Thanks Rick,
I ran the job. The first part gave a return code of 0 but the second part
was bypassed. I checked the message but I cannot figure it out. Can you spot
my error?
DIAGNOSE -
ICFCATALOG -
INFILE(UCAT1) -
COMPAREDD(DASD01)
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
DIAGNOSE VVDS -
INFILE(DASD01) -
COMPAREDS(UCAT1) -
LIST
IDC11373I THE FOLLOWING COMPARE ELEMENTS WERE NOT ENCOUNTERED:
UCAT1
IDC01360I THE FOLLOWING ENTRIES HAD NO ERRORS:
SYS1.VVDS.VMIPL01 (Z)
UCAT.MIPL (Z)
UCAT.MIPL.CATINDEX (Q)
UCAT.MIPL.CATINDEX (Z)
DFSMSA.ACTV.ACDS.DATA (Z)
DFSMSA.ACTIF.COMMDS.DATA (Z)
Rick Fochtman <[EMAIL PROTECTED]> wrote:
>
> //DIAGNOS EXEC PGM=IDCAMS
>//SYSPRINT DD SYSOUT=*
>//UCAT1 DD DSN=CTUCAT.CTTL04,DISP=SHR
>//DASD01 DD DSN=SYS1.VVDS.VPRDNO1,VOL=SER=PRDNO1,UNIT=3390,
>// DISP=SHR,AMP='AMORG'
>//SYSIN DD *
> DIAGNOSE VVDS -
> INFILE(DASD01) -
> COMPAREDS(UCAT1) -
> LIST
> DIAGNOSE -
> ICFCATALOG -
> INFILE(UCAT1) -
> COMPAREDD(DASD01)
>
-----------------------------------------------------------------------------------
I see no reason this should present a problem.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
---------------------------------
Access over 1 million songs - Yahoo! Music Unlimited.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
