Hi,
I need help in converting a decimal value to hexadecimal value using sort card.
Below are my requirements,
I have an input file with 834 records,in which each record looks like
ZZZZ11112098102012-04-20-09.24.19.000001
ZZZZ11113098202012-04-20-09.24.19.000002
.
.
.
.
and so on...
Now i want to convert the value starting from postion 9 to 12 i:e;the value 2098,3098 to hexadecimal values.How i can acheive this using sort.
Need the resolution ASAP.
How to convert a decimal valuie to hexadecimal using sort
Moderators: Frank Yaeger, Moderator Group
How to convert a decimal valuie to hexadecimal using sort
Thanks,
Haritha
Haritha
- dbzTHEdinosauer
- Moderator
- Posts: 981
- Joined: Mon Oct 02, 2006 8:31 pm
1. we don't asap anything, you are being rude.
2. show what characters you want in 9 thru 12 based on your input.
problem is, saying you want it in hexadecimal makes no sense.
do you want the binary equivalent of 2098 in 9 thru 12? 0832?
if you show us, then we can tell you what to do and what to call it.
2. show what characters you want in 9 thru 12 based on your input.
problem is, saying you want it in hexadecimal makes no sense.
do you want the binary equivalent of 2098 in 9 thru 12? 0832?
if you show us, then we can tell you what to do and what to call it.
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.
- Frank Yaeger
- Moderator
- Posts: 812
- Joined: Sat Feb 18, 2006 5:45 am
- Location: San Jose, CA
- Contact:
Haritha,
What you actually want is to convert from zoned decimal (ZD) to binary (BI). Assuming you want to overlay the 4-byte ZD value with an equivalent 4-byte BI value, you can use a DFSORT job like the following:
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:
http://www.ibm.com/support/docview.wss? ... g3T7000080
What you actually want is to convert from zoned decimal (ZD) to binary (BI). Assuming you want to overlay the 4-byte ZD value with an equivalent 4-byte BI value, you can use a DFSORT job like the following:
Code: Select all
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (FB)
//SORTOUT DD DSN=... output file (FB)
//SYSIN DD *
SORT FIELDS=(1,1,CH,A)
INREC OVERLAY=(9:9,4,ZD,TO=BI,LENGTH=4)
http://www.ibm.com/support/docview.wss? ... g3T7000080
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page