> Let's take a simplified example.
> I want to create a file with a 2 byte record with x'a1b2' as the contents.
>
> I use FD to define two fields, each one byte long:
> FD NAME=BYTE1,LENGTH=1,STARTLOC=1,PICTURE=161
> FD NAME=BYTE2,LENGTH=1,STARTLOC=2,PICTURE=178

IEBDG definitely isn't an easy way to do it, but if you really want to
use it, then the following works:

FD NAME=BYTE1,LENGTH=1,STARTLOC=1,PICTURE=3,B'161'
FD NAME=BYTE2,LENGTH=1,STARTLOC=2,PICTURE=3,B'178'
CREATE QUANTITY=1,NAME=(BYTE1,BYTE2)

Regards,
Allen

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to