Routine: NURCVPR0

Information

NURCVPR0 ;HIRMFO/YH,FT-VITALS/MEASUREMENTS RESULTS REPORTING ;5/4/99 14:43

Name	Comments	DBIA/ICR reference
EN1	;ENTER FROM NURCPP-VIT-SF511 OPTION TO PRINT SF 511, B/P OR WEIGHT CHART
DEV
START	; ENTRY TO PRINT THIS REPORT AFTER IT HAS BEEN QUEUED ; NOTE: THIS REPORT MUST BE QUEUED TO A PRINTER.
REPT	;
DATE
Q1
Q2
EN2	;VITAL SIGNS DISPLAY BY INDIVIDUAL PATIENT
EN3	;REPORT OF VITALS ENTERED IN ERROR FOR A PATIENT
EN4	;CUMULATIVE VITALS REPORT BY WARD/ROOM/PATIENT
START4
Q4
REPORT
EN5	;DISPLAY VITAL SIGNS BY LOCATION
START2	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PAIN CHART must be queued to a HP Laser printer",! Line Location: EN1+10
Function Call: WRITE	Prompt: !!,"This report must be queued to a line printer",!,"or a slave printer with 132 columns",!,"or a Kyocera/HP Laser printer",! Line Location: EN1+11
Function Call: WRITE	Prompt: ! Line Location: DEV+0
Function Call: WRITE	Prompt: !!,"Sorry, you must select a DEVICE that can print 132 columns. Try again." Line Location: DEV+2
Function Call: WRITE	Prompt: !,"PAIN CHART uses HP Laser printer only." Line Location: DEV+4
Function Call: WRITE	Prompt: ! Line Location: DEV+6
Function Call: WRITE	Prompt: !,"Sorry, you must select a Kyocera or HP Laser printer for the Pain Chart." Line Location: START+4
Function Call: WRITE	Prompt: !,"Sorry, you must select a HP Laser printer." Line Location: START+5
Function Call: WRITE	Prompt: !,"NO DATA FOR THIS REPORT" Line Location: START+7
Function Call: WRITE	Prompt: !?5,"Ending date of range needs to be greater that starting date.",!?5,$C(7),"PLEASE REENTER!!" Line Location: DATE+6
Function Call: WRITE	Prompt: !,"NO PATIENT FOR THIS REPORT" Line Location: EN4+3
Function Call: WRITE	Prompt: !,"**** NO DATA FOR UNIT : ",NPWARD Line Location: EN5+8