Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: GMRAIAD1

Package: Adverse Reaction Tracking

Routine: GMRAIAD1


Information

GMRAIAD1 ;BPOIFO/JG - BUILD HL7 ORU^R01 MESSAGE FOR ADVERSE REACTION - PART 1 ; 18 Feb 2005 2:54 PM

Source Information

Source file <GMRAIAD1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 2 ^%DTC  $$GET1^DIQ  
VDEF 2 ($$TS,$$XCN200,SETDLMS)^VDEFEL  ERR^VDEFREQ  
Adverse Reaction Tracking 1 ENTRY^GMRAIAD2  
Registration 1 BLDPID^VAFCQRY  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Adverse Reaction Tracking 1 GMRAIAD2  

Entry Points

Name Comments DBIA/ICR reference
VALID ;;VDEF HL7 MESSAGE BUILDER
; Creates HL7 V2.4 ORU^R01 message for allergy adverse reaction
EN(EVIEN,KEY,VFLAG,OUT,MSHP) ;
PID
OBR
OBX1
RXAGRP1
OBX2
CALL
OBX10
RXAGRP2
EXIT
SAVE
HL7RC(X)
LIKEQ ; LIKE set

External References

Name Field # of Occurrence
^%DTC RXAGRP1+30
$$GET1^DIQ OBX1+10
ENTRY^GMRAIAD2 CALL
BLDPID^VAFCQRY PID+1
$$TS^VDEFEL OBR+5, RXAGRP1+5, RXAGRP1+6, RXAGRP1+14, RXAGRP1+33, OBX2+5, RXAGRP2+7, RXAGRP2+8, RXAGRP2+16
$$XCN200^VDEFEL OBR+8, OBR+11, OBX1+13
SETDLMS^VDEFEL EN+24
ERR^VDEFREQ EN+28, EN+30

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.85 - [#120.85] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+30
^GMR(120.8 - [#120.8] OBR+19
^GMR(120.85 - [#120.85] EN+27, OBR+14, OBX1+3, OBX1+4, OBX1+18, RXAGRP1RXAGRP1+1, OBX2OBX2+1, OBX2+3
OBX10RXAGRP2RXAGRP2+1, RXAGRP2+4
^GMRD(120.83 - [#120.83] OBX1+6
^TMP("HLS" EN+18!, SAVE+9!*

Label References

Name Line Occurrences
$$HL7RC RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+37, RXAGRP1+42, RXAGRP1+45, RXAGRP1+50
OBX2+3, OBX2+4, RXAGRP2+11, RXAGRP2+20, RXAGRP2+23
CALL OBX2
EXIT EN+28, EN+30, RXAGRP2
OBX2 OBX1+18
RXAGRP2 OBX10
SAVE PID+3, OBR+21, OBX1+15, RXAGRP1+21, RXAGRP1+46, RXAGRP1+51, RXAGRP1+60, RXAGRP1+67, OBX2+6, OBX10+2
RXAGRP2+12, RXAGRP2+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADD EN+13~, SAVE+2!*, SAVE+4, SAVE+11!
ADD( SAVE+3*
ALRDATA EN+13~, EN+27*, EN+28, EN+29, OBR+5, OBR+8, OBR+11, OBR+19, RXAGRP1+1!*
ALRDATA("LIKE" RXAGRP1+54
ALRDATA(0 RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+33, RXAGRP1+37, RXAGRP1+45, RXAGRP1+50
ALRDATA(1 RXAGRP1+5, RXAGRP1+6, RXAGRP1+14, RXAGRP1+30, RXAGRP1+38, RXAGRP1+42
ARRAY EN+15~, EN+18*, SAVE+5, SAVE+10*
CMP EN+15~, RXAGRP1+24*, RXAGRP1+27*, RXAGRP1+30*, RXAGRP1+33*, RXAGRP1+34*, RXAGRP1+37*, RXAGRP1+38*, RXAGRP1+39
DATA EN+14~
DFN EN+13~, EN+29*, EN+30, PID+1
DTE EN+13~
DTP EN+13~
EVIEN EN~
GMRAHL EN+15~, EN+19*, PID+1
GMRAHL("ECH" EN+22
GMRAHL("FS" EN+23
GMRAHL("Q" EN+23
GMRAPID EN+14~, PID!, PID+1, PID+3!
GMRAPID( PID+2!
GMRAPID(1 PID+2*, PID+3
HL7RC EN+14~, EN+23*, HL7RC+2
HLCM EN+13~, EN+22*, EN+23, OBR+1, OBR+2, OBR+8, OBR+11, OBR+15, OBR+16, OBR+19
RXAGRP1+27, RXAGRP1+30, RXAGRP1+33, RXAGRP1+37, RXAGRP1+38, RXAGRP1+56, RXAGRP1+57, RXAGRP1+59, RXAGRP1+65, RXAGRP2+17
HLES EN+13~, EN+22*, EN+23, HL7RC+4
HLFS EN+13~, EN+23*, OBROBR+1, OBR+2, OBR+5, OBR+8, OBR+16, OBR+20, OBR+21
OBX1OBX1+7, OBX1+10, OBX1+13, OBX1+14, OBX1+15, RXAGRP1+1, RXAGRP1+5, RXAGRP1+6, RXAGRP1+9
RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+21, RXAGRP1+34, RXAGRP1+39, RXAGRP1+42, RXAGRP1+45
RXAGRP1+46, RXAGRP1+50, RXAGRP1+51, RXAGRP1+55, RXAGRP1+56, RXAGRP1+59, RXAGRP1+60, RXAGRP1+63, RXAGRP1+66, RXAGRP1+67
OBX2+2, OBX2+3, OBX2+4, OBX2+5, OBX2+6, OBX10+1, OBX10+2, RXAGRP2+4, RXAGRP2+7, RXAGRP2+8
RXAGRP2+11, RXAGRP2+12, RXAGRP2+17, RXAGRP2+20, RXAGRP2+23, RXAGRP2+24, SAVE+1
HLQ EN+13~, EN+23*
HLRP EN+13~, EN+22*, EN+23, OBR+16, OBX1+5, OBX1+6
HLSC EN+13~, EN+22*, EN+23
I EN+14~, PID+2*, SAVE~, SAVE+3*, HL7RC~, HL7RC+4*
IEN EN+14~, OBX1+18*, RXAGRP1*, RXAGRP1+1, OBX2+1*, OBX2+3, RXAGRP2+1*, RXAGRP2+4
KEY EN~, EN+27, EN+28, OBR+1, OBR+14, OBX1+3, OBX1+4, OBX1+10, OBX1+18, RXAGRP1
RXAGRP1+1, OBX2OBX2+1, OBX2+3, OBX10RXAGRP2RXAGRP2+1, RXAGRP2+4
LIKE EN+14~, RXAGRP1+54*, RXAGRP1+56, RXAGRP1+57
LIKERSP EN+14~, RXAGRP1+54*, RXAGRP1+57, RXAGRP1+64
MSHP EN~
OCHR HL7RC~, HL7RC+2*, HL7RC+3, HL7RC+4
OUT EN~
OUT("HLS" SAVE+9!
OUTX EN+14~, PID*, PID+3*, OBR*, OBR+1*, OBR+2*, OBR+5*, OBR+8*, OBR+16*, OBR+20*
OBR+21*, OBX1*, OBX1+7*, OBX1+10*, OBX1+13*, OBX1+14*, OBX1+15*, RXAGRP1+1*, RXAGRP1+5*, RXAGRP1+6*
RXAGRP1+9*, RXAGRP1+10*, RXAGRP1+13*, RXAGRP1+14*, RXAGRP1+15*, RXAGRP1+18*, RXAGRP1+21*, RXAGRP1+24*, RXAGRP1+34*, RXAGRP1+39*
RXAGRP1+42*, RXAGRP1+45*, RXAGRP1+46*, RXAGRP1+50*, RXAGRP1+51*, RXAGRP1+55*, RXAGRP1+56*, RXAGRP1+59*, RXAGRP1+60*, RXAGRP1+63*
RXAGRP1+66*, RXAGRP1+67*, OBX2+2*, OBX2+3*, OBX2+4*, OBX2+5*, OBX2+6*, OBX10+1*, OBX10+2*, RXAGRP2+4*
RXAGRP2+7*, RXAGRP2+8*, RXAGRP2+11*, RXAGRP2+12*, RXAGRP2+16*, RXAGRP2+17*, RXAGRP2+20*, RXAGRP2+23*, RXAGRP2+24*, SAVE+1
SAVE+2*, SAVE+3*, SAVE+4!*, SAVE+5, SAVE+11!
PTC EN+15~
RCHR HL7RC~, HL7RC+2*, HL7RC+4
RCHRI HL7RC~, HL7RC+1*, HL7RC+2
S EN+14~, EN+18*, PID*, OBR*, OBX1*, RXAGRP1+1*, RXAGRP1+24*, RXAGRP1+51*, RXAGRP1+55*, RXAGRP1+63*
OBX2+2*, OBX10+1*, RXAGRP2+4*, RXAGRP2+16*
SEPC EN+15~
SEPE EN+15~
SEPF EN+15~
SEPR EN+15~
SEPS EN+15~
SEQ EN+14~, PID*, PID+1
>> SITEPARM OBR+1
>> TARGET EN+18*, EXITSAVE+8, SAVE+10*
TYPE HL7RC~*, HL7RC+1
U EN+29, OBR+1, OBR+5, OBR+8, OBR+11, OBR+14, OBR+19, OBX1+4, OBX1+5, OBX1+6
RXAGRP1+5, RXAGRP1+6, RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+30
RXAGRP1+33, RXAGRP1+37, RXAGRP1+38, RXAGRP1+42, RXAGRP1+45, RXAGRP1+50, RXAGRP1+57, RXAGRP1+64, OBX2+3, OBX2+4
OBX2+5, OBX10+1, RXAGRP2+7, RXAGRP2+8, RXAGRP2+11, RXAGRP2+16, RXAGRP2+20, RXAGRP2+23, SAVE+8, SAVE+10
VAL EN+14~, OBR+1*, OBR+8*, OBR+11*, OBR+16, OBX1+4*, OBX1+13, RXAGRP1+5*, RXAGRP1+6*, RXAGRP1+9*
RXAGRP1+10*, RXAGRP1+13*, RXAGRP1+14*, RXAGRP1+15*, RXAGRP1+18*, RXAGRP1+33*, RXAGRP1+37*, RXAGRP1+50*, RXAGRP1+56*, RXAGRP1+57*
RXAGRP1+59*, RXAGRP1+64*, RXAGRP1+65, RXAGRP2+16*, RXAGRP2+17
>> VDEFHL EN+19
VFLAG EN~
X EN+14~, OBR+14*, OBR+15*, OBR+16*, OBR+19*, OBR+20, OBX1+3*, OBX1+4, RXAGRP1+30*, RXAGRP1+57*
RXAGRP1+58*, RXAGRP1+59, RXAGRP1+65*, RXAGRP1+66, OBX2*, OBX2+3*, OBX2+4, OBX2+5, OBX10*, OBX10+1
, RXAGRP2*, RXAGRP2+4*, RXAGRP2+7, RXAGRP2+8, RXAGRP2+11, RXAGRP2+16, RXAGRP2+20, RXAGRP2+23, HL7RC~, HL7RC+3
, HL7RC+4*, HL7RC+5
X1 EN+14~, RXAGRP1+30*
X2 EN+14~, RXAGRP1+30*
Y EN+14~, OBX1+3*, OBX1+4*, OBX1+5, OBX1+6, RXAGRP2+17*
Z EN+14~, OBX1+3*, OBX1+5*, OBX1+6*, OBX1+7
>> ZTSTOP EN+28*, EN+30*

Marked Items

Name Field # of Occurrence
$T(LIKEQ+(1) RXAGRP1+56
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All