Summary of Parameter Types

Modifying CA IDMS Reports › Coding in CA Culprit for CA IDMS › Summary of Parameter Types

Summary of Parameter Types

The following table summarizes the CA Culprit for CA IDMS parameters and indicates what each can do in modifying CA IDMS reports.

Identifier	Function	Modifications
INPUT	Defines input	Modify the CA Culprit for CA IDMS buffer size or subschema name
REC	Defines fields	Modify the name, start position, length, or data type of a field
SELECT or BYPASS	Selects records	Select only records that meet certain criteria
OUTPUT	Defines output	Modify the report's line size or number of lines per page
SORT	Sorts	Modify the order in which the report presents information
3	Outputs a title	Add/delete/change the report title
4	Outputs a heading	Add/delete/change report headings
5	Outputs a detail line	Add/delete/change columns of information
6	Outputs a total line	For summary reports, add/delete/change columns of information
7	Defines input processing	Modify or add processing applied to input data
8	Defines total processing	For summary reports, modify or add processing applied to total-time data
0, 1, or 15	Defines work fields	Add if required for additional processing
PATH	Accesses database records	Modify or add to access different database records
KEY	Accesses specified database records	Add to access particular database records

The following are the CA Culprit for CA IDMS parameters that produced the sample report:

Sample CA Culprit for CA IDMS source code and output:

PATHU1 OOAK-012,S-010,SS-026,SSR-032,RCDACT-059,PROG-051 280 FUNC-TBL.13 'CONNECT ' 'OBTAIN ' * 'DISCONNECT ' 'FIND ' * 'STORE ' 'ERASE ' * 'CURRENCY ACCEPTED' 'MODIFY ' * 'GET ' 'BIND ' * 'FIND KEEP ' 'OBTAIN KEEP ' * ' ' $ FUNCTIONS 280 KEY-TBL.12 7 43 11 3 12 2 15 8 5 14 23 63 $ KEY TO FUNCTION TBL 28OUTPUT D LP=51 28SORT S-NAME-010 SS-NAM-026 SSR-NAM-032 * PROG-NAME-051 PROG-VER-051 FUNC-TBL.DISP STAR-HD 283 DATA DICTIONARY REPORTER 28410001 'DREPORT 028' 28410053 'IDMS RECORD ACTIVITY REPORT' 28420001-STAR-HD 28420045 STAR-HD 28420089 STAR-HD 28430102 '---- D A T E ----' 28440001 'SCHEMA' 28440010 'VER' 28440016 'SUBSCHEMA' 28440027 'RECORD' 28440060 'PROGRAM' 28440069 'VER' 28440075 'USAGE' 28440095 'TIMES' 28440102 'COMPILED' 28440112 'CREATED' 28450001 STAR-HD 28450045 STAR-HD 28450089 STAR-HD 28460001 ' ' 28510001 S-NAM-010 28510009 S-SER-010 FM 'ZZZZZ9' 28510016 SS-NAM-026 28510027 SSR-NAM-032 28510060 PROG-NAME-051 28510068 PROG-VER-051 FM 'ZZZZZ9' 28510075 FUNC-TBL.DISP 28510095 RA-COUNT-059 FM 'ZZZZZ9' 28510102 PROG-DATE-051 28510111 DATE-CREATED-051 287010 IF PATH-ID NE 'U1' DROP $ DROP N/A PATHS 287020 IF S-NAM-010 EQ 'NON IDMS' DROP $ NON IDMS FILES ONLY 287100 $ TABLE LOOKUP TO DETERMINE SUBSCRIPT FOR FUNCTION TABLE 287 MOVE RA-FUNCT-059 TO IND $ KEY FOR LOOKUP 287110 CALL US62 (KEY-TBL 'N' 8 12 'S' IND DISP) 287120 IF DISP NE 0 150 $ IF FOUND, TAKE 287 MOVE 13 TO DISP $ ELSE SET TO BLANKS 287150 TAKE

Sample report:

REPORT NO. 28 DREPORT 028 ********************** SCHEMA VER SUBSCHEMA RECORD ********************** EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 EMPSCHM 100 EMPSS01 DATA DICTIONARY REPORTER mm/dd/yy. PAGE 1 IDMS RECORD ACTIVITY REPORT *********************************************************************************************************** ---- D A T E ---- PROGRAM VER USAGE TIMES COMPILED CREATED *********************************************************************************************************** COVERAGE EMPINQ 1 BIND 1 mm/dd/yy mm/dd/yy DENTAL-CLAIM EMPINQ 1 BIND 1 mm/dd/yy mm/dd/yy DEPARTMENT D3 1 BIND 1 mm/dd/yy mm/dd/yy DEPARTMENT D4 1 BIND 1 mm/dd/yy mm/dd/yy DEPARTMENT D6 1 BIND 1 mm/dd/yy mm/dd/yy DEPARTMENT D6 1 OBTAIN 1 mm/dd/yy mm/dd/yy DEPARTMENT EMPINQ 1 BIND 1 mm/dd/yy mm/dd/yy DEPARTMENT TESTPROG 1 BIND 1 mm/dd/yy DEPARTMENT TESTPROG 1 OBTAIN 2 mm/dd/yy EMPLOYEE D3 1 BIND 1 mm/dd/yy mm/dd/yy EMPLOYEE D3 1 FIND 1 mm/dd/yy mm/dd/yy EMPLOYEE D3 1 MODIFY 1 mm/dd/yy mm/dd/yy EMPLOYEE D4 1 BIND 1 mm/dd/yy mm/dd/yy EMPLOYEE D4 1 ERASE 1 mm/dd/yy mm/dd/yy EMPLOYEE D4 1 FIND 1 mm/dd/yy mm/dd/yy