GMRCIEV1 ;SLC/JFR - IFC EVENTS CONT'D ; Jun 10, 2022@09:24:33
Source file <GMRCIEV1.m>
Package | Total | Call Graph |
---|---|---|
Consult Request Tracking | 5 | ($$CNVTD,$$ISCERNER,$$LOC,$$ROUTE,NOMPI,NW,TRIGR)^GMRCIEVT SETTCH2^GMRCIMSG ($$OBXSF,$$OBXTZ,$$ORC,OBXWP)^GMRCISEG ($$OBR,$$OBXPD)^GMRCISG1 ($$ADD2OBR,$$ADD2PID,LOGMSG)^GMRCIUTL |
Health Level Seven | 2 | INIT^HLFNC2 GENERATE^HLMA |
Kernel | 2 | $$FMTE^XLFDT ($$TITLE,$$UP)^XLFSTR |
Registration | 2 | $$EN^VAFCPID $$SITE^VASITE |
Master Patient Index VistA | 1 | ($$GETICN,$$IFLOCAL)^MPIF001 |
VA FileMan | 1 | ($$GET1,GETS)^DIQ |
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 |
---|---|---|
RESUB(GMRCDA,GMRCACT) | ;build HL7 msg with edits from resubit
|
|
SF(GMRCDA,GMRCACT) | ;send SIG FINDING update
|
|
FWD(GMRCDA,GMRCACT) | ;bld HL7 msg upon FWD action
|
|
FWD2IFC(GMRCDA,GMRCACT) | ;pkg up and send request upon fwd'ing into IFC serv
|
|
EXIST201(GMRCDA,GMRCACT) | ;
|
|
CRNRNTE(IEN,GMRCNA) | ;format an NTE seg with all comments to go to Cerner
|
|
CRNROBX(IEN,GMRCNA) | ;If Add Comment going to Cerner, send ALL comments
|
|
LOC(GMRCLOC,GMRCIENS) | ;DETERMINE LOCATION
|
|
SITE | ;SET LOCAL SITE
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | EXIST201+2, CRNROBX+25 |
GETS^DIQ | CRNRNTE+10, CRNROBX+15 |
$$CNVTD^GMRCIEVT | RESUB+20, RESUB+34, SF+19, SF+31, FWD+19, FWD+32 |
$$ISCERNER^GMRCIEVT | SF+42, FWD+43 |
$$LOC^GMRCIEVT | CRNROBX+23 |
$$ROUTE^GMRCIEVT | RESUB+64, SF+53, FWD+54 |
NOMPI^GMRCIEVT | RESUB+11, SF+10, FWD+10 |
NW^GMRCIEVT | FWD2IFC+6 |
TRIGR^GMRCIEVT | FWD2IFC+9 |
SETTCH2^GMRCIMSG | CRNRNTE+5 |
$$OBXSF^GMRCISEG | SF+51, FWD+52 |
$$OBXTZ^GMRCISEG | RESUB+63, SF+52, FWD+53 |
$$ORC^GMRCISEG | RESUB+26, SF+26, FWD+25 |
OBXWP^GMRCISEG | RESUB+40, RESUB+56, SF+44, FWD+45, CRNROBX+20 |
$$OBR^GMRCISG1 | RESUB+30, SF+32, FWD+28 |
$$OBXPD^GMRCISG1 | RESUB+49 |
$$ADD2OBR^GMRCIUTL | RESUB+34, SF+33, FWD+32 |
$$ADD2PID^GMRCIUTL | RESUB+20, SF+19, FWD+19 |
LOGMSG^GMRCIUTL | RESUB+10, RESUB+65, RESUB+69, SF+9, SF+54, SF+59, FWD+9, FWD+55, FWD+60 |
INIT^HLFNC2 | RESUB+8, SF+7, FWD+7 |
GENERATE^HLMA | RESUB+67, SF+57, FWD+58 |
$$GETICN^MPIF001 | RESUB+14, SF+13, FWD+13 |
$$IFLOCAL^MPIF001 | RESUB+15, SF+14, FWD+14 |
$$EN^VAFCPID | RESUB+16, SF+15, FWD+15 |
$$SITE^VASITE | CRNRNTE+6, CRNROBX+8, SITE+1 |
$$FMTE^XLFDT | CRNRNTE+11, CRNROBX+16 |
$$TITLE^XLFSTR | CRNRNTE+8, CRNROBX+10 |
$$UP^XLFSTR | CRNRNTE+11, CRNROBX+16 |
FileNo | Call Tags |
---|---|
123.02 | GETS^DIQ |
^GMR(123.6 - [#123.6] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | CRNROBX+25, LOC+5 |
^GMR(123 - [#123] | RESUB+12, RESUB+20, SF+11, SF+19, SF+25, SF+40, SF+51, FWD+11, FWD+19, FWD+41 , FWD+52, FWD2IFC+5, FWD2IFC+8, CRNRNTE+9, CRNRNTE+13, CRNROBX+14, LOC+2, LOC+3 |
^GMR(123.1 - [#123.1] | CRNRNTE+8, CRNROBX+10 |
^GMR(123.6 - [#123.6] | FWD2IFC+5, EXIST201+1 |
^TMP("GMRCCRNRCMT" | CRNROBX+11 |
^TMP("GMRCMT" | RESUB+55!, RESUB+56, RESUB+57, RESUB+58, RESUB+59, RESUB+61!, SF+41!, SF+43, SF+44, SF+45 , SF+46, SF+47, SF+49!, FWD+42!, FWD+44, FWD+45, FWD+46, FWD+47, FWD+48, FWD+50! |
^TMP("GMRCRFR" | RESUB+39!, RESUB+40, RESUB+41, RESUB+43, RESUB+44, RESUB+46! |
^TMP("HLS" | RESUB+7!, RESUB+16*, RESUB+20*, RESUB+26*, RESUB+30*, RESUB+34*, RESUB+44*, RESUB+50*, RESUB+59*, RESUB+63* , SF+6!, SF+15*, SF+19*, SF+26*, SF+33*, SF+47*, SF+51*, SF+52*, FWD+6!, FWD+15* , FWD+19*, FWD+25*, FWD+33*, FWD+48*, FWD+52*, FWD+53* |
Name | Line Occurrences |
---|---|
$$EXIST201 | RESUB+65, SF+54, FWD+55 |
$$LOC | CRNRNTE+14 |
CRNROBX | SF+43, FWD+44 |
FWD | FWD2IFC+10 |
SITE | CRNRNTE+14, LOC+2 |
Name | Field # of Occurrence |
---|---|
^( | CRNRNTE+9, CRNRNTE+13, CRNROBX+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CMT | CRNRNTE+3~, CRNRNTE+4* |
ERR | RESUB+68~*, RESUB+69, SF+58~*, SF+59, FWD+59~*, FWD+60 |
GMRC773 | RESUB+5~, RESUB+67, RESUB+68, RESUB+69, SF+4~, SF+57, SF+58, SF+59, FWD+4~, FWD+58 , FWD+59, FWD+60 |
GMRCACT | RESUB~, RESUB+10, RESUB+11, RESUB+26, RESUB+30, RESUB+40, RESUB+56, RESUB+65, RESUB+69, SF~ , SF+9, SF+10, SF+26, SF+40, SF+44, SF+54, SF+59, FWD~, FWD+9, FWD+10 , FWD+25, FWD+28, FWD+41, FWD+45, FWD+55, FWD+60, FWD2IFC~, FWD2IFC+10, EXIST201~, EXIST201+1 , CRNROBX+6~ |
GMRCACTD | CRNRNTE+3~, CRNRNTE+7*, CRNRNTE+8, CRNROBX+6~, CRNROBX+9*, CRNROBX+10 |
GMRCACTD( | CRNRNTE+8*, CRNRNTE+9, CRNRNTE+12, CRNROBX+10*, CRNROBX+14, CRNROBX+18 |
GMRCACTN | FWD2IFC+4~, FWD2IFC+7*, FWD2IFC+8*, FWD2IFC+9 |
GMRCCRNR | SF+4~, SF+42*, SF+43, SF+44, FWD+4~, FWD+43*, FWD+44, FWD+45 |
GMRCDA | RESUB~, RESUB+10, RESUB+11, RESUB+12, RESUB+20, RESUB+26, RESUB+30, RESUB+34, RESUB+40, RESUB+49 , RESUB+56, RESUB+64, RESUB+65, RESUB+69, SF~, SF+9, SF+10, SF+11, SF+19, SF+25 , SF+26, SF+31, SF+32, SF+33, SF+40, SF+42, SF+43, SF+44, SF+51, SF+53 , SF+54, SF+59, FWD~, FWD+9, FWD+10, FWD+11, FWD+19, FWD+25, FWD+28, FWD+32 , FWD+41, FWD+43, FWD+44, FWD+45, FWD+52, FWD+54, FWD+55, FWD+60, FWD2IFC~, FWD2IFC+5 , FWD2IFC+6, FWD2IFC+8, FWD2IFC+9, FWD2IFC+10, EXIST201~, EXIST201+1 |
GMRCDFN | RESUB+12~*, RESUB+13, RESUB+14, RESUB+15, RESUB+16, RESUB+20, SF+11~*, SF+12, SF+13, SF+14 , SF+15, SF+19, FWD+11~*, FWD+12, FWD+13, FWD+14, FWD+15, FWD+19 |
GMRCDT | CRNRNTE+3~, CRNRNTE+11*, CRNRNTE+17, CRNROBX+6~, CRNROBX+16*, CRNROBX+29 |
GMRCENBY | CRNRNTE+3~, CRNRNTE+15*, CRNRNTE+16, CRNROBX+6~, CRNROBX+27*, CRNROBX+28 |
GMRCIENS | CRNRNTE+3~, CRNRNTE+10*, CRNRNTE+11, CRNRNTE+14, CRNRNTE+15, CRNROBX+6~, CRNROBX+15*, CRNROBX+16, CRNROBX+23, CRNROBX+24 , CRNROBX+25, CRNROBX+27, LOC~, LOC+2, LOC+3 |
GMRCIQT | RESUB+5~, RESUB+11, RESUB+13*, RESUB+14*, RESUB+15*, SF+4~, SF+10, SF+12*, SF+13*, SF+14* , FWD+4~, FWD+10, FWD+12*, FWD+13*, FWD+14* |
GMRCL | CRNRNTE+3~, CRNRNTE+13*, CRNROBX+6~, CRNROBX+21* |
GMRCLOC | CRNRNTE+3~, CRNRNTE+6*, CRNRNTE+14*, CRNROBX+6~, CRNROBX+8*, CRNROBX+23*, LOC~, LOC+2, SITE+1* |
GMRCN | CRNRNTE+3~, CRNRNTE+9*, CRNRNTE+10, CRNRNTE+13, CRNROBX+6~, CRNROBX+13*, CRNROBX+14*, CRNROBX+15, CRNROBX+20 |
GMRCNA | CRNRNTE~, CRNRNTE+12, CRNRNTE+13*, CRNRNTE+14, CRNRNTE+16, CRNRNTE+17, CRNRNTE+18, CRNRNTE+19, CRNROBX~, CRNROBX+17 , CRNROBX+18, CRNROBX+21, CRNROBX+23, CRNROBX+26, CRNROBX+28, CRNROBX+29 |
GMRCO | CRNROBX+6~, CRNROBX+15! |
GMRCO( | CRNROBX+16, CRNROBX+23, CRNROBX+24, CRNROBX+25, CRNROBX+27 |
GMRCOS | SF+4~, SF+25*, FWD+4~ |
GMRCOUT | CRNRNTE+3~, CRNRNTE+10! |
GMRCOUT( | CRNRNTE+11, CRNRNTE+15 |
GMRCPCS | CRNRNTE+3~ |
GMRCPD | RESUB+5~, RESUB+49*, RESUB+50 |
GMRCSITE | CRNROBX+25~* |
GMRCSTDA | CRNROBX+25~* |
GMRCSTNM | CRNROBX+25~*, CRNROBX+26 |
GMRCT | CRNRNTE+3~, CRNRNTE+9*, CRNRNTE+12*, CRNRNTE+13*, CRNRNTE+14*, CRNRNTE+16*, CRNRNTE+17*, CRNRNTE+18*, CRNRNTE+19*, CRNROBX+6~ , CRNROBX+13*, CRNROBX+17*, CRNROBX+18*, CRNROBX+21*, CRNROBX+23*, CRNROBX+26*, CRNROBX+28*, CRNROBX+29* |
GMRCTMP | CRNRNTE+3~, CRNROBX+6~, CRNROBX+11*, CRNROBX+20, CRNROBX+21, CRNROBX+30 |
GMRCX | CRNRNTE+3~, CRNRNTE+8*, CRNRNTE+9*, CRNRNTE+12, CRNRNTE+13*, CRNROBX+6~, CRNROBX+10*, CRNROBX+14*, CRNROBX+18, CRNROBX+21* |
HL | RESUB+5~, RESUB+8, RESUB+9, SF+4~, SF+7, SF+8, FWD+4~, FWD+7, FWD+8 |
HLL | RESUB+5~, SF+4~, FWD+4~ |
HLL("LINKS" | RESUB+64*, RESUB+66, SF+53*, SF+55, FWD+54*, FWD+56 |
>> HLP | RESUB+67, SF+57, FWD+58 |
>> HLP("SUBSCRIBER" | RESUB+66*, SF+55*, FWD+56* |
I | RESUB+42~*, RESUB+43*, RESUB+44, RESUB+54~, RESUB+58*, RESUB+59, SF+46~*, SF+47, FWD+47~*, FWD+48 |
IEN | CRNRNTE~, CRNRNTE+9, CRNRNTE+10, CRNRNTE+13, CRNROBX~, CRNROBX+14, CRNROBX+15, CRNROBX+20 |
IEN123P6 | EXIST201+1~*, EXIST201+2 |
LOCNAME | CRNROBX+6~, CRNROBX+23*, LOC+1~, LOC+3*, LOC+4*, LOC+5*, LOC+6 |
OBR | SF+4~, SF+32*, SF+33*, SF+38, FWD+4~, FWD+28*, FWD+32*, FWD+33, FWD+39 |
PROSTHCS | SF+4~, SF+38*, SF+43, SF+44, FWD+4~, FWD+39*, FWD+44, FWD+45 |
SEG | RESUB+5~, RESUB+6*, RESUB+16, RESUB+20, RESUB+22*, RESUB+26, RESUB+27*, RESUB+30, RESUB+34, RESUB+36* , RESUB+44, RESUB+45*, RESUB+50, RESUB+51*, RESUB+59, RESUB+60*, RESUB+63, SF+4~, SF+5*, SF+15 , SF+19, SF+21*, SF+26, SF+27*, SF+33, SF+34*, SF+47, SF+48*, SF+51*, SF+52 , FWD+4~, FWD+5*, FWD+15, FWD+19, FWD+21*, FWD+25, FWD+26*, FWD+33, FWD+35*, FWD+48 , FWD+49*, FWD+52*, FWD+53 |
TCH | CRNRNTE+3~ |
U | RESUB+12, RESUB+20, RESUB+66, RESUB+68, SF+11, SF+19, SF+25, SF+38, SF+51, SF+55 , SF+58, FWD+11, FWD+19, FWD+39, FWD+52, FWD+56, FWD+59, FWD2IFC+5, CRNRNTE+6, CRNRNTE+9 , CRNRNTE+12, CRNRNTE+15, CRNROBX+8, CRNROBX+14, CRNROBX+18, CRNROBX+27, LOC+4, LOC+5, SITE+1 |