zOs/JCL/TTX
//A540769E JOB (CP00,KE50),
// 'EXECUTE-VDPS257',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=BS1
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/19/2006.17.11.43
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//*--------------------------------------------------------------------
//* FOR JES3 SYSTEMS, COPY AEXIN INPUT STREAM TO TEMPORARY FILE
//*--------------------------------------------------------------------
//*--------------------------------------------------------------------
//* A C H T U N G ||| Benutzermodifikation(START)
//*--------------------------------------------------------------------
//UNLAUDIT EXEC PGM=IKJEFT01
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*
//SYSREC00 DD DISP=(OLD,CATLG,DELETE),
// MGMTCLAS=COM#E005,
// DATACLAS=NOMULTI,
// SPACE=(CYL,(2,1),RLSE),
// DSN=DSN.XMLDDL.VDPS257.D06170.T171143
//SYSTSIN DD *
DSN SYSTEM(DBTF)
RUN PROGRAM (DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL')
//SYSIN DD *
SELECT ACTION
FROM BMCACT74.V74_AUDIT_LOG X
WHERE DATE = CURRENT DATE
AND PRODUCT = 'AEXACM'
AND NOT EXISTS ( SELECT TIME
FROM BMCACT74.V74_AUDIT_LOG Y
WHERE DATE = CURRENT DATE
AND PRODUCT = 'AEXACM'
AND Y.TIME > X.TIME )
ORDER BY DATE, TIME, SEQUENCE, SESSION_SEQ
;
/*
//*--------------------------------------------------------------------
//*--------------------------------------------------------------------
//XMLSTEP EXEC CMNOXMLB
//XMLIN DD *
<?xml version="1.0"?>
<service name="CMPONENT">
<scope name="SERVICE">
<message name="CHECKIN">
<header>
<subsys>0</subsys>
<suppressNotify>Y</suppressNotify>
<product>CMN</product>
<format>SPLIT</format>
</header>
<request>
<package>VDPS000077</package>
<applName>VDPS</applName>
<packageId> </packageId>
<component>VDPS257</component>
<componentType>DDL</componentType>
<chkInSourceLocation>1</chkInSourceLocation>
<sourceStorageMeans>8</sourceStorageMeans>
<sourceLib>DSN.XMLDDL.VDPS257.D06170.T171143</sourceLib>
<lockAfterChkIn>N</lockAfterChkIn>
<savePriorStagingVersion>N</savePriorStagingVersion>
<changeDesc>Staged by XML Batch Client</changeDesc>
<listCount>1</listCount>
<targetComponent>VDPS257</targetComponent>
</request>
</message>
</scope>
</service>
//*--------------------------------------------------------------------
//* A C H T U N G ||| Benutzermodifikation(ENDE)
//*--------------------------------------------------------------------