Routine: LREPIRS2

Information

LREPIRS2 ;DALOI/CKA - EPI-PRINT LOCAL REPORT/SPREADSHEET ; 5/14/03

Name	Comments	DBIA/ICR reference
RORS	;REPORT OR SPREADSHEET
CHOOSE	;CHOOSE RPT OR SPSHT TO PRINT
EXIT	;
SPSHT	;
PRTSP
READY	;
PRIV	;PRIVACY MESSAGE
REP	;
PRT	;Print report
PAUSE	;
NPG	;NEW PAGE
HDG	;
SAVHDG	;SAVE HEADING WHEN GENERATE REPORT
DELETE	;Delete a report or spreadsheet
DRORS	;REPORT OR SPREADSHEET
DCHOOSE	;CHOOSE WHICH REPORT/SPREADSHEET TO DELETE

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"Print Local Report/Spreadsheet Option" Line Location: LREPIRS2+4
Function Call: WRITE	Prompt: !,"No "_$S(LRREP=1:"report ",1:"spreadsheet ")_"is ready for printing." Line Location: CHOOSE+10
Function Call: WRITE	Prompt: !! Line Location: CHOOSE+26
Function Call: WRITE	Prompt: !!?5,"Report Cancelled." Line Location: SPSHT+3
Function Call: WRITE	Prompt: !!?5,"The Task has been queued",!,"Task #",$G(ZTSK) Line Location: SPSHT+4
Function Call: WRITE	Prompt: !!!,"This report will contain Confidential Information." Line Location: PRIV+1
Function Call: WRITE	Prompt: !,"*THIS REPORT CONTAINS CONFIDENTIAL INFORMATION.*" Line Location: PRT+2
Function Call: WRITE	Prompt: @IOF Line Location: NPG+3
Function Call: WRITE	Prompt: " PAGE ",LRPAGE Line Location: HDG+5
Function Call: WRITE	Prompt: !?5,"Delete a Local Report/Spreadsheet Option" Line Location: DELETE+1
Function Call: WRITE	Prompt: !,"No "_$S(LRREP=1:"report ",1:"spreadsheet ")_"is ready for printing." Line Location: DCHOOSE+10
Function Call: WRITE	Prompt: !,"Spreadsheet deleted." Line Location: DCHOOSE+19
Function Call: WRITE	Prompt: !,"Report deleted." Line Location: DCHOOSE+20