cmuncan
New User
Joined: 14 Sep 2007 Posts: 1 Location: Waterloo, Ontario
|
|
|
|
Hi there. I was doing some searching through the board but couldn't get anything working properly for me. I found a similar thread and it is near what I am looking for but unfortunately I'm getting "odd" results. Plus I haven't used DFSORT in a long time though...
My inputs are both 80 bytes (they are control cards) and my output is still 80 bytes. and in fact, my input data is only 31 bytes of data so I am trying to "combine" 2 records into 1
Input File - LRECL 80
Code: |
DDDDDD XXXXXXX 0263 0264 0261
DLLLL XXXXXXX 0385 0376 0375
|
Output file should be:
Code: |
DDDDDD XXXXXXX 0263 0264 0261 DLLLL XXXXXXX 0385 0376 0375
|
I am using this:
Code: |
OPTION COPY
INREC IFTHEN=(WHEN=GROUP,RECORDS=2,PUSH=(41:1,40,41:SEQ=1))
OUTFIL FNAMES=OUT,INCLUDE=(41,1,ZD,EQ,2),
BUILD=(41,40,1,40) |
Output produced:
Code: |
2LP01P SLP1173 0263 0264 0261 DLPZ5 SLP1173 0385 0376 0375 |
The very odd thing is that I am getting the number "2" added to the beginning of the output record!?!? I think the spacing is "ok" and can work with it, but the "2" at the beginning is killing me? |
|