source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/ORXPAR09.m@ 1154

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