Hallo
eine kruze Frage, vllt. kenne ja jemand von euch die Lösung!
Folgende DS ist gegeben
Code:
D dsRcvVar DS qualified
D BytesReturn 1 4B 0
D #Bytes_Avail 5 8B 0
D SplfName 9 18
D jobname 19 28
D username 29 38
D jobnr 39 44
D splfnr 45 48B 0
D #Job_SysNam 49 56
D #Splf_Dat 57 64
D #Reserved 65 65
D #Splf_Time 66 71
Nun möchte ich diese DS in Fully Free übernehmen, aber ich scheitere immer an der Binary Declaration.
So sieht es bei mir aus:
Code:
dcl-ds dsRcvVar qualified;
jobName char(10) pos(19);
userName char(10) pos(29);
jobNr char(6) pos(39);
splfNr bindec(4:0) pos(45);
end-ds;
Ich dachte dies wäre richtig, aber im Programm bekomme ich immer nur eine 0 ausgegeben, obwohl da 82 stehen müsste.
Bookmarks