ILE aus /36 aufrufen

[Norbertf]

Liebes Forum,

bisher habe ich immer nur fleißig mut gelesen und auch schon viele Lösungen für meine Problem hier gefunden.
Nun hätte ich aber mal direkt eine Frage. Ich habe da noch jemanden mit einer /36-Lösung. Diese läuft auf einer i5 mit OS 5.4.
In /36 will nun aber wohl wirklich keiner mehr programmieren. Deshalb habe ich einen Wunsch in ILE gelöst. Dieses Programm muss immer laufen, wenn in der 36er-Umgebung eine bestimmte Procedure ab gearbeitet worden ist.
Gibt es eine Möglichkeit aus der 36er-umgebung das ILE-Programm an zu schubsten ?
Sonnst muss immer jemand daran denken es zu starten, wenn auf der 36er-Seite die Procedure durch ist.

Gruß
Norbert

[Fuerchau]

Ein ILE-Programm kannst du in der Prozedur genauso aufrufen wie ein normales CLP/RPG.
Wo ist also das Problem?

[Norbertf]

Okay,
manchmal ist es doch so nahe liegend (*schäm*).
Hätte ich ja auch mal einfach ausprobieren können.
Dachte mit dem // LOAD PGM001 ... und // RUN geht nur mit dem 36er-Kram.

Danke
Norbert

[Brownie]

0005.00 **
0006.00 CHGJOB SWS(10000000)
0007.00 **
0008.00 // IFF DATAF1-J.USTSUM BLDFILE J.USTSUM,I,R,200,128,,T,1,10,DFILE,,00100
0009.00 // IFF DATAF1-J.B.FSPE BLDFILE J.B.FSPE,S,R,1000,200,,,,,DFILE,,05000
0010.00 // IFF DATAF1-J.B.ATST BLDFILE J.B.ATST,I,RECORDS,1,80,,T,1,9
0011.00 // IFF DATAF1-J.B.EIN5 BLDFILE J.B.EIN5,S,R,1000,200,,,,,DFILE,,05000
0012.00 // * '************************************************* *************'
0013.00 // * 'WW ÜBERNAHME DER DEBITOREN-RECHNUNGEN IN DIE FIBU OFPO ***'
0014.00 // * '************************************************* *************'
0015.00 CALL PGM(FUS906WWCL)

[Norbertf]

Danke!

So einfach ist das am Ende. Die 36er-Welt ist nicht meine Welt gewesen.
Bevor ich auf die AS/400 gekommen bin, war ich in den 90zigern auf einer IBM S/390 am werkeln.

Gruß
Norbert