MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » July 2008

Re: Retrieve record length in a C/L program



fixed

Sure. But RPGLE allows you do to this:
D RecordLength s 5i 0
D FileName s 10a inz('SYSDUMMY1')
D LibraryName s 10a inz('SYSIBM')
/free
*inlr=*on;
exec sql select row_length into :RecordLength
from systables
where Table_name=:FileName
and Table_Schema=:LibraryName;
/end-free
If you want to figure out the record I/O in CL, good luck.



Rob Berendt





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 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