Routine: DGPFHLR

Package	Total	Call Graph
Registration	14	($$FNDASGN,$$STOALL)^DGPFAA ($$GETRDT,$$STOHL7)^DGPFAA3 ($$FNDLOG,PRGQLOG,STOSTAT)^DGPFHLL ($$FNDEVNT,$$GETSTAT,STOEVNT)^DGPFHLL1 PARSQRY^DGPFHLQ3 PARSORF^DGPFHLQ4 (SNDACK,SNDORF)^DGPFHLS PARSORU^DGPFHLU PARSACK^DGPFHLU4 PROCERR^DGPFHLU5 $$NXTSEG^DGPFHLUT ($$ISDIV,$$STATUS)^DGPFUT $$GETDFN^DGPFUT2 $$SITE^VASITE
Kernel	3	$$STA^XUAF4 $$KSP^XUPARAM $$PROD^XUPROD
VA FileMan	2	$$FIND1^DIC $$GET1^DIQ
Electronic Health Modernization	1	$$SAVEHL7X^EHMHL7
MailMan	1	^XMD
Master Patient Index VistA	1	$$GETDFN^MPIF001

Package	Total	Caller Graph
Registration	6	DGPF PRF ORF/R04 SUBSC DGPF PRF ORU/R01 EVENT DGPF PRF ORU/R01 SUBSC DGPF PRF QRY/R02 EVENT DGPFHLS DGPFHLUQ
Kernel	1	^ORD(101

Name	Comments	DBIA/ICR reference
RCV	;Receive all message types and route to message specific receiver
RCVORU(DGWRK,DGMIEN,DGHL)	;Receive ORU Message Types (ORU~R01)
STOORU(DGORU,DGERR)	;store ORU data array
RCVACK(DGWRK,DGMIEN,DGHL)	;Receive ACK Message Types (ACK~R01)
RCVQRY(DGWRK,DGMIEN,DGHL)	;Receive QRY Message Types (QRY~R02)
RCVORF(DGWRK,DGMIEN,DGHL)	;Receive ORF Message Types (ORF~R04)
STOORF(DGDFN,DGORF,DGERR)	;store ORF data
SDORUERR(DGMIEN,DGSEGERR,DGSTOERR,DGETYP)	;
ERRMSGP(DGMIEN,DGERR,DGTXT)	;

Name	Field # of Occurrence
$$FNDASGN^DGPFAA	STOORU+43, STOORF+23
$$STOALL^DGPFAA	STOORU+81, STOORF+59
$$GETRDT^DGPFAA3	STOORU+73
$$STOHL7^DGPFAA3	STOORU+79
$$FNDLOG^DGPFHLL	RCVACK+15, RCVORF+35
PRGQLOG^DGPFHLL	RCVORF+39
STOSTAT^DGPFHLL	RCVACK+19, RCVACK+22, RCVORF+36
$$FNDEVNT^DGPFHLL1	RCVORF+39
$$GETSTAT^DGPFHLL1	RCVORF+39
STOEVNT^DGPFHLL1	RCVORF+29
PARSQRY^DGPFHLQ3	RCVQRY+16
PARSORF^DGPFHLQ4	RCVORF+18
SNDACK^DGPFHLS	RCVORU+26
SNDORF^DGPFHLS	RCVQRY+20
PARSORU^DGPFHLU	RCVORU+17
PARSACK^DGPFHLU4	RCVACK+14
PROCERR^DGPFHLU5	RCVACK+23
$$NXTSEG^DGPFHLUT	RCV+48
$$ISDIV^DGPFUT	STOORU+72
$$STATUS^DGPFUT	STOORU+67, STOORF+58
$$GETDFN^DGPFUT2	RCVQRY+17
$$FIND1^DIC	STOORU+60
$$GET1^DIQ	STOORU+70
$$SAVEHL7X^EHMHL7	RCVORU+32
$$GETDFN^MPIF001	RCVORF+19
$$SITE^VASITE	STOORU+72, SDORUERR+3
^XMD	SDORUERR+15
$$STA^XUAF4	RCVORU+32
$$KSP^XUPARAM	RCVORU+32
$$PROD^XUPROD	SDORUERR+6

HL7 Protocol Name	Call Tags
DGPF PRF ORU/R01 EVENT	RCV
DGPF PRF ORU/R01 SUBSC	RCV
DGPF PRF QRY/R02 EVENT	RCV
DGPF PRF ORF/R04 SUBSC	RCV

FileNo	Call Tags
^DGPF(26.13 - [#26.13]	GET1^DIQ
26.131	FIND1^DIC

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DGPF"	RCVORU+15, RCVORF+16
^TMP("DGPFHL7"	RCV+37
^TMP("EHMHL7"	RCVORU+31!*, RCVORU+33!

Name	Line Occurrences
$$STOORF	RCVORF+26
$$STOORU	RCVORU+20
@(	RCV+51
ERRMSGP	SDORUERR+9
SDORUERR	RCVORU+18, RCVORU+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CURASGN	STOORU+14~, STOORU+43, STOORU+44, STOORU+60, STOORU+70, STOORF+14~, STOORF+23
DBRSCNT	STOORU+14~, STOORU+27, STOORU+28, STOORU+29, STOORU+30, STOORU+31, STOORU+32, STOORU+33, STOORU+56, STOORU+57 , STOORU+58, STOORU+61, STOORU+63, STOORU+64, STOORF+14~, STOORF+30, STOORF+31, STOORF+32, STOORF+33, STOORF+34 , STOORF+35, STOORF+36, STOORF+49, STOORF+50, STOORF+51, STOORF+52, STOORF+53, STOORF+54, STOORF+55
DBRSNUM	STOORU+14~, STOORU+27, STOORU+29, STOORU+30, STOORU+31, STOORU+32, STOORU+33, STOORU+56, STOORU+58, STOORU+59 , STOORU+60, STOORU+63, STOORU+64, STOORF+14~, STOORF+30, STOORF+32, STOORF+33, STOORF+34, STOORF+35, STOORF+36 , STOORF+49, STOORF+51, STOORF+52, STOORF+53, STOORF+55
DGACK	RCVACK+10~, RCVACK+14, RCVACK+23
DGACK("ACKCODE"	RCVACK+18
DGACK("MSGID"	RCVACK+15
DGACKTYP	RCVORU+13~, RCVORU+21, RCVORU+23, RCVORU+26
DGADT	STOORU+9~, STOORU+36, STOORU+37, STOORU+39, STOORU+44, STOORU+46, STOORU+49, STOORU+50, STOORU+53, STOORU+54 , STOORU+77, STOORF+10~, STOORF+38, STOORF+39*, STOORF+42, STOORF+43, STOORF+46, STOORF+47
DGCNT	RCV+31~, RCV+42, RCV+43, RCV+44, RCV+45, STOORU+10~, STOORU+36, STOORU+37, STOORU+38
DGCODE	SDORUERR+2~, SDORUERR+12*, SDORUERR+13
DGDFN	RCVQRY+10~, RCVQRY+17, RCVQRY+18, RCVQRY+20, RCVORF+10~, RCVORF+19, RCVORF+26, RCVORF+29, RCVORF+39, STOORF~ , STOORF+19
DGDFNERR	RCVQRY+11~
DGDFNERR("DIERR"	RCVQRY+18, RCVQRY+19
DGE	ERRMSGP+1~, ERRMSGP+9*, ERRMSGP+10
DGEMSG	ERRMSGP+1~, ERRMSGP+10*, ERRMSGP+11
DGERR	STOORU~, STOORU+46, STOORU+81, STOORU+84*, STOORU+86, RCVACK+11~, RCVACK+14, RCVACK+19, RCVACK+22, RCVACK+23 , RCVORF+13~, RCVORF+18, RCVORF+36, STOORF~, STOORF+39, STOORF+59, STOORF+62, ERRMSGP~
DGERR(	RCVORF+28*, ERRMSGP+4, ERRMSGP+6, ERRMSGP+7, ERRMSGP+9
DGERR(""	RCVORF+28
DGERR("DIERR"	STOORU+84
DGETYP	SDORUERR~, SDORUERR+8, SDORUERR+10
DGFLD	ERRMSGP+1~, ERRMSGP+8*, ERRMSGP+10
DGHL	RCVORU~, RCVORU+17, RCVORU+26, RCVACK~, RCVACK+14, RCVQRY~, RCVQRY+16, RCVQRY+20, RCVORF~, RCVORF+18
DGHL("ECH"	RCVORU+32
DGHL("FS"	RCVORU+32
DGI	ERRMSGP+1~, ERRMSGP+4*, ERRMSGP+5, ERRMSGP+6, ERRMSGP+7, ERRMSGP+9
DGJ	ERRMSGP+1~, ERRMSGP+6*, ERRMSGP+7, ERRMSGP+9
DGK	ERRMSGP+1~, ERRMSGP+7*, ERRMSGP+8, ERRMSGP+9
DGLC	ERRMSGP+1~, ERRMSGP+2, ERRMSGP+3, ERRMSGP+11
DGLIEN	RCVACK+12~, RCVACK+15, RCVACK+16, RCVACK+19, RCVACK+22, RCVACK+23, RCVORF+11~, RCVORF+35, RCVORF+36
DGMIEN	RCVORU~, RCVORU+18, RCVORU+25, RCVORU+26, RCVACK~, RCVQRY~, RCVQRY+20, RCVORF~, SDORUERR~, SDORUERR+9 , ERRMSGP~, ERRMSGP+3
DGMSGTYP	RCV+32~, RCV+49*, RCV+51
DGORF	RCVORF+12~, RCVORF+16*, RCVORF+17, RCVORF+18, RCVORF+19, RCVORF+22, RCVORF+23, RCVORF+26, RCVORF+32, RCVORF+35 , RCVORF+42, STOORF~, STOORF+16, STOORF+20, STOORF+26, STOORF+27, STOORF+28, STOORF+30, STOORF+33, STOORF+34 , STOORF+35, STOORF+36, STOORF+39, STOORF+43, STOORF+46, STOORF+47, STOORF+49, STOORF+51, STOORF+52, STOORF+53 , STOORF+55
DGORU	RCVORU+10~, RCVORU+15*, RCVORU+16, RCVORU+17, RCVORU+20, RCVORU+36, STOORU~, STOORU+17, STOORU+18, STOORU+19 , STOORU+23, STOORU+24, STOORU+25, STOORU+27, STOORU+30, STOORU+31, STOORU+32, STOORU+33, STOORU+37, STOORU+40 , STOORU+46, STOORU+50, STOORU+53, STOORU+54, STOORU+56, STOORU+58, STOORU+59, STOORU+63, STOORU+64
DGPFA	STOORU+11~, STOORU+79, STOORU+81, STOORF+11~, STOORF+17~, STOORF+59
DGPFA("DBRS A	CTION" , STOORU+32, STOORF+35
DGPFA("DBRS D	ATE" , STOORU+31, STOORF+34
DGPFA("DBRS O	THER" , STOORU+30, STOORF+33
DGPFA("DBRS S	ITE" , STOORU+33, STOORF+36
DGPFA("DBRS#"	STOORU+29, STOORF+32
DGPFA("DFN"	STOORU+18, STOORU+43, STOORF+19, STOORF+23
DGPFA("FLAG"	STOORU+19, STOORU+43, STOORU+73, STOORF+20, STOORF+21, STOORF+23
DGPFA("NARR"	STOORU+25, STOORF+28
DGPFA("ORIGSITE"	STOORU+24, STOORF+27
DGPFA("OWNER"	STOORU+23, STOORU+70, STOORU+72, STOORF+26
DGPFA("REVIEWDT"	STOORU+73*
DGPFA("SNDFAC"	STOORU+17*
DGPFA("STATUS"	STOORU+22, STOORU+67, STOORF+25, STOORF+58
DGPFAH	STOORU+12~, STOORU+47~, STOORU+79, STOORU+81, STOORF+12~, STOORF+40~, STOORF+59
DGPFAH("ACTION"	STOORU+50, STOORU+67, STOORU+70, STOORU+77, STOORU+79, STOORF+43, STOORF+58
DGPFAH("APPRVBY"	STOORU+52, STOORF+45
DGPFAH("ASSIGNDT"	STOORU+49, STOORU+73, STOORF+42
DGPFAH("COMMENT"	STOORU+53, STOORF+46
DGPFAH("DBRS"	STOORU+58, STOORU+61, STOORU+63, STOORU+64, STOORF+51, STOORF+52, STOORF+53, STOORF+54, STOORF+55*
DGPFAH("ENTERBY"	STOORU+51, STOORF+44
DGPFAH("ORIGFAC"	STOORU+54, STOORF+47
DGQRY	RCVQRY+12~, RCVQRY+16, RCVQRY+20
DGQRY("ICN"	RCVQRY+17
DGQRYERR	RCVQRY+13~, RCVQRY+19*, RCVQRY+20
DGSEG	RCV+33~, RCV+48, ERRMSGP+1~, ERRMSGP+5*, ERRMSGP+10
DGSEG("TYPE"	RCV+48
DGSEG(9	RCV+49
DGSEGCNT	RCV+34~, RCV+41*, RCV+43, RCV+45
DGSEGERR	RCVORU+11~, RCVORU+17, RCVORU+18, RCVORU+20, RCVORU+25, RCVORU+26, RCVQRY+14~, RCVQRY+16, RCVQRY+20, SDORUERR~ , SDORUERR+9
DGSET	STOORF+13~, STOORF+16*, STOORF+20, STOORF+26, STOORF+27, STOORF+28, STOORF+30, STOORF+33, STOORF+34, STOORF+35 , STOORF+36, STOORF+39, STOORF+43, STOORF+46, STOORF+47, STOORF+49, STOORF+51, STOORF+52, STOORF+53, STOORF+55
DGSINGLE	STOORU+13~, STOORU+38, STOORU+44, STOORU+79
DGSTAT	RCVORF+14~, RCVORF+23, RCVORF+27, RCVORF+32, RCVORF+36, SDORUERR+2~, SDORUERR+3, SDORUERR+5
DGSTOERR	RCVORU+12~, RCVORU+18, RCVORU+20, RCVORU+25, RCVORU+26, SDORUERR~
DGSTOERR("DIERR"	SDORUERR+12
DGTXT	SDORUERR+2~, SDORUERR+9, ERRMSGP~
DGTXT(	ERRMSGP+3, ERRMSGP+11
DGTXT(1	SDORUERR+11*
DGTXT(2	SDORUERR+13*
DGWRK	RCV+35~, RCV+37*, RCV+38, RCV+43, RCV+45, RCV+48, RCV+54, RCVORU~, RCVORU+17, RCVORU+31 , RCVACK~, RCVACK+14, RCVQRY~, RCVQRY+16, RCVORF~, RCVORF+18
>> HL("ECH"	RCV+49
>> HL("FS"	RCV+48
>> HL("MTN"	RCV+51
>> HL("SAF"	RCVORU+30
>> HLNEXT	RCV+41
>> HLNODE	RCV+43
>> HLNODE(	RCV+44, RCV+45
>> HLQUIT	RCV+41
LASTDT	STOORU+14~, STOORU+40*, STOORU+44, STOORU+77
RES	STOORU+14~, STOORU+60, STOORU+61, STOORU+79, STOORU+81, STOORF+14~, STOORF+59
RTNVALUE	RCVORU+31~, RCVORU+32*
STOFLG	STOORU+14~, STOORU+77*, STOORU+79, STOORU+81
U	STOORU+58, STOORU+61, STOORU+63, STOORU+64, STOORU+72, STOORU+73, STOORU+77, STOORF+51, STOORF+52, STOORF+53 , STOORF+54, STOORF+55, SDORUERR+3
XMDUZ	SDORUERR+1~, SDORUERR+4*
XMSUB	SDORUERR+1~, SDORUERR+5, SDORUERR+6
XMTEXT	SDORUERR+1~, SDORUERR+14*
XMY	SDORUERR+1~
XMY("G.DG PRF	APPLICATION ERRORS" , SDORUERR+7*
XMZ	SDORUERR+1~

Customize PDF page

Package: Registration

Routine: DGPFHLR

Information

Source Information

Call Graph

Call Graph Total: 22

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

Used in HL7 Interface

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: