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 |