Verkettung mit NULL:0 in Free

[Sebastian85]

Hallo

Ich bin gerade dran, alte RPG IV -Programm in FullFree Form umzuwandeln. Dabei stoße ich immermal an meine Grenzen. Auch in diesem Fall:

* Variable
D F1 S 32A

C EVAL F1 = '-a' + PGMID
C F1 CAT NULL:0 F1

Jetzt meine Frage, wie kann der Opcode CAT mit dem Faktor2 NULL:0 in FullFree umgewandelt werden. Ich weis nicht, wie ich den NULL:0 in Free schreibe.

Weis jemand in diesen Fall rat?

[dschroeder]

So wie ich das verstehe, ist NULL bei dir einfach eine Variable oder Konstante, die ohne Leerzeichen an f1 gekettet werden soll.

Das müsste so gehen:

f1 = %trimr(f1) + null;

Dieter

[Sebastian85]

Hallo dschroeder,

null bzw NULL kennt FullFree RPG nicht. Dafür verwende ich x'00'
Aber der Hinweis mit dem %TRIMR ist richtig gut. Das hat mir gefehlt.

F1 = %trimr(F1) + x'00';

Vielen Dank