CA IDMS/DB SQL Dictionary Reports—QREPORTS › QREPORT 006 -SQL Table Syntax Report › Job Submission

Job Submission

The following example lists syntax for all qualifying tables and views in the TSTDICT dictionary.

DATABASE DICTNAME=dictionary-name
USE "QRPT006"  WITH VALUES (REQUESTED_DICTIONARY='TSTDICT'
                            REQUESTED_SCHEMA='%'
                            REQUESTED_TABLE='%')

Sample QREPORT 006:

.sp
 QREPORT 006                           SQL TABLE SYNTAX REPORT            mm/dd/yy            PAGE     1
.sp
.sp
  SCHEMA NAME           TABLE NAME               SYNTAX
  ───────────           ──────────               ──────

.sp
DEMOEMPL            EMPLOYEE           ( ( EMP_ID <= 8999 ) AND (STATUS IN ('A', 'S', 'L', 'T') ) )
.sp
.sp
DEMOEMPL            POSITION           ( (HOURLY_RATE IS NOT NULL AND SALARY_AMOUNT IS NULL)
                                        OR (HOURLY_RATE IS NULL AND SALARY_AMOUNT IS NOT NULL) )
.sp
.sp
SYSCA               ACCESSIBLE_TABLES  SELECT SCHEMA,
                                              NAME,
                                              TYPE
                                         FROM SYSTEM.TABLE
                                        WHERE TYPE <> 'N'
                                          AND ACCESS(SCHEMA, NAME) = 'Y'
                                       UNION
                                       SELECT NAME,
                                              SUBSTR(RSYN_NAME_079, 1, 18),
                                              'N'
                                         FROM SYSTEM.SCHEMA,
                                              SYSDICT."S-010",
                                              SYSDICT."SRCD-113",
                                              SYSDICT."RCDSYN-079"
                                        WHERE DICTIONARY = CURRENT DATABASE
                                          AND NTWKSCHEMA <> ' '
                                          AND S_NAM_010 = NTWKSCHEMA
                                          AND S_SER_010 = VERSION
                                          AND RSYN_NAME_079 NOT BETWEEN 'SR0' AND 'SR9'
                                          AND ACCESS(NAME, RSYN_NAME_079) = 'Y'
                                          AND "S-SRCD"
                                          AND "RCDSYN-SRCD"