Documents
Resources
Learning Center
Upload
Plans & pricing Sign in
Sign Out

X737 T5GBD042 - AML Datastore V1.1

VIEWS: 17 PAGES: 2

									                CATALOGUED PROCEDURES/EXECUTABLE JCL                                        X737
Project Name : AML Data Store                                    Revision Date:    12/11/2009
Catalogued procedures executable JCL                                Project ID:    PRJ00006KK


Catalogued Procedure/Executable JCL - work object ID X737


    A) New Job T5GBD042 - CARE Integrity check for changed data of existing cards


// T5GBD042 JOB (DUPB0000000,NM),'AML DATASTORE’,MSGCLASS=K,CLASS=A,
//      USER=J001PRD
//*
// JCLLIB ORDER=(SYS1.PROD.PROCLIB)
//*
// UCC11RMS EXEC UCC11RMS,PARM=P
//*
//JS010 EXEC T5E1041P,
//         COLD=,
//         DUPOVRD='N',
//         FILERCPT='AML DATASTORE    ',
//         FILESRCE='CARE2         ',
//         FILETYPE=DEMOGRAPH',
//         HLQ=AXH2,
//         HLQ1=AXH3,
//         JOB=T5GBD042,
//         JOB1=T5GBD035,
//         JOB2=T5GBD100,
//         FORM=AK9R,
//         RECSZ=1950,
//         RUNTYPE=1
//*


    B) Required Table Setup for Proc T5E1041P:


         a. Job T5GBD042 - SPUFI

        1) INSERT      INTO VCE100.V01_DQ_FILE_TYPES
           VALUES      ('DEMOGRAPH','CARE INTEGRITY CHECK TYPE 2');
        2) INSERT      INTO VCE100.V01_DQ_FILE_DTL
           VALUES      ('CARE2','AML DATASTORE','DEMOGRAPH','D','I');
        3) INSERT      INTO VCE100.V01_DQ_RECORD_DTL
           VALUES      ('CARE','AML DATASTORE','DEMOGRAPH','0000001', 8,19);




e4723cce-5cc7-4620-b9e9-ed023a617b0d.doc                              Date: 12-Nov2009
WO Template: Normal.dotm (Version 2003-Jan)                     Print Date: 21-May-2010
American Express Confidential                                                 Page 1 of 2
                CATALOGUED PROCEDURES/EXECUTABLE JCL                      X737
Project Name : AML Data Store                  Revision Date:    12/11/2009
Catalogued procedures executable JCL              Project ID:    PRJ00006KK


    C) Parm T5GBD042 (New)


    DELETE (AXH2.T5GBD042.Z.T5GBD042.R6970)
    DELETE (AXH2.T5GBD042.Z.T5GBD042.P1298)
    DELETE (AXH2.T5GBD042.Z.T5GBD042.IUTID)
    DELETE (AXH2.T5GBD042.Z.T5GBD042.OUTID)
     IF MAXCC = 8 THEN DO
         SET MAXCC = 0
     END




e4723cce-5cc7-4620-b9e9-ed023a617b0d.doc            Date: 12-Nov2009
WO Template: Normal.dotm (Version 2003-Jan)   Print Date: 21-May-2010
American Express Confidential                               Page 2 of 2

								
To top