source: WorldVistAEHR/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/ORBX3101.m@ 1195

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

initial load of WorldVistAEHR

File size: 1.0 KB
RevLine 
[613]1ORBX3101 ; SLC/CLA - Data for Pkg Level Parameters; Sep 30, 1998@11:03:28
2 ;;3.0;ORDER ENTRY/RESULTS REPORTING;**31**;Dec 17, 1997
3LOAD ; load data into ^TMP (expects ROOT to be defined)
4 S I=1 F S REF=$T(DATA+I) Q:REF="" S ORVAL=$T(DATA+I+1) D
5 . S I=I+2,REF=$P(REF,";",3,999),ORVAL=$P(ORVAL,";",3,999)
6 . S @(ROOT_REF)=ORVAL
7 Q
8DATA ; parameter data
9 ;;2773,"KEY")
10 ;;ORB PROCESSING FLAG^UNVERIFIED ORDER
11 ;;2773,"VAL")
12 ;;Disabled
13 ;;2775,"KEY")
14 ;;ORB URGENCY^UNVERIFIED ORDER
15 ;;2775,"VAL")
16 ;;High
17 ;;2776,"KEY")
18 ;;ORB DELETE MECHANISM^UNVERIFIED ORDER
19 ;;2776,"VAL")
20 ;;All Recipients
21 ;;2777,"KEY")
22 ;;ORB PROVIDER RECIPIENTS^UNVERIFIED ORDER
23 ;;2777,"VAL")
24 ;;T
25 ;;2778,"KEY")
26 ;;ORB ARCHIVE PERIOD^UNVERIFIED ORDER
27 ;;2778,"VAL")
28 ;;30
29 ;;2779,"KEY")
30 ;;ORB FORWARD SUPERVISOR^UNVERIFIED ORDER
31 ;;2779,"VAL")
32 ;;0
33 ;;2780,"KEY")
34 ;;ORB FORWARD SURROGATES^UNVERIFIED ORDER
35 ;;2780,"VAL")
36 ;;0
37 ;;2828,"KEY")
38 ;;ORB UNVERIFIED ORDER^1
39 ;;2828,"VAL")
40 ;;2
41 ;;2831,"KEY")
42 ;;ORB UNVERIFIED MED ORDER^1
43 ;;2831,"VAL")
44 ;;2
Note: See TracBrowser for help on using the repository browser.