Funktion 'SYSTEM' in Ile Cobol aufrufen oder CL-Befehl mit Returncode

[rebe]

Hallo Dieter,

wie geht denn Variablen importieren?
Ich kenne nur "copy member of sourcedatei".

Ich kann die Prozedur SYSTEM nicht aufrufen.

IDENTIFICATION DIVISION.
PROGRAM-ID. T4.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 cl-cmd pic x(256).
77 fehler pic s9(9) comp-4.

PROCEDURE DIVISION.
H1.
move "DLYJOB DLY(2)" to cl-cmd
call procedure "SYSTEM" using cl-cmd returning fehler
goback.


Ich wandle das Programm um mit CRTBNDCBL mit Binderverzeichnis QC2LE. Fehlermeldung:

Nachricht . . . : Definition für Symbol 'SYSTEM' nicht gefunden.
Ursache . . . . : Für Referenz SYSTEM in *MODULE Objekt T4 der Bibliothek
QTEMP wurde keine Definition gefunden. Entweder ist die Definition nicht
vorhanden, oder sie gehört nicht zu demselben Datentyp oder derselben
Prozedurart wie die Referenz. Fehlerbeseitigung: Den Befehl CRTPGM
(Programm erstellen) wiederholen, wobei ein Objekt angegeben wird, das eine
Definition für Symbol SYSTEM enthält.

Was mache ich falsch?
Vielen Dank für Hinweise schon mal.

Grüße
Reiner

[Fuerchau]

Siehe oben:

process NOMONOCASE <= Namen nicht in Grossbuschstaben

Der Name der Prozedur ist "system" und nicht "SYSTEM", casesensitive.

[rebe]

"system" klein habe ich probiert.
Macht das Umwandlungsprogramm raus:

* 10 ID: LNC0047 BEW.STUFE 20 FOLGENR. 001400
Nachricht . . . : Programmname '"system"' ist ungültig. Als
'"SYSTEM"' akzeptiert.

Und dann kommt wieder die gleiche Fehlermeldung wie angegeben.

Muß ich da beim Umwandeln noch einen Schalter setzen?

Reiner

[Fuerchau]

Ok, kleiner Fehler von mir.

Vor der IDENTIFICATION DIVISION füge folgende Zeile ein:

Process nomonoprc

[rebe]

Ich glaube, das geht so nicht.
Habe Process system eingefügt in die Quelle.
Die Umwandlungsliste sagt:

* ID: LNC0026 BEW.STUFE 10 FOLGENR. 000100
Nachricht . . . : Auswahl erwartet, 'SYSTEM' gefunden. 'SYSTEM'
ignoriert.
* 10 ID: LNC0047 BEW.STUFE 20 FOLGENR. 001500
Nachricht . . . : Programmname '"system"' ist ungültig. Als
'"SYSTEM"' akzeptiert.

[Fuerchau]

Dann noch mal gaaaaaanz deutlich:

Process nomonoprc

[rebe]

Danke Herr Fürchau, jetzt habe ichs kapiert und es funktioniert.

Reiner