Dfsort 4 Byte Pd Convert To 8 Byte
Can anyone tell me how to convert a file with COMP fields to a normalfile. I will be pleased if anyone gives me the JCL for that.Regards,Vinoth ThiyagarajanConfidentiality NoticeThe information contained in this electronic message and any attachments to this message are intendedfor the exclusive use of the addressee(s) and may contain confidential or privileged information. Ifyou are not the intended recipient, please notify the sender at Wipro or immediatelyand destroy all copies of this message and any attachments.-For IBM-MAIN subscribe / signoff / archive access instructions,send email to with the message: GET IBM-MAIN INFOSearch the archives atEd Gould30.03.05 22:02. On 3/30/05 11:32 PM, Vinoth Thiyagarajan atwrote: Can anyone tell me how to convert a file with COMP fields to a normal file. I will be pleased if anyone gives me the JCL for that.
INREC OVERLAY=(73:SEQNUM,8,ZD) Sort the records. SORT FIELDS=(2,8,ZD,A,11,2,CH,D) Produce one record for each unique sort key with totals for the specified summary fields SUM FIELDS=(45,4,BI,8,2,PD) Produce output records displaying the sort and sum fields intermixed with constants and arithmetic operations. I have a requirement to convert numeric data (stored as character on input) to either packed signed or packed unsigned formats. I can convert to packed/signed using the 'PD' format, but I'm having a difficult time getting unsigned packed data. For instance, I need a ZD number like 14723 converted to: 042. Using PD, I get this (which is.
Kamen rider cross z new world sub indo. Regards, Vinoth ThiyagarajanIEBPTPCH can probably do what you want. Its documented in the MVS Utilitiesmanual.Ed-For IBM-MAIN subscribe / signoff / archive access instructions,send email to with the message: GET IBM-MAIN INFOSearch the archives atRajeev Vasudevan30.03.05 22:02. Hello,I hope the below jcl will suit your need. This solved my problem. Thanx a lot guys!!! Thanx Vasudevan!!!Regards,Vinoth ThiyagarajanConfidentiality NoticeThe information contained in this electronic message and any attachments to this message are intendedfor the exclusive use of the addressee(s) and may contain confidential or privileged information.
Ifyou are not the intended recipient, please notify the sender at Wipro or immediatelyand destroy all copies of this message and any attachments.-For IBM-MAIN subscribe / signoff / archive access instructions,send email to with the message: GET IBM-MAIN INFOSearch the archives atMayakkannan Subhas, ISDC Chennai30.03.05 23:49. Disclaimer:This message and any attachment(s) contained here are information that isconfidential, proprietary to HCL Technologies and its customers. Contentsmay be privileged or otherwise protected by law. The information is solelyintended for the individual or the entity it is addressed to. If you are notthe intended recipient of this message, you are not authorized to read,forward, print, retain, copy or disseminate this message or any part of it.If you have received this e-mail in error, please notify the senderimmediately by return e-mail and delete it from your computerOUTREC=(1,2,PD, PD FIELD STARTS AT 01, LENGTH 02TO=ZD) CONVERT TO ZD OR UNPACK ITThis can be used to convert packed decimal (COMP-3) to zoned decimal.
OUTREC=(1,2,PD TO=ZD)OUTREC=(1,2,BI TO=ZD)This can be used to convert packed decimal (COMP-3) to zoned decimal. Youcan use BI instead of PD to convert COMP fields into zoned decimal.Alternatively you can use the conversion functions (X2D etc.) and SUBSTRin REXX but you have to write an EXEC for that.
You can use the folloingexec as base/.-REXX-. Author.: Mayakkannan.S. Module.: CVTDATA. Function.: This exec will convert decimal. and binary values in a file to. displayable format (COMP /COMP-3.
to DISPLAY). -Original Message- From: IBM Mainframe Discussion List On Behalf Of Vinoth Thiyagarajan Can anyone tell me how to convert a file with COMP fields to a normal file. I will be pleased if anyone gives me the JCL for that.Depending on what you mean by 'normal file', the OUTFIL OUTREC statement ofDFSORT might be the simplest.-jc-For IBM-MAIN subscribe / signoff / archive access instructions,send email to with the message: GET IBM-MAIN INFOSearch the archives atFrank Yaeger31.03.05 07:57. Vinoth Thiyagarajan wrote:Can anyone tell me how to convert a file with COMP fields to a normalfile.
Dfsort 4 Byte Pd Convert To 8 Byte 1
SORT – CONVERT PD to ZD IN DISPLAYABLE FORMAT (ZDF)In most of the scenarios, your input file has data either in Packed decimal (COMP-3) format which is not in readable format. To change this to readable format, you need to convert these numbers into ZONED Decimal (ZD) format. This can be accomplished using SORT.PD to ZDSuppose your input file has first 4 bytes in packed format and you want it in displayable formatOUTREC FIELDS=(1,4,PD,TO=ZD,LENGTH=6)p,m,PD,TO=ZD converts the PD values to ZD values. By default, a 4-byte BI value produces a 7-byte ZD value, but LENGTH=6 override the default length to produce a 6-byte ZD value.OUTREC FIELDS=(1,4,PD,TO=ZD)This does not override the length of output ZD value produced.But the above SORT card would have an Alphabet instead of number as the last byte in the new ZD value.
Use the below SORT card with ZDF option, to have the new ZD value as all numeric.OUTREC FIELDS=(1,4,PD,ZDF).