Routine: PRCVIMF

Package	Total	Call Graph
Health Level Seven	3	$$FLD^HLCSUTL INIT^HLFNC2 GENERATE^HLMA
Kernel	3	($$FMTHL7,$$HTE)^XLFDT $$HLNAME^XLFNAME $$KSP^XUPARAM
VA FileMan	2	NOW^%DTC $$GET1^DIQ
IFCAP	1	$$CONV^PRCVUTSC
MailMan	1	^XMD
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
IFCAP	3	PRCVIT PRCV_IFCAP_05_EV_ITEM_UPD PRCV_IFCAP_05_SU_ITEM_UPD
Kernel	1	^ORD(101

Name	Comments	DBIA/ICR reference
EN(PRCVIN)	;Entry point for API Call
HDRBLD	;Generate message header, MFI Segment
MSGBLD	; Build Message Body ; PRCVFLD - Field
BAR	; ; N PRCVL,PRCVL1 ; S PRCVI=2 ; F S PRCVI=$O(HLA("HLS",PRCVI)) Q:'PRCVI D ; . S PRCVL=$L(HLA("HLS",PRCVI)) ; . F PRCVL1=PRCVL:-1 Q:PRCVL1<0 D ; .. I $E(HLA("HLS",PRCVI),PRCVL1)'="\|" S PRCVL1=0 Q ; .. S HLA("HLS",PRCVI)=$E(HLA("HLS",PRCVI),1,PRCVL1-1) ; .. Q ; . Q
ZVI	; ZVI segment
MFKPROC	;Process MFK^M01 response message
ERROR	;Process ERR Segments
CLIFP	;Call partner app w/ mail message for users on error
FIN	;Clean up variables

Name	Field # of Occurrence
NOW^%DTC	HDRBLD+8
$$GET1^DIQ	MSGBLD+7
$$FLD^HLCSUTL	MFKPROC+6, ERROR+3, ERROR+4, ERROR+7
INIT^HLFNC2	HDRBLD+3
GENERATE^HLMA	EN+15
$$CONV^PRCVUTSC	MSGBLD+5, MSGBLD+24, MSGBLD+29, MSGBLD+74, MSGBLD+102, MSGBLD+107
$$FMTHL7^XLFDT	HDRBLD+9, MSGBLD+38, MSGBLD+56, MSGBLD+64, ZVI+14, ZVI+20
$$HTE^XLFDT	CLIFP+2
$$HLNAME^XLFNAME	MSGBLD+58, MSGBLD+66
^XMD	CLIFP+6
$$GET^XPAR	EN+7
$$KSP^XUPARAM	MSGBLD+7

HL7 Protocol Name	Call Tags
PRCV_IFCAP_05_EV_ITEM_UPD	MFKPROC
PRCV_IFCAP_05_SU_ITEM_UPD	MFKPROC

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PRC(440 - [#440]	MSGBLD+44, MSGBLD+48, MSGBLD+125, ZVI+5, ZVI+13
^PRC(441 - [#441]	MSGBLD+74
^PRCD(420.5 - [#420.5]	MSGBLD+86, MSGBLD+87, ZVI+24, ZVI+25
^TMP("PRCVIT"	MSGBLD+4, MSGBLD+19, MSGBLD+23, MSGBLD+24, MSGBLD+27, MSGBLD+29, MSGBLD+100, MSGBLD+102, MSGBLD+105, MSGBLD+107 , MSGBLD+122, MSGBLD+123, MSGBLD+129, MSGBLD+131, ZVI+4, FIN+1!

Name	Line Occurrences
CLIFP	EN+16, HDRBLD+4, ERROR+14
ERROR	MFKPROC+7
FIN	EN+11, EN+17, MFKPROC+8
HDRBLD	EN+10
MSGBLD	EN+12
ZVI	MSGBLD+131

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	HDRBLD+9, FIN+2!
HL	HDRBLD+2!, HDRBLD+3, HDRBLD+4, FIN+2!
HL("ECH"	HDRBLD+5
HL("FS"	HDRBLD+5
HLA	EN+5!, FIN+2!
HLA("HLS"	HDRBLD+13, MSGBLD+12, MSGBLD+21, MSGBLD+25, MSGBLD+29, MSGBLD+97, MSGBLD+103, MSGBLD+107, MSGBLD+110, MSGBLD+115 , MSGBLD+127, ZVI+39
>> HLECH	MSGBLD+5, MSGBLD+24, MSGBLD+29, MSGBLD+74, MSGBLD+102, MSGBLD+107
>> HLFS	MSGBLD+5, MSGBLD+24, MSGBLD+29, MSGBLD+74, MSGBLD+102, MSGBLD+107
>> HLNEXT	MFKPROC+4, MFKPROC+5, ERROR+2
>> HLNODE	MFKPROC+6, ERROR+3, ERROR+4, ERROR+7
>> HLQUIT	ERROR+2
N	ERROR+1~, ERROR+2*
PRCVCON	EN+2~, ZVI+13*, ZVI+14
PRCVCS	EN+2~, HDRBLD+5*, HDRBLD+13, MSGBLD+12, MSGBLD+44, MSGBLD+48, MSGBLD+59, MSGBLD+67, MSGBLD+75, MSGBLD+87 , MSGBLD+125, ZVI+5, ZVI+14, ZVI+17, ZVI+26, FIN+2!
PRCVDP	EN+4~, EN+14*, EN+15, EN+16, FIN+2!
PRCVDT	HDRBLD+9*, HDRBLD+13, MSGBLD+12, FIN+2!
PRCVDT1	EN+3~, MSGBLD+54, MSGBLD+56, MSGBLD+59, MSGBLD+62, MSGBLD+64, MSGBLD+67
PRCVDUZ	EN+3~, MSGBLD+53, MSGBLD+55, MSGBLD+57, MSGBLD+59, MSGBLD+61, MSGBLD+65, MSGBLD+67
PRCVERC	ERROR+2, ERROR+6, ERROR+8, ERROR+9*, ERROR+10, FIN+3!
PRCVERM	ERROR+1~, ERROR+7*, ERROR+10, FIN+3!
PRCVERR	EN+3~, EN+11, FIN+3!
PRCVERR(	ERROR+8, ERROR+10
PRCVERR(1	EN+16, HDRBLD+4
PRCVFLD	EN+2~, MSGBLD+5, MSGBLD+12, MSGBLD+24, MSGBLD+25, MSGBLD+42, MSGBLD+44, MSGBLD+45, MSGBLD+47, MSGBLD+48 , MSGBLD+49, MSGBLD+58, MSGBLD+59, MSGBLD+63, MSGBLD+66, MSGBLD+67, MSGBLD+69, MSGBLD+74, MSGBLD+75, MSGBLD+76 , MSGBLD+84, MSGBLD+86, MSGBLD+87, MSGBLD+88, MSGBLD+99, MSGBLD+102*, MSGBLD+103
PRCVFS	EN+2~, HDRBLD+5*, HDRBLD+13, MSGBLD+12, MSGBLD+21, MSGBLD+32, MSGBLD+34, MSGBLD+36, MSGBLD+39, MSGBLD+41 , MSGBLD+45, MSGBLD+49, MSGBLD+51, MSGBLD+71, MSGBLD+78, MSGBLD+80, MSGBLD+82, MSGBLD+88, MSGBLD+90, MSGBLD+92 , MSGBLD+94, MSGBLD+110, MSGBLD+124, MSGBLD+127, ZVI+5, ZVI+7, ZVI+9, ZVI+11, ZVI+17, ZVI+19 , ZVI+22, ZVI+28, ZVI+30, ZVI+32, ZVI+34, ZVI+36, FIN+2!
PRCVI	EN+2~, MSGBLD+26, MSGBLD+27, MSGBLD+29, MSGBLD+104, MSGBLD+105, MSGBLD+107, MSGBLD+121, MSGBLD+122, MSGBLD+123 , MSGBLD+130, MSGBLD+131, ZVI+4, FIN+2!
PRCVIN	EN~, EN+8, EN+16, HDRBLD+4, MSGBLD+4, MSGBLD+12, MSGBLD+19, MSGBLD+23, MSGBLD+24, MSGBLD+27 , MSGBLD+29, MSGBLD+100, MSGBLD+102, MSGBLD+105, MSGBLD+107, MSGBLD+122, MSGBLD+123, MSGBLD+129, MSGBLD+131, ZVI+4
PRCVIT	ERROR+1~, ERROR+4*, CLIFP+2
PRCVN	EN+2~, EN+9, HDRBLD+12, HDRBLD+13, MSGBLD+11, MSGBLD+12, MSGBLD+17, MSGBLD+21, MSGBLD+25, MSGBLD+29 , MSGBLD+97, MSGBLD+103, MSGBLD+107, MSGBLD+110, MSGBLD+115, MSGBLD+126, MSGBLD+127, ZVI+38, ZVI+39, FIN+2!
PRCVN1	MSGBLD+16~, MSGBLD+18, MSGBLD+25, MSGBLD+28, MSGBLD+29, MSGBLD+96, MSGBLD+97, MSGBLD+101, MSGBLD+103, MSGBLD+106* , MSGBLD+107, MSGBLD+110, MSGBLD+114*, MSGBLD+115
PRCVND0	EN+3~, MSGBLD+4*, MSGBLD+5, MSGBLD+21, MSGBLD+34, MSGBLD+36, MSGBLD+41, MSGBLD+44, MSGBLD+48, MSGBLD+51 , MSGBLD+53, MSGBLD+56, MSGBLD+92, MSGBLD+113, MSGBLD+115
PRCVND2	EN+3~, ZVI+4, ZVI+5, ZVI+7, ZVI+9, ZVI+12, ZVI+13, ZVI+17, ZVI+20, ZVI+24 , ZVI+25, ZVI+28, ZVI+30, ZVI+32, ZVI+34, ZVI+36
PRCVND3	EN+3~, MSGBLD+19*, MSGBLD+38, MSGBLD+60, MSGBLD+61, MSGBLD+64, MSGBLD+73, MSGBLD+74, MSGBLD+75, MSGBLD+80 , MSGBLD+82, MSGBLD+84, MSGBLD+90, MSGBLD+94
PRCVNM	MSGBLD+16~, MSGBLD+58, MSGBLD+66
PRCVNM("FIELD"	MSGBLD+57, MSGBLD+65
PRCVNM("FILE"	MSGBLD+57, MSGBLD+65
PRCVNM("IENS"	MSGBLD+57, MSGBLD+65
PRCVPRO	EN+4~, EN+15, HDRBLD+2*, HDRBLD+3, FIN+2!
PRCVRS	EN+2~, HDRBLD+5*, MSGBLD+29, MSGBLD+63, MSGBLD+107, FIN+2!
PRCVSEG	EN+2~, MSGBLD+32, MSGBLD+34, MSGBLD+36, MSGBLD+38, MSGBLD+39, MSGBLD+41, MSGBLD+45, MSGBLD+49, MSGBLD+51* , MSGBLD+63, MSGBLD+69, MSGBLD+71, MSGBLD+76, MSGBLD+78, MSGBLD+80, MSGBLD+82, MSGBLD+88, MSGBLD+90, MSGBLD+92 , MSGBLD+94, MSGBLD+97, MSGBLD+120, MSGBLD+123, MSGBLD+124, MSGBLD+125, MSGBLD+127, ZVI+3, ZVI+5, ZVI+7 , ZVI+9, ZVI+11, ZVI+14, ZVI+17, ZVI+19, ZVI+20, ZVI+22, ZVI+26, ZVI+28, ZVI+30 , ZVI+32, ZVI+34, ZVI+36*, ZVI+39
PRCVSTN	EN+3~, MSGBLD+7*, MSGBLD+12, MSGBLD+21, MSGBLD+44, MSGBLD+48, MSGBLD+59, MSGBLD+67, MSGBLD+75, MSGBLD+125 , ZVI+5
PRCVUP	EN+3~, ZVI+25*, ZVI+26
U	EN+16, MSGBLD+5, MSGBLD+21, MSGBLD+34, MSGBLD+36, MSGBLD+38, MSGBLD+41, MSGBLD+44, MSGBLD+48, MSGBLD+51 , MSGBLD+53, MSGBLD+56, MSGBLD+60, MSGBLD+61, MSGBLD+64, MSGBLD+73, MSGBLD+74, MSGBLD+75, MSGBLD+80, MSGBLD+82 , MSGBLD+84, MSGBLD+87, MSGBLD+90, MSGBLD+92, MSGBLD+94, MSGBLD+113, MSGBLD+115, MSGBLD+124, MSGBLD+125, ZVI+5 , ZVI+7, ZVI+9, ZVI+12, ZVI+13, ZVI+14, ZVI+17, ZVI+20, ZVI+24, ZVI+25, ZVI+26 , ZVI+28, ZVI+30, ZVI+32, ZVI+34, ZVI+36, ERROR+4, ERROR+10
VAL	MFKPROC+3~, MFKPROC+6, MFKPROC+7, ERROR+3, ERROR+4, ERROR+5, FIN+3!
XMDUZ	CLIFP+1~, CLIFP+3*
XMMG	CLIFP+1~
XMSUB	CLIFP+1~, CLIFP+2*
XMTEXT	CLIFP+1~, CLIFP+4*
XMY	CLIFP+1~
XMY("G.PRCV I	tem Vendor Edits" , CLIFP+5*
XMZ	CLIFP+1~

Customize PDF page

Package: IFCAP

Routine: PRCVIMF

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

Used in HL7 Interface

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: