source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/ORVOMH.m@ 1608

Last change on this file since 1608 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 1.5 KB
Line 
1ORVOMH ; slc/dcm - Help for ORVOM ;12/11/90 14:30 ;
2 ;;3.0;ORDER ENTRY/RESULTS REPORTING;;Dec 17, 1997
3R ; HELP FOR PREFIX
4 W !?5,"Enter a unique 2 to 4 character prefix beginning with an uppercase",!?5,"letter and followed only by uppercase letters or numbers." Q:X'?1"??".E
5 W !?5,"If this is an established package, you may enter one of the prefixes",!?5,"listed in the right column below."
6 S DIC=9.4,DIC(0)="QE",DIC("W")="W ?35,$P(^(0),U,2)",DIZ=15 D ^DIC K DIC,DIZ Q
7 ;
8R1 ; HELP FOR RTN NAME
9 W !?5,"Answer YES if you want to create a program called "_X W:$D(Q) !?5,"even though there already is one on file. (It will be overwritten.)" W !?5,"Answer NO if you don't want to do this." S X=$P(X,"ONIT",1) Q
10 ;
11M ; HELP FOR MAX RTN SIZE
12 W !?5,"Enter the maximum number of characters you would like each routine",!?5,"contain. This number must be between 2000 and 10000." Q
13 ;
14VER ;Version # help
15 W !!?3,"Package Version Number must be entered to put onto the second"
16 W !?3,"line of the ONIT routines."
17 W !!?3,"Format can be either the old type of version no. nnn.nn",!,?3,"or the new type, nnnXnn where X is either T for test phase",!?3,"or V for verification phase." Q
18PNM ;Package name help
19 W !!?3,"Enter the Package Name to go on the second line of the ONIT routines." Q
20VDT ;Version Date help
21 W !!?3,"Enter the Distribution Date for this Package, to go on the second",!?3,"line of the ONIT routines. It should match the version date",!?3,"on the other routines being sent with this package." Q
Note: See TracBrowser for help on using the repository browser.