Routine: ECXDIVIV

Information

ECXDIVIV ;BIR/CML-Enter/Edit and Print IV Room Division ;2/7/14 16:32

Name	Comments	DBIA/ICR reference
ED	;enter/edit division field for iv rooms
PRT	;print worksheet
START	;queued entry point
HDR	;header
CHK	;check for existence of necessary files for division functionality
EXIT
PAUSE	;pause screen

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option allows editing of the DIVISION field for IV Rooms.",! Line Location: ED+2
Function Call: WRITE	Prompt: " INACTIVE",$C(7) Line Location: ED+8
Function Call: WRITE	Prompt: !!,"This option will produce a worksheet listing all entries in the IV Room file" Line Location: PRT+2
Function Call: WRITE	Prompt: !,"(#59.5). It should be used to help DSS and Pharmacy services define and" Line Location: PRT+3
Function Call: WRITE	Prompt: !,"review the DIVISION assignments for each IV Room.",!! Line Location: PRT+4
Function Call: WRITE	Prompt: !!,"No Data found for this worksheet." Line Location: START+14
Function Call: WRITE	Prompt: ! Line Location: HDR+1
Function Call: WRITE	Prompt: !,"IV Room Worksheet",?72,"Page: ",PG,!,"Printed ",PDT Line Location: HDR+5
Function Call: WRITE	Prompt: !!,"IV ROOM",?34,"DIVISION",?60,"INACTIVE DATE",!,LN1 Line Location: HDR+6
Function Call: WRITE	Prompt: ! Line Location: PAUSE+2
Function Call: WRITE	Prompt: ! Line Location: PAUSE+3