Routine: PSJ5P193

Information

PSJ5P193 ;NCD - Check for null start date/times ; 2/4/09 11:26am

Name	Comments	DBIA/ICR reference
ENVN	; Begin check of existing orders
START	;Check of existing Pharmacy orders.
END
SENDMSG	;Send mail message when check is complete.
CLEAN	;
CLEANMSG(BEG,END)

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Your DUZ is not defined. It must be defined to run this routine." Line Location: ENVN+1
Function Call: WRITE	Prompt: !!,"The check of existing Pharmacy orders is",$S($D(ZTSK):"",1:" NOT")," queued",! Line Location: ENVN+4
Function Call: WRITE	Prompt: " (to start NOW).",!!,"YOU WILL RECEIVE A MAILMAN MESSAGE WHEN TASK #"_ZTSK_" HAS COMPLETED. IF" Line Location: ENVN+6
Function Call: WRITE	Prompt: !,"ERRORS ARE DETECTED, THE VERIFYING PHARMACIST WILL RECEIVE A MESSAGE INDICATING CLEANUP" Line Location: ENVN+7
Function Call: WRITE	Prompt: !,"HAS COMPLETED." Line Location: ENVN+8