David:
Speaking of Sort...
20+ years ago I created a data tape for testing sort out. It was
essentially an 80 byte record with 20 4 byte sort "keys". I created a
million records using IEBDG and it really put any sort I threw at it
to a heavy duty test. All fields were binary and random. Once I got
through the control cards the process was painless. My memory is
cloudy here but I think I ran into issues like yours understanding
what IEBDG was really asking for.
Ed
On Jan 18, 2012, at 4:58 PM, Donald Russell wrote:
Thanks very much for this working example.
What threw me was the format of the PICTURE= clause... I didn't
realize the
"length" was the number of digits to parse in the B'...' part....
you'd
THINK that would be unnecessary as it would just count them
itself. :-) I
did try specifying the length of the field, which I also thought was
redundant as I already coded LENGTH= for the field.
I know, IEBDG was probably written in the 1960's :-)
I also learned about SORT... I never think of using sort for
copying data
or this sort of "translation".
Thanks again for all the replies.
Cheers
On Tue, Jan 17, 2012 at 17:42, Gainsford, Allen
<[email protected]>wrote:
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
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
