Routine: VPRDIB

Information

VPRDIB ;SLC/MKB -- Integrated Billing (insurance) ;3/14/12 09:01

Source file <VPRDIB.m>

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