DVBAREN1 ;ALB/JLU;NEW 7131 REQ FOR NON-ADMIT VETS;9/20/94
Source file <DVBAREN1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OLD | ;this is the main entry point.
|
|
| A1 | ;writes header statement for admission dates
|
|
| N1 | ;writes the header statement for activity dates
|
|
| B1 | ;writes the header statement for both admission and activity dates
|
|
| COLADM | ;gathers the admission info. and stores in to the ^TMP global
|
|
| ADMSET(A) | ;starts the process of setting up the ^TMP global
|
|
| COLAPT | ;gathers the appointment information
|
|
| APTSET(A) | ;begins to set up the ^TMP global for appointments
|
|
| COLSTP | ;gathers the stop code information
|
|
| COLLOG | ;gathers the disposition information
|
|
| DISSET(DVBA2) | ;begins to set up the ^TMP with dispositions
|
|
| SET(IDT,CDT,TYP,FTYP,X2) | ;
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |