Name | Value |
---|---|
NAME | ORDER COMMENT MODIFIED |
EXECUTE CODE | S:$S($D(LRCOM(LRSAMP,LRSPEC,1)):$S(LRCOM(LRSAMP,LRSPEC,1)["~For Test:":1,1:0),1:0) LRCOM(LRSAMP,LRSPEC)=0 R !,"Enter Order Comment: ",LRCCOM:DTIME |
TYPE | COMMENT |
HELP PROMPT | Please enter a comment about this order. |
DESCRIPTION | Order comment that suppresses '~For test:' |