View previous topic :: View next topic |
Author |
Message |
sumithar Beginner
Joined: 22 Sep 2006 Posts: 84 Topics: 29
|
Posted: Fri Apr 06, 2012 1:17 pm Post subject: Compare timestamp b/w DBRM and Load Module |
|
|
I'm sure this has been asked and perhaps answered too but I have googled quite a bit to no avail...
Given a DBRM dataset and a list of DBRMs is there a technique to automate this?
for each DBRM
grab the timestamp- the 1st 8 bytes will do- into a string variable
open the matching member in the load module dataset
see if this timestamp is present in the loadmodule dataset
I have some acquaintance w/ REXX but whenever I wanted to see if a string was present in a dataset member i opened the member and read it line by line and then checked if the string was on that line or not using a POS command. But that approach won't work with a load module dataset will it?
I found something online that seemed to fit my purpose but it was written in PL/I and required me to have a PL/I compiler. |
|
Back to top |
|
|
sumithar Beginner
Joined: 22 Sep 2006 Posts: 84 Topics: 29
|
Posted: Tue Apr 10, 2012 10:20 am Post subject: |
|
|
I figured out how to do this using ISRSUPC. |
|
Back to top |
|
|
Jeba Beginner
Joined: 02 Dec 2002 Posts: 48 Topics: 9 Location: Columbus, GA
|
Posted: Tue Apr 10, 2012 2:51 pm Post subject: |
|
|
Hi Sumithar,
Please find below sample
Code: | //SEARCH EXEC PGM=ISRSUPC,
// PARM=(SRCHCMP,
// '')
//NEWDD DD DISP=SHR,DSN=LOAD1
// DD DISP=SHR,DSN=LOAD2
// DD DISP=SHR,DSN=LOAD3
//OUTDD DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=Dataset with Tokens |
Dataset can be prepared in Rexx program like below for each component
Code: |
SRCHFOR X'071451C6184C51EE'
SRCHFOR X'071451C6184C51E4' |
_________________ Thanks,
Jeba
(Known is a drop Unknown is an ocean) |
|
Back to top |
|
|
|
|