1) I need to compare JOBNAME in both the file.
2) If JOBNAME matches I need to compare the date in file 1 with current date.
3) If date matches then write in output file "JOBNAME ran fine. "
4) If date is not current date then pick details from File2 and write in output file "JOBNAME should run before TIME."
5) If JOBNAME in File 2 not found in File 1 then write JOBNAME have no entry or never ran."
Thanks for the responses while running above sort card I am getting below error. I have searched web but didn't found any appropriate solution.
Code:
JOINKEYS FILE=F1,FIELDS=(1,08,A)
JOINKEYS FILE=F2,FIELDS=(1,08,A)
REFORMAT FIELDS=(F1:1,17,F2:1,8,10,4,?)
JOIN UNPAIRED,F2
SORT FIELDS=COPY
WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED
WER274A CONTINUATION STATEMENT ERROR FOUND
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
Magesg
On the mainframe 'file' can be directly related to the 'DDNAME' which then relates to the data set. Within the program the DDNAME is referred to as FILE:
In PL/1..
Code:
DCL infile FILE ....
JCL:
Code:
//INFILE DD DSN=data.set.name
and this relationship is clearly explained in one of the (PL/1) manuals.
Thanks for the responses while running above sort card I am getting below error. I have searched web but didn't found any appropriate solution.
Code:
JOINKEYS FILE=F1,FIELDS=(1,08,A)
JOINKEYS FILE=F2,FIELDS=(1,08,A)
REFORMAT FIELDS=(F1:1,17,F2:1,8,10,4,?)
JOIN UNPAIRED,F2
SORT FIELDS=COPY
WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED
WER274A CONTINUATION STATEMENT ERROR FOUND
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Magesg
On the mainframe 'file' can be directly related to the 'DDNAME' which then relates to the data set. Within the program the DDNAME is referred to as FILE:
In PL/1..
Code:
DCL infile FILE ....
JCL:
Code:
//INFILE DD DSN=data.set.name
and this relationship is clearly explained in one of the (PL/1) manuals.