MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

SORT to expand fields from CONNECT:Direct Process Log

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
superk
Advanced


Joined: 19 Dec 2002
Posts: 684
Topics: 5

PostPosted: Tue Aug 30, 2005 10:27 am    Post subject: SORT to expand fields from CONNECT:Direct Process Log Reply with quote

I have a dataset of raw process log records from CONNECT:Direct. I want to create a new output log suitable for reporting purposes by expanding the fields from the raw log dataset into readable fields in the output. What I don't have available is a copy of the Assembler DSECT that describes the format of the log file. However, it looks relatively easy to interpret the layout from a hex dump. The input log dataset is RECFM=FB, LRECL=4100. The output dataset will be RECFM=FB, LRECL=175. I will be using DFSORT for this process.

This is the raw log data:
[code:1:12824f0f93]
Cols 1-80:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
......CT..
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose

PostPosted: Tue Aug 30, 2005 11:01 am    Post subject: Reply with quote

Superk,

The bytes 17 for 8 bytes has the following value in hex. X'01063912200524F'. which is a reprensted here
Code:

00312021
1692054F


I am not sure as to how you related it as
Code:
 
01:06:39 01:06:41


And what is the pos of the return-code field?

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
superk
Advanced


Joined: 19 Dec 2002
Posts: 684
Topics: 5

PostPosted: Tue Aug 30, 2005 12:00 pm    Post subject: Reply with quote

That's column 17 for a length of 3, which should be:

Code:

003
169


The return-code is in column 25 for a length of 4. I was just looking at that field closely, and it appears to be a binary field, not packed-decimal as I first presumed, so I just got the value I was looking for by coding:

Code:

...,42:25,4,BI,TO=ZD,LENGTH=8,5,...
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose

PostPosted: Tue Aug 30, 2005 12:09 pm    Post subject: Reply with quote

Superk,

To display X'010639' in 17-19 as C'010639', you can use 17,3,HEX. Is that what you want?
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
superk
Advanced


Joined: 19 Dec 2002
Posts: 684
Topics: 5

PostPosted: Tue Aug 30, 2005 1:23 pm    Post subject: Reply with quote

Yes, I just might do that.

Taking a clue from Kolusu's response, I looked into the field starting in column 17 for a length of 8. It appears to be a time-date stamp in the format "mmhhssttyyyyddd", and making a slight change to use:

Code:

...,10:17,8,PD,TO=ZD,
26:9,8,PD,TO=ZD,...

also worked.

Thanks both for the help.
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose

PostPosted: Tue Aug 30, 2005 1:47 pm    Post subject: Reply with quote

Yes, that will work if you want to display 15 digits since the 8-byte field appears to be a PD value with an F sign. With DFSORT, TO=ZD will give you a displayable value (F sign for last digit).
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group