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

This thread ...


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