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.
//*********************************************************************