STRPCCMD ohne STRPCO erzeugt keinen Fehler?

[AndreasH]

Hallo Forum,
ich habe mehr durch Zufall bemerkt, dass ein STRPCCMD ohne vorheriges STRPCO zwar einen 40er Fehler im Joblog versuchsacht, aber weder auf %error noch monitor abfragbare Ergebnisse erzeugt.
Im Normalfall haben alle unsere Dialoguser ein Startprogramm, dass STRPCO "auf Verdacht" absetzt, weil wir recht viele PC Programme aus der 5250 Anwendung aufrufen.
Nun hat ein schlauer Programmierer (nein, nein, ich wars nicht :D ) sich sein eigenes Startpgm geschrieben und den STRPCO prompt vergessen.
Dieses Coding habe ich mal zum Testen gemacht.
AS400CMD ist einfach Prototyped qcmdexec.
Die DOS.BAT erzeugt die Datei, falls sie nicht vorhanden ist und ruft sie mit START auf.
in w#doc steht mydoc.doc drin, die sich im root laufwerk C: befindet.



monitor;
as400cmd('Strpccmd ' + '''' +
'C:\AS400_DTA\AS400CMD.BAT ' + w#doc + '''' :512);
on-error *all;
CALLP(E) AS400CMD('strpco':6);
callp(e) as400cmd('Strpccmd ' + '''' +
'C:\AS400_DTA\AS400CMD.BAT ' + w#doc + '''' :512);
endMon;


ich hätte erwartet, dass Monitor hier anspringt, weil ein IWS4008, Bewertung 40 an den Job geschickt wird.
Auch die MSGID und MSG-Text der SDS sind leer.

Jemand eine Idee, wie ich den Fehler abfangen kann?

Danke!


Für Neugierige hier noch kurz die dos.bat


@echo off
c:
cd \
if exist %1 goto runapp
copy C:\AS400_DTA\empty %1
:runapp
start %1
exit

[Fuerchau]

Mit Monitor leider gar nicht, da dieser nur ESCAPE-Nachrichten überwacht.
Im CLP geht das schon eher, ich muss nur einen RCVMSG absetzen, der entweder die Fertigmeldung oder die Diagnosemeldung empfängt.

[AndreasH]

danke für die schnelle Antwort.
Dann werde ich wohl ein CLLE module aufrufen müssen, dass mir die message einliest.

Frage beantwortet