Routine: DVBACRMS

Information

DVBACRMS ;ALB/GTS-557/THM - PRINT 21-DAY CERT FOR RO ;21 JUL 89

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,"There are no new 21-DAY CERTIFICATES to print.",! Line Location: DVBACRMS+4
Function Call: WRITE	Prompt: !!,*7,"Your USER NUMBER is missing. Call the site manager.",!! Line Location: DVBACRMS+5
Function Call: WRITE	Prompt: @IOF,!?(IOM-$L(HD)\2),HD,!!!,"This program generates ORIGINAL Regional Office 21-day certificates.",!! Line Location: DVBACRMS+10
Function Call: WRITE	Prompt: !!,"Patient record missing for DFN ",DFN,!! Line Location: CREATE+5
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+10
Function Call: WRITE	Prompt: " The patient above has been hospitalized for 21 consecutive days ",!,"from " Line Location: CREATE+11
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+11
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+11
Function Call: WRITE	Prompt: !!!,"A signed copy of this document is on file at "_HD1,! Line Location: CREATE+14
Function Call: WRITE	Prompt: !!?5,"R0C 119",! Line Location: CREATE+15

FileNo	Call Tags
^DVB(396 - [#396]	Classic Fileman Calls