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 |