Kein Video. Keine Folien. Du liest, du schreibst Code, du fragst — und ein KI-Tutor erklärt dir genau das was du nicht verstanden hast. 50 Lektionen + 5 Abschlussprojekte auf einem echten IBM i System.
Lektion 1 gratis — keine Kreditkarte
DOW NOT %EOF(AUFTRAGPF); READ AUFTRAGPF; IF NOT %EOF(AUFTRAGPF); // Satz verarbeiten GESWERT += POSGESWERT; ENDIF; ENDDO;
Das DOW-Statement prüft die Bedingung vor dem ersten Durchlauf. Das bedeutet: wenn die Bedingung schon beim Start falsch ist, läuft die Schleife kein einziges Mal.
DOW NOT %EOF(AUFTRAGPF); READ AUFTRAGPF; IF NOT %EOF(AUFTRAGPF); // Satz verarbeiten GESWERT += POSGESWERT; ENDIF; ENDDO;
READE liest nur Sätze mit demselben Schlüssel wie zuletzt gelesen. Wechselt der Schlüssel, setzt %EOF auf *ON — auch wenn noch Sätze in der Datei sind.
Du liest eine Datei mit READE. %EOF wird *ON. Was bedeutet das in diesem Kontext?
* 3-Tages-Seminar, pro Person, inkl. durchschnittlicher Reisekosten
Kein anderer IBM i Kurs bietet das: Du hast eine Frage mittendrin in der Lektion — du tippst sie, du bekommst eine Antwort. Kein Warten auf ein Forum. Kein Trainer der nächste Woche Zeit hat.
Jede Lizenz hat Zugriff auf das Manager-Dashboard. Du siehst den Lernfortschritt aller Lerner, kannst neue Zugänge einladen und Lizenzen jederzeit neu vergeben.
Jede Phase schließt mit einer konkreten Fähigkeit ab. Ab Phase 2 kommen Abschlussprojekte dazu — echte Programme auf einem echten IBM i System.
Du kennst das System: Navigation, Bibliotheken, CL-Programme, Batch-Jobs, Journaling.
Du schreibst eigenständig Free-Format RPGLE: Dateizugriff, Schleifen, ILE, Subfiles, Debugging.
Du arbeitest mit Datenbanken: DDS, Embedded SQL, JOINs, GROUP BY, Commitment Control.
Du entwickelst mit VS Code, Git, REST APIs und Open Source auf IBM i.
Du verstehst ERP-Strukturen: Kopf/Position, Auftrag → Rechnung → Lieferschein.
Nach den Lektionen kommt die Praxis: 5 größere Projekte, die du auf pub400.com umsetzt — dem kostenlosen, echten IBM i System für Azubis. Kein Tutorial das man nachklickt — echte Programme die laufen.
**FREE DCL-PI KVANLPGM; P_KUNDNAME VARCHAR(50); P_PLZ CHAR(5); P_ORT VARCHAR(30); P_ERRMSG VARCHAR(200); P_OK CHAR(1); END-PI; // Neue Kundennummer aus Sequence EXEC SQL VALUES NEXT VALUE FOR FIRM001.KUNDNRSEQ INTO :W_KUNDNR; // Kunden in Datenbank anlegen EXEC SQL INSERT INTO FIRM001.KUNDENPF (KUNDNR, KUNDNAME, KUNDPLZ, KUNDORT) VALUES (:W_KUNDNR, :P_KUNDNAME, :P_PLZ, :P_ORT);
Mehr als 20 Lizenzen? Rechnungskauf, Onboarding-Call, SLA. Kontakt aufnehmen →
Lektion 1 vollständig kostenlos — kein Konto, kein IBM i System nötig.
Lektion 1 starten →