NAME	ENWONEW-WARD
DESCRIPTION	Entry of Engineering work requests by non-Engineering personnel. Intentis to reduce volume of written work orders and to reduce telephone callsto Engineering Work Control desk. Assumes that AEMS/MERS has beenintegrated with CORE systems so that all DHCP users have access to theEngineering Package.
CREATOR	POSTMASTER
E ACTION PRESENT	YES
ENTRY ACTION	S ENDR=$S($D(^DIE("B","ENZWOWARD")):"[ENZWOWARD]",1:"[ENWOWARD]") D INIT^EN,WARD^ENWONEW
EXIT ACTION	K ENSHKEY
MENU TEXT	Request Electronic Work Order
TYPE	action
UPPERCASE MENU TEXT	REQUEST ELECTRONIC WORK ORDER
X ACTION PRESENT	YES