GMRCHL7B ;SLC/DCM,MA,JFR - Process data from GMRCHL7A ; 12/1/20 4:43pm
Source file <GMRCHL7B.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEW(MESSAGE) | ;Add new order
|
|
| DC(GMRCO,ACTRL) | ;Discontinue request from OERR
|
|
| MODIFY | ;Change an order/request when an HL7 'XX' code is received
|
|
| REASON | ;load the reason for request into ^GMR(123,IFN,20
|
|
| COMMENT(GMRCARY) | ;add comments to the record. Add the comment header, then the comment lines, and lastly, the number of comment lines to the header
|
|
| EXIT | ;kill off all variables
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | NEW+21 |
| ^DIE | NEW+28, NEW+54, DC+14, MODIFY+9 |
| $$GET1^DIQ | NEW+29 |
| $$DCNOTE^GMRCADC | DC+20 |
| $$ORTX^GMRCAU | DC+27 |
| $$CHKTXT^GMRCHL7U | REASON+2, COMMENT+4 |
| ALERT^GMRCHL7U | NEW+60 |
| AUDIT0^GMRCHL7U | NEW+57, DC+15, MODIFY+10 |
| MSG^GMRCP | DC+29 |
| $$DCPRNT^GMRCUTL1 | DC+17 |
| $$NEWUCID^GMRCUTL1 | NEW+24 |
| PRNT^GMRCUTL1 | NEW+61, DC+18 |
| $$CODECS^ICDEX | NEW+35 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | Classic Fileman Calls |
| ^GMR(123.5 - [#123.5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(123 - [#123] | NEW+26, NEW+56, NEW+58*, DC+8, DC+18, DC+19, DC+21, DC+23, REASON+1*, REASON+2* , REASON+3*, COMMENT+3*, COMMENT+4*, COMMENT+5* |
| ^GMR(123.1 - [#123.1] | DC+10, DC+11, MODIFY+6, MODIFY+7 |
| ^GMR(123.3 - [#123.3] | NEW+38, NEW+42, NEW+43, NEW+45 |
| ^GMR(123.5 - [#123.5] | NEW+48, NEW+49, DC+24 |
| ^XTMP("GMRCHL7B" | NEW+25* |
| Name | Field # of Occurrence |
|---|---|
| ^( | DC+24 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTRL | DC~, DC+10, DC+17, DC+26, DC+28 |
| DA | NEW+23*, NEW+24, NEW+25, DC+9~, DC+12*, MODIFY+4*, COMMENT+3, COMMENT+4, COMMENT+5, EXIT+1! |
| >> DFN | NEW+60 |
| DIC | NEW+20~, NEW+21*, NEW+23, EXIT+1! |
| DIC(0 | NEW+21* |
| DIE | NEW+20~, NEW+23*, DC+12*, MODIFY+4*, MODIFY+8*, EXIT+1! |
| >> DILOCKTM | NEW+26 |
| DLAYGO | NEW+20~, NEW+21*! |
| DR | NEW+20~, NEW+27*, NEW+31*, NEW+32*, NEW+37*, NEW+39*, NEW+46*, NEW+52*, DC+13*, MODIFY+8* , EXIT+1! |
| DT | REASON+1 |
| DUZ | DC+17, DC+20, DC+22 |
| >> GMRCA | NEW+23*, NEW+57* |
| GMRCACT | DC+9~, DC+10*, DC+11, MODIFY+6*, MODIFY+7 |
| >> GMRCACTN | NEW+59 |
| GMRCADUZ | NEW+20~, DC+9~, DC+20*, DC+29, EXIT+1! |
| GMRCADUZ( | NEW+59*, DC+22* |
| GMRCARY | COMMENT~, COMMENT+2 |
| GMRCARY( | COMMENT+4* |
| GMRCARY(1 | COMMENT+2 |
| GMRCCP | NEW+20~, NEW+38* |
| GMRCCS | NEW+20~, NEW+34*, NEW+35*, NEW+36* |
| >> GMRCDA | REASON+1, COMMENT+3 |
| GMRCDFN | DC+9~, DC+19*, DC+29 |
| GMRCFL | DC+9~, DC+20*, DC+29 |
| GMRCO | NEW+23*, NEW+26, NEW+56, NEW+58, NEW+60, NEW+61, DC~, DC+7, DC+8, DC+12 , DC+17, DC+18, DC+19, DC+20, DC+21, DC+23, DC+25, DC+27, DC+29, MODIFY+4 , REASON+1, REASON+2, REASON+3, COMMENT+3, COMMENT+4, COMMENT+5 |
| >> GMRCOFN | NEW+58 |
| GMRCORTX | DC+26*, DC+27*, DC+29, EXIT+1! |
| >> GMRCOTXT | NEW+29* |
| >> GMRCPRCD | NEW+33, NEW+35 |
| >> GMRCPRI | NEW+38, NEW+41, NEW+42, NEW+43, NEW+45, NEW+47, NEW+60, MODIFY+5* |
| >> GMRCRFQ( | REASON+2* |
| >> GMRCRFQ(0 | NEW+55 |
| GMRCRQR | DC+9~, DC+21*, DC+22 |
| >> GMRCSS | NEW+29, NEW+48, NEW+49, NEW+60, NEW+61, MODIFY+5* |
| >> GMRCSTS | NEW+23*, DC+11*, MODIFY+5*, MODIFY+7* |
| GMRCSVC | DC+9~, DC+23*, DC+24*, DC+25* |
| >> GMRCTRLC | MODIFY+6 |
| >> GMRCTYPE | MODIFY+5* |
| GMRCUCID | NEW+20~, NEW+24*, NEW+25 |
| >> GMRCURGI | NEW+60, MODIFY+5* |
| >> GMRCWARD | MODIFY+5* |
| >> GMRCXMF | NEW+58 |
| IFC | NEW+43~*, NEW+44, NEW+46, NEW+49~*, NEW+50, NEW+51, NEW+52 |
| L | REASON+2*, REASON+4! |
| LN | REASON+2*, REASON+3*, REASON+4!, COMMENT+3*, COMMENT+4*, COMMENT+6! |
| LN1 | COMMENT+4*, COMMENT+5, COMMENT+6! |
| MESSAGE | NEW~ |
| NOTYPE | DC+28~*, DC+29 |
| U | NEW+36, NEW+38, NEW+45, NEW+51, NEW+52, DC+18 |
| X | NEW+20~, NEW+21* |
| Y | NEW+20~, NEW+21, NEW+23 |
