Table Procedure Examples, Design, and Use › Sample Files › EMPEXPT Table Procedure Specification Code (EMPEXPT.TPS)

EMPEXPT Table Procedure Specification Code (EMPEXPT.TPS)

This code represents the table procedure specification you defined using the Quick Bridge user interface. The actual code depends on the version of the program and might be slightly different from the one listed here:

[CAAV_14.1 CA IDMS SQL Quick Bridge]
[DATES CAAV="Nov  1 1995",TPS="Nov 16 1995"]
CONNECT="Employee"
DICTNAME=SYSDICT
CVNUMBER=0

[TABLE]
DIALOGTYPE=129
TABTEXT="SQL Options"
NAME=EMPLOYEE.EXPERTISE
XNAME=EMPEXPT
DELETE=ALL
UPDATE=YES
INSERT=YES
SCHEMA=EMPSCHM
VERSION=100
SUBSCHEMA=EMPSS01

[EPREC]
DIALOGTYPE=130
TABTEXT="Entry Record"
REC=DEPARTMENT,ORG-DEMO-REGION,56,I
SEQACC=SWEEP,AREA
DIRACC=CALC,CALC
UFLD=DEPT-ID-0410,DEPT_ID_0410,"9(4)"

[PATH]
DIALOGTYPE=132
TABTEXT="Path Record 1"
REC=EMPLOYEE,EMP-DEMO-REGION,116,I
SET=DEPT-EMPLOYEE,YES,AUTO
UFLD=EMP-ID-0415,EMP_ID_0415,"9(4)"

[PATH]
DIALOGTYPE=140
TABTEXT="Target Record"
REC=EXPERTISE,EMP-DEMO-REGION,8,I
SET=EMP-EXPERTISE,NO,AUTO

[TFIELDS]
DIALOGTYPE=16
TABTEXT="Target Fields"
RFLD=EXPERTISE-DAY-0425,EXPERTISE_DAY,"9(2)"
RFLD=EXPERTISE-MONTH-0425,EXPERTISE_MONTH,"9(2)"
RFLD=EXPERTISE-YEAR-0425,EXPERTISE_YEAR,"9(2)"

[AUX]
DIALOGTYPE=32
TABTEXT="Aux Record 1"
REC=SKILL,ORG-DEMO-REGION,76,I
SET=SKILL-EXPERTISE,NO,AUTO
UPDACC=CALC,CALC
UFLD=SKILL-ID-0455,SKILL_ID_0455,"9(4)"

[COLUMN]
DIALOGTYPE=64
TABTEXT="Work Columns"
CFLD=TOTAL_DOLLAR_AMT,"DECIMAL(6,2)"
CFLD=TRANS_DATE,"DATE"
CFLD=TRANS_TIME,"TIME"

[END]