ORC ADD SUMMARY (2313)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME ORC ADD SUMMARY
ITEM TEXT Write New Summary
EXIT ACTION S OREBUILD=1 S:$D(^TMP("OR",$J,"CURRENT","MENU")) XQORM("HIJACK")=^("MENU") I +$G(OREBUILD) D TAB^ORCHART(ORTAB,1)
ENTRY ACTION D FULL^VALM1,MAIN^TIUEDIT(244,.OREBUILD) S VALMBCK="R"
DESCRIPTION
Add a new discharge summary.
TYPE action
CREATOR USER,ONE
TIMESTAMP 1999-04-16 15:22:37