DSNTEJ6I
The DSNTEJ6I sample program generates service SQL documentation, which describes a Db2 for z/OS® subsystem in a standard diagnostic documentation format, for use by IBM® Support. It calls the ADMIN_INFO_SQL stored procedure.
The output from ADMIN_INFO_SQL is intended primarily for the use of IBM Support. The format and content of the output might change at any time.
//*********************************************************************
//* NAME = DSNTEJ6I
//*
//* DESCRIPTIVE NAME = DB2 APPLICATION DRIVER FOR
//* SYSPROC.ADMIN_INFO_SQL STORED PROCEDURE
//*
//* Licensed Materials - Property of IBM
//* 5650-DB2
//* (C) COPYRIGHT 1982, 2016 IBM Corp. All Rights Reserved.
//*
//* STATUS = Version 12
//*
//* FUNCTION = EXECUTES PROGRAM DSNADMSB TO CALL THE
//* STORED PROCEDURE SYSPROC.ADMIN_INFO_SQL WHICH
//* COLLECTS ENVIRONMENTAL SERVICE DATA.
//*
//* PSEUDOCODE =
//* DSNADMSB STEP EXECUTE DSNADMSB TO CALL SYSPROC.ADMIN_INFO_SQL
//*
//* DEPENDENCIES = SYSPROC.ADMIN_INFO_SQL MUST BE CREATED AND BOUND
//* PRIOR TO RUNNING THIS JOB. USE JOB DSNTIJRT TO
//* CREATE AND BIND DB2-SUPPLIED STORED PROCEDURES.
//*
//* THE PACKAGE AND PLAN FOR DSNADMSB MUST BE BOUND
//* PRIOR TO RUNNING THIS JOB. USE JOB DSNTIJRT
//* TO BIND THE PACKAGE AND PLAN FOR DSNADMSB.
//*
//* NOTES = THE CONTROL STATEMENT FOR DSNADMSB IS SPECIFIED IN
//* THE INPUTP DD AND HAS 13 PARAMETERS.
//* THESE PARAMETERS ARE LISTED BELOW IN THE COMMENT BLOCK
//* FOR THE INPUTP DD.
//*
//* THE SAMPLE CONTROL STATEMENT PROVIDED WITH THIS JOB
//* SHOWS HOW TO USE DSNADMSB TO COLLECT DDL, STATISTICS,
//* AND COLUMN STATISTICS FOR RETURN BY RESULT SET AND
//* OUTPUT TO THE SYSPRINT DD.
//*
//* THE FOLLOWING MANUAL TAILORING IS REQUIRED:
//* 1. ADD A VALID JOB CARD.
//* 2. LOCATE AND CHANGE ALL OCCURRENCES OF THE FOLLOWING
//* STRINGS AS INDICATED:
//* - '!DSN!' TO THE NAME OF THE DB2 SUBSYSTEM YOU ARE
//* PREPARING TO MIGRATE.
//* - 'DSN!!0' TO THE PREFIX OF THE SDSNLOAD TARGET
//* LIBRARY NAME FOR THE DB2 SUBSYSTEM YOU ARE
//* PREPARING TO MIGRATE.
//* - '!CEE!' TO THE PREFIX OF YOUR TARGET LIBRARY FOR
//* IBM LANGUAGE ENVIRONMENT
//* C. CHANGE !SYSADM! TO THE OWNER OF THE PLAN TABLE
//* TO BE USED BY DSNADMSB
//* D. CHANGE !PLANINFO! TO PROGRAMS AND QUERY NUMBERS
//* FROM THE PLAN_TABLE FOR THE TABLES TO BE
//* COLLECTED. FOR EXAMPLE,
//* APROGRAM-1-12345
//* REFERS TO PROGRAM 'APROGRAM' AND QUERY NUMBERS
//* 1 THROUGH 12345
//* E. CHANGE !TSNNNNNNNNN! TO THE SALESFORCE
//* CASE ID OR TO THE PMR'S
//* NUMBER.BRANCH CODE.COUNTRY CODE
//* (PPPPP.BBB.CCC)
//*
//* DO NOT ALTER OTHER DSNADMSB PARAMETERS WHEN COLLECTING
//* DOCUMENTATION FOR PROBLEM ANALYSIS UNLESS REQUESTED
//* TO DO SO BY IBM SERVICE.
//*
//* CHANGE ACTIVITY =
//* PM73555 11/11/12
//* PI36988 02/17/15
//* PH14064 07/24/19 Support Salesforce case ID in PMR_INFO param
//*********************************************************************
//JOBLIB DD DSN=DSN!!0.SDSNLOAD,DISP=SHR
// DD DSN=!CEE!.SCEERUN,DISP=SHR
//*
//* Execute DSNADMSB to call SYSPROC.ADMIN_INFO_SQL
//*
//DSNADMSB EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*,DCB=(RECFM=VB,LRECL=4096)
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(!DSN!)
RUN PROGRAM(DSNADMSB) PLAN(DSNADMSB)
//*
//*********************************************************************
//* THE DSNADSM CONTROL STATEMENT FOLLOWS. IT CONSISTS OF 13 POSITIONAL
//* PARAMETERS AS INDICATED. EACH PARAMETER APPEARS ON A SEPARATE
//* LINE. USE A PLUS SIGN(+) IN COLUMN 1 TO INDICATE THAT IT IS A
//* CONTINUATION OF A PARAMETER FROM THE PREVIOUS LINE.
//*********************************************************************
//* 1) TABLE_CREATOR VARCHAR(128)
//* 2) TABLE_NAME VARCHAR(128)
//* 3) CATALOG_CREATOR VARCHAR(128)
//* 4) PLAN_INFO VARCHAR(150)
//* 5) COLLECT_DDL CHAR(1)
//* 6) COLLECT_STATS CHAR(1)
//* 7) COLLECT_COLUMN_STATS CHAR(1)
//* 8) EDIT_DDL CHAR(1)
//* 9) EDIT_VERSION_MODE CHAR(4)
//* 10) PART_ROTATION CHAR(1)
//* 11) OUTPUT_METHOD CHAR(1)
//* 12) OUTPUT_INFO VARCHAR(1024)
//* 13) PMR_INFO VARCHAR(13)
//*********************************************************************
//INPUTP DD *
!SYSADM!
PLAN_TABLE
DEFAULT
!PLANINFO!
Y
Y
N
Y
NONE
Y
R
NONE
!TSNNNNNNNNN!
//*********************************************************************
//* End of DSNADMSB input parameters.
//*********************************************************************