GMTSALG ; SLC/DLT,KER - Allergies ;08-Mar-2011 08:39;DU
Source file <GMTSALG.m>
Package | Total | Call Graph |
---|---|---|
Health Summary | 3 | $$WRAP^GMTSORC (REGDT4,REGDTM4)^GMTSU CKP^GMTSUP |
VA Fileman | 2 | $$GET1^DIQ ^DIWP |
Adverse Reaction Tracking | 1 | EN1^GMRADPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
ALLAS | ; Allergy Assessment
|
|
NKA | ; No known allergies
|
|
TEXT | ; Setup for print of allergy comments
|
|
ALLRGP | ; Allergy Print
|
|
TITLE | ; Print title
|
|
SIGBLK(GMTSALF) | ; Signature block
|
|
GETALLRG | ; Get Allergies
|
|
ALLRG | ; Allergies
|
|
PRUN | ;IHS/MSC/MGH Print unassessable
|
|
AUTOV | ; Autoverify
|
|
UNASS(DFN) | ;IHS/MSC/MGH Check if patient is unassessable
|
|
FORMAT | ; Formats each line
|
|
LINE | ; Writes formatted lines of text
|
|
INACTIVE(NODE) | ;IHS/MSC/MGH Display the inactive data as needed
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | ALLAS+2, ALLAS+4, ALLAS+5, ALLAS+6, SIGBLK+1, UNASS+6, UNASS+7 |
^DIWP | FORMAT+1 |
EN1^GMRADPT | GETALLRG+2 |
$$WRAP^GMTSORC | ALLRGP+6 |
REGDT4^GMTSU | ALLAS+3 |
REGDTM4^GMTSU | ALLRGP+25, ALLRGP+29, ALLRGP+30 |
CKP^GMTSUP | ALLRG+9, ALLRGP+3, ALLRGP+6, ALLRGP+10, ALLRGP+16, ALLRGP+20, ALLRGP+26, ALLRGP+27, ALLRGP+29, ALLRGP+30 , NKA+2, NKA+3, NKA+4, NKA+5, NKA+6, PRUN+1, PRUN+2, TITLE+1, TEXT+1, LINE+1 , SIGBLK+2, SIGBLK+3, INACTIVE+2, INACTIVE+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^GMR(120.86 - [#120.86] | GET1^DIQ |
120.869999911 | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | ALLRG+4 |
^BEHOAR(90460.05 - [#90460.05] | ALLRGP+13, ALLRGP+24 |
^GMR(120.8 - [#120.8] | ALLRGP+9, ALLRGP+30, AUTOV+1, TEXT+2 |
^GMR(120.86 - [#120.86] | UNASS+3, UNASS+4 |
^UTILITY($J | TEXT+2!, TEXT+3, TEXT+4!, LINE+1 |
Name | Line Occurrences |
---|---|
ALLAS | GETALLRG+3 |
ALLRGP | ALLRG+6 |
AUTOV | ALLRGP+6 |
FORMAT | TEXT+2 |
GETALLRG | ALLRG+6 |
LINE | TEXT+3 |
NKA | ALLRG+6 |
PRUN | ALLRG+8, ALLRGP+1, NKA+1 |
SIGBLK | ALLRGP+28 |
TEXT | ALLRGP+30 |
TITLE | ALLRG+6 |
UNASS | GETALLRG+1 |
Name | Field # of Occurrence |
---|---|
^(0 | ALLRGP+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALL | ALLRG+10!, ALLRGP+15*, ALLRGP+16, ALLRGP+20*, ALLRGP+21*, INACTIVE+1~ |
ALLRG | ALLRG+3~*, ALLRG+6, ALLRG+7, ALLRG+9, ALLRG+10!, GETALLRG+2*, GETALLRG+3*, GETALLRG+13* |
C | ALLRG+2~ |
CC | ALLRG+2~, ALLRG+10!, ALLRGP+30* |
CCC | ALLRG+10!, ALLRGP+30*, TEXT+2 |
CD | ALLRG+10!, ALLRGP+30*, TEXT+1 |
DFN | GETALLRG+1, GETALLRG+3, ALLAS+2, ALLAS+4, UNASS~, UNASS+3, UNASS+4, UNASS+5 |
DIWF | ALLRG+10!, FORMAT+1* |
DIWL | ALLRG+10!, TEXT+3, FORMAT+1*, LINE+1 |
DIWR | ALLRG+10!, FORMAT+1* |
GMRA | ALLRG+10!, GETALLRG+2* |
GMRAL | ALLRG+1~, ALLRG+10!, GETALLRG+2, GETALLRG+3, GETALLRG+4 |
GMRAL( | GETALLRG+5, GETALLRG+6, GETALLRG+7, GETALLRG+8, GETALLRG+10, GETALLRG+11, GETALLRG+12 |
GMRAUNDT | ALLRG+1~, ALLRGP+1, NKA+1, PRUN+1, UNASS+2*, UNASS+6* |
GMRAUNRE | ALLRG+1~, PRUN+2, UNASS+2*, UNASS+7* |
GMRSRC | ALLRG+2~ |
GMTSA | ALLRG+3!, ALLRG+10! |
GMTSAFN | ALLRG+1~, ALLRGP+28, ALLRGP+29, AUTOV+1*, AUTOV+2 |
GMTSAL | ALLRG+1~, ALLRG+10! |
GMTSAL( | ALLRGP+2, ALLRGP+4, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+12, ALLRGP+13, ALLRGP+15, ALLRGP+19, ALLRGP+23 , ALLRGP+24, ALLRGP+25, GETALLRG+10*, GETALLRG+12*, AUTOV+1 |
GMTSALAD | ALLRG+1~, NKA+2, NKA+4, ALLAS+1*, ALLAS+2*, ALLAS+3* |
GMTSALAS | ALLRG+1~, ALLRG+6, ALLRG+7, NKA+2, NKA+3, NKA+4, ALLAS+1* |
GMTSALAT | ALLRG+1~, NKA+6, ALLAS+6*, ALLAS+7* |
GMTSALAW | ALLRG+1~, NKA+4, NKA+5, NKA+6, ALLAS+1*, ALLAS+5*, ALLAS+7* |
GMTSALF | ALLRG+10!, SIGBLK~, SIGBLK+1 |
GMTSALG1 | ALLAS+1~ |
GMTSALG2 | ALLAS+1~, ALLAS+2 |
GMTSALG3 | ALLAS+1~, ALLAS+7 |
GMTSALNM | ALLRG+2~, ALLRG+10!, ALLRGP+9, ALLRGP+30, AUTOV+1*, TEXT+2 |
GMTSAU | ALLAS+1~, ALLAS+4*, ALLAS+5, ALLAS+6 |
GMTSAV | ALLRG+1~, ALLRGP+7, AUTOV+1*, AUTOV+2* |
GMTSCNT | ALLRG+2~, ALLRG+10!, GETALLRG+5*, GETALLRG+10, GETALLRG+12 |
GMTSEACT | ALLRG+2~, ALLRG+10!, GETALLRG+7*, GETALLRG+10, GETALLRG+12 |
GMTSLN | ALLRG+2~, ALLRG+10!, TEXT+2*, TEXT+3*, TEXT+5, LINE+1 |
GMTSMECH | ALLRG+2~, ALLRG+10!, GETALLRG+8*, GETALLRG+9*, GETALLRG+10, GETALLRG+12 |
GMTSNODE | ALLRG+10! |
GMTSPFN | ALLRG+10! |
>> GMTSPNF | ALLRG+9, TITLE+2 |
GMTSPRT | ALLRG+2~, ALLRG+10!, TEXT+2*, FORMAT+1 |
>> GMTSQIT | ALLRG+5, ALLRG+9, ALLRGP+3, ALLRGP+6, ALLRGP+10, ALLRGP+15, ALLRGP+16, ALLRGP+20, ALLRGP+26, ALLRGP+27 , ALLRGP+29, ALLRGP+30, NKA+2, NKA+3, NKA+4, NKA+5, NKA+6, PRUN+1, PRUN+2, TITLE+1 , TEXT+1, TEXT+3, LINE+1, SIGBLK+2, SIGBLK+3, INACTIVE+2, INACTIVE+3 |
>> GMTSRC | ALLRGP+13*, ALLRGP+14, GETALLRG+11* |
GMTSSB | SIGBLK+1~*, SIGBLK+2 |
GMTSSN | SIGBLK+1~*, SIGBLK+2 |
GMTSSRC | ALLRG+2~, ALLRGP+24*, ALLRGP+27 |
GMTSST | SIGBLK+1~*, SIGBLK+3 |
GMTSSTM | ALLRG+2~, ALLRGP+25* |
GMTSTY | ALLRG+2~, ALLRG+10!, GETALLRG+6*, GETALLRG+10, GETALLRG+12 |
I | ALLRG+10!, GETALLRG+5*, GETALLRG+6, GETALLRG+7, GETALLRG+8, GETALLRG+10, GETALLRG+11, GETALLRG+12 |
II | ALLRG+10!, ALLRGP+2*, ALLRGP+3, ALLRGP+4, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+12, ALLRGP+13, ALLRGP+15 , ALLRGP+19, ALLRGP+23, ALLRGP+24, ALLRGP+25, AUTOV+1 |
IIEN | UNASS+1~ |
INACTIVE | ALLRG+2~ |
INIEN | UNASS+1~, UNASS+5*, UNASS+6, UNASS+7 |
JJ | ALLRG+3~, ALLRG+10!, ALLRGP+4*, ALLRGP+5, ALLRGP+6, ALLRGP+8, ALLRGP+12, ALLRGP+13, ALLRGP+15, ALLRGP+19 , ALLRGP+23, ALLRGP+24, ALLRGP+25, GETALLRG+12*, AUTOV+1 |
KK | ALLRG+2~, ALLRG+10!, ALLRGP+5*, ALLRGP+6, ALLRGP+8, ALLRGP+12, ALLRGP+13, ALLRGP+15, ALLRGP+19, ALLRGP+23 , ALLRGP+24, ALLRGP+25, AUTOV+1 |
L | ALLRG+10!, ALLRGP+6*, ALLRGP+8, ALLRGP+12, ALLRGP+13, ALLRGP+15, ALLRGP+19, ALLRGP+23, ALLRGP+24, ALLRGP+25 , AUTOV+1 |
M | ALLRG+10!, ALLRGP+15*, ALLRGP+19, ALLRGP+23, ALLRGP+24, ALLRGP+25 |
MX | ALLRG+10!, ALLRGP+15*, ALLRGP+17*, ALLRGP+18, INACTIVE+1~ |
N | ALLRG+10!, ALLRGP+19*, ALLRGP+20, ALLRGP+21, INACTIVE+1~ |
NODE | INACTIVE~, INACTIVE+2, INACTIVE+3 |
ODT | ALLRG+10!, ALLRGP+29* |
SEQ | ALLRG+3*, ALLRG+10! |
TITLE | ALLRG+3~*, ALLRG+10!, TITLE+2, TITLE+3 |
U | ALLRGP+8, ALLRGP+9, ALLRGP+12, ALLRGP+13, ALLRGP+23, ALLRGP+24, ALLRGP+25, ALLRGP+28, ALLRGP+29, GETALLRG+6 , GETALLRG+7, GETALLRG+8, GETALLRG+11, AUTOV+1, AUTOV+2, INACTIVE+2, INACTIVE+3, UNASS+4 |
WKK | ALLRGP+5~, ALLRGP+6*, ALLRGP+10 |
X | ALLRG+1~, ALLRG+4*, ALLRG+10!, ALLRGP+25*, ALLRGP+26, ALLRGP+29*, ALLRGP+30*, ALLAS+1~, ALLAS+3*, FORMAT+1* |
Y | UNASS+1~, UNASS+3*, UNASS+4, UNASS+5 |
Z | ALLRG+10! |