Routine: DVBCIRP2

Information

DVBCIRP2 ;ALB/RTW - CAPRI INSUFFICIENT 2507 RPT -CONT 1 ; 07/17/2015 4:24 AM

Name	Comments	DBIA/ICR reference
SUMRPT	;**Output the summary report
SUMHD	;** Output Summary Report heading
DETAIL	;** Output reason, exam type and exam info
KVARS	;** Final Kill for Detail report
CHKREQ(DVBARIEN)	;check for parent requests
SUM	;** Set up reason counter array, count all 2507's received
SUMKILL	;** Kill the variables used in the summary report

Name	Line Occurrences
Function Call: WRITE	Prompt: !?3,"Total 2507 requests received for date range:",?71,$J(DVBARQCT,5) Line Location: SUMRPT+4
Function Call: WRITE	Prompt: !?3,"Total insufficient 2507 requests received for date range:",?71,$J(DVBAINRQ,5) Line Location: SUMRPT+5
Function Call: WRITE	Prompt: !?3,"Total insufficient 2507 requests cancelled by RO for date range:",?71,$J(DVBACAN("REQ"),5) Line Location: SUMRPT+6
Function Call: WRITE	Prompt: !!?3,"Total 2507 exams received for date range:",?71,$J(DVBAXMCT,5) Line Location: SUMRPT+17
Function Call: WRITE	Prompt: !?3,"Total insufficient 2507 exams received for date range:",?71,$J(DVBAINXM,5) Line Location: SUMRPT+18
Function Call: WRITE	Prompt: !?3,"Total insufficient 2507 exams cancelled by RO for date range:",?71,$J(DVBACAN("EXM"),5) Line Location: SUMRPT+19
Function Call: WRITE	Prompt: !?3,"Exams without insufficient reason indicated",?53,DVBAINXM(DVBARSLP) Line Location: SUMRPT+44
Function Call: WRITE	Prompt: !?15,"Summary Insufficient Exam Report for ",$$SITE^DVBCUTL4(),! Line Location: SUMHD+2
Function Call: WRITE	Prompt: ?(((67+DVBASL)-$L(DVBATXT))\2) Line Location: SUMHD+8
Function Call: WRITE	Prompt: !?16,"For Date Range: "_STRTDT_" to "_LSTDT,! Line Location: SUMHD+9
Function Call: WRITE	Prompt: ! Line Location: DETAIL+34