Prozeduraufruf in Serviceprogramm durch externes Programm

[Fuerchau]

Stimmt, habe ich übersehen.
Auch bzgl. des Returnwertes solltest du ggf. keinen Pointer (%ADDR) zurückgeben sondern direkt ein Zeichenfeld, ggf. auch mit VARYING.
Auch weiß ich nicht, was dir "%str(%addr(getlabz))" liefern soll.
"getlabz" muss ein Pointer sein da deine Prozedur einen zurückgibt.
%addr liefert dir nun die Adresse des Pointers im Speicher.
%str versucht nun davon einen Nul-terminerten String zu laden.
Korrekt wäre da eher "%str(test(p12))", wenn der Return deiner Funktion auch einen C-String liefert.

Besser und übersichtlicher sind allemal native RPGLE-Variablen. Pointer sind eher was für API's.

[dholtmann]

Dankeschön!
Habs inzwischen wie vorgeschlagen gelöst.
Ich gebe direkt das Char Feld zurück.
Das funktioniert jetzt einwandfrei.

Eine letzte Frage habe ich noch.
In meinem Serviceprogramm habe ich jetzt eine Datei eingebunden,
im Aufrufprogramm jedoch nicht.
Muss ich das Aufrufprogramm noch einmal wandeln, wenn die Datei erweitert wird?

[Fuerchau]

Nein, wieso?
Ein Levelcheck passiert nur beim Open und den macht ja das Service-Pgm.
Nun rate mal, wer neu umgewandelt werden muss...
Wenn du allerdings eine E_DS definierst und diese Struktur als Parameter austauschst, ist natürlich jeder der das verwendet betroffen.

[dholtmann]

Ja super,
das hatte ich mir auch überlegt.
Lag wahrscheinlich nur daran, dass ich noch auf das alte Objekt zugegriffen habe?
Dankeschön!