SALDUCT Sample

The SALDUCT view accesses the SALINFO and DEDUCT tables.

In this section: SALDUCT MASTER SALDUCT FOCSQL SALDUCT Diagram

SALDUCT MASTER

For DB2 or DB2 for VM:

FILENAME=SALDUCT,  SUFFIX=SQLDS,$
 
SEGNAME=SALINFO  ,SEGTYPE=S0,$
 FIELDNAME=SALEID   ,ALIAS=EID     ,USAGE=A9      ,ACTUAL=A9,$
 FIELDNAME=PAY_DATE ,ALIAS=PD      ,USAGE=YMD     ,ACTUAL=DATE,$
 FIELDNAME=GROSS    ,ALIAS=MO_PAY  ,USAGE=D12.2M  ,ACTUAL=D8,$
 
SEGNAME=DEDUCT   ,SEGTYPE=S0, PARENT =SALINFO,$
  FIELDNAME=DEDEID  ,ALIAS=EID ,USAGE=A9       ,ACTUAL = A9,$
  FIELDNAME=DEDDATE ,ALIAS=PD  ,USAGE=YMD      ,ACTUAL = DATE,$
  FIELDNAME=DED_CODE,ALIAS=DC  ,USAGE=A4       ,ACTUAL = A4,$
  FIELDNAME=DED_AMT  ,ALIAS=DA  ,USAGE=P9.2     ,ACTUAL = P4,$

Note:

• For Teradata:
• Change the suffix value to SQLDBC.
• Change the USAGE format for GROSS to P9.2 and the ACTUAL to P8.
• Change the ACTUAL format for DED_AMT to P9.2 and the ACTUAL to P8.

• For CA-IDMS, change the suffix value to SQLIDMS.
• For Oracle, change the suffix value to SQLORA.

SALDUCT FOCSQL

For DB2 or DB2 for VM:

SEGNAME = SALINFO, TABLENAME = "USER1"."SALINFO", KEYS = 2, WRITE = YES,
    KEYORDER = HIGH, DBSPACE = PUBLIC.SPACE0,$
SEGNAME = DEDUCT, TABLENAME = "USER1"."DEDUCT",  KEYS = 3, WRITE = YES,
    KEYORDER = HIGH, DBSPACE = PUBLIC.SPACE0,
    KEYFLD = SALEID/PAY_DATE , IXFLD = DEDEID/DEDDATE,$

For Teradata:

SEGNAME = SALINFO,TABLENAME = USER1.SALINFO, KEYS=2, WRITE=YES,
    KEYORDER=HIGH, FALLBACK=YES,$
SEGNAME = DEDUCT, TABLENAME = USER1.DEDUCT,  KEYS=3, WRITE=YES,
    KEYORDER=HIGH, FALLBACK=YES,
    KEYFLD=SALEID/PAY_DATE, IXFLD=DEDEID/DEDDATE,$

For IDMS SQL:

SEGNAME = SALINFO, TABLENAME = SALSCHEM.SALINFO, KEYS = 2, WRITE = YES,
    KEYORDER = HIGH, DBSPACE = SALSEG.SALAREA,$
SEGNAME = DEDUCT, TABLENAME = DEDSCHEM.DEDUCT,  KEYS = 3, WRITE = YES,
    KEYORDER = HIGH, DBSPACE = DEDSEG.DEDAREA,
    KEYFLD = SALEID/PAY_DATE, IXFLD = DEDEID/DEDDATE,$

For Oracle:

SEGNAME=SALINFO, TABLENAME=USER1.SALINFO, KEYS=2, WRITE=YES,
    KEYORDER = HIGH, DBSPACE=SPACE1,
SEGNAME = DEDUCT, TABLENAME = USER1.DEDUCT, KEYS = 3, WRITE=YES,
    KEYORDER = HIGH, DBSPACE=SPACE1,
     KEYFLD = SALEID/PAY_DATE, IXFLD = DEDEID/DEDDATE,$

SALDUCT Diagram

check file salduct pict
  NUMBER OF ERRORS=     0
  NUMBER OF SEGMENTS=   2  ( REAL=    2  VIRTUAL=   0 )
  NUMBER OF FIELDS=     7  INDEXES=   0  FILES=     1
  TOTAL LENGTH OF ALL FIELDS=   42
 SECTION 01
              STRUCTURE OF SQLDS    FILE SALDUCT  ON 06/17/93 AT 13.52.47
 
          SALINFO
  01      S0
 **************
 *SALEID      **
 *PAY_DATE    **
 *GROSS       **
 *            **
 *            **
 ***************
  **************
        I
        I
        I
        I DEDUCT
  02    I S0
 **************
 *DEDEID      **
 *DEDDATE     **
 *DED_CODE    **
 *DED_AMT     **
 *            **
 ***************
  **************