msost
19-11-10, 09:41
Hallo,
ich habe ein Programm das eine externe Prozedur startet. Die soll einen Wert zurückliefern. In der Return Zeile der Prozedur sieht die Datenstruktur die den Wert beinhaltet super aus.
Das Feld Iniret in der Prozedur ist lokal definiert mit likeds genauso wie die Datensruktur Inireturn. War ne Verzweiflungstat.
Leider kommt im aufrufenden Programm nix an. *grübel.
OS/400 ist V5R4M0.
Wäre für 'n Tip dankbar!
Aufrufendes Programm:
clear Inireturn;
callp UTC_Init();
if not Inireturn.status.error = *on;
Prototyp (In Copystrecke, also in Programm und Przedur gleich):
d UTC_Init PR likeds(Inireturn)
Prozedur:
return Iniret;
ich habe ein Programm das eine externe Prozedur startet. Die soll einen Wert zurückliefern. In der Return Zeile der Prozedur sieht die Datenstruktur die den Wert beinhaltet super aus.
Das Feld Iniret in der Prozedur ist lokal definiert mit likeds genauso wie die Datensruktur Inireturn. War ne Verzweiflungstat.
Leider kommt im aufrufenden Programm nix an. *grübel.
OS/400 ist V5R4M0.
Wäre für 'n Tip dankbar!
Aufrufendes Programm:
clear Inireturn;
callp UTC_Init();
if not Inireturn.status.error = *on;
Prototyp (In Copystrecke, also in Programm und Przedur gleich):
d UTC_Init PR likeds(Inireturn)
Prozedur:
return Iniret;