Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
| Code: |
S9(9)v99
-0000009876
0000006253
-0000008276
0000006253
0000001111
|
S9(9)v99 would have 11 digits, but you are only showing 10 digits - why?
If you want to convert s9(7)v99 (= 9 digits) to s9(9)v99 (= 11 digits), you just need to add two leading zeros. An easy way to do that (and change a + sign to a blank) would be with these DFSORT control statements:
| Code: |
OPTION COPY
INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'+'),
BUILD=(C' 00',2,9)),
IFTHEN=(WHEN=NONE,BUILD=(1,1,C'00',2,9))
|
|
|
