Db2dclgn Indicator variables

Hi!

I'm using db2 UDV v9.1 and MF Cobol Net Express v 5.

db2dclgn generates cobol descriptions for a table.
Like table Employee in the sample database.

01 EMPLOYEE.
05 EMPNO PIC X(6).
05 FIRSTNME.
49 LEN PIC S9(4) COMP-5.
49 DAT PIC X(12).
05 MIDINIT PIC X(1).
05 LASTNAME.
49 LEN PIC S9(4) COMP-5.
49 DAT PIC X(15).
05 WORKDEPT PIC X(3).
05 PHONENO PIC X(4).
05 HIREDATE PIC X(10).
05 JOB PIC X(8).
05 EDLEVEL PIC S9(4) COMP-5.
05 SEX PIC X(1).
05 BIRTHDATE PIC X(10).
05 SALARY PIC S9(7)V9(2) COMP-3.
05 BONUS PIC S9(7)V9(2) COMP-3.
05 COMM PIC S9(7)V9(2) COMP-3.

01 IND-TAB-EMPLOYEE.
05 IND-EMPLOYEE PIC S9(4) COMP-5 OCCURS 14 TIMES.

1. Why doesn't IBM provide a prefix for varchar LEN and DAT fields ?
Now I have to refer to "DAT in FIRSTNME in EMP" which is bit
tedious.
Any workaround ?
(The internal table description generator in Netexpress generates
MIDINIT-DAT and MIDINIT-LEN)

2. How do I use the Indicator table?
The preproceesor does not allow me to use
FETCH ..... :EMP.MIDINIT INDICATOR :IND-EMPLOYEE(3) or any other
construct that I've tried.
Is the indicator table meaningful in some other language / compiler
or what ?


\dg


.

Relevant Pages

  • Re: Industry Night?
    ... They are great fun as you need to have your employee ID to get in if the ... past is any indicator. ... Friday/Saturday prime time? ...
    (alt.vacation.las-vegas)
  • Re: ONE CURE for BOTH type 1 and type 2 diabetes???
    ... A lot of residents are. ... I have not ever been a hospital employee. ... The level of truth in this reply is a good indicator of your overall ... indicator of his overall credibility than is warranted. ...
    (sci.med.cardiology)
  • Re: Industry Night?
    ... past is any indicator. ... for business as well! ... you don't need an employee ID to get in! ... Alto ...
    (alt.vacation.las-vegas)