GMRADSP5 ;HIRMFO/YMP,RM,WAA-LISTING OF ALLERGIES TO SIGNED OFF ALLERGIES ;8/16/92
Source file <GMRADSP5.m>
| Package | Total | Call Graph | 
|---|---|---|
| Adverse Reaction Tracking | 3 | (EOP,HDR)^GMRADSP3 (CLOSE,DEV)^GMRAUTL $$PRDTST^GMRAUTL1 | 
| Kernel | 3 | ^%ZTLOAD ($$FMTE,$$NOW)^XLFDT KILL^XUSCLEAN | 
| Registration | 2 | KVA^VADPT PID^VADPT6 | 
| VA Fileman | 1 | D^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| Adverse Reaction Tracking | 1 | GMRA PRINT-NOT SIGNED OFF | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DISP | ||
| TASK | ; | |
| EN1 | ; Entry to PATIENT ALLERGIES NOT SIGNED OFF option | |
| EN2 | ||
| EN3 | ||
| EXIT | ;Quit and kill | |
| EN2A | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | EN2A+4 | 
| ^GMR(120.8 - [#120.8] | EN2+1, EN2A | 
| ^TMP($J | EN2A+4*, DISP, DISP+1, DISP+2, DISP+3, DISP+4, EXIT+2!, EN3 | 
| ^VA(200 - [#200] | EN2A+4 | 
| ^XUSEC("GMRA-ALLERGY VERIFY" | EN2A+1 | 
| Name | Line Occurrences | 
|---|---|
| DISP | EN2+2 | 
| EN2A | EN2+1 | 
| EN3 | DISP+4 | 
| EXIT | EN1+5, EN1+6 | 
| TASK | EN1+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | EN3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> DFN | EN2A+3* | 
| DUZ | EN2A+1 | 
| >> GMRADFN | DISP+4*, EN3 | 
| >> GMRADT | EN2*, DISP+3*, DISP+4, EN3, EN3+1 | 
| >> GMRAHEAD( | EN1+4* | 
| >> GMRAHEAD(1 | EN1+2* | 
| >> GMRAHEAD(3 | EN1+2* | 
| >> GMRAHEAD(4 | EN1+2* | 
| >> GMRAHEAD(5 | EN1+2* | 
| >> GMRAHEAD(6 | EN1+2* | 
| >> GMRAIEN | DISP+2*, DISP+3, DISP+4, EN3 | 
| >> GMRALL | EN3*, EN3+1 | 
| >> GMRANOW | EN1+3*, EN1+4 | 
| >> GMRAORG | EN2*, DISP+1*, DISP+2, DISP+3, DISP+4, EN3, EN3+1 | 
| >> GMRAOUT | EN1+1*, EN1+5*, DISP+1, DISP+2, DISP+3, DISP+4, EN3, EN3+2 | 
| >> GMRAPAT | EN3* | 
| >> GMRAPG | DISP* | 
| >> GMRAREC | EN2+1*, EN2A, EN2A+4 | 
| >> GMRASSN | EN2A+3*, EN2A+4 | 
| >> GMRATEMP | EN2A*, EN2A+1, EN2A+2, EN2A+3, EN2A+4 | 
| GMRAZIS | EN1+5! | 
| IO("Q" | EN1+6 | 
| ION | TASK+1 | 
| IOSL | EN3+2 | 
| >> POP | EN1+5 | 
| U | EN2A+1, EN2A+2, EN2A+3, EN2A+4, EN3+1 | 
| >> VA("BID" | EN2A+3 | 
| X | EXIT+2! | 
| Y | EXIT+2!, EN3+1* | 
| Z | EXIT+2! | 
| >> ZTDESC | TASK+1* | 
| ZTDH | TASK+3! | 
| ZTDTH | TASK+1*, TASK+3! | 
| >> ZTIO | TASK+1* | 
| ZTRTN | TASK+1*, TASK+3! | 
| ZTSAVE | TASK+3! | 
| ZTSAVE("DFN" | TASK+1* | 
| ZTSAVE("GMRA*" | TASK+1* | 
| ZTSK | TASK+2, TASK+3! |