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! |