
Maintaining the Job Accounting Database (TSIDJLD)
11-12 User Reference
The following job adds all information from the Recorder Backup dataset to the data base.
// JOB TSIDJLD UPDATE THE JOB ACCTNG DATA BASE
// ASSGN SYS003,SYSIPT
// ASSGN SYS004,SYSLST
// ASSGN SYS001,DISK,VOL=WORK01,SHR
// TLBL SYS005,'DAILY.RCDR.BACKUP'
// DLBL SORTWK1,'===.SORTWK1'
// EXTENT SYS001
// DLBL TSIJADB,'TSIJADB.JOB.ACCOUNT',,VSAM,CAT=UCAT
// EXEC TSIDJLD,SIZE=TSIDJLD
ADD
/*
/&
The following job deletes all jobs started on or before December 31, 1994 and adds all
information from the Recorder Backup dataset to the database.
// JOB TSIDJLD UPDATE THE JOB ACCTNG DATA BASE
// ASSGN SYS003,SYSIPT
// ASSGN SYS004,SYSLST
// ASSGN SYS001,DISK,VOL=WORK01,SHR
// TLBL SYS005,'DAILY.RCDR.BACKUP'
// DLBL SORTWK1,'===.SORTWK1'
// EXTENT SYS001
// DLBL TSIJADB,'TSIJADB.JOB.ACCOUNT',,VSAM,CAT=UCAT
// EXEC TSIDJLD,SIZE=TSIDJLD
ADD
DEL 12/31/1997
/*
/&
Examples
Comentarios a estos manuales