Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How can I reformat these fields?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Sat Nov 21, 2009 2:50 am    Post subject: How can I reformat these fields?
Reply with quote

I feel dumb asking this, but I'm not an expert on numeric data types.

The dataset in question is RECFM(F B) LRECL(1600).

The raw data looks like this in hex:

Code:

 îçí   ¬ îçá   ¬   
15452025154420250000
5685099F5685099F0008


and I know that it's composed of these fields:

COMPLETED TIME in HHMMSSTT format. I know this value is: 15:56:48.
COMPLETED DATE in Julian (YYYYDDDF) format. I know this value is: 2009295 (10/22/2009).
STARTED TIME in HHMMSSTT format. I know this value is also 15:56:48.
STARTED DATE in Julian (YYYYDDDF) format. I know this value is also: 2009295 (10/22/2009).
STEP COMPLETION CODE. I know this value is:00000008.

What DFSORT data types would convert these into their decimal equivalents? It looks like p,4,PD,TO=FS,LENGTH=8 is close.
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Sat Nov 21, 2009 3:14 am    Post subject:
Reply with quote

You could use these DFSORT statements:

Code:

  OPTION COPY                                               
  INREC  BUILD=(1,3,HEX,8:5,4,PD,EDIT=(TTTTTTT),16:9,3,HEX,
     23:13,4,PD,EDIT=(TTTTTTT),31:17,4,HEX)                 


and the output would be:

Code:

155648 2009295 155648 2009295 00000008


You can do further conversions/formatting from those values if you need to.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm
No new posts Sum Fields ballaswaroop DFSORT/ICETOOL 4 Tue May 02, 2017 11:07 am
No new posts DFSORT MUL FIELDS tspr52 DFSORT/ICETOOL 16 Fri Mar 03, 2017 11:53 pm
No new posts Sort two file having same field, one ... himanshu malik DFSORT/ICETOOL 7 Thu Feb 02, 2017 10:09 am
No new posts SYNCSORT SEQNUM and FI fields. nartcr SYNCSORT 7 Sat Jan 21, 2017 4:02 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us