ORDER COMMENT (18) EXECUTE CODE (62.07)
Name
Value
NAME
ORDER COMMENT
EXECUTE CODE
R !,"Enter Order Comment: ",LRCCOM:$S($D(DTIME):DTIME,1:99) S:$L(LRCCOM)&(LRCCOM'="?") LRCCOM="~"_LRCCOM
TYPE
COMMENT
HELP PROMPT
Please enter a comment about this test order
DESCRIPTION
Prompts for a comment to be made at the time of ordering.