DBIA355    ICR (355)

Read access to the following fields and
cross-references:

FIELDS:

ELEMENT                       FILE
DD LEVEL                  FIELD #                 DD NUMBER

**APPOINTMENT DATE/TIME         PATIENT
1                         1900                    2
2                         .001                    2.98

**APPOINTMENT STATUS            PATIENT
1                         1900                    2
2                         3                       2.98

**APPOINTMENT TYPE              PATIENT
1                         1900                    2
2                         9.5                     2.98

**APPT. CANCELLATION REASON     PATIENT
1                         1900                    2
2                         16                      2.98

**CLINIC                        PATIENT
1                         1900                    2
2                         .01                     2.98

(The above fields related to field 1900 will be eliminated with the scheduling
redesign.) **DATE OF ENROLLMENT            PATIENT

XREF: AEB