Re: [MI400] unknown block length

[Gene_Gaunt@xxxxxxxxxxxxxxx]

By the way, after database file open with UFCB, the following gets the
number of records and the record length from the open feedback:

dcl spcptr ?OpenDataPath;
dcl spcptr ?InputBuffer;
dcl spcptr ?OutputBuffer;
dcl spcptr ?OpenFeedBack;
/* etc. -- rest of UFCB */

dcl RecordLength bas(?OpenFeedBack) pos(H"2D") bin(2);
dcl RecordCount bas(?OpenFeedBack) pos(H"4C") bin(4);