Routine: PSDCORP1

Information

PSDCORP1 ;BIR/JPW-CS Correction Log Status Changes ; 2 Aug 94

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?20," NO ORDER STATUS CHANGES REPORTED FROM ",$P(PSDATE,"^")," TO ",$P(PSDATE,"^",2)," ",!! Line Location: PRINT+2
Function Call: WRITE	Prompt: !,?5,"=> ",PSD,! Line Location: PRINT+3
Function Call: WRITE	Prompt: !,?5,"=> ",PSD,!! Line Location: PRINT+6
Function Call: WRITE	Prompt: @IOF Line Location: DONE+0
Function Call: WRITE	Prompt: ! Line Location: DONE+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?25,"CS CORRECTION LOG - ORDER STATUS CHANGES",?115,"Page: ",PG,!,?25,"Report Range ",$P(PSDATE,"^")," to ",$P(PSDATE,"^",2),!,?25,"Report Printed: ",RPDT,! Line Location: HDR+2
Function Call: WRITE	Prompt: !!,?5,"=> NAOU",!,?57,"DATE",?74,"CORRECTED BY" Line Location: HDR+3
Function Call: WRITE	Prompt: !,"DISP #",?12,"DRUG",?54,"CORRECTED",?75,"PHARMACIST",?100,"ENTERED BY NURSE",!,LN,! Line Location: HDR+4