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: MAGDHOW2

Package: Imaging

Routine: MAGDHOW2


Information

MAGDHOW2 ;WOIFO/PMK,DAC,JSL - Capture Consult/GMRC data ;22 Jul 2021 10:13 AM

Source Information

Source file <MAGDHOW2.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Imaging 8 $$MAKE^MAG7UM  (PID,PV1)^MAGDHLS  PIDPV1^MAGDHOW2  ORC^MAGDHOW3  OBR^MAGDHOW4  (OBX,ZDS)^MAGDHOW5  ERROR^MAGDHOWA  OUTPUT^MAGDHOWP  
Health Level Seven 4 ($$MOVESEG,$$NEWMSG,MOVESEG)^HLOAPI  $$SENDSUB^HLOAPI1  ADDSEG^HLOMSG  BUILDHDR^HLOPBLD1  
Kernel 1 ($$DT,$$NOW)^XLFDT  
VA FileMan 1 $$GET1^DIQ  

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: 5

Package Total Caller Graph
Imaging 5 MAGDHOW1  MAGDHOW2  MAGDHOWA  MAGT7MA  MAGT7S  

Entry Points

Name Comments DBIA/ICR reference
MESSAGE(SERVICE) ; invoked from ^MAGDHOW1
INIT(MSGTYPE,EVENT) ; start building a new HL7 message
PIDPV1(HLMSTATE,DFN) ; build the PID and PV1 segments
; Also invoked by ^MAGT7S to build these segments for Anatomic Pathology - P183 PMK 3/7/17
OUTPUT ; output the messages to ^MAGDHL7
MOVESEG(HLMSTATE,SEG,ERROR) ;Adds a segment built in the 'traditional' way as an array of lines into the message.

External References

Name Field # of Occurrence
$$GET1^DIQ MESSAGE+22
$$MOVESEG^HLOAPI PIDPV1+16, PIDPV1+28
$$NEWMSG^HLOAPI INIT+11
MOVESEG^HLOAPI PIDPV1+16, PIDPV1+28
$$SENDSUB^HLOAPI1 MESSAGE+23
ADDSEG^HLOMSG MOVESEG+25, MOVESEG+31
BUILDHDR^HLOPBLD1 OUTPUT+7
$$MAKE^MAG7UM PIDPV1+13
PID^MAGDHLS PIDPV1+10
PV1^MAGDHLS PIDPV1+11
PIDPV1^MAGDHOW2 MESSAGE+12
ORC^MAGDHOW3 MESSAGE+13
OBR^MAGDHOW4 MESSAGE+14
OBX^MAGDHOW5 MESSAGE+16
ZDS^MAGDHOW5 MESSAGE+15
ERROR^MAGDHOWA MESSAGE+33, INIT+21, PIDPV1+26, PIDPV1+38
OUTPUT^MAGDHOWP OUTPUT+69
$$DT^XLFDT OUTPUT+41
$$NOW^XLFDT OUTPUT+41

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HLD(779.4 - [#779.4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLA - [#777] OUTPUT+21, OUTPUT+22
^MAGDHL7(2006.5 - [#2006.5] OUTPUT+42, OUTPUT+43, OUTPUT+44*, OUTPUT+45*, OUTPUT+46, OUTPUT+47*, OUTPUT+48, OUTPUT+51*, OUTPUT+58*, OUTPUT+62*
OUTPUT+64*, OUTPUT+67*

Label References

Name Line Occurrences
$$MOVESEG PIDPV1+16, PIDPV1+28
INIT MESSAGE+6, MESSAGE+9
OUTPUT MESSAGE+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CONSULT MESSAGE+1~
>> CPINVOCATION OUTPUT+69
D0 OUTPUT+1~, OUTPUT+43*, OUTPUT+44, OUTPUT+45, OUTPUT+47, OUTPUT+51, OUTPUT+58, OUTPUT+62, OUTPUT+64, OUTPUT+67
DEL OUTPUT+1~, OUTPUT+11*, OUTPUT+12, OUTPUT+13, OUTPUT+37*, OUTPUT+38, OUTPUT+53, OUTPUT+54, OUTPUT+55, OUTPUT+60
DFN MESSAGE+12, PIDPV1~, PIDPV1+10, PIDPV1+11
DT PIDPV1+11
ERROR MESSAGE+1~, INIT+1~, INIT+11, PIDPV1+16, PIDPV1+28, MOVESEG~, MOVESEG+14!, MOVESEG+28*, MOVESEG+29*, MOVESEG+30*
EVENT INIT~, INIT+4, INIT+7
FMDATE OUTPUT+1~, OUTPUT+41*, OUTPUT+44, OUTPUT+45, OUTPUT+51
FMDATETIME OUTPUT+1~, OUTPUT+41*, OUTPUT+51, OUTPUT+64, OUTPUT+67
>> GMRCIEN MESSAGE+13, MESSAGE+14, MESSAGE+15, MESSAGE+16
HDR OUTPUT+1~, OUTPUT+46*, OUTPUT+47
HL PIDPV1+2~
HL7 OUTPUT+1~
HL7( OUTPUT+14*, OUTPUT+23*, OUTPUT+32*, OUTPUT+52
HL7(1 OUTPUT+37, OUTPUT+38*
HL7ARRAY PIDPV1+2~
HL7ARRAY(1 PIDPV1+6*, PIDPV1+7*, PIDPV1+8*, PIDPV1+9*
HL7IEN MESSAGE+1~
HL7MSH OUTPUT+1~, OUTPUT+7, OUTPUT+10*, OUTPUT+12*, OUTPUT+13*, OUTPUT+14
HL7MSH(1 OUTPUT+10
HL7MSH(2 OUTPUT+10
HL7SEG PIDPV1+2~
HL7SEG(2 PIDPV1+14
HL7SEG(3 PIDPV1+15
>> HL7SUBLIST MESSAGE+20, MESSAGE+22
HLAIEN OUTPUT+1~, OUTPUT+2*, OUTPUT+19, OUTPUT+21, OUTPUT+22
HLECH PIDPV1+2~, PIDPV1+3*, PIDPV1+9
HLFS PIDPV1+2~, PIDPV1+4*, PIDPV1+8
HLMSTATE MESSAGE+1~, MESSAGE+12, MESSAGE+13, MESSAGE+14, MESSAGE+15, MESSAGE+16, MESSAGE+23, INIT+11, PIDPV1~, PIDPV1+16
, PIDPV1+28, OUTPUT+7, MOVESEG~, MOVESEG+25, MOVESEG+31
HLMSTATE("BATCH" MOVESEG+30
HLMSTATE("BODY" OUTPUT+2
HLMSTATE("HDR" PIDPV1+3, PIDPV1+4, OUTPUT+3*, OUTPUT+4*, OUTPUT+11, MOVESEG+21
HLMSTATE("MSA" MOVESEG+24, MOVESEG+25, MOVESEG+26!
HLMSTATE("UNS TORED LINES" , OUTPUT+29, OUTPUT+30, OUTPUT+31
HLQ PIDPV1+2~, PIDPV1+5*
I MESSAGE+1~, OUTPUT+1~, OUTPUT+4*, OUTPUT+21*, OUTPUT+22, OUTPUT+52*
I1 OUTPUT+1~, OUTPUT+29*, OUTPUT+30, OUTPUT+31
I2 OUTPUT+1~, OUTPUT+30*, OUTPUT+31
J OUTPUT+1~, OUTPUT+14*, OUTPUT+23*, OUTPUT+32*, OUTPUT+36, OUTPUT+52*, OUTPUT+58*, OUTPUT+62*, OUTPUT+67
K OUTPUT+1~, OUTPUT+54*, OUTPUT+55, OUTPUT+60
MESSAGES MESSAGE+1~, MESSAGE+23
MSG MESSAGE+1~, MESSAGE+25~, MESSAGE+33, INIT+13~, INIT+21, PIDPV1+18~, PIDPV1+26, PIDPV1+30~, PIDPV1+38, OUTPUT+1~
MSG(1 MESSAGE+27*, INIT+15*, PIDPV1+20*, PIDPV1+32*
MSG(2 MESSAGE+28*, INIT+16*, PIDPV1+21*, PIDPV1+33*
MSG(3 MESSAGE+29*, INIT+17*, PIDPV1+22*, PIDPV1+34*
MSGTYPE MESSAGE+5, MESSAGE+6, MESSAGE+9, INIT~, INIT+7, INIT+8, OUTPUT+51
N OUTPUT+1~, OUTPUT+36*, OUTPUT+52, OUTPUT+69
NEWCOUNT MOVESEG+15~, MOVESEG+17*, MOVESEG+18*, MOVESEG+20*
NEXT MESSAGE+1~
NUL PIDPV1+2~, PIDPV1+13*
OBXSEGNO MESSAGE+1~
OLDCOUNT MOVESEG+15~, MOVESEG+19*, MOVESEG+20*
PARMS MESSAGE+23, INIT+1~, INIT+11
PARMS("CONTIN UATION POINTER" , INIT+3*
PARMS("COUNTRY" INIT+2*
PARMS("ENCODI NG CHARACTERS" , INIT+6*
PARMS("EVENT" INIT+4*
PARMS("FIELD SEPARATOR" , INIT+5*
PARMS("MESSAG E STRUCTURE" , INIT+7*, E TYPE" , INIT+8*
PARMS("PROCES SING MODE" , INIT+9*
PARMS("QUEUE" MESSAGE+22*
PARMS("SENDIN G APPLICATION" , MESSAGE+19*
PARMS("SUBSCR IPTION IEN" , MESSAGE+20*
PARMS("VERSION" INIT+10*
PID PIDPV1+2~, PIDPV1+14*, PIDPV1+16
PRIORITY MESSAGE+2~
PV1 PIDPV1+2~, PIDPV1+15*, PIDPV1+28
SAVEORCSEG MESSAGE+2~, MESSAGE+13, MESSAGE+14
SEG MOVESEG~, MOVESEG+18
SEG( MOVESEG+20
SERVICE MESSAGE~, MESSAGE+14
SUBJECT MESSAGE+25~, MESSAGE+26*, MESSAGE+33, INIT+13~, INIT+14*, INIT+21, PIDPV1+18~, PIDPV1+19*, PIDPV1+26, PIDPV1+30~
, PIDPV1+31*, PIDPV1+38
SUCCESS MESSAGE+2~, MESSAGE+23*, MESSAGE+24, MESSAGE+29, INIT+1~, INIT+11*, INIT+12, INIT+17, PIDPV1+2~, PIDPV1+16*
, PIDPV1+17, PIDPV1+22, PIDPV1+28*, PIDPV1+29, PIDPV1+34
TIUDOC MESSAGE+2~
TOARY MOVESEG+15~, MOVESEG+25~, MOVESEG+31
TOARY( MOVESEG+20*
TOARY(1 MOVESEG+18*, MOVESEG+21, MOVESEG+25*
TYPE MOVESEG+15~, MOVESEG+21*, MOVESEG+25, MOVESEG+28, MOVESEG+29
VARIABLES MESSAGE+25~, MESSAGE+33, INIT+13~, INIT+21, PIDPV1+18~, PIDPV1+26, PIDPV1+30~, PIDPV1+38
VARIABLES("ERROR" INIT+20*, PIDPV1+25*, PIDPV1+37*
VARIABLES("HLMSTATE" MESSAGE+30*, INIT+19*, PIDPV1+23*, PIDPV1+35*
VARIABLES("MESSAGES" MESSAGE+32*
VARIABLES("PARMS" MESSAGE+31*, INIT+18*
VARIABLES("PID" PIDPV1+24*, PIDPV1+36*
X MESSAGE+2~, OUTPUT+1~, OUTPUT+22*, OUTPUT+23, OUTPUT+31*, OUTPUT+32, OUTPUT+52*, OUTPUT+53, OUTPUT+54, OUTPUT+55
OUTPUT+60
Y MESSAGE+2~, OUTPUT+1~, OUTPUT+53*, OUTPUT+56, OUTPUT+58*, OUTPUT+60*, OUTPUT+62
Z OUTPUT+1~, OUTPUT+55*, OUTPUT+56

Marked Items

Name Field # of Occurrence
$T( MESSAGE+27, INIT+15, PIDPV1+20, PIDPV1+32
$T(MOVESEG^HLOAPI PIDPV1+16, PIDPV1+28
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