How to convert Hex to PD



Support for NetApp SyncSort for z/OS, Visual SyncSort, SYNCINIT, SYNCLIST and SYNCTOOL

How to convert Hex to PD

Postby manjeera.bonakurthi » Tue Mar 02, 2010 3:37 pm

Hi

I have input file in which one field is in Hex .Now i need to convert this field alone to PD using JCL SORT .
How can I achieve this?
manjeera.bonakurthi
 
Posts: 13
Joined: Fri Feb 19, 2010 10:54 am
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert Hex to PD

 

Re: How to convert Hex to PD

Postby Alissa Margulies » Tue Mar 02, 2010 11:27 pm

Since you did not provide any information regarding your actual data (position/length of HEX field, DCB attributes of file, etc.), I created this example:
//STEP1 EXEC PGM=SORT                                             
//SYSOUT  DD SYSOUT=*                                               
//SORTIN  DD *                                                       
000004A4
00001000                                                                                                     
//SORTOUT DD DSN=OUTPUT.FILE,...
//SYSIN   DD *                                                     
  ALTSEQ CODE=(F000,F101,F202,F303,F404,F505,F606,F707,F808,F909, 
               C10A,C20B,C30C,C40D,C50E,C60F)                     
  INREC IFTHEN=(WHEN=INIT,OVERLAY=(41:1,8,TRAN=ALTSEQ)),           
        IFTHEN=(WHEN=INIT,                                         
        OVERLAY=(41:(48,1,BI,ADD,                                 
                    (47,1,BI,MUL,+16),ADD,                         
                    (46,1,BI,MUL,+256),ADD,                       
                    (45,1,BI,MUL,+4096),ADD,                       
                    (44,1,BI,MUL,+65536),ADD,                     
                    (43,1,BI,MUL,+1048576),ADD,                   
                    (42,1,BI,MUL,+16777216),ADD,                   
                    (41,1,BI,MUL,+268435456)))),                   
        IFTHEN=(WHEN=INIT,                                         
        BUILD=(41,15,ZD,PD))                                       
  SORT FIELDS=COPY                                                 
/*
Alissa Margulies
Syncsort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com
Alissa Margulies
Global moderator
 
Posts: 369
Joined: Tue Feb 26, 2008 11:15 pm
Location: USA
Has thanked: 1 time
Been thanked: 1 time

Re: How to convert Hex to PD

Postby dick scherrer » Wed Mar 03, 2010 1:47 am

Hello,

I have input file in which one field is in Hex
Unfortunately, every field in every file is in Hex. . .

When asking for help, it is important to provide sufficient detail. . .
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6304
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 91 times

Re: How to convert Hex to PD

Postby manjeera.bonakurthi » Wed Mar 03, 2010 4:34 pm

Hi Alissa
Thank u for ur help...
manjeera.bonakurthi
 
Posts: 13
Joined: Fri Feb 19, 2010 10:54 am
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert Hex to PD

Postby Alissa Margulies » Wed Mar 03, 2010 9:07 pm

Glad you found my example useful.

In the future, please keep in mind that it would be more helpful to those of us trying to assist you if you could post more specific details about your job requirments. Posting sample input records and the desired output, along with the file attributes is a good place to start.
Alissa Margulies
Syncsort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com
Alissa Margulies
Global moderator
 
Posts: 369
Joined: Tue Feb 26, 2008 11:15 pm
Location: USA
Has thanked: 1 time
Been thanked: 1 time


Return to Syncsort/Synctool

 


  • Related topics
    Replies
    Views
    Last post