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 |