View Full Version : Datei-Definition in Free-RPG
loeweadolf
08-12-19, 17:26
Unter V7R3 möchte ich in einem gemixten Programm (teilweise Fix, teilweise Free RPG) eine Datei-Definition in RPG angeben, Geht das nicht ? Ich bekomme im SEU immer den Fehler: "Für die Operation EVAL wird ein Zuordnungsoperator erwartet".
F SFILE(FS0001:ZEIL1)
/free
dcl-f HHPERSPF keyed
extdesc('HHPERSPF') // Umwandlungszeit
extfile(*extdesc) // Laufzeit *extdesc=Datei wie Laufzeit
usage(*input:*update:*delete:*output)
RENAME(HHPERS:HHPERS_PF);
/end-free
FLOOME3X1 IF E K DISK
Nimm dafür RDi, der SEU unterstützt die neuen Formate nicht und wird es auch wohl nie.
Die /free und /end-free sind da nicht mehr relevant und waren sowieso nur im C-Teil erlaubt.
loeweadolf
08-12-19, 20:51
okay, dann weiß ich Bescheid. Vielen Dank für die schnelle Antwort.
Guten Morgen loeweadolf, wenn du, so wie ich beim Kunden, kein RDI hast, dann kannst du die Anweisungen trotzdem im SEU schreiben. Der SEU "beschwert" sich, aber der Compiler macht das dann richtig. :-))
Es gibt halt keine Unterstützung ob deine Syntax richtig ist.
Klaus
loeweadolf
09-12-19, 15:43
Guter Hinweis. Danke K_Tippi.
andreaspr@aon.at
09-12-19, 20:23
Ich habe grundsätzlich im SEU die Syntaxprüfung abgeschaltet.
Spätestens beim Fully-Free ist die Prüfung komplett zum vergessen.
KingofKning
10-12-19, 07:28
Ich habe grundsätzlich im SEU die Syntaxprüfung abgeschaltet.
Spätestens beim Fully-Free ist die Prüfung komplett zum vergessen.
Wie geht das?
Dumm die Dumm weiterer Fülltext
Gehe in eine Quelle mit "2" = Editieren rein.
Dann F13
und bei Syntaxprüfung ein "N" eingeben.
Und schon ist diese ausgestellt
Gruß
Ronald