Hi Scott! Also.... don't forget the new integer data types in V5R3 CL ... it keeps you from needing to use %BIN DCL VAR(&Offset) TYPE(*UINT) /* Unsigned 4 byte binary integer */ DCL VAR(&Offset) TYPE(*UINT) LEN(2) /* Unsigned 2 byte binary integer */ DCL VAR(&Length) TYPE(*INT) /* Signed 4 byte binary integer */ DCL VAR(&Length) TYPE(*INT) LEN(2) /* Signed 2 byte binary integer */ Dan Riehl The Powertech Group, Inc. >> Naturally, in V5R3 you'd want to use DOWHILE instead of a GOTO, but I >> wasn't sure what release you were using, so I gave you code that will >> work >> on any release.
This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact