Danke für die Antwort.

Habe mich nun ein wenig damit "gespielt" und folgendes probiert:
Das scheint zu funktionieren:

DCL VAR(&In_Parm) TYPE(*CHAR) LEN(10)
DCL VAR(&Work_Parm) TYPE(*CHAR) LEN(10)
DCL VAR(&nullptr) TYPE(*PTR)

IF COND(%ADDR(&In_Parm) *NE &NULLPTR) THEN(DO)
chgvar var(&Work_Parm) value(&In_Parm)
enddo


CALL PGM(PGM01) PARM(&Work_Parm)

Ich prüfe da einfach mit hilfe von %ADDR ab ob der Input-Parm eine Adresse enthält.
Ist das ein gangbarer Weg?

LG