GMRASIGN ;HIRMFO/WAA-ALLERGY/ADVERSE REACTION PATIENT SIGN OFF ;9/22/06 11:01
Source file <GMRASIGN.m>
Package | Total | Call Graph |
---|---|---|
Adverse Reaction Tracking | 9 | DELETE^GMRADEL EN4^GMRAMCB HANGT^GMRAPEH0 $$REQCOM^GMRAPEM0 EDIT^GMRAPEM4 PTBUL^GMRAROBS (ENCNT,PNOTE,PRINT,YNSO)^GMRASIG1 (SITE,UNLOCK)^GMRAUTL EN1^GMRAVAB |
VA Fileman | 4 | $$FIND1^DIC ^DIE ^DIK ^DIR |
Kernel | 2 | SETUP^XQALERT EN^XQOR |
Registration | 1 | INP^VADPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
DELOBS | ;Delete observed data from 120.85
|
|
VFY(Y) | ;THIS FUNCTION WILL RETURN TRUE IF THIS ALLERGY IS AUTO VERIFIED
|
|
SIGNOFF | ; The signoff code
|
|
RANGE(GMRARNG) | ;Sign off select allergies
|
|
IDBAND | ; Mark ID Bands and Charts for a given patient
|
|
ALERT | ; SENDS ALERT FOR ALL DATA THAT IS UNSIGNED
|
|
SOQ | ;Sign off on all allergies for a patient
|
|
REMAIN | ;Review remaining entries that were not signed off. Entire section added with patch 17
|
|
ALLSNG | ;Sign off on all
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | RANGE+22 |
^DIE | RANGE+7, RANGE+14, RANGE+16 |
^DIK | DELOBS+2 |
^DIR | SOQ+8, REMAIN+11, REMAIN+19, REMAIN+21 |
DELETE^GMRADEL | REMAIN+26 |
EN4^GMRAMCB | IDBAND+2 |
HANGT^GMRAPEH0 | ALERT+13 |
$$REQCOM^GMRAPEM0 | REMAIN+17, REMAIN+18 |
EDIT^GMRAPEM4 | REMAIN+16 |
PTBUL^GMRAROBS | RANGE+18 |
ENCNT^GMRASIG1 | SIGNOFF+3 |
PNOTE^GMRASIG1 | SIGNOFF+10 |
PRINT^GMRASIG1 | SOQ+2 |
YNSO^GMRASIG1 | SIGNOFF+6 |
SITE^GMRAUTL | VFY+3 |
UNLOCK^GMRAUTL | ALERT+12, IDBAND+2 |
EN1^GMRAVAB | RANGE+16 |
INP^VADPT | RANGE+22 |
SETUP^XQALERT | ALERT+11 |
EN^XQOR | RANGE+22 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
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.85 - [#120.85] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^GMR(120.8 - [#120.8] | RANGE+8, RANGE+17, RANGE+20, ALERT+5, REMAIN+4, REMAIN+17, REMAIN+20 |
^GMR(120.85 - [#120.85] | REMAIN+17, REMAIN+20, DELOBS+2 |
^GMRD(120.84 - [#120.84] | VFY+4 |
^TMP($J | SIGNOFF+11!, ALLSNG+3, RANGE+5, RANGE+24!, ALERT+1, ALERT+4, ALERT+14, ALERT+15!, REMAIN+3, REMAIN+4 , REMAIN+26 |
Name | Line Occurrences |
---|---|
$$VFY | RANGE+13 |
ALERT | SIGNOFF+7 |
ALLSNG | SOQ+11 |
DELOBS | REMAIN+20 |
RANGE | SIGNOFF+6, SOQ+11, REMAIN+25 |
REMAIN | ALERT+2 |
SOQ | SIGNOFF+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | RANGE+7*, RANGE+12*, DELOBS+1~, DELOBS+2* |
DFN | RANGE+21~*, ALERT+9, IDBAND+2 |
DIC | REMAIN+1~ |
>> DIE | RANGE+7*, RANGE+12* |
DIK | DELOBS+1~, DELOBS+2* |
DIR | SOQ+3~, REMAIN+1~, REMAIN+11! |
DIR("?" | SOQ+5*, REMAIN+6*, REMAIN+7*, REMAIN+8*, REMAIN+9*, REMAIN+10*, REMAIN+21* |
DIR("??" | SOQ+6* |
DIR("A" | SOQ+7*, REMAIN+11*, REMAIN+19*, REMAIN+21* |
DIR("B" | SOQ+4*, REMAIN+5*, REMAIN+19*, REMAIN+21* |
DIR(0 | SOQ+4*, REMAIN+5*, REMAIN+19*, REMAIN+21* |
DIRUT | SOQ+9, REMAIN+1~, REMAIN+11, REMAIN+23 |
DONE | REMAIN+1~, REMAIN+14, REMAIN+15*, REMAIN+19*, REMAIN+23*, REMAIN+24* |
DR | RANGE+7*, RANGE+12!, RANGE+14*, RANGE+16* |
DUOUT | REMAIN+1~ |
DUZ | ALERT+6 |
GMRACNT | RANGE+5*, RANGE+12~, RANGE+21~, RANGE+24, ALERT+4* |
GMRACNTF | ALERT+4*, ALERT+13*, ALERT+17! |
GMRACNTT | SIGNOFF+1~, SIGNOFF+6, SOQ+7 |
>> GMRANAM | ALERT+7 |
GMRANEW | REMAIN+1~, REMAIN+13* |
GMRAOUT | SIGNOFF+1~*, SOQ+9*, REMAIN+1~, REMAIN+15* |
GMRAPA | RANGE+5*, RANGE+7, RANGE+8, RANGE+10, RANGE+12, RANGE+13, RANGE+17, RANGE+20, RANGE+24, ALERT+4* , ALERT+5, ALERT+9, ALERT+12, ALERT+14, ALERT+15, IDBAND+2*, REMAIN+1~, REMAIN+4*, REMAIN+17, REMAIN+20 , DELOBS+2 |
GMRAPA(0 | RANGE+8*, RANGE+9, RANGE+11, RANGE+17*, RANGE+18, RANGE+20*, RANGE+21, ALERT+5*, ALERT+7, REMAIN+4* , REMAIN+11 |
GMRAPASS | VFY+1~, VFY+2*, VFY+6*, VFY+7 |
GMRARNG | RANGE~, RANGE+5, RANGE+6~ |
>> GMRASIGN | SIGNOFF+2*, SIGNOFF+6* |
GMRASITE | SIGNOFF+9!, VFY+3, VFY+4 |
GMRASLL | IDBAND+1, IDBAND+2, IDBAND+3! |
GMRASLL( | RANGE+10*, IDBAND+2 |
GMRATYPE | RANGE+4~, RANGE+9*, RANGE+18, VFY+5*, VFY+6 |
>> GMRAUSER | ALERT+9 |
I | RANGE+5*, RANGE+6~ |
IOF | SOQ+1 |
LCVJ | REMAIN+1~, REMAIN+3*, REMAIN+4, REMAIN+24 |
OIEN | DELOBS+1~, DELOBS+2* |
OROLD | RANGE+21~ |
SIGNED | REMAIN+1~, REMAIN+2*, REMAIN+24*, REMAIN+25 |
U | RANGE+9, RANGE+11, RANGE+18, RANGE+21, ALERT+7, ALERT+9, VFY+5, VFY+6, REMAIN+11, REMAIN+17 , REMAIN+20 |
VAIN | RANGE+22! |
X | SOQ+2!, ALLSNG+1~, ALLSNG+2*, ALLSNG+3*, RANGE+22*!, ALERT+14*, ALERT+15, VFY+1~, VFY+4*, VFY+6 |
XQA | ALERT+17! |
XQA( | ALERT+6* |
>> XQADATA | ALERT+3, ALERT+9* |
>> XQAID | ALERT+8* |
XQAMSG | ALERT+7*, ALERT+17! |
>> XQAROU | ALERT+10* |
Y | SIGNOFF+5, SIGNOFF+6, SOQ+9*, SOQ+10, SOQ+11, SOQ+12*, ALLSNG+2*, ALLSNG+3*, VFY~, REMAIN+1~ , REMAIN+11*, REMAIN+12, REMAIN+19, REMAIN+22 |
Y(0 | VFY+5, VFY+6 |