cpyf - bin verwirrt.

[Edefauler]

...ja helfen wirds nicht viel- aber einen workaround (es gibt ne Technote zu dem Problem- aber der beschriebene Weg funktioniert bei mir irgendwie auch nicht) werden sie mir wohl aufzeigen können.

[Edefauler]

@Dieter: ...ich übergebe auch nicht wirklich AAA... ich habe eine Variable &var (*char 10) mit dem Inhalt 'AAA '.
Also 3xA und 7x Blank.
Sorry- da hatte ich mich ein bisschen ungenau ausgedrückt.

[Edefauler]

IBM hat nen Workaround für mich:

PGM
DCL VAR(&VAR) TYPE(*CHAR) LEN(10) +
VALUE('AAA')
DCL VAR(&CMD) TYPE(*CHAR) LEN(200)

CHGVAR VAR(&CMD) VALUE('CPYF FROMFILE(TESTBIB/ELW) +
TOFILE(QTEMP/ELW) MBROPT(*ADD) +
CRTFILE(*YES) INCREL((*IF UPUPRF *EQ ''' +
*CAT &VAR *CAT '''))')
CALL PGM(QCMDEXC) PARM(&CMD 200)

ENDPGM