Routine: DVBACER1

Name	Comments	DBIA/ICR reference
CERPTS(DVBALST,DVBARTYP,DVBAFLTRS)	;Contracted Exam Reports
CERPTS2	;Logic for timeliness report
CONLST(DVBACIEN,DVBARSLTS)	;Get Contractor List
DRPTS(DVBACSRT,DVBARIEN,DVBAEIEN,DVBASCRH)	; Detailed Report Processing
DSPLYDTL(DVBACSRT,DVBACIEN,DVBAPEXMS,DVBASCRH,DVBADLMT)	;Display Sorted Detailed Report Info
EXMINFO(DVBAPEXMS,DVBAEIEN,DVBACSRT,DVBADLMT,DVBASPCG)	;Display Exam Info
DRPTSPCG(DVBACSRT,DVBADLMT,DVBASPCG)	;Setup Detailed Report Spacing
SRPTS(DVBARIEN,DVBACNDE,DVBAGLBL,DVBARSLTS)	;Summary Report Processing
TRPTS(DVBACNDE,DVBAGLBL,DVBARSLTS,DVBATVAL)	;Timeliness Report Processing
TRPTS2(DVBACNDE)	;Timeliness include logic
TRPTS3(DVBAGLBL,DVBARSLTS)	;Timeliness calculation section
GETHFS()	;Get HFS File Name
OPENHFS(DVBAHNDL,DVBAHFS,DVBAMODE,DVBARSLTS)	;Open HFS File
CLOSEHFS(DVBAHNDL,DVBAHFS,DVBARSLTS)	;Close HFS and unload data

Name	Line Occurrences
Function Call: WRITE	Prompt: ?DVBASPCG(1),"Request Date",$S(DVBADLMT:"^",1:""),?DVBASPCG(2),"SSN",$S(DVBADLMT:"^",1:"") Line Location: DSPLYDTL+11
Function Call: WRITE	Prompt: ?DVBASPCG(3),"Patient Name",$S(DVBADLMT:"^",1:""),?DVBASPCG(4),"Status",$S(DVBADLMT:"^",1:"") Line Location: DSPLYDTL+12
Function Call: WRITE	Prompt: ?DVBASPCG(5),"Examinations",$S(DVBADLMT:"^",1:"") Line Location: DSPLYDTL+14
Function Call: WRITE	Prompt: ?DVBASPCG(7),"Referred" Line Location: DSPLYDTL+16
Function Call: WRITE	Prompt: ?DVBASPCG(5),$G(DVBAEXM(396.4,DVBAEIEN_",",.03,"E")),$S(DVBADLMT:"^",1:"") Line Location: EXMINFO+5
Function Call: WRITE	Prompt: ?DVBASPCG(7),$$FMTE^XLFDT($P($G(DVBAEXM(396.4,DVBAEIEN_",",101,"I")),"@"),"M"),$S(DVBADLMT:"^",1:"") Line Location: EXMINFO+7

FileNo	Call Tags
^DVB(396.3 - [#396.3]	GETS^DIQ
^DVB(396.4 - [#396.4]	GETS^DIQ

Information