varchar in CL

[wilfried]

HAllo, ich habe mit RTVDIRINF eine Datei erstellt, die ich jetzt im CL abarbeiten möchte.


DCLF FILE(C_IFS2O) OPNID(C_IFS2O) ALWVARLEN(*YES) ALWNULL(*YES) ALWGRAPHIC(*YES)

RTVDIRINF DIR('/') SUBTREE(*NONE) INFFILEPFX(C_IFS2) INFLIB(ATSCWI)

* lesen aller pfade und entsprechende verarbeitung. */
X1:
RCVF OPNID(C_IFS2O)
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(X3))

CHGVAR VAR(&PATH) VALUE(%SST(&C_IFS2O_QEZOBJNAM 3 1024))


Aber in der Variable &PATH kommen nur Fragezeichen heinein ..... ???
Das Problem scheint zu sein, dass das Feld QEZOBJNAM in dieser Datei als "VARGRAPHIC" definiert ist.

Wie kann ich das Konvertieren?

[Fuerchau]

In CLP so erst mal nicht.
In den ersten beiden Stellen steht per %bin() die Länge der Zeichen, danach folgt Unicode.
Am Einfachsten wandelst du das per ILERPG mittels Eval von Uncode in Char.
Du kannst es auch kompliziert per API-Aufruf durchführen.