-
SQL in COBOL ist wirklich denkbar einfach:
Dateityp SQLCBL oder SQLCBLLE (ich bevorzuge letzteres).
Alle SQL-Anweisungen beginnen mit EXEC SQL und enden mit END-EXEC und werden erst ab Bereich B Spalte 12 bis Spalte 71 akzeptiert.
Im Gegensatz zu RPG muss ich SQL-Hostvariablen explizit deklarieren, also:
WORKING STORAGE SECTION.
: die üblichen Definitionen
:
:
EXEC SQL SET OPTION ....
END-EXEC.
EXEC SQL INCLUDE SQLCA <= Wie Birgitta schon sagte, muss explizit eingebunden werden.
END-EXEC.
EXEC SQL BEGIN DECLARE SECTION
END-EXEC.
77 ...
01 ....
EXEC SQL END DECLARE SECTION
END-EXEC.
Alles zwischen BEGIN und END kann als SQL-Hostvariablen verwendet werden.
DECLARE-Sections kann es durchaus mehrfach geben (WORKING-STORAGE, LINKAGE).
In der PROCEDURE DIVISION kannst du dann ganz normales SQL überall einbetten.
EXEC SQL DECLARE GETDATA CURSOR FOR
SELECT ...
WHERE FELD = : MYHOSTVAR OF STRUKTUR
AND FELD2 = "ABCD"
END-EXEC
Einzige Einschränkung die ich bisher gefunden habe:
Da COBOL per Default nur 18-Stellig dezimal kann (PROCESS EXTEND31 / EXTEND63) akzeptiert der SQL-Precompiler keine Hostvariablen größer 18 Stellen.
Sollten diese benötigt werden kann man diese nur als z.B. PIC X(31) und als CAST-Funktion verwenden.
COBOL akzeptiert Konstanten wahlweise in Hochkommata (Warnmeldung 10 oder PROZESS APOST) oder Anführungsstrichen.
COBOL-Embedded SQL akzeptiert Konstanten ausschließlich in Anführungsstrichen!
Werte in Hochkommata wird als casesensitiver Feldname interpretiert.
Merken tut man das fast ausschließlich zur Laufzeit!
Vor Einführung der Globalen Variablen meckerte der Compiler das Fehlen von Variablen an (in Tabelle nicht gefunden).
Seit Einführung dieser Variablen (V7R1?) geht der Precompiler nun davon aus, dass das ja später globale Variablen sein könnten. Tippfehler werden also erst zur Laufzeit bestraft.
Und der Rest ist dann halt einfach SQL.
Similar Threads
-
By tarkusch in forum NEWSboard Programmierung
Antworten: 7
Letzter Beitrag: 29-06-14, 15:12
-
By tarkusch in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 02-06-14, 09:45
-
By Ludger Muhmann in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 30-07-02, 09:49
-
By Joshua in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 11-04-02, 09:42
-
By Stefan_R in forum IBM i Hauptforum
Antworten: 0
Letzter Beitrag: 12-10-01, 09:47
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks