DVBAREQ1 ;ALB/GTS-557/THM-AMIE NEW REQUESTS; 21 JUL 89@0128
Source file <DVBAREQ1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BYDATE | ;Selection by the date like old way
|
|
| BYNAME | ;Selection by patient name
|
|
| LINE | ;LINE FEED
|
|
| REMOTE | ;Get remote site name from user
|
|
| ASK | ||
| DATE | ;Gets beginning and ending dates from user
|
|
| GO | ||
| DATA | ||
| LOOPDIV | ;** Loop through Division - 'AE' X-ref
|
|
| LOOPDA | ;** Loop through DA - 'AE' X-ref
|
|
| EXIT | ||
| TASK | ||
| DEQUE | ||
| CLIN | ;Logic not changed, it is the original - needs to be
|
|
| INIT | ;Initialize variables
|
|
| HDR | ;Writes header info
|
|
| DEVICE | ;Get device to print to
|
| FileNo | Call Tags |
|---|---|
| ^DG(40.8 - [#40.8] | Classic Fileman Calls |
