View Full Version : Problem QCMDEXC unter V7R3
andimichel
07-08-17, 10:38
Hallo.
In einem RPG Druckprogramm wird ein QCMDEXC abgesetzt für ein OVRPRTF.
Etwa so
367 C CALL 'QCMDEXC'
368 C PARM $QCMD
Inhalt des Parameters ist.
$QCMD =
....5...10...15...20...25...30...35...40...45...50 ...55...60
1 'OVRPRTF QSYSPRT SHARE(*YES) DRAWER(1) OUTQ(PRTBL13) '
61 ' ‚
Der Befehl wird nicht ausgeführt und er Druck landet immer auf dem Standarddrucker des Jobs. Das bestehende Programm läuft nur bei Neuerstellung klappt das nicht mehr.
Hat jemand eine Idee?
RobertMack
07-08-17, 10:49
Da fehlt was...
$QCMDLEN = %Len(%Trim($QCMD)) oder fix 60
call qcmdexc
parm cmd
parm laenge 155 --> %Len(%Trim(CMD))
oder ein OVRSCOPE(*job) fehlt.
Wenn der DFT für o.g. Schlüsselwort auf *ACTRPG steht, und das PGM eine ILE Pgm ist, muß der OVR auf JOBEBENE laufen
(Dann stimmt die 60 nicht, der %len... ist immer besser)
Robi
andimichel
07-08-17, 12:26
Danke für die Hinweise.
Es liegt an OVRPRTF ! Ein ADDLIBLE zum Beispiel wird ausgeführt.
Fällt euch noch was ein ?
ist das RPG ein ILE Pgm ( RPGLE )
in welcher actgrp läuft es
ist im OVRPRTF Befehl ein OVRSCOPE(*JOB) angegeben?
oder ...
Hat das Joblog einen Fehler? (Klammer fehlt, '+' im Text, Hochkomma Fehler ...)
RobertMack
07-08-17, 13:07
MOVEL nach CMD ohne Inz oder "P"atch,
CAT ",":0
...
SBMJOB nach dem OVRPRTF
Ist der Priterfile eventuell schon geöffnet, so das der OVR gar nicht erst greift?
Gruß
Ronald
RobertMack
07-08-17, 13:12
...er schreibt ja, "das bestehende Programm läuft". Es hat also mit dem Compile in V7R3 zu tun...
deswegen ja ...
alte Kiste, ILE Umwandlung in standartaktivierunggsgruppe = OPM
neue Kiste, ILE Umwandlung nach QILE --> OVR mit Overscope(*actgrpdfn) geht nicht mehr
andimichel
07-08-17, 14:18
Vielen Dank an Alle.
OVRSCOPE(*JOB) war die Lösung, damit der Overwrite wieder funktioniert.
Ich bin kein Programmier und kenne mich mit Aktivierungsgruppen nicht aus.
Könnte mir das jemand, zum Abschluss, kurz erklären.
Danke
Gruß Andreas