Routine: PSOPI136

Information

PSOPI136 ;BHM/MFR,BI - Patient Merge Clean-up ;07/10/03

Name	Comments	DBIA/ICR reference
REPEAT
OUT
EN
END
FIX(OLDDFN,NEWDFN)	; Fix problems caused by Patient Merge
EXP	; Sets CPRS order status to EXPIRED
DSC	; Sets CPRS order status to DISCONTINUED
MAIL	; Send mail about the Clean-up

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The Environment Check Routine is designed",!,"to run during the installation step only.",! Line Location: PSOPI136+10
Function Call: WRITE	Prompt: !,"This patch queues a job to perform Patient Merge Clean-up",! Line Location: PSOPI136+11
Function Call: WRITE	Prompt: "It should be queued to run when there are no users processing outpatient prescriptions." Line Location: REPEAT+0
Function Call: WRITE	Prompt: !,"The program did not run, the patch will not install.",! Line Location: REPEAT+2
Function Call: WRITE	Prompt: !,"The program did not run, the patch will not install..",! Line Location: REPEAT+3
Function Call: WRITE	Prompt: !,"MUST BE IN THE FUTURE",! Line Location: REPEAT+4
Function Call: WRITE	Prompt: ! Line Location: REPEAT+6
Function Call: WRITE	Prompt: !!,"JOB QUEUED AS ",$G(ZTSK),".",! Line Location: REPEAT+7
Function Call: WRITE	Prompt: "Job is already running",! Line Location: EN+2
Function Call: WRITE	Prompt: "." Line Location: DSC+20