Hi everybody,

I'm trying to read byte-by-byte (or groups) a RECFM=U dataset with a READ
macro.

I read the post-answer by Steve Myers:
http://ibmmainframes.com/about63436.html

and everything was ok up to a small change in order to read some bytes and
not the entire block.

READ  IDECB,SF,IDCB,(10),'S'     everything is OK

READ  IDECB,SF,IDCB,(10),4       S001

What i obtain is a S001-1

IEC020I 001-1,J48017J,ST020,INPUT,A477,PRZZ9F,
IEC020I JZPT.SQBN0G.J48017.SMF30.U
IEC020I NO ERROR HANDLING, (SYNAD), EXIT SPECIFIED

It seems that specifying the number of bytes is allowed for RECFM=U.

Any hint ?

To be clear, I've a file with a VBS format (BDW+RDW+data) in a undefined
format and need to go back to a VBS dataset.

Thanks a lot.
Massimo

Reply via email to