Name | Value |
---|---|
NAME | ORCHANGE NOTES AUTHOR |
ITEM TEXT | Signed Notes by Author |
ENTRY ACTION | N X,CTXT S CTXT=$P($G(^TMP("OR",$J,ORTAB,0)),U,3),X=$P(CTXT,";",4),X=$$AUTHOR^ORCHANGE(X) S:X $P(CTXT,";",1,5)=";;4;"_X_";",$P(^TMP("OR",$J,ORTAB,0),U,3,4)=CTXT_U |
TYPE | action |
CREATOR | USER,ONE |
TIMESTAMP | 1999-04-16 15:27:15 |