BigInt Variable aus Pointer String extrahieren

[Fuerchau]

dcl-s ptr pointer;

dcl-s bigint int(20) based(ptr);

pointer = %addr(buffer) + posbigint;

Posbigint ist die relative Position eines Feldes im Gesmtpuffer, start ist 0.