GMRADPT ; HIRMFO/RM,WAA - UTILITY TO GATHER PATIENT DATA ; Oct 16, 2023@3:03:00
Source file <GMRADPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ; ENTRY TO GATHER PATIENT A/AR DATA
|
|
| EN2 | ; ENTRY TO GATHER PATIENT A/AR DATA
|
|
| DPT | ;
|
|
| DPT2 | ;DO NOT CALL THIS ENTRY POINT AS IT WILL BE DELETED IN THE FUTURE. USE EN2 INSTEAD.
|
|
| INTERNAL(FILE,FIELD,VALUE) | ;RETURN INTERNAL VALUE OF VUID
|
|
| SETAL(REMOTE) | ;DETERMINE WHETHER TO RETURN CURRENT ALLERGY
|
|
| DATA(GMRAREC,GMRAL) | ;RETRIEVE THE APPROPRIATE DATA
|
|
| PASS(GMRAREC,GMRAL) | ;RETRIEVE LOCAL DATA
|
|
| REMOTE(GMRAL,NODE) | ;RETRIEVE REMOTE DATA
|
|
| MECH | ;CREATE MECHANISM ARRAY
|
| FileNo | Call Tags |
|---|---|
| ^GMR(120.8 - [#120.8] | EXTERNAL^DILFD |
| ^GMR(120.85 - [#120.85] | EXTERNAL^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(120.8 - [#120.8] | DPT+6, DPT2+17, SETAL+5, PASS+7, PASS+24, PASS+25, PASS+32, PASS+33, PASS+34 |
| ^GMR(120.85 - [#120.85] | PASS+17, PASS+19, PASS+20, PASS+22 |
| ^GMR(120.86 - [#120.86] | DPT+3 |
| ^GMRD(120.83 - [#120.83] | EN1+6, DPT2+6, PASS+36 |
| ^XTMP("ORRDI" | DPT2+9, DPT2+10, DPT2+12, DPT2+20, DPT2+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | SETAL+2~, SETAL+14*, PASS+3~, PASS+8*, PASS+9, PASS+10, PASS+15*, PASS+16, PASS+20*, PASS+21 , PASS+22*, PASS+23, PASS+25*, PASS+26 |
| DATE | REMOTE+35~, REMOTE+46*, REMOTE+47 |
| >> DFN | EN1+3, DPT+3, DPT+6, DPT2+3, DPT2+8, DPT2+9, DPT2+10, DPT2+12, DPT2+17, DPT2+20 , DPT2+22, REMOTE+5 |
| ERROR | REMOTE+15~, REMOTE+20 |
| FIELD | INTERNAL~, INTERNAL+12 |
| FILE | INTERNAL~, INTERNAL+11, INTERNAL+12, REMOTE+15~, REMOTE+17*, REMOTE+18, REMOTE+19, REMOTE+21, REMOTE+22, REMOTE+42* , REMOTE+43, REMOTE+44 |
| GLOBAL | REMOTE+15~ |
| GMRA | EN1+4*, DPT+8!, DPT2+4*, DPT2+7, DPT2+9, DPT2+15, DPT2+30!, SETAL+5, SETAL+8, SETAL+9 , SETAL+12, SETAL+14 |
| GMRAI | SETAL+2~, SETAL+7*, SETAL+8*, SETAL+9*, SETAL+10*, SETAL+11, SETAL+13*, SETAL+14*, SETAL+15 |
| GMRAKC | PASS+3~, PASS+6*, PASS+42 |
| GMRAL | EN1+5!, DPT+3*, DPT+5, DPT+7*, DPT2+5!, DPT2+8*, DPT2+9, DPT2+13*, DPT2+14*, DPT2+15 , DPT2+29*, SETAL+6*, SETAL+16, DATA~, DATA+3, DATA+4, PASS~, REMOTE~ |
| GMRAL( | PASS+9*, PASS+10*, PASS+11*, PASS+16*, PASS+21*, PASS+23*, PASS+26*, PASS+31*, PASS+41* |
| GMRAL("R" | REMOTE+5*, REMOTE+7*, REMOTE+9*, REMOTE+11*, REMOTE+13*, REMOTE+23*, REMOTE+24*, REMOTE+31*, REMOTE+34*, REMOTE+38* , REMOTE+45*, REMOTE+47*, REMOTE+48* |
| GMRAL(0 | DPT+7, DPT2+29 |
| GMRANODE | DPT+6*, DPT+8!, DPT2+2~, DPT2+17*, DPT2+21~, DPT2+24*, DPT2+26*, DPT2+27*, SETAL+9, SETAL+10 , SETAL+12, SETAL+14, PASS+3~, PASS+7*, PASS+8, PASS+9, PASS+10, PASS+11, PASS+15, PASS+27 , PASS+29, PASS+30, REMOTE+3, REMOTE+7, REMOTE+11 |
| GMRAOSOF | DPT+8!, DPT2+2~ |
| GMRAOTH | EN1+2~, EN1+6*, DPT2+2~, DPT2+6*, PASS+36, REMOTE+38 |
| GMRAREC | DPT+6*, DPT+8!, DPT2+2~, DPT2+17*, DPT2+21~, DPT2+22*, DPT2+23, DPT2+25, DPT2+27, SETAL+5 , SETAL+16, DATA~, DATA+3, DATA+4, PASS~, PASS+7, PASS+9, PASS+10, PASS+11, PASS+16 , PASS+17, PASS+19, PASS+21, PASS+23, PASS+24, PASS+25, PASS+26, PASS+31, PASS+32, PASS+33 , PASS+34, PASS+41 |
| GMRARRAY | INTERNAL+10~, REMOTE+15~, REMOTE+28~, REMOTE+40~ |
| GMRARRAY( | INTERNAL+12, REMOTE+22, REMOTE+30, REMOTE+44 |
| GMRASIGN | SETAL+2~ |
| GMRATCNT | DPT+8!, DPT2+2~ |
| GMRAV1 | EN1+2~, EN1+6*, PASS+13, PASS+38 |
| GMRAX | PASS+3~, PASS+33*, PASS+34 |
| GMRAY | PASS+3~, PASS+33*, PASS+41* |
| GMRAZ | PASS+3~, PASS+34*, PASS+35, PASS+36, PASS+40 |
| GMRAZ(1 | PASS+36*, PASS+40*, PASS+41 |
| IDX | DPT2+2~, DPT2+10*, DPT2+12, PASS+18~, PASS+20*, PASS+21, PASS+23 |
| IEN | PASS+18~, PASS+19*, PASS+20, PASS+22, REMOTE+15~, REMOTE+22*, REMOTE+23, REMOTE+44*, REMOTE+45 |
| INDEX | DPT2+19~, DPT2+20*, DPT2+22, REMOTE+5, REMOTE+7, REMOTE+9, REMOTE+11, REMOTE+13, REMOTE+23, REMOTE+24 , REMOTE+31, REMOTE+34, REMOTE+38, REMOTE+45, REMOTE+47, REMOTE+48 |
| MECH | DPT2+2~, PASS+4, PASS+42!, REMOTE+3*, REMOTE+9, REMOTE+13 |
| MECH( | PASS+10, REMOTE+13 |
| MECH("A" | MECH+1* |
| MECH("P" | MECH+1* |
| MECH("U" | MECH+1* |
| NODE | REMOTE~, REMOTE+5, REMOTE+16, REMOTE+17, REMOTE+27, REMOTE+29, REMOTE+33, REMOTE+34, REMOTE+36, REMOTE+37 , REMOTE+38, REMOTE+39, REMOTE+41, REMOTE+42, REMOTE+45, REMOTE+46, REMOTE+48 |
| OBSHIS | REMOTE+26~, REMOTE+30*, REMOTE+31 |
| REMOTE | DPT2+2~, DPT2+7*, DPT2+18, SETAL~, SETAL+5 |
| RETURN | DPT2+11~, DPT2+12*, DPT2+13, DPT2+14, DPT2+21~, DPT2+23*, DPT2+24, DPT2+25*, DPT2+26, INTERNAL+7~ , INTERNAL+8*, INTERNAL+9, INTERNAL+12*, INTERNAL+13, REMOTE+15~ |
| RETURN("GLOBA | L NAME" , REMOTE+23 |
| SEVR | PASS+28~, PASS+29*, PASS+31 |
| SEVRDT | PASS+28~, PASS+30*, PASS+31 |
| SINDEX | REMOTE+35~, REMOTE+36*, REMOTE+37, REMOTE+38, REMOTE+39, REMOTE+41, REMOTE+42, REMOTE+45, REMOTE+46, REMOTE+47 |
| U | DPT+3, DPT2+7, DPT2+9, DPT2+15, DPT2+24, DPT2+26, DPT2+27, INTERNAL+11, SETAL+5, SETAL+8 , SETAL+9, SETAL+10, SETAL+12, SETAL+14, PASS+8, PASS+9, PASS+10, PASS+11, PASS+15, PASS+16 , PASS+20, PASS+21, PASS+22, PASS+24, PASS+25, PASS+27, PASS+29, PASS+30, PASS+31, PASS+36 , PASS+40, REMOTE+3, REMOTE+5, REMOTE+7, REMOTE+9, REMOTE+11, REMOTE+13, REMOTE+16, REMOTE+17, REMOTE+23 , REMOTE+24, REMOTE+29, REMOTE+34, REMOTE+37, REMOTE+38, REMOTE+39, REMOTE+41, REMOTE+42, REMOTE+45, REMOTE+47 |
| VALUE | INTERNAL~, INTERNAL+9, INTERNAL+11 |
| VUID | REMOTE+15~, REMOTE+16*, REMOTE+21, REMOTE+41*, REMOTE+43 |
