Routine: DVBACRRR

Information

DVBACRRR ;ALB/GTS-557/THM-REPRINT 21-DAY CERT FOR THE RO ;21 JUL 89

Name	Comments	DBIA/ICR reference
KIL
DEVICE	;
DATA	;
KILL
CREATE	;CERTIFICATE CREATE
HDR	;Displays the header to this option.
INIT	;sets up and checks various variables

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Patient record missing for DFN ",DFN,!! Line Location: CREATE+3
Function Call: WRITE	Prompt: !,FDT(0),?32,"REPORT OF CONTACT",!,?31,"21-DAY CERTIFICATE",?(80-11),"PAGE: 1",!,?(80-$L(HD1)\2),HD1,!!!!!!!,"Patient name: ",?16,PNAM,!,?9,"SSN: ",?16,SSN,?33,"Claim #: ",?43,CNUM,!!,?9,"Ward: ",?16,WARD,?30,"Bed: ",?36,BED,!!! Line Location: CREATE+8
Function Call: WRITE	Prompt: " The patient above has been hospitalized for 21 consecutive days ",!,"from " Line Location: CREATE+9
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+9
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+9
Function Call: WRITE	Prompt: !!!,"A signed copy of this document is on file at "_HD1,! Line Location: CREATE+12
Function Call: WRITE	Prompt: !!?5,"R0C 119",! Line Location: CREATE+13