| Name | Value |
|---|---|
| NAME | XT-OPTION TEST |
| X ACTION PRESENT | YES |
| MENU TEXT | Test an option not in your menu |
| UPPERCASE MENU TEXT | TEST AN OPTION NOT IN YOUR MEN |
| E ACTION PRESENT | YES |
| ENTRY ACTION | S DIC=19,DIC(0)="AEMQZ",DIC("A")="Option entry to test: ",DIC("S")="I $P(^(0),U)'[""XUPROG""" D ^DIC K DIC I Y>0 S XQY=+Y,XQUR=$P(Y,U,2),XQDIC="U",XQY0=^DIC(19,XQY,0),^("T")=^XUTL("XQ",$J,"T")-1 G M0^XQ |
| LOCK | XUMGR |
| DESCRIPTION | This is for in-house testing of options only. It allows the selection of an option from the OPTION file and then executes it. No security checks are performed, therefore, this option should only be given to programmers. |
| CREATOR | USER,ONE |
| TYPE | action |
| TIMESTAMP | 1988-05-13 13:59:35 |
| TIMESTAMP OF PRIMARY MENU | 1989-09-19 15:16:49 |