Routine: VAFCQRY

Package	Total	Call Graph
Registration	4	BLDPID^VAFCQRY1 (BLDEVN,BLDPD1,CHKID)^VAFCQRY2 ($$LABE,$$PD1,$$PHARA,$$PV1,$$PV2,$$RADE)^VAFCSB $$EN1^VAFHLZPD
Health Level Seven	2	GENACK^HLMA1 LINK^HLUTIL3
Kernel	1	$$LKUP^XUAF4

Package

Total

Call Graph

Registration

BLDPID^VAFCQRY1 (BLDEVN,BLDPD1,CHKID)^VAFCQRY2 ($$LABE,$$PD1,$$PHARA,$$PV1,$$PV2,$$RADE)^VAFCSB $$EN1^VAFHLZPD

Health Level Seven

GENACK^HLMA1 LINK^HLUTIL3

Kernel

$$LKUP^XUAF4

Package	Total	Caller Graph
Outpatient Pharmacy	3	PSOHLDS1 PSORELD1 PSOVDF1
Adverse Reaction Tracking	2	GMRAIAD1 GMRAIAL1
Automated Lab Instruments	1	LA7QRY1
General Medical Record - Vitals	1	GMVVDEF1
Pharmacy Benefits Management	1	PSULRHL1
Registration	1	DGHTHL7
Scheduling	1	SCDXMSG1

Package

Total

Caller Graph

Outpatient Pharmacy

PSOHLDS1 PSORELD1 PSOVDF1

Adverse Reaction Tracking

GMRAIAD1 GMRAIAL1

Automated Lab Instruments

LA7QRY1

General Medical Record - Vitals

GMVVDEF1

Pharmacy Benefits Management

PSULRHL1

Registration

DGHTHL7

Scheduling

SCDXMSG1

Entry Points

Name	Comments	DBIA/ICR reference
BLDPD1(DFN,SEQ,PD1,HL,ERR)	; ; At this point only sequence 3 is supported ; Variable list ; DFN - internal PATIENT (#2) number ; SEQ - variable consisting of sequence numbers delimited by commas ; that will be used to build the message ; PD1 (passed by reference) - array location to place PD1 segment result, the array can have existing values when passed. ; HL - array that contains the necessary HL variables (init^hlsub) ; ERR - array that is used to return an error	ICR #3630 Status: Active Usage: Controlled Subscription
QRD	;process QRD segment
BLDPID(DFN,CNT,SEQ,PID,HL,ERR)	;build PID from File #2	ICR #3630 Status: Active Usage: Controlled Subscription
RESP	;Response processing initiated from the MPI.
IN	;process in the patient query
BLDRSP(DFN,VAFCCNT)	;
MSH	;process MSH segment
BLDEVN(DFN,SEQ,EVN,HL,EVR,ERR)	;build EVN for TF last treatment date and event reason ; At this point only sequence one and two are supported ; Variable list ; DFN - internal PATIENT (#2) number ; SEQ - variable consisting of sequence numbers delimited by commas ; that will be used to build the message ; EVN (passed by reference) - array location to place EVN segment result, the array can have existing values when passed. ; HL - array that contains the necessary HL variables (init^hlsub) ; EVR - event reason that triggered this message ; ERR - array that is used to return an error	ICR #3630 Status: Active Usage: Controlled Subscription
ROUTE	;Routine logic initiated from the MPI.

External References

Name	Field # of Occurrence
GENACK^HLMA1	IN+10
LINK^HLUTIL3	IN+9
BLDPID^VAFCQRY1	BLDPID+18
BLDEVN^VAFCQRY2	BLDEVN+11
BLDPD1^VAFCQRY2	BLDPD1+10
CHKID^VAFCQRY2	IN+4
$$LABE^VAFCSB	BLDRSP+13
$$PD1^VAFCSB	BLDRSP+9
$$PHARA^VAFCSB	BLDRSP+12
$$PV1^VAFCSB	BLDRSP+10
$$PV2^VAFCSB	BLDRSP+11
$$RADE^VAFCSB	BLDRSP+14
$$EN1^VAFHLZPD	BLDRSP+18
$$LKUP^XUAF4	MSH+7

HL7 Protocol Name	Call Tags
VAFC QRY-A19 SERVER	RESP
VAFC ADR-A19 CLIENT	IN

Name	Line Occurrences (* Changed, ! Killed)
^TMP("HLA"	IN+6, IN+7, IN+11!, BLDRSP+3, BLDRSP+5, BLDRSP+9, BLDRSP+10, BLDRSP+11, BLDRSP+12, BLDRSP+13* , BLDRSP+14, BLDRSP+18

Name	Line Occurrences
@(	IN+3
BLDEVN	BLDRSP+3
BLDPID	BLDRSP+5
BLDRSP	IN+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CITY	IN+1~
CLAIM	IN+1~
CNT	BLDRSP+1~, BLDRSP+5*, BLDPID~, BLDPID+18
COMP	IN+1~, IN+11!, MSH+4*, MSH+7, QRD+7
DFN	IN+1~, IN+4, IN+5, IN+8, BLDRSP~, BLDRSP+3, BLDRSP+5, BLDRSP+18, QRD+11*, BLDEVN~ , BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~, BLDPID+18
ERR	BLDRSP+1~, BLDRSP+3, BLDRSP+5, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~, BLDPID+18
EVN	BLDRSP+1~, BLDRSP+3, BLDEVN~, BLDEVN+11
EVN(1	BLDRSP+3
EVR	BLDEVN~, BLDEVN+11
HL	IN+10, BLDRSP+3, BLDRSP+5, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~, BLDPID+18
HL("ECH"	MSH+2, MSH+4, MSH+5, MSH+6
HL("EID"	IN+10
HL("EIDS"	IN+10
HL("FS"	IN+6, MSH+1, MSH+2, MSH+7, QRD+3, QRD+4
HL("MID"	IN+6, MSH+3
HL("Q"	MSH+2
HLA	IN+1~
>> HLECH	MSH+2*
>> HLFS	MSH+2*
>> HLL("LINKS"	IN+9*
>> HLMTIENS	IN+10
>> HLNEXT	IN+3
>> HLNODE	IN+3, MSH+7, QRD+2
>> HLQ	MSH+2*
>> HLQUIT	IN+3
>> HLRESLTA	IN+10
ICN	IN+1~, IN+4, IN+5, QRD+10*
ID	QRD+1~, QRD+7*, QRD+10, QRD+11, QRD+13
IDS	QRD+1~, QRD+4*, QRD+5
IEN	IN+1~, IN+9*
LABE	BLDRSP+1~, BLDRSP+13*
LVL	IN+1~
LVL2	IN+1~
PD1	BLDRSP+1~, BLDRSP+9*, BLDPD1~, BLDPD1+10
PID	BLDRSP+1~, BLDRSP+5, BLDPID~, BLDPID+18
PID(	BLDRSP+5
PID(1	BLDRSP+5
PRES	BLDRSP+1~, BLDRSP+12*
>> PV1	BLDRSP+10*
PV2	BLDRSP+1~, BLDRSP+11*
QRD	QRD+1~
QRDAA	QRD+1~, QRD+7*, QRD+9, QRD+12
QRDNTC	QRD+1~, QRD+7*, QRD+10, QRD+11, QRD+13
RADE	BLDRSP+1~, BLDRSP+14*
REP	IN+1~, MSH+5*, QRD+5
SEQ	BLDRSP+1~, BLDRSP+3, BLDRSP+5, BLDRSP+17*, BLDRSP+18, BLDEVN~, BLDEVN+11, BLDPD1~, BLDPD1+10, BLDPID~ , BLDPID+18
SG	IN+1~, IN+3*
SITE	IN+9, IN+11!, MSH+7*
SSN	IN+1~, IN+4, IN+5, QRD+13*
STATE	IN+1~
SUBCOMP	IN+1~, MSH+6*, QRD+7
VAFC	IN+1~, IN+3*, IN+9
VAFC(	IN+9
VAFC(0	IN+9
VAFCCNT	IN+1~, IN+2, IN+6, IN+7, IN+8, BLDRSP~, BLDRSP+3, BLDRSP+5, BLDRSP+6, BLDRSP+9 , BLDRSP+10, BLDRSP+11, BLDRSP+12, BLDRSP+13, BLDRSP+14, BLDRSP+18, BLDRSP+19
VAFCER	IN+1~, IN+2, IN+5, IN+6, IN+8, IN+11!
VAFCFS	IN+11!, MSH+1*
VAFCID	IN+11!, MSH+3*
VAFCQRD	IN+7, IN+11!, QRD+2*, QRD+3, QRD+4
VAFCRCV	IN+11!, QRD+3*
WSF	QRD+1~, QRD+5*, QRD+7
X	BLDRSP+1~, BLDRSP+5, QRD+1~, QRD+5

Customize PDF page

Package: Registration

Routine: VAFCQRY

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Used in HL7 Interface

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items