Last change
on this file since 700 was 613, checked in by George Lilly, 15 years ago |
initial load of WorldVistAEHR
|
File size:
1.0 KB
|
Line | |
---|
1 | ORBX3101 ; SLC/CLA - Data for Pkg Level Parameters; Sep 30, 1998@11:03:28
|
---|
2 | ;;3.0;ORDER ENTRY/RESULTS REPORTING;**31**;Dec 17, 1997
|
---|
3 | LOAD ; 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
|
---|
8 | DATA ; 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.