IBTRED ;ALB/AAS - EXPAND/EDIT CLAIMS TRACKING ENTRY ;01-JUL-1993
Source file <IBTRED.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for IBT EXPAND/EDIT TRACKING
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BLD | ; -- list builder
|
|
| VISIT | ; -- Visit info Region
|
|
| 1 | ; -- visit region for admission or scheduled admission
|
|
| 2 | ; -- visit region for outpatient care
|
|
| 3 | ; -- visit region for rx refill
|
|
| 4 | ; -- Visit region for prosthetics
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| BLANK(LINE) | ; -- Build blank line
|
|
| ETYP(IBTRN) | ; -- Expand type of epidose and date
|
|
| ETYPQ | ||
| ENCL(IBOE) | ; -- output format of classifications
|
|
| ENCLQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
