RPGLE/CLLE, CALLPRC, MCH3601, Länge des RückgabeParm

[COS]

OS400_V5R2 mit PTF_Stand: TL-05-263

aus einem CLLE wird per CALLPRC eine Prozedur (ServicePgm + RPGLE_Modul) aufgerufen, der Rückgabewert war zuerst char(1)
identische Länge sowohl im CLLE wie auch in der RPG_Proc.

CALLPRC PRC(GETxxyyy) PARM(&Parm1 &Parm2) RTNVAL(&RTNVAR)

dann kam im CLLE immer MCH3601 "Zeiger für angegebene Position nicht gesetzt. "

wird im CLLE der Parameter von char(1) auf char(2) verlängert,
und auch in der RPGLE-Procedure auf 2A verlängert, so kommt kein MCH3601 mehr !!!???

ist das ein Fehler oder ein Feature ??
gibt es dafür ein PTF oder wer hatte eine ähnliche Situation ??

wie gesagt - es geht um die LängenDefinition von
DCL VAR(&RTNVAR) TYPE(*CHAR) LEN(1)
oder
DCL VAR(&RTNVAR) TYPE(*CHAR) LEN(2)

[Robi]

Hi,
der Fehler kommt immer wenn das gerufene Programm mit einem nicht empfangenen Parameter arbeitet.
call pgm_a
Parm eins
Parm zwei

und in PGM_a (CLLE)
PGM Parm(&eins &zwei &drei)
( oder eben procedur parm empfang)
...
chgvar &drei 'Beispiel' --> MCH3601

hilfts ?
Robi

[COS]

Hi,
der Fehler kommt immer wenn das gerufene Programm mit einem nicht empfangenen Parameter arbeitet.
call pgm_a
Parm eins
Parm zwei

und in PGM_a (CLLE)
PGM Parm(&eins &zwei &drei)
( oder eben procedur parm empfang)
...
chgvar &drei 'Beispiel' --> MCH3601

hilfts ?
Robi

es mag sein, daß dann (Anzahl der Parameter ungleich) dieselbe Fehlermeldung kommt,

ich bin mir aber absolut sicher, daß das in meinem Fall nicht zutrifft,
da ich sowohl auf die Anzahl der Parameter wie auch auf deren Länge jeweils genau geachtet hatte.
Auch hatte ich alle Objekte gelöscht und alle beteiligten Komponenten vollständig neu compiliert - hat alles nichts geholfen.

Das Problem ist &RTNVAR ,
mit Länge 1 funktioniert es nicht,
mit Länge 2 alles o.k.

[Robi]

ja, erinner mich jetzt.
sowas hatten wir auch mal, allerdings mit einem numerischen rückgabewert. und nur wen der rufende ein CL ist.
is wohl n Fehler. aus RPGLE geht's
Robi

[B.Hauser]

Das Problem ist &RTNVAR ,
mit Länge 1 funktioniert es nicht,
mit Länge 2 alles o.k.

Soweit ich mich richtig erinnere tritt dieser Fehler unter Release V5R2M0 und früher auf! Und wurde auch nie behoben.

Ab Release V5R3M0 sollte der Fehler eigentlich nicht mehr auftreten. Wir definieren in solchen Fällen die Rückgabe-Werte im CL mit 2A.

Birgitta