ADGEVNT ; IHS/ADC/PDW/ENM - IHS/ADT EVENT DRIVER ; [ 03/25/1999 11:48 AM ]
Source file <ADGEVNT.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Changes To ADT | 5 | (ADMDS,AMA,DEATH,ICU,READM,TI,TO)^ADGBULL1 ($$DSRV,APCDALV,APCDALVR,APCDCVDT,APCDVDLT)^ADGCALLS EN^ADGCRB0 EN^ADGLOC0 ^ADGREADM | 
| VA Fileman | 4 | ^%DT ^DIC ^DIE ^DIK | 
| IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| A | ; -- driver | |
| TS() | ; -- specialty ien | |
| ON(N) | ; -- returns 1 if bulletin turned on | |
| N3() | ; -- discharge node | |
| NBCHK | ; -- checks newborn admit date against date of birth | |
| A6() | ; -- admitting service changed (1=yes,0=no) | |
| BULL | ; -- check if bulletins turned on and call subrtns to send them | |
| A3 | ; -- admission movement with discharge pointer | |
| AS | ; -- a sheet and locator | |
| VH() | ; -- v hospitalization ien | |
| 1 | ; -- admissions | |
| 3 | ; -- discharges | |
| 2 | ; -- transfers | |
| 5 | ; -- check-out lodger | |
| 4 | ; -- check-in lodger | |
| VI() | ; -- visit ien | |
| 6 | ; -- specialty | |
| IC | ; -- incomplete chart | |
| ID() | ; -- inverse date | |
| TF() | ; -- transfer facility | 
| Name | Field # of Occurrence | 
|---|---|
| ^%DT | 3+1 | 
| ADMDS^ADGBULL1 | BULL+11 | 
| AMA^ADGBULL1 | BULL+22 | 
| DEATH^ADGBULL1 | BULL+23 | 
| ICU^ADGBULL1 | BULL+16 | 
| READM^ADGBULL1 | BULL+10 | 
| TI^ADGBULL1 | BULL+5 | 
| TO^ADGBULL1 | BULL+21 | 
| $$DSRV^ADGCALLS | 6+3, 6+4, A3+5 | 
| APCDALV^ADGCALLS | 1+2 | 
| APCDALVR^ADGCALLS | 3+2, 3+8, 6+4, A3+1, A3+7 | 
| APCDCVDT^ADGCALLS | 1+4 | 
| APCDVDLT^ADGCALLS | 1+3 | 
| EN^ADGCRB0 | AS+1 | 
| EN^ADGLOC0 | AS+2 | 
| ^ADGREADM | BULL+9 | 
| ^DIC | IC+5, IC+11 | 
| ^DIE | IC+15 | 
| ^DIK | 3+3 | 
| $$VAL^XBDIQ1 | BULL+4, BULL+16, BULL+19 | 
| $$VALI^XBDIQ1 | ON+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^AUPNVINP - [#9000010.02] | Classic Fileman Calls | 
| ^ADGIC - [#9009013] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ADGIC - [#9009013] | IC+2, IC+6, IC+7*, IC+8, IC+10, IC+15 | 
| ^ADGIC(0 | IC+3, IC+5 | 
| ^AGPATCH( | 3+1* | 
| ^AUPNVINP - [#9000010.02] | 6+3 | 
| ^AUPNVINP("AD" | VH+1 | 
| ^AUPNVSIT("AA" | VI+1 | 
| ^DG(43 - [#43] | IC+1 | 
| ^DGPM - [#405] | 6+1, IC+12, ID+1, N3+1, NBCHK+4 | 
| ^DGPM("APHY" | TS+1 | 
| ^DGPM("ATS" | IC+13 | 
| ^DIC(45.7 - [#45.7] | NBCHK+2 | 
| ^DPT - [#2] | 3+1, NBCHK+5 | 
| ^TMP("DGPM" | A3+4, A6+1 | 
| Name | Line Occurrences | 
|---|---|
| $$A6 | A3+3 | 
| $$ID | VI+1 | 
| $$N3 | A3+1, A3+7 | 
| $$ON | BULL+3, BULL+8, BULL+15, BULL+21, BULL+22, BULL+23 | 
| $$TF | 3+7 | 
| $$TS | A3+4, A6+1, NBCHK+3 | 
| $$VH | 3+3, 6+3, A3+1 | 
| $$VI | VH+1 | 
| @( | A+2 | 
| A3 | 1+5 | 
| AS | 1+2, 1+6 | 
| BULL | 1+2, 1+6, 3+2, 3+9, 2+1 | 
| IC | 3+2 | 
| NBCHK | 1+1, 6+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | IC+13 | 
| ^("P" | A6+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADTYP | BULL+4~*, BULL+5 | 
| >> APCDALVR | 3+8, A3+6 | 
| >> APCDALVR("APCDDSCH" | 3+4* | 
| >> APCDALVR("APCDTADS" | A3+4* | 
| >> APCDALVR("APCDTAT" | A3+2* | 
| >> APCDALVR("APCDTDCS" | 6+4*, A3+5* | 
| >> APCDALVR("APCDTDT" | 3+5* | 
| >> APCDALVR("APCDTTT" | 3+7* | 
| C | IC+12~*, IC+13 | 
| DA | 3+3*!, IC+8* | 
| DA(1 | IC+8* | 
| >> DFN | 3+1, IC+2, IC+4, IC+6, IC+7, IC+8, IC+9, IC+10, IC+13, IC+15 , AS+1, AS+2, VI+1 | 
| DGDT | BULL+9~* | 
| DGPMA | A+1, 1+1, 1+3, 1+4, 1+5, 3+3, 3+4, 3+5, 3+6, 6+2 , A3+1~*, A3+2, A3+7~*, IC+8, IC+12, TF+1, NBCHK+5, NBCHK+6, BULL+4, BULL+9 , BULL+16, BULL+19 | 
| DGPMCA | A+1~*, 6+1, ID+1, N3+1 | 
| >> DGPMDA | AS+1, AS+2, TS+1, NBCHK+3 | 
| DGPMP | A+1, 1+2, 1+4, 3+2, 3+4, 3+5, 3+6, A3+1~*, A3+2, A3+7~* | 
| >> DGPMT | A+2, NBCHK+3, BULL+1, BULL+13, BULL+18 | 
| DGRE | BULL+8!, BULL+9, BULL+10, BULL+11 | 
| DIC | IC+4*, IC+9*, IC+14, IC+15! | 
| DIC(0 | IC+4*, IC+9* | 
| DIE | IC+14*, IC+15! | 
| DIK | 3+3*! | 
| >> DLAYGO | IC+4*, IC+9* | 
| DOB | NBCHK+1~, NBCHK+5*, NBCHK+6 | 
| DR | IC+14*, IC+15! | 
| DUZ(2 | 3+1 | 
| I | IC+12~*, IC+13 | 
| N | IC+12~*, ON~, ON+1 | 
| T | IC+12~, IC+13* | 
| U | A+1, 1+5, 3+5, 3+6, 6+1, 6+3, A3+2, A3+4, IC+1, IC+8 , IC+12, N3+1, TF+1, A6+1, NBCHK+4, NBCHK+5, BULL+4, BULL+16, BULL+19 | 
| X | 3+1~*, IC+4*, IC+8*, TF+1~*, NBCHK+1~, NBCHK+2*, NBCHK+4, BULL+19~*, BULL+20, BULL+21 , BULL+22 | 
| Y | 3+1~, NBCHK+3*, NBCHK+4 |