Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ORWUPX01

ORWUPX01.m

Go to the documentation of this file.
  1. ORWUPX01 ; ; Aug 21, 2000@13:26:02
  1. ;;3.0;ORDER ENTRY/RESULTS REPORTING;**10**;Dec 17, 1997
  1. LOAD ; load data into ^TMP (expects ROOT to be defined)
  1. S I=1 F S REF=$T(DATA+I) Q:REF="" S VAL=$T(DATA+I+1) D
  1. . S I=I+2,REF=$P(REF,";",3,999),VAL=$P(VAL,";",3,999)
  1. . S @(ROOT_REF)=VAL
  1. Q
  1. DATA ; parameter data
  1. ;;273,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^10
  1. ;;273,"VAL")
  1. ;;M.A.S.
  1. ;;274,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^30
  1. ;;274,"VAL")
  1. ;;VITALS/MEASUREMENTS
  1. ;;275,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^40
  1. ;;275,"VAL")
  1. ;;NURSING
  1. ;;276,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^50
  1. ;;276,"VAL")
  1. ;;DIETETICS
  1. ;;277,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^60
  1. ;;277,"VAL")
  1. ;;IV MEDICATIONS
  1. ;;278,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^70
  1. ;;278,"VAL")
  1. ;;INPATIENT MEDICATIONS
  1. ;;279,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^80
  1. ;;279,"VAL")
  1. ;;IMAGING
  1. ;;280,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^90
  1. ;;280,"VAL")
  1. ;;CONSULTS
  1. ;;281,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^100
  1. ;;281,"VAL")
  1. ;;PROCEDURES
  1. ;;282,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^110
  1. ;;282,"VAL")
  1. ;;SURGERY
  1. ;;283,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^120
  1. ;;283,"VAL")
  1. ;;OTHER HOSPITAL SERVICES
  1. ;;284,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^35
  1. ;;284,"VAL")
  1. ;;ACTIVITY
  1. ;;285,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^75
  1. ;;285,"VAL")
  1. ;;LABORATORY
  1. ;;380,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^20
  1. ;;380,"VAL")
  1. ;;ALLERGIES
  1. ;;630,"KEY")
  1. ;;ORWT TOOLS MENU^2
  1. ;;630,"VAL")
  1. ;;&Calculator=Calc.exe
  1. ;;631,"KEY")
  1. ;;ORWT TOOLS MENU^1
  1. ;;631,"VAL")
  1. ;;&Time=Clock.exe
  1. ;;632,"KEY")
  1. ;;ORWT TOOLS MENU^3
  1. ;;632,"VAL")
  1. ;;&Windows Introduction=WinHlp32 Windows.hlp
  1. ;;1216,"KEY")
  1. ;;ORWOR CATEGORY SEQUENCE^65
  1. ;;1216,"VAL")
  1. ;;OUTPATIENT MEDICATIONS
  1. ;;1217,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^CWAD (Postings)
  1. ;;1217,"VAL")
  1. ;;NO
  1. ;;1218,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Encounters
  1. ;;1218,"VAL")
  1. ;;YES
  1. ;;1219,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Lab Results
  1. ;;1219,"VAL")
  1. ;;YES
  1. ;;1220,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Medications
  1. ;;1220,"VAL")
  1. ;;NO
  1. ;;1221,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Problem List
  1. ;;1221,"VAL")
  1. ;;NO
  1. ;;1222,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Reminders
  1. ;;1222,"VAL")
  1. ;;YES
  1. ;;1223,"KEY")
  1. ;;ORWOR COVER RETRIEVAL^Vitals
  1. ;;1223,"VAL")
  1. ;;NO
  1. ;;1224,"KEY")
  1. ;;ORWOR DISABLE ORDERING^1
  1. ;;1224,"VAL")
  1. ;;NO
  1. ;;2750,"KEY")
  1. ;;ORWDQ DO^10
  1. ;;2750,"VAL")
  1. ;;FHWN1
  1. ;;2751,"KEY")
  1. ;;ORWDQ DO^20
  1. ;;2751,"VAL")
  1. ;;FHWN2
  1. ;;2862,"KEY")
  1. ;;ORWOR TIMEOUT COUNTDOWN^1
  1. ;;2862,"VAL")
  1. ;;20
  1. ;;3022,"KEY")
  1. ;;ORWDX NEW MED^Inpatient
  1. ;;3022,"VAL")
  1. ;;PSJ OR PAT OE
  1. ;;3023,"KEY")
  1. ;;ORWDX NEW MED^Outpatient
  1. ;;3023,"VAL")
  1. ;;PSO OERR
  1. ;;3151,"KEY")
  1. ;;ORWDXM ORDER MENU STYLE^1
  1. ;;3151,"VAL")
  1. ;;Mnemonics Included
  1. ;;3470,"KEY")
  1. ;;ORWDX NEW PROCEDURE^1
  1. ;;3470,"VAL")
  1. ;;GMRCOR REQUEST
  1. ;;3471,"KEY")
  1. ;;ORWDX NEW CONSULT^1
  1. ;;3471,"VAL")
  1. ;;GMRCOR CONSULT
  1. ;;3472,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^52
  1. ;;3472,"VAL")
  1. ;;PSJ OR PAT OE
  1. ;;3473,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^99
  1. ;;3473,"VAL")
  1. ;;OR GXTEXT WORD PROCESSING ORDER
  1. ;;3474,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^80
  1. ;;3474,"VAL")
  1. ;;GMRCOR CONSULT
  1. ;;3475,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^85
  1. ;;3475,"VAL")
  1. ;;GMRCOR REQUEST
  1. ;;3476,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^55
  1. ;;3476,"VAL")
  1. ;;PSO OERR
  1. ;;3477,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^60
  1. ;;3477,"VAL")
  1. ;;LR OTHER LAB TESTS
  1. ;;3478,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^70
  1. ;;3478,"VAL")
  1. ;;RA OERR EXAM
  1. ;;3479,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^58
  1. ;;3479,"VAL")
  1. ;;PSJI OR PAT FLUID OE
  1. ;;3480,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^90
  1. ;;3480,"VAL")
  1. ;;GMRVOR
  1. ;;3481,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^30
  1. ;;3481,"VAL")
  1. ;;FHW1
  1. ;;3482,"KEY")
  1. ;;ORWOR WRITE ORDERS LIST^20
  1. ;;3482,"VAL")
  1. ;;GMRAOR ALLERGY ENTER/EDIT
  1. ;;3537,"KEY")
  1. ;;ORWRP CIRN REMOTE DATA ALLOW^1
  1. ;;3537,"VAL")
  1. ;;NO
  1. ;;3538,"KEY")
  1. ;;ORWOR BROADCAST MESSAGES^1
  1. ;;3538,"VAL")
  1. ;;YES
  1. ;;3539,"KEY")
  1. ;;ORWOR AUTO CLOSE PT MSG^1
  1. ;;3539,"VAL")
  1. ;;5
  1. ;;3551,"KEY")
  1. ;;ORWDP WINPRINT DEFAULT^1
  1. ;;3551,"VAL")
  1. ;;NO
  1. ;;3552,"KEY")
  1. ;;ORWOR AUTOSAVE NOTE^1
  1. ;;3552,"VAL")
  1. ;;180
  1. ;;3553,"KEY")
  1. ;;ORWOR DISABLE HOLD ORDERS^1
  1. ;;3553,"VAL")
  1. ;;NO
  1. ;;3554,"KEY")
  1. ;;ORWT TOOLS MENU^4
  1. ;;3554,"VAL")
  1. ;;&Notepad=Notepad.exe
  1. ;;3594,"KEY")
  1. ;;ORWOR VERIFY NOTE TITLE^1
  1. ;;3594,"VAL")
  1. ;;YES