Routine: DVBACERT

Information

DVBACERT ;ALB/GTS-557/THM - 21 DAY CERT CHECKER ;1/23/91 11:17 AM

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!?(IOM-$L(HD)\2),HD,!!,"This program should be run only if the Task Manager fails.",!!! Line Location: DVBACERT+6
Function Call: WRITE	Prompt: !!!,"There were no 21 day certificates to print today.",!! Line Location: DATA+6
Function Call: WRITE	Prompt: !!!,"There were "_CNT_" certificates processed on "_FDT(0),!! Line Location: DATA+7
Function Call: WRITE	Prompt: @IOF Condition for execution: (IOST?1"C-".E)!($D(DVBAON2)) Line Location: CREATE+2
Function Call: WRITE	Prompt: !!,"Patient record missing for DFN "_DFN,!! Line Location: CREATE+2
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,?25," Bed: ",BED,!!! Line Location: CREATE+7
Function Call: WRITE	Prompt: " The patient above has been hospitalized for 21 consecutive days ",!,"from " Line Location: CREATE+8
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+8
Function Call: WRITE	Prompt: Y," to " Line Location: CREATE+8
Function Call: WRITE	Prompt: "Physician signature: " Line Location: CREATE+9
Function Call: WRITE	Prompt: "_" Line Location: CREATE+9
Function Call: WRITE	Prompt: !!!," Approved by: " Line Location: CREATE+10
Function Call: WRITE	Prompt: "_" Line Location: CREATE+10
Function Call: WRITE	Prompt: !!?5,"ROC 119",! Line Location: CREATE+11

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