NAMENURAED-STF-LOC
DESCRIPTIONAllows editing of location field in the NURS STAFF FILE (#210).
CREATORUSER,ONE
E ACTION PRESENTYES
ENTRY ACTIOND EN14^NURAED0 S NUROUT=$S('$D(XQUIT):0,XQUIT=1:1,1:0) D:'NUROUT ^NURAED1 S:'$D(NURAES) NUROUT=1 W:'NUROUT ! S:'NUROUT DIE="^NURSF(210",DR=28.1,DA=+NURSDBA D:'NUROUT ^DIE D EN15^NURAED0 K NUROUT
MENU TEXTLocation Edit, Employee
PACKAGENURSING SERVICE
TYPEaction
UPPERCASE MENU TEXTLOCATION EDIT, EMPLOYEE