EMPADD Sample

The EMPADD view accesses the EMPINFO and ADDRESS tables.

In this section: EMPADD MASTER EMPADD FOCSQL EMPADD Diagram

EMPADD MASTER

For DB2 or DB2 for VM:

FILENAME=EMPADD,   SUFFIX=SQLDS,$
 
SEGNAME=EMPINFO  ,SEGTYPE=S0,$
 FIELD=EMP_ID        ,ALIAS=EID           ,USAGE=A9       ,ACTUAL=A9,$
 FIELD=LAST_NAME     ,ALIAS=LN            ,USAGE=A15      ,ACTUAL=A15,$
 FIELD=FIRST_NAME    ,ALIAS=FN            ,USAGE=A10      ,ACTUAL=A10,$
 FIELD=HIRE_DATE     ,ALIAS=HDT           ,USAGE=YMD      ,ACTUAL=DATE,$
 FIELD=DEPARTMENT    ,ALIAS=DPT           ,USAGE=A10      ,ACTUAL=A10,
   MISSING=ON,$
 FIELD=CURRENT_SALARY,ALIAS=CSAL          ,USAGE=P9.2     ,ACTUAL=P4,$
 FIELD=CURR_JOBCODE  ,ALIAS=CJC           ,USAGE=A3       ,ACTUAL=A3,$
 FIELD=ED_HRS        ,ALIAS=OJT           ,USAGE=F6.2     ,ACTUAL=F4,
   MISSING=ON,$
 FIELD=BONUS_PLAN    ,ALIAS=BONUS_PLAN    ,USAGE=I4       ,ACTUAL=I4,$
 
SEGNAME=ADDRESS  ,SEGTYPE=S0, PARENT = EMPINFO,$
  FIELD=ADDEID           ,ALIAS=EID  ,USAGE=A9      ,ACTUAL=A9,$
  FIELD=TYPE             ,ALIAS=AT   ,USAGE=A4      ,ACTUAL=A4,$
  FIELD=ADDRESS_LN1      ,ALIAS=LN1  ,USAGE=A20     ,ACTUAL=A20,$
  FIELD=ADDRESS_LN2      ,ALIAS=LN2  ,USAGE=A20     ,ACTUAL=A20,$
  FIELD=ADDRESS_LN3      ,ALIAS=LN3  ,USAGE=A20     ,ACTUAL=A20,$
  FIELD=ACCTNUMBER        ,ALIAS=ANO  ,USAGE=I9L     ,ACTUAL=I4,$

Note:

• For Teradata:
• Change the suffix value to SQLDBC.
• Change the ALIAS for LAST_NAME to LNAME.
• Change the ACTUAL format for CURRENT_SALARY to P8.
• Change the USAGE format for ED_HRS to D6.2 and the ACTUAL to D8.

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

EMPADD FOCSQL

For DB2 or DB2 for VM:

SEGNAME = EMPINFO, TABLENAME = "USER1"."EMPINFO", KEYS = 1, WRITE = YES,
     DBSPACE = PUBLIC.SPACE0,$
SEGNAME = ADDRESS, TABLENAME = "USER1"."ADDRESS", KEYS = 2, WRITE = YES,
     DBSPACE = PUBLIC.SPACE0,
     KEYFLD = EMP_ID, IXFLD = ADDEID,$

For Teradata:

SEGNAME=EMPINFO, TABLENAME=USER1.EMPINFO, KEYS=1, WRITE=YES, FALLBACK=YES,$
SEGNAME=ADDRESS, TABLENAME=USER1.ADDRESS, KEYS=2, WRITE=YES, FALLBACK=YES,
    KEYFLD=EMP_ID, IXFLD=ADDEID,$

For IDMS SQL:

SEGNAME = EMPINFO, TABLENAME = EMPSCHEM.EMPINFO, KEYS = 1, WRITE = YES,
     DBSPACE = EMPSEG.EMPAREA,$
SEGNAME = ADDRESS, TABLENAME = ADDSCHEM.ADDRESS, KEYS = 2, WRITE = YES,
     DBSPACE = ADDSEG.ADDAREA,
     KEYFLD = EMP_ID, IXFLD = ADDEID,$

For Oracle:

SEGNAME=EMPINFO, TABLENAME=USER1.EMPINFO, KEYS=1, WRITE=YES,
    DBSPACE=SPACE1,
SEGNAME = ADDRESS, TABLENAME = USER1.ADDRESS, KEYS = 2, WRITE=YES,
    DBSPACE=SPACE1,
     KEYFLD = EMP_ID, IXFLD = ADDEID,$

EMPADD Diagram

check file empadd pict
  NUMBER OF ERRORS=     0
  NUMBER OF SEGMENTS=   2  ( REAL=    2  VIRTUAL=   0 )
  NUMBER OF FIELDS=    15  INDEXES=   0  FILES=     1
  TOTAL LENGTH OF ALL FIELDS=  140
 SECTION 01
              STRUCTURE OF SQLDS    FILE EMPADD   ON 06/16/93 AT 09.43.16
 
          EMPINFO
  01      S0
 **************
 *EMP_ID      **
 *LAST_NAME   **
 *FIRST_NAME  **
 *HIRE_DATE   **
 *            **
 ***************
  **************
        I
        I
        I
        I ADDRESS
  02    I S0
 **************
 *ADDEID      **
 *TYPE        **
 *ADDRESS_LN1 **
 *ADDRESS_LN2 **
 *            **
 ***************
  **************