ORCHANGE NOTES UNCOSIGNED (2390)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME ORCHANGE NOTES UNCOSIGNED
ITEM TEXT Uncosigned Notes
ENTRY ACTION N CTXT S CTXT=$P($G(^TMP("OR",$J,ORTAB,0)),U,3),$P(CTXT,";",1,5)=";;3;;",$P(^TMP("OR",$J,ORTAB,0),U,3,4)=CTXT_U
TYPE action
CREATOR USER,ONE
TIMESTAMP 1999-04-16 15:27:15