Anmelden

View Full Version : CL - sind optionale Entry-Parameter möglich ?


HeymannJ
22-01-09, 12:50
Hallo *All,

besteht im CLLE die Möglichkeit, ähnlich wie im RPGLE, Parameter optional an das Programm zu übergeben "options(*nopass)" und anschl. die Anzahl der übergebenen Parameter mit %parms abzufragen

vielen Dank im voraus
rmittag
22-01-09, 13:02
x: pgm (&pWert)

dcl &pWert *char (10)
dcl &Wert *char (10)
dcl &xWert *lgl *n '1'
dcl &pCount *dec (5 0) 1

chgvar &Wert &pWert
monmsg cpf0000 exec(do)
chgVar &Wert '*N/A'
chgVar &pCount (&pCount - 1)
chgVar &xWert '0'
enddo
HeymannJ
22-01-09, 13:55
Hallo rmittag,

das ist ja schon mal nicht schlecht. Funktioniert das auch mit per Pointer übergebene Parms (*PTR)

mfg
J.Heymann