MVSFORUMS.com

hisabarinath

How to remove spaces between a text String and the Pipe ('|') delimiter. I have the input file like below. The Input file is a 80 byte FB record.

Input file

kolusu · Posted: Wed Apr 22, 2009 10:56 am Post subject:

hisabarinath,

The following DFSORT JCL will give you the desired results. I assumed that your input is FB and 80 bytes LRECL

hisabarinath · Posted: Wed Apr 22, 2009 11:36 am Post subject:

Great Kolusu.. Thanks.

But the problem is, if there is any spaces in between the field1's or Field2's.. String that is also removed from your Code, But we dont want to remove any space between the Strings or Leading Strings For example-

kolusu · Posted: Wed Apr 22, 2009 12:12 pm Post subject:

hisabarinath,

If you want to preserve the spaces then use FINDREP, I just coded removing up to 10 spaces and the delimiter. You can change it according to your needs

hisabarinath · Posted: Wed Apr 22, 2009 1:18 pm Post subject:

Kolusu - I'm unable to get the solution. By using this logic FINDREP

Going back to your simple logic
INREC BUILD=(1,80,SQZ=(SHIFT=LEFT))

Are there any way that i can skip the first filed by using the SQZ logic. Since the first field's String only have the spaces in between the words all other fields are NOT having any spaces inbetween or leading.

So, is there any way that i can use the STARTPOS=NNN when build the output file.
NNN - would be the starting postion of the SHIFT

kolusu · Posted: Wed Apr 22, 2009 1:23 pm Post subject:

hisabarinath · Posted: Wed Apr 22, 2009 1:39 pm Post subject:

Thanks Kolusu. This way the output file that we are getting from position 'p' but i need the entire 80 byte record NOT from starting position 'p'

dbzTHEdinosauer · Posted: Wed Apr 22, 2009 2:08 pm Post subject:

can't wait for the next 'undisclosed' requirement.
_________________
Dick Brenholtz
American living in Varel, Germany

kolusu · Posted: Wed Apr 22, 2009 2:19 pm Post subject:

hisabarinath · Posted: Wed Apr 22, 2009 2:53 pm Post subject:

Yes, i run with OVERLAY=(Start Positioin, Length,SQZ...) But the output record writes only starts from Starting Postion, NOT the entire 80 Byte record length.

hisabarinath · Posted: Wed Apr 22, 2009 2:54 pm Post subject:

The SYSIN i have used..

kolusu · Posted: Wed Apr 22, 2009 3:02 pm Post subject:

hisabarinath,

bonk

Pay attention to the control cards I posted

hisabarinath · Posted: Wed Apr 22, 2009 3:10 pm Post subject:

Kolusu - You always Great... I have to find another vocabulary to prize/proud you. Thank you so much.