GMRAGUI1 ;SLC/DAN - CPRS GUI support ;06-May-2013 11:01;DU
Source file <GMRAGUI1.m>
Package | Total | Call Graph |
---|---|---|
Adverse Reaction Tracking | 12 | EN1^GMRAEAB WAIT^GMRAFX3 EN7^GMRAMCB ($$NKA,$$NKASCR)^GMRANKA $$DUPCHK^GMRAOR0 ADVERSE^GMRAOR7 EN1^GMRAOR9 EN1^GMRAPET0 EN1^GMRAPTB RANGE^GMRASIGN SITE^GMRAUTL VAD^GMRAUTL1 |
VA Fileman | 5 | $$FIND1^DIC (,UPDATE)^DIE ^DIK $$GET1^DIQ ^DIWP |
Kernel | 2 | $$NOW^XLFDT EN^XQOR |
National Drug File | 1 | $$TGTOG^PSNAPIS |
RPC Broker | 1 | $$BROKER^XWBLIB |
Registration | 1 | INP^VADPT |
Package | Total | Caller Graph |
---|---|---|
Adverse Reaction Tracking | 3 | GMRADEL GMRAGUI GMRAPEM0 |
IHS Electronic Health Record | 1 | BEHOARMU |
Order Entry Results Reporting | 1 | ORWDAL32 |
Name | Comments | DBIA/ICR reference |
---|---|---|
NKA | ;Change patient assessment to NKA
|
|
MESS | ;Give out locked message
|
|
OBSV | ; Get OBSERVATIONS from file 120.85
|
|
EIE(GMRAIEN,GMRADFN,GMRARRAY) | ;Mark individual entry as entered in error
|
|
UPDATE(GMRAIEN,DFN,GMRARRAY) | ;Add/edit allergies
|
|
NEXT | ;SET ARRAY NODE AND INCREMENT ARRAY COUNTER
|
|
EN1 | ; GETREC, cont'd
|
|
EXIT | ||
ADCOM(ENTRY,TYPE,GMRACOM) | ;Add comments to allergies
|
|
OBSLOOP | ||
GETUSR |
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | EIE+15 |
^DIE | EIE+5, NKA+13 |
UPDATE^DIE | ADCOM+9, UPDATE+13, UPDATE+21, UPDATE+29, UPDATE+43 |
^DIK | EIE+9, UPDATE+37 |
$$GET1^DIQ | GETUSR |
^DIWP | ADCOM+3 |
EN1^GMRAEAB | EIE+12 |
WAIT^GMRAFX3 | MESS+5 |
EN7^GMRAMCB | UPDATE+46 |
$$NKA^GMRANKA | NKA+5, UPDATE+6 |
$$NKASCR^GMRANKA | EIE+7 |
$$DUPCHK^GMRAOR0 | UPDATE+3 |
ADVERSE^GMRAOR7 | UPDATE+55 |
EN1^GMRAOR9 | UPDATE+60 |
EN1^GMRAPET0 | EIE+13, UPDATE+57 |
EN1^GMRAPTB | UPDATE+58 |
RANGE^GMRASIGN | UPDATE+60 |
SITE^GMRAUTL | UPDATE+5 |
VAD^GMRAUTL1 | UPDATE+46 |
$$TGTOG^PSNAPIS | UPDATE+17 |
INP^VADPT | EIE+15 |
$$NOW^XLFDT | ADCOM+5, UPDATE+11 |
EN^XQOR | EIE+16 |
$$BROKER^XWBLIB | MESS+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ORD(101 - [#101] | FIND1^DIC |
^GMR(120.8 - [#120.8] | Classic Fileman Calls |
^GMR(120.86 - [#120.86] | Classic Fileman Calls |
^VA(200 - [#200] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | OBSLOOP+5, OBSLOOP+11 |
^GMR(120.8 - [#120.8] | EIE+7, EIE+8, EIE+10, UPDATE+35, UPDATE+36 |
^GMR(120.85 - [#120.85] | OBSLOOP, OBSLOOP+1 |
^GMR(120.86 - [#120.86] | NKA+8, NKA+9, NKA+10*, NKA+11*, NKA+12 |
^GMRD(120.83 - [#120.83] | UPDATE+38, UPDATE+53 |
^GMRD(120.84 - [#120.84] | UPDATE+5 |
^TMP($J | UPDATE+60* |
^UTILITY($J | ADCOM+3! |
^XTMP("GMRAED" | EIE+2, EIE+17, NKA+4, NKA+15, UPDATE+4, UPDATE+62 |
Name | Line Occurrences |
---|---|
ADCOM | EIE+6, UPDATE+30 |
EXIT | OBSLOOP |
GETUSR | OBSLOOP+4, OBSLOOP+14 |
MESS | EIE+2, NKA+4, UPDATE+4 |
NEXT | OBSV+1, OBSLOOP+2, OBSLOOP+6, OBSLOOP+7, OBSLOOP+10, OBSLOOP+12, OBSLOOP+15, OBSLOOP+17 |
OBSLOOP | OBSLOOP+18 |
Name | Field # of Occurrence |
---|---|
^( | UPDATE+33, UPDATE+34 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | EIE+1~, EIE+4*, EIE+8*, NKA+2~, NKA+13*, UPDATE+1~, UPDATE+37* |
DA(1 | UPDATE+37* |
DFN | EIE+1~, EIE+14*, NKA+2~, NKA+3*, NKA+4, NKA+5, NKA+9, NKA+10, NKA+11, NKA+12 , NKA+13, NKA+15, UPDATE~, UPDATE+3, UPDATE+4, UPDATE+6, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+11 , UPDATE+12, UPDATE+16, UPDATE+46, UPDATE+50, UPDATE+62 |
DIE | EIE+1~, EIE+4*, NKA+2~, NKA+13* |
DIK | EIE+1~, EIE+8*, UPDATE+1~, UPDATE+37* |
DIWL | ADCOM+2~, ADCOM+3* |
DIWR | ADCOM+2~, ADCOM+3* |
DR | EIE+1~, EIE+4*, NKA+2~, NKA+13* |
DUZ | ADCOM+6, NKA+13, UPDATE+10, UPDATE+28, UPDATE+41 |
ENTRY | ADCOM~, ADCOM+5, ADCOM+6, ADCOM+7, ADCOM+8 |
FDA | ADCOM+2~, UPDATE+1~, UPDATE+14!, UPDATE+23!, UPDATE+31! |
FDA( | ADCOM+5*, ADCOM+6*, ADCOM+7*, ADCOM+8*, UPDATE+8*, UPDATE+9*, UPDATE+10*, UPDATE+11*, UPDATE+16*, UPDATE+19* , UPDATE+20*, UPDATE+27*, UPDATE+28*, UPDATE+38*, UPDATE+40*, UPDATE+41*, UPDATE+42* |
FILE | UPDATE+1~, UPDATE+26*, UPDATE+27, UPDATE+28 |
>> GMRA(1 | OBSLOOP+1*, OBSLOOP+4, OBSLOOP+5, OBSLOOP+8, OBSLOOP+11, OBSLOOP+14 |
GMRAAR | UPDATE+1~, UPDATE+59* |
GMRACOM | ADCOM~, ADCOM+3, ADCOM+4*, ADCOM+8 |
GMRADFN | EIE~, EIE+2, EIE+13, EIE+14, EIE+17, UPDATE+1~, UPDATE+50*, UPDATE+57 |
GMRAI | ADCOM+2~, ADCOM+3* |
GMRAIEN | OBSLOOP, EIE~, EIE+3, UPDATE~, UPDATE+1~, UPDATE+2, UPDATE+15, UPDATE+22*, UPDATE+27, UPDATE+28 , UPDATE+30, UPDATE+35, UPDATE+36, UPDATE+37, UPDATE+38, UPDATE+39, UPDATE+46, UPDATE+49, UPDATE+51, UPDATE+52 , UPDATE+53, UPDATE+54, UPDATE+55, UPDATE+56, UPDATE+57, UPDATE+58, UPDATE+59 |
GMRAIEN( | UPDATE+56* |
GMRAL | UPDATE+1~, UPDATE+54*, UPDATE+55 |
GMRAL( | UPDATE+49*, UPDATE+51*, UPDATE+52*, UPDATE+53* |
GMRAL1 | MESS+1~, MESS+3*, MESS+5, MESS+6 |
GMRAL2 | MESS+1~, MESS+4*, MESS+5, MESS+6 |
GMRALL | UPDATE+1~ |
GMRALL( | UPDATE+46* |
>> GMRALOC | UPDATE+46 |
>> GMRANAM | UPDATE+46 |
GMRAOUT | EIE+1~, EIE+11*, EIE+13, UPDATE+1~, UPDATE+48*, UPDATE+57 |
GMRAPA | EIE+1~, EIE+3*, EIE+4, EIE+6, EIE+7, EIE+8, EIE+10, EIE+13, UPDATE+1~, UPDATE+58* , UPDATE+59*, UPDATE+60 |
GMRAPA(0 | EIE+10* |
GMRAPN | EIE+18, UPDATE+1~, UPDATE+61 |
GMRAROT | UPDATE+1~ |
GMRAROT( | UPDATE+44* |
GMRARRAY | NEXT+1, EIE~, EIE+4, EIE+6, UPDATE~, UPDATE+3, UPDATE+11, UPDATE+17*, UPDATE+19, UPDATE+20 , UPDATE+25, UPDATE+27, UPDATE+30, UPDATE+32, UPDATE+47, UPDATE+49, UPDATE+51, UPDATE+52, UPDATE+58, UPDATE+59 |
GMRAS0 | UPDATE+1~, UPDATE+33*, UPDATE+35, UPDATE+36, UPDATE+37, UPDATE+38, UPDATE+40, UPDATE+42, UPDATE+44 |
>> GMRASITE | UPDATE+5 |
>> GMRASITE(0 | UPDATE+5* |
GMRAXBOS | MESS+1~, MESS+2*, MESS+5 |
>> I | OBSLOOP+16* |
IEN | UPDATE+1~, UPDATE+14! |
IEN( | UPDATE+12* |
IEN(1 | UPDATE+22 |
>> ND | NEXT+1* |
NEW | UPDATE+1~, UPDATE+2*, UPDATE+3, UPDATE+7, UPDATE+15, UPDATE+16, UPDATE+20, UPDATE+22, UPDATE+45 |
NKA | NKA+2~, NKA+5*, NKA+6, NKA+7, UPDATE+1~, UPDATE+6*, UPDATE+7 |
NODE | UPDATE+1~, UPDATE+15*, UPDATE+16, UPDATE+19, UPDATE+20, UPDATE+39*, UPDATE+40, UPDATE+41, UPDATE+42 |
>> OBSIEN | OBSV+2*, OBSLOOP*, OBSLOOP+1, OBSLOOP+2 |
>> ORDFN | NKA+3 |
OROLD | EIE+1~ |
>> ORY | EIE+18*, NKA+7*, NKA+8*, NKA+12*, NKA+14*, UPDATE+3*, UPDATE+61*, MESS+6* |
>> SEVCOD | OBSLOOP+8*, OBSLOOP+9 |
>> SEVER | OBSLOOP+9*, OBSLOOP+10 |
SIEN | UPDATE+1~, UPDATE+35*, UPDATE+36, UPDATE+37, UPDATE+38, UPDATE+39 |
>> STRING | OBSV+1*, OBSLOOP+2*, OBSLOOP+6*, OBSLOOP+7*, OBSLOOP+10*, OBSLOOP+12*, OBSLOOP+15*, OBSLOOP+16*, NEXT+1* |
SUB | UPDATE+1~, UPDATE+18*, UPDATE+19, UPDATE+20, UPDATE+24*, UPDATE+25, UPDATE+26, UPDATE+27, UPDATE+32*, UPDATE+33 , UPDATE+34, UPDATE+53* |
TYPE | ADCOM~, ADCOM+7 |
U | OBSLOOP+4, OBSLOOP+5, OBSLOOP+8, OBSLOOP+11, OBSLOOP+14, EIE+7, EIE+8, NKA+10, NKA+11, UPDATE+3 , UPDATE+17, UPDATE+19, UPDATE+20, UPDATE+34, UPDATE+35, UPDATE+36, UPDATE+37, UPDATE+38, UPDATE+40, UPDATE+42 , UPDATE+44, UPDATE+47, UPDATE+51, UPDATE+53, UPDATE+59 |
>> USR | OBSLOOP+4*, OBSLOOP+14*, GETUSR |
>> USRNAM | OBSLOOP+3*, OBSLOOP+7, OBSLOOP+13*, OBSLOOP+15, GETUSR* |
VAIN | EIE+1~ |
X | EIE+1~, EIE+15*, EIE+16, ADCOM+2~, ADCOM+3* |
Y | OBSLOOP+5*, OBSLOOP+6, OBSLOOP+11*, OBSLOOP+12, EIE+1~ |