| 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. |