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')
exec sql select row_length into :RecordLength
from systables
where Table_name=:FileName
and Table_Schema=:LibraryName;
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-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