Formatting in PS using DFSORT utility

[udhay]

Hi, I have a PS file with VB as a record format and it looks like below:

----+----1----+----2----+----3----+----4----+----5----+----6----+----7----
********************************* Top of Data ****************************
.?.&CUSTROOT...............................>LOANSEGM......................
.?...?CUSTROOT...................d..?BR02-T02PETER THOMAS 1900 STANFORD
.?...;LOANSEGM...................d?.;A1A1978 CHEV VAN .....
.?...?CUSTROOT......................?BR02-T01JAMES TAYLOR 5411 OCEAN DR.
.?...;LOANSEGM....................?.;H1HADDITION OF A FAMILY ROOM .....

This is basically an IMS unload file and I want to format it in a proper way like SEGMENT NAME (current position is 7), two spaces, then remaining VALID data starts from 38th position. All the in between data looks like various non-editable characters (ie. NULLs). I tried to MOVE spaces for the nulls using the DFSORT utility using the below command but I'm not able to format it correctly and even I tried some other commands also. Can anyone pl. let me know the solution for this?

//SYSIN DD *
OPTION COPY
ALTSEQ CODE=(0040)
OUTREC FIELDS=(20,31,TRAN=ALTSEQ)
/*

Finally I want the output dataset like below:

----+----1----+----2----+----3----+----4----+----5----+----6----+----7----
********************************* Top of Data ****************************
CUSTROOT LOANSEGM
CUSTROOT BR02-T02PETER THOMAS 1900 STANFORD
LOANSEGM A1A1978 CHEV VAN
CUSTROOT BR02-T01JAMES TAYLOR 5411 OCEAN DR.
LOANSEGM H1HADDITION OF A FAMILY ROOM
_________________
Udhay

[Frank Yaeger]

It's not clear if you're counting the RDW in positions 1-4 when giving the starting positions. I suspect you're not, so you need to add 4 to each starting position. If you want to create output records with the segment name, 2 spaces and the remaining valid data (assuming you weren't counting the RDW in the starting positions), and replace nulls with blanks, you can use DFSORT statements like this:

[udhay]

Thanks a lot Frank!!!
_________________
Udhay