zOs/JCL/TEMP
//A540769E JOB (CP00,KE50),
// 'EXECUTE-CT01004',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//*--------------------------------------------------------------------
//*-------------------------------------------------------------------
//* 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=(NEW,CATLG,DELETE),
// MGMTCLAS=COM#E005,
// DATACLAS=NOMULTI,
// SPACE=(CYL,(2,1),RLSE),
// DSN=DSN.XMLDDL.CT01004.D06094.T132925
//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>GEAB000013</package>
<applName>GEAB</applName>
<packageId> </packageId>
<component>CT01004</component>
<componentType>DDL</componentType>
<chkInSourceLocation>1</chkInSourceLocation>
<sourceStorageMeans>8</sourceStorageMeans>
<sourceLib>DSN.XMLDDL.CT01004.D06094.T132925</sourceLib>
<lockAfterChkIn>N</lockAfterChkIn>
<savePriorStagingVersion>N</savePriorStagingVersion>
<changeDesc>Staged by XML Batch Client</changeDesc>
<listCount>1</listCount>
<targetComponent>CT01004</targetComponent>
</request>
</message>
</scope>
</service>
//*--------------------------------------------------------------------
//* A C H T U N G ||| Benutzermodifikation(ENDE)
//*--------------------------------------------------------------------