268 lines
5.2 KiB
Mathematica
268 lines
5.2 KiB
Mathematica
ORXPAR09 ; ; Dec 17, 1997@11:35:35
|
|
;;3.0;ORDER ENTRY/RESULTS REPORTING;;Dec 17, 1997
|
|
;;
|
|
LOAD ; load data into ^TMP (expects ROOT to be defined)
|
|
S I=1 F S REF=$T(DATA+I) Q:REF="" S VAL=$T(DATA+I+1) D
|
|
. S I=I+2,REF=$P(REF,";",3,999),VAL=$P(VAL,";",3,999)
|
|
. S @(ROOT_REF)=VAL
|
|
Q
|
|
DATA ; parameter data
|
|
;;1135,"VAL")
|
|
;;0
|
|
;;1136,"KEY")
|
|
;;ORB FORWARD SURROGATES^TRANSFER FROM PSYCHIATRY
|
|
;;1136,"VAL")
|
|
;;0
|
|
;;1137,"KEY")
|
|
;;ORB FORWARD SURROGATES^ORDER REQUIRES CO-SIGNATURE
|
|
;;1137,"VAL")
|
|
;;0
|
|
;;1139,"KEY")
|
|
;;ORB FORWARD SURROGATES^SITE-FLAGGED ORDER
|
|
;;1139,"VAL")
|
|
;;0
|
|
;;1140,"KEY")
|
|
;;ORB FORWARD SURROGATES^LAB ORDER CANCELED
|
|
;;1140,"VAL")
|
|
;;0
|
|
;;1141,"KEY")
|
|
;;ORB FORWARD SURROGATES^STAT ORDER
|
|
;;1141,"VAL")
|
|
;;0
|
|
;;1142,"KEY")
|
|
;;ORB FORWARD SURROGATES^STAT RESULTS
|
|
;;1142,"VAL")
|
|
;;0
|
|
;;1143,"KEY")
|
|
;;ORB FORWARD SURROGATES^DNR EXPIRING
|
|
;;1143,"VAL")
|
|
;;0
|
|
;;1144,"KEY")
|
|
;;ORB FORWARD SURROGATES^FREE TEXT
|
|
;;1144,"VAL")
|
|
;;0
|
|
;;1145,"KEY")
|
|
;;ORB FORWARD SURROGATES^MEDICATIONS EXPIRING
|
|
;;1145,"VAL")
|
|
;;0
|
|
;;1146,"KEY")
|
|
;;ORB FORWARD SURROGATES^UNVERIFIED MEDICATION ORDER
|
|
;;1146,"VAL")
|
|
;;0
|
|
;;1147,"KEY")
|
|
;;ORB FORWARD SURROGATES^NEW ORDER
|
|
;;1147,"VAL")
|
|
;;0
|
|
;;1148,"KEY")
|
|
;;ORB FORWARD SURROGATES^STAT IMAGING REQUEST
|
|
;;1148,"VAL")
|
|
;;0
|
|
;;1149,"KEY")
|
|
;;ORB FORWARD SURROGATES^URGENT IMAGING REQUEST
|
|
;;1149,"VAL")
|
|
;;0
|
|
;;1150,"KEY")
|
|
;;ORB FORWARD SURROGATES^IMAGING RESULTS AMENDED
|
|
;;1150,"VAL")
|
|
;;0
|
|
;;1151,"KEY")
|
|
;;ORB FORWARD SURROGATES^ORDER CHECK
|
|
;;1151,"VAL")
|
|
;;0
|
|
;;1152,"KEY")
|
|
;;ORB FORWARD SURROGATES^FOOD/DRUG INTERACTION
|
|
;;1152,"VAL")
|
|
;;0
|
|
;;1153,"KEY")
|
|
;;ORB FORWARD SURROGATES^ERROR MESSAGE
|
|
;;1153,"VAL")
|
|
;;0
|
|
;;1156,"KEY")
|
|
;;ORB SYSTEM ENABLE/DISABLE^1
|
|
;;1156,"VAL")
|
|
;;Disable
|
|
;;1178,"KEY")
|
|
;;ORK DEBUG ENABLE/DISABLE^1
|
|
;;1178,"VAL")
|
|
;;Disable
|
|
;;1179,"KEY")
|
|
;;ORB URGENCY^ERROR MESSAGE
|
|
;;1179,"VAL")
|
|
;;Low
|
|
;;1222,"KEY")
|
|
;;ORK CLINICAL DANGER LEVEL^POLYPHARMACY
|
|
;;1222,"VAL")
|
|
;;Moderate
|
|
;;1223,"KEY")
|
|
;;ORK PROCESSING FLAG^POLYPHARMACY
|
|
;;1223,"VAL")
|
|
;;Enabled
|
|
;;1246,"KEY")
|
|
;;ORK PROCESSING FLAG^DISPENSE DRUG NOT SELECTED
|
|
;;1246,"VAL")
|
|
;;Enabled
|
|
;;1247,"KEY")
|
|
;;ORK CLINICAL DANGER LEVEL^DISPENSE DRUG NOT SELECTED
|
|
;;1247,"VAL")
|
|
;;Moderate
|
|
;;1389,"KEY")
|
|
;;ORB DELETE MECHANISM^LAB RESULTS
|
|
;;1389,"VAL")
|
|
;;Individual Recipient
|
|
;;1390,"KEY")
|
|
;;ORB URGENCY^LAB RESULTS
|
|
;;1390,"VAL")
|
|
;;Moderate
|
|
;;1391,"KEY")
|
|
;;ORB PROVIDER RECIPIENTS^LAB RESULTS
|
|
;;1391,"VAL")
|
|
;;OAPT
|
|
;;1599,"KEY")
|
|
;;ORB PROVIDER RECIPIENTS^FREE TEXT
|
|
;;1599,"VAL")
|
|
;;O
|
|
;;1649,"KEY")
|
|
;;ORWT TOOLS MENU^1
|
|
;;1649,"VAL")
|
|
;;&Calculator=Calc.exe
|
|
;;1650,"KEY")
|
|
;;ORWT TOOLS MENU^2
|
|
;;1650,"VAL")
|
|
;;&Time=Clock.exe
|
|
;;1651,"KEY")
|
|
;;ORWT TOOLS MENU^3
|
|
;;1651,"VAL")
|
|
;;&Windows Introduction=WinHlp32 Windows.hlp
|
|
;;1773,"KEY")
|
|
;;ORCH CONTEXT NOTES^1
|
|
;;1773,"VAL")
|
|
;;;;1;;100
|
|
;;1774,"KEY")
|
|
;;ORCH CONTEXT SUMMRIES^1
|
|
;;1774,"VAL")
|
|
;;;;1;
|
|
;;1775,"KEY")
|
|
;;ORCH CONTEXT PROBLEMS^1
|
|
;;1775,"VAL")
|
|
;;;;A;1
|
|
;;1776,"KEY")
|
|
;;ORCH CONTEXT ORDERS^1
|
|
;;1776,"VAL")
|
|
;;;;2;ALL;L
|
|
;;1777,"KEY")
|
|
;;ORCH CONTEXT INPT MEDS^1
|
|
;;1777,"VAL")
|
|
;;;;1
|
|
;;1778,"KEY")
|
|
;;ORCH CONTEXT XRAYS^1
|
|
;;1778,"VAL")
|
|
;;T-1826;T;;;10
|
|
;;1779,"KEY")
|
|
;;ORCH CONTEXT OUTPT LABS^1
|
|
;;1779,"VAL")
|
|
;;T-180;NOW;C
|
|
;;1780,"KEY")
|
|
;;ORCH CONTEXT INPT LABS^1
|
|
;;1780,"VAL")
|
|
;;T-7;NOW;C
|
|
;;1781,"KEY")
|
|
;;ORCH CONTEXT CONSULTS^1
|
|
;;1781,"VAL")
|
|
;;;;;
|
|
;;1782,"KEY")
|
|
;;ORCH CONTEXT REPORTS^1
|
|
;;1782,"VAL")
|
|
;;T-1826;T;;;10
|
|
;;1790,"KEY")
|
|
;;OR SIGNED ON CHART^1
|
|
;;1790,"VAL")
|
|
;;NO
|
|
;;1817,"KEY")
|
|
;;ORB ARCHIVE PERIOD^ABNORMAL LAB RESULT (INFO)
|
|
;;1817,"VAL")
|
|
;;30
|
|
;;1818,"KEY")
|
|
;;ORB ARCHIVE PERIOD^CRITICAL LAB RESULTS (ACTION)
|
|
;;1818,"VAL")
|
|
;;30
|
|
;;1819,"KEY")
|
|
;;ORB DELETE MECHANISM^CRITICAL LAB RESULTS (ACTION)
|
|
;;1819,"VAL")
|
|
;;Individual Recipient
|
|
;;1820,"KEY")
|
|
;;ORB DELETE MECHANISM^ABNORMAL LAB RESULT (INFO)
|
|
;;1820,"VAL")
|
|
;;Individual Recipient
|
|
;;1821,"KEY")
|
|
;;ORB FORWARD SUPERVISOR^ABNORMAL LAB RESULT (INFO)
|
|
;;1821,"VAL")
|
|
;;0
|
|
;;1822,"KEY")
|
|
;;ORB FORWARD SUPERVISOR^CRITICAL LAB RESULTS (ACTION)
|
|
;;1822,"VAL")
|
|
;;0
|
|
;;1823,"KEY")
|
|
;;ORB FORWARD SURROGATES^CRITICAL LAB RESULTS (ACTION)
|
|
;;1823,"VAL")
|
|
;;0
|
|
;;1824,"KEY")
|
|
;;ORB FORWARD SURROGATES^ABNORMAL LAB RESULT (INFO)
|
|
;;1824,"VAL")
|
|
;;0
|
|
;;1825,"KEY")
|
|
;;ORB PROCESSING FLAG^ABNORMAL LAB RESULT (INFO)
|
|
;;1825,"VAL")
|
|
;;Disabled
|
|
;;1826,"KEY")
|
|
;;ORB PROCESSING FLAG^CRITICAL LAB RESULTS (ACTION)
|
|
;;1826,"VAL")
|
|
;;Disabled
|
|
;;1827,"KEY")
|
|
;;ORB PROVIDER RECIPIENTS^CRITICAL LAB RESULTS (ACTION)
|
|
;;1827,"VAL")
|
|
;;OAPT
|
|
;;1828,"KEY")
|
|
;;ORB PROVIDER RECIPIENTS^ABNORMAL LAB RESULT (INFO)
|
|
;;1828,"VAL")
|
|
;;OAPT
|
|
;;1829,"KEY")
|
|
;;ORB URGENCY^ABNORMAL LAB RESULT (INFO)
|
|
;;1829,"VAL")
|
|
;;Moderate
|
|
;;1830,"KEY")
|
|
;;ORB URGENCY^CRITICAL LAB RESULTS (ACTION)
|
|
;;1830,"VAL")
|
|
;;High
|
|
;;1842,"KEY")
|
|
;;ORPF SETUP ACTION^1
|
|
;;1842,"VAL")
|
|
;;-1
|
|
;;1907,"KEY")
|
|
;;ORB PROVIDER RECIPIENTS^IMAGING REQUEST CANCEL/HELD
|
|
;;1907,"VAL")
|
|
;;O
|
|
;;1971,"KEY")
|
|
;;ORLP DEFAULT CLINIC START DATE^1
|
|
;;1971,"VAL")
|
|
;;T
|
|
;;1972,"KEY")
|
|
;;ORLP DEFAULT CLINIC STOP DATE^1
|
|
;;1972,"VAL")
|
|
;;T
|
|
;;1973,"KEY")
|
|
;;ORQQAP SEARCH RANGE START^1
|
|
;;1973,"VAL")
|
|
;;T
|
|
;;1974,"KEY")
|
|
;;ORQQAP SEARCH RANGE STOP^1
|
|
;;1974,"VAL")
|
|
;;T+90
|
|
;;1975,"KEY")
|
|
;;ORQQVS SEARCH RANGE START^1
|
|
;;1975,"VAL")
|
|
;;T-365
|
|
;;1976,"KEY")
|
|
;;ORQQVS SEARCH RANGE STOP^1
|
|
;;1976,"VAL")
|
|
;;T
|