Routine: DVBCCHKR

Information

DVBCCHKR ;ALB/GTS-557/THM-CHECK C&P REQUEST FOR CRITICAL DATA ; 3/20/19 7:56am

Name	Comments	DBIA/ICR reference
CHECK
PRINT
PRINT1
EN
ASK
DEV
GO
EXIT
HDR
LINKCK	;** Patient DFN's w/ 2507's >3 days w/out links
RPTCHK()	;**Check C&P Report Param field - 396.1
NAMELN
SETSTYLE	;

Name	Line Occurrences
Function Call: WRITE	Prompt: @FF,!!,"This report will check the 2507 REQUEST file for missing crucial data.",!!,"All requests will be checked and those found missing any of the following",!,"will be reported:",!! Line Location: EN+1
Function Call: WRITE	Prompt: "1) Request date",!,"2) Regional office number",!,"3) Requester",! Line Location: EN+2
Function Call: WRITE	Prompt: "4) Request status",!,"5) Routing location",!,"6) No exams selected" Line Location: EN+3
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: "Do you want to continue" Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"Enter Y to print the report or N to quit.",!! Line Location: ASK+1
Function Call: WRITE	Prompt: !! Line Location: DEV+0
Function Call: WRITE	Prompt: !!!!!?25,"Nothing found to report",!! Line Location: GO+3
Function Call: WRITE	Prompt: !!!!!?25,"Nothing found to report",!! Line Location: GO+9
Function Call: WRITE	Prompt: @IOF Line Location: HDR+0
Function Call: WRITE	Prompt: !,DVBCDT,?(80-$L(HD)\2),HD,?69,"Page: ",PG,!,?(80-$L($$SITE^DVBCUTL4)\2),$$SITE^DVBCUTL4,!!,"Veteran name",?28,"Social Sec #",?50,"Missing items",! Line Location: HDR+1
Function Call: WRITE	Prompt: LN,!!,NAME,?28,$P(^DPT(DFN,0),U,9) Line Location: NAMELN+0