Page 1 of 1

Display PD field in displayable format

PostPosted: Tue Jul 19, 2011 5:50 pm
by richagoyal
Hi ,

I am trying to display PD value into my JCL but it is giving 00.
//SORT001  EXEC PGM=SORT                               
//SYSOUT   DD  SYSOUT=*                                 
//SORTIN   DD  DSN=CS.DH6D.DATE.file,DISP=SHR     
//SORTOUT  DD  DSN=CS.DH6D.test,
//             DISP=(,CATLG,DELETE),...
//SYSIN    DD  *                                       
  OPTION COPY                                       
  OUTFIL BUILD=(1:72,2,PD,TO=ZD,LENGTH=4)

Input file data as it is comp field(BI)
00
04 ,
00
03

while executing the job , i am getting 0000 in my output file.
Please suggest how to get the correct data ?

Re: Display PD field in displayable format

PostPosted: Tue Jul 19, 2011 5:55 pm
by BillyBoyo
In your control cards you are saying you have a Packed Decimal which you want to convert to a Zoned Decimal.

Down with your data, you say it the field is comp (BI).

If you get the data and sort cards to agree (BI instead of PD) then you should get the result you want (if the rest of the stuff is OK, which I have no idea about).

If you want to know why you are only getting zero, first try a little research with your SORT manual, if you still don't understand, explain how you understand it and someone can point you in the right direction.

Re: Display PD field in displayable format

PostPosted: Tue Jul 19, 2011 6:11 pm
by richagoyal
Thanks its worked !

Re: Display PD field in displayable format

PostPosted: Tue Jul 19, 2011 6:51 pm
by BillyBoyo
You're welcome.