zOs/SQL/REVI

SELECT *                                                                00001024
  FROM REVI.DB2LOAD                                                     00001124
  WHERE SUBSYS = 'DBTF'                                                 00001226
      AND TIMESTAMP =                                                   00001324
          (   SELECT MAX(TIMESTAMP)                                     00001424
                  FROM REVI.DB2LOAD                                     00002024
                  WHERE SUBSYS = 'DBTF'                                 00003026
          )                                                             00004024
;                                                                       00005024
FEHLER                                                                  00006024
INSERT                                                                  00010013
    INTO REVI.DB2LOAD                                                   00020013
      (                                                                 00030013
        "GROUP",                                                        00040014
        TIMESTAMP,                                                      00050013
        DBNAME,                                                         00060013
        TSNAME,                                                         00070013
        DSNUM,                                                          00080013
        ICTYPE,                                                         00090013
        JOBNAME,                                                        00100013
        AUTHID                                                          00110013
      )                                                                 00120013
    SELECT                                                              00130013
        'DBAF',                                                         00140013
        TIMESTAMP,                                                      00150013
        DBNAME,                                                         00160013
        TSNAME,                                                         00170013
        DSNUM,                                                          00180013
        ICTYPE,                                                         00190013
        JOBNAME,                                                        00200013
        AUTHID                                                          00210013
                                                                        00220013
      FROM SYSIBM.SYSCOPY                                               00230013
        WHERE TIMESTAMP >                                               00240023
          (                                                             00250023
            SELECT MAX(TIMESTAMP)                                       00260018
              FROM REVI.DB2LOAD                                         00270018
              WHERE GROUP = 'DBAF'                                      00280018
          )                                                             00290023
          AND TIMESTAMP <= CURRENT TIMESTAMP - 5 DAYS + 3 HOURS         00300021
      ;                                                                 00310013
                                                                        00320013
    COMMIT ;                                                            00330017
                                                                        00340017
    ENDE                                                                00350009
SELECT COUNT(*), ICTYPE, CURRENT SERVER, CURRENT MEMBER                 00360005
    FROM CHSKA000DBTF.SYSIBM.SYSCOPY                                    00370007
    WHERE TIMESTAMP >= CURRENT TIMESTAMP - 1 DAY                        00380002
    GROUP BY ICTYPE;                                                    00390008
                                                                        00400009
 001600  CREATE TABLE    REVI.DB2LOAD                                   00410009
 001700     (GROUP    CHAR(4)                                           00420009
 001800      TIMESTAMP TIMESTAMP                                        00430009
 001900      DBNAME   CHAR(8)                                           00440009
 002000      TSNAME   CHAR(8)                                           00450009
 002100      DSNUM    INTEGER                                           00460009
 002200      ICTYPE   CHAR(1)                                           00470009
 002300      JOBNAME  CHAR(8)                                           00480009
 002400      AUTHID   CHAR(8)                                           00490009