Du wirst lachen, aber für Cobol gibts das ganz genauso.

Einziger Unterschied:
Für SQL muss man Felder explizit zugänglich machen:

exec sql begin declare section end-exec.
01 ...
77 ...
exec sql end declare section end-exec.

Dies kann in der Quelle beliebig oft wiederholt werden.

Zusätzlich muss man einmalig die SQLCA einbinden:

exec sql
include SQLCA
end-exec.

Alle anderen SQL-Befehle werden genauso eingebunden wie in RPG/LE.

exec sql
:
:
end-exec.

Für die Fehlerbehandlung ist es am einfachsten am Anfang der Procedure Division einmalig

exec sql
whenever sqlerror continue
end-exec.

einzubinden. Dann kann man die Variable SQLCODE direkt auswerten.

Der Member-Typ ist SQLCBL bzw. SQLCBLLE.