IBM Mainframe Forum

by **NicC** » Tue Jan 28, 2014 7:25 pm

Fill the remainder of your record with blanks. The dots, as you should know, represent un-displayable characters. If you turn hex on you will see the actual values.

by **BillyBoyo** » Tue Jan 28, 2014 7:39 pm

The dots are not dots, they are just how the system shows you non-displayable characters. They are probably binary-zeros.

If you add ,80:X to your BUILD, an X (which is a blank) is placed in column 80. Any intervening colums which have to be created between your data and column 80 will be space-padded.

For you requirement:

Select all

//CTRCLCD1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC BUILD=(1,16,SQZ=(SHIFT=LEFT,
LEAD=C'ACTION=LIST,RESOURCE=ADCOM,ADID=',
TRAIL=C',STATUS=A;',
LENGTH=80))

//SORTIN DD *
AACADPQ
AACBODQ
AACBOEQ
FGFTUJYHTRR
AACCHEQ
AACDCLQ
VVVVVFGG
AACEFFQ
AACGRFQ
FTJOUR06H00RT

Don't just use it, you need to understand it. So do some research, then tell us what it does.

by **dgmf** » Wed Jan 29, 2014 9:49 am

is there an other way to avoid dots... Because the porgramm i use need a DCB with FB et LENGHT=80

Yes..

you can add spaces at last
i.e after last ; you can fill with spaces by giving C' '

by **samb01** » Wed Jan 29, 2014 1:14 pm

OK, dgmf.

Thank's.

IBM Mainframe Forum

how to obtain it

Re: how to obtain it

Re: how to obtain it

Re: how to obtain it

Re: how to obtain it