On Mon, 3 Sep 2012 08:02:34 +0000, Uwe Oswald wrote:
>
>Question 1: Is it possible and how to check a SMF date column in the format
>YYYYMMDD rather than YYDDD
>Question 2: Is it possible and how to check a SMF time column in the format
>HHMM
1. You could write an edit macro (REXX) that reformats "readable" ranges into
"raw" format.
Then create a member with date/time ranges
20120805 0800 0900
20120820 1600 1800
...
and the macro outputs this
INCLUDE COND=(11,4,PD,EQ,112218,AND,7,4,BI,GE, ...
or
2. If your SMF records are shorter then 32744 (32756-12) try this
//S1 EXEC PGM=SORT
//*
//SYSOUT DD SYSOUT=*
//SORTIN DD DISP=SHR,LRECL=32744,
// DSN=?smfin
//SORTOUT DD DISP=(,CATLG,DELETE),
// DSN=?smfout,LIKE=?smfin
//SYSIN DD *
INCLUDE COND=(6,1,BI,EQ,+70)
INREC IFTHEN=(WHEN=(1,2,BI,LE,+32744),
BUILD=(1,4,11,4,DT1,7,4,TM2,5)),
IFTHEN=(WHEN=NONE,
BUILD=(1,4,C'999999999999',SEQNUM,10,ZD))
SORT FIELDS=(23,4,PD,A,19,4,BI,A)
OUTFIL INCLUDE=((5,8,CH,EQ,C'20120805',AND,
13,4,CH,GE,C'0800',AND,13,4,CH,LE,C'1100'),OR,
(5,8,CH,EQ,C'20120807',AND,
13,4,CH,GE,C'1600',AND,13,4,CH,LE,C'1800')),
BUILD=(1,4,17)
/*
>
>But the most important question is that I want to check the RMFDATE & -TIME
>and those columns are at on offset. Let me try to explain what I mean.
>
>Question 3: "Look in an SMF70 record" in field "SMF70PRS" (offset to product
>section) take this number, use it and calculate offsets for "SMF70IST" and "
>SMF70DAT". I would like to check date & time against those fields.
DFSORT has no built-in feature for this (AFAIK), You'd need a (E15/E35) sort
exit.
>Question 4: The sort statement doesn't seem to work. The records keep
>unsorted. ??????
Remove the "OPTION COPY"-Statement.
Norbert Friemel.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
