Routine: NURCEVP0

Information

NURCEVP0 ;HIRMFO/RTK,RM,MD-Nursing Care Plans Print Report ;8/29/96

Name	Comments	DBIA/ICR reference
ENT1	;
DEV	; SELECT DEVICE TO SEND OUTPUT TO. ; IF REPORT IS QUEUED, SET UP TASK USING %ZTLOAD AND GET OUT OF ROUTINE
PRINT	; ENTRY FROM TASKMAN TO PRINT THIS REPORT
END	; CLEAN UP VARIABLES
HEADER	; PRINT HEADER FOR REPORT
PRTRMBD(ROOM,BED)	; THIS FUNTION RETURNS THE PRINTABLE FORM OF ROOM/BED

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"THERE IS A PROBLEM IN THE ""AA"" XREF.",! Line Location: ENT1+1
Function Call: WRITE	Prompt: !?3,"THIS PATIENT HAS NO PROBLEMS TO BE EVALUATED." Line Location: PRINT+17
Function Call: WRITE	Prompt: !?3,$E(GMRGXPRT,1,43),?48,$P($G(NURCPDT($P(X1,U,4))),U,2),?68,$P(X1,U,3) Line Location: PRINT+22
Function Call: WRITE	Prompt: !! Line Location: PRINT+26
Function Call: WRITE	Prompt: ! Line Location: HEADER+4
Function Call: WRITE	Prompt: ?23,"Nursing Problems to be Evaluated",?70,"Page ",PAGE Line Location: HEADER+4
Function Call: WRITE	Prompt: !!,"ROOM/BED",?17,"PATIENT (PID)",!,?48,"DATE/TIME",?68,"EVALUATION",!?3,"PROBLEM TO BE EVALUATED",?48,"DEVELOPED",?68,"DATE" Line Location: HEADER+5
Function Call: WRITE	Prompt: !,"==============================================================================" Line Location: HEADER+6