Hallo Gemeinde,
brauche da mal wieder Hlfe zur QShell.
Die habe ich in einem RPG eingebunden. Wenn ich das Programm auf der Grünen Zeile aufrufe,
dann ist alles Okay. Läuft das Teil im Batch, macht er nix. Ich sehe auch nichts im Joblog.
Das gleiche (nur ein anderer Pfad) läuft auf diversen anderen Kisten ohne Probleme..
PHP-Code:
h DftActGrp(*no) BndDir('QC2LE') Option( *NoDebugIO )
h DatFmt(*dmy.) TimFmt(*hms:) DatEdit(*dmy.) DecEdit('0,') Debug(*yes)
....
* Prozeduren
d System pr 10i 0 extproc('system')
d * value options(*string)
* Datenbereiche
d Pfadname s 255 dtaara( MyDtaara )
/free
In *Lock PfadName; // Holen Pfad-IFS aus DTAARA
Out PfadName;
// Lesen IFS mit Hilfe der QSH
system( 'qsh cmd(''ls ' + %Trim( PfadName ) +
' >/qsys.lib/MyLib.lib/MyFile.file/MyFile.mbr ' +
'2>/dev/null'')' );
/end-free
Und Mylib ist dabei nicht die QTEMP
Gruß
Ronald
Bookmarks