Routine: VPRDIB

Package	Total	Call Graph
Integrated Billing	1	$$INSUR^IBBAPI
Virtual Patient Record	1	($$ESC,$$FAC)^VPRD

Entry Points

Name	Comments	DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID)	; -- find patient's insurance data ; [END,ID not currently used]
FORMAT(X)	; -- enforce (xxx)xxx-xxxx phone format
XML(ITEM)	; -- Return patient data as XML in @VPR@(n) ; as <element code='123' displayName='ABC' />
ADDR(X)	; -- XML address node from X=street1^st2^st3^city^state^zip
PHONE(X)	; -- XML telecom node from X=home^cell^work numbers
ADD(X)	; Add a line @VPR@(n)=X

External References

Name	Field # of Occurrence
$$INSUR^IBBAPI	EN+13
$$ESC^VPRD	XML+6, XML+7, ADDR+3, ADDR+4
$$FAC^VPRD	EN+33

Label References

Name	Line Occurrences
$$FORMAT	EN+21
ADD	XML+3, XML+4, XML+9, XML+13, ADDR+7, PHONE+2, PHONE+3, PHONE+4, PHONE+5, PHONE+6
ADDR	XML+10
PHONE	XML+11
XML	EN+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ATT	XML+2~, XML+4*, XML+5, XML+6, XML+7, XML+8, XML+9, XML+12
BEG	EN~
DFN	EN~, EN+3*, EN+13, EN+16, EN+17
DT	EN+4
END	EN~
>> FILTER("status"	EN+6
I	EN+2~, EN+14, EN+15, FORMAT+2~, FORMAT+3, XML+2~, ADDR+1~, ADDR+3*, PHONE+1~
ID	EN~, EN+16
ITEM	XML~
ITEM(	XML+4, XML+5, XML+8, XML+9
>> J	EN+19*
MAX	EN~, EN+4*, EN+14
N	FORMAT+2~, FORMAT+3*
P	FORMAT+2~, FORMAT+3, FORMAT+4*, FORMAT+5
SUB	XML+2~, XML+8*, XML+9, XML+10, XML+11
U	EN+19, EN+24, EN+28, EN+29, XML+7, ADDR+3, ADDR+4, ADDR+5, ADDR+6, PHONE+3 , PHONE+4, PHONE+5
>> VPR	ADD+2
VPRCNT	EN+2~, EN+14, EN+34
VPRDT	EN+2~, EN+4, EN+7, EN+13
>> VPRI	ADD+1*, ADD+2
VPRINS	EN+2~, EN+15*
VPRINS(	EN+19
VPRINS(1	EN+16, EN+17, EN+18
VPRINS(10	EN+22
VPRINS(11	EN+23
VPRINS(13	EN+29
VPRINS(14	EN+29
VPRINS(18	EN+25
VPRINS(19	EN+28
VPRINS(2	EN+18
VPRINS(21	EN+26
VPRINS(6	EN+21
VPRINS(8	EN+16, EN+17, EN+24
VPRITM	EN+2~, EN+15!, EN+34
VPRITM("company"	EN+18, EN+20, EN+21*
VPRITM("effectiveDate"	EN+22*
VPRITM("expirationDate"	EN+23*
VPRITM("facility"	EN+33*
VPRITM("groupName"	EN+24*
VPRITM("groupNumber"	EN+25*
VPRITM("id"	EN+17*
VPRITM("insuranceType"	EN+26*
VPRITM("relationship"	EN+28*
VPRITM("subscriber"	EN+29*
VPRSTS	EN+2~, EN+6*, EN+7, EN+13
>> VPRTOTL	XML+3*
VPRX	EN+2~, EN+13
VPRX("IBBAPI"	EN+14, EN+15
X	EN+2~, EN+13, EN+18, EN+19, EN+20, EN+21, EN+26, FORMAT~, FORMAT+1, FORMAT+3 , XML+2~, XML+5, XML+6, XML+7, XML+9, XML+10, XML+11, ADDR~, ADDR+1, ADDR+3 , ADDR+4, ADDR+5, ADDR+6, PHONE~, PHONE+1, PHONE+3, PHONE+4, PHONE+5, ADD~, ADD+2
Y	FORMAT+2~, FORMAT+5, FORMAT+6, XML+2~, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9 , XML+12, ADDR+1~, ADDR+2, ADDR+3, ADDR+4, ADDR+5, ADDR+6, ADDR+7, PHONE+1~, PHONE+3 , PHONE+4, PHONE+5

Customize PDF page

Package: Virtual Patient Record

Routine: VPRDIB

Information

Source Information

Call Graph

Call Graph Total: 2

Entry Points

External References

Label References

Local Variables

Legend: