- ORXPAR02 ; ; 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
- G ^ORXPAR03
- DATA ; parameter data
- ;;57,"VAL",2,0)
- ;;further details for any of the meds, click the name of the medication.
- ;;58,"KEY")
- ;;ORWUH WHATSTHIS^lstCNoK
- ;;58,"VAL")
- ;;-1
- ;;58,"VAL",1,0)
- ;;Next of Kin
- ;;58,"VAL",2,0)
- ;;
- ;;58,"VAL",3,0)
- ;;This lists the name and address of the next of kin.
- ;;59,"KEY")
- ;;ORWUH WHATSTHIS^lstCNotif
- ;;59,"VAL")
- ;;-1
- ;;59,"VAL",1,0)
- ;;Notifications
- ;;59,"VAL",2,0)
- ;;
- ;;59,"VAL",3,0)
- ;;A list of active notifications or alerts appears here. To view the
- ;;59,"VAL",4,0)
- ;;notification in detail, and potentially take action on it:
- ;;59,"VAL",5,0)
- ;;
- ;;59,"VAL",6,0)
- ;;1) Click on the notification to select it.
- ;;59,"VAL",7,0)
- ;;
- ;;59,"VAL",8,0)
- ;;2) Choose 'View | Details...' from the menu.
- ;;59,"VAL",9,0)
- ;;
- ;;59,"VAL",10,0)
- ;;The window that appears depends on the notification selected.
- ;;60,"KEY")
- ;;ORWUH WHATSTHIS^lstCPostings
- ;;60,"VAL")
- ;;-1
- ;;60,"VAL",1,0)
- ;;Postings
- ;;60,"VAL",2,0)
- ;;
- ;;60,"VAL",3,0)
- ;;A list of active crises/warning notes and directives appears here. To see
- ;;60,"VAL",4,0)
- ;;the full text of the note:
- ;;60,"VAL",5,0)
- ;;
- ;;60,"VAL",6,0)
- ;;1) Click on the note to select it.
- ;;60,"VAL",7,0)
- ;;
- ;;60,"VAL",8,0)
- ;;2) Choose 'View | Details...' from the menu.
- ;;60,"VAL",9,0)
- ;;
- ;;60,"VAL",10,0)
- ;;A window with the full text of the note will appear.
- ;;61,"KEY")
- ;;ORWUH WHATSTHIS^lstCProblems
- ;;61,"VAL")
- ;;-1
- ;;61,"VAL",1,0)
- ;;Problems
- ;;61,"VAL",2,0)
- ;;
- ;;61,"VAL",3,0)
- ;;A thumbnail view of the problem list is presented here. To view a
- ;;61,"VAL",4,0)
- ;;problem in greater detail:
- ;;61,"VAL",5,0)
- ;;
- ;;61,"VAL",6,0)
- ;;1) Click on the problem to select it.
- ;;61,"VAL",7,0)
- ;;
- ;;61,"VAL",8,0)
- ;;2) Choose 'View | Details...' from the menu.
- ;;61,"VAL",9,0)
- ;;
- ;;61,"VAL",10,0)
- ;;A window containing detailed information about the selected problem will
- ;;61,"VAL",11,0)
- ;;appear.
- ;;62,"KEY")
- ;;ORWUH WHATSTHIS^lstCVisits
- ;;62,"VAL")
- ;;-1
- ;;62,"VAL",1,0)
- ;;Visits
- ;;62,"VAL",2,0)
- ;;
- ;;62,"VAL",3,0)
- ;;A list of clinic visits and hospital admissions appears here. To see the
- ;;62,"VAL",4,0)
- ;;progress note from a clinic visit or discharge summary from an admission:
- ;;62,"VAL",5,0)
- ;;
- ;;62,"VAL",6,0)
- ;;1) Click on the visit to select it.
- ;;62,"VAL",7,0)
- ;;
- ;;62,"VAL",8,0)
- ;;2) Choose 'View | Details...' from the menu.
- ;;62,"VAL",9,0)
- ;;
- ;;62,"VAL",10,0)
- ;;A window with the note or summary will appear.
- ;;63,"KEY")
- ;;ORWUH WHATSTHIS^memCsltData
- ;;63,"VAL")
- ;;-1
- ;;63,"VAL",1,0)
- ;;Consult Report
- ;;63,"VAL",2,0)
- ;;
- ;;63,"VAL",3,0)
- ;;The text of a consult report is listed here.
- ;;64,"KEY")
- ;;ORWUH WHATSTHIS^memNotesData
- ;;64,"VAL")
- ;;-1
- ;;64,"VAL",1,0)
- ;;Progress Note
- ;;64,"VAL",2,0)
- ;;
- ;;64,"VAL",3,0)
- ;;Progress notes may be viewed and written here. When writing progress
- ;;64,"VAL",4,0)
- ;;notes, you may use the 'Action' menu to:
- ;;64,"VAL",5,0)
- ;;
- ;;64,"VAL",6,0)
- ;;1) Link the note to a problem.
- ;;64,"VAL",7,0)
- ;;
- ;;64,"VAL",8,0)
- ;;2) Place orders.
- ;;64,"VAL",9,0)
- ;;
- ;;64,"VAL",10,0)
- ;;3) View recent lab results to include into the note.
- ;;64,"VAL",11,0)
- ;;
- ;;64,"VAL",12,0)
- ;;The edit menu may be used to copy other places in the chart which many
- ;;64,"VAL",13,0)
- ;;then be pasted into a note.
- ;;65,"KEY")
- ;;ORWUH WHATSTHIS^memRadData
- ;;65,"VAL")
- ;;-1
- ;;65,"VAL",1,0)
- ;;Radiology Report
- ;;65,"VAL",2,0)
- ;;
- ;;65,"VAL",3,0)
- ;;The text of a radiology report is listed here.
- ;;66,"KEY")
- ;;ORWUH WHATSTHIS^memSpecData
- ;;66,"VAL")
- ;;-1
- ;;66,"VAL",1,0)
- ;;Specials Report
- ;;66,"VAL",2,0)
- ;;
- ;;66,"VAL",3,0)
- ;;The text of reports is displayed here.
- ;;67,"KEY")
- ;;ORWUH WHATSTHIS^memSummData
- ;;67,"VAL")
- ;;-1
- ;;67,"VAL",1,0)
- ;;Summary
- ;;67,"VAL",2,0)
- ;;
- ;;67,"VAL",3,0)
- ;;The text of the selected discharge summary appears here.
- ;;68,"KEY")
- ;;ORWUH WHATSTHIS^lstCsltList
- ;;68,"VAL")
- ;;-1
- ;;68,"VAL",1,0)
- ;;Consult List
- ;;68,"VAL",2,0)
- ;;
- ;;68,"VAL",3,0)
- ;;A list of pending and completed consults is listed here. To view a
- ;;68,"VAL",4,0)
- ;;consult, click on the title.
- ;;69,"KEY")
- ;;ORWUH WHATSTHIS^outMedsSheet
- ;;69,"VAL")
- ;;-1
- ;;69,"VAL",1,0)
- ;;Med Profile
- ;;69,"VAL",2,0)
- ;;
- ;;69,"VAL",3,0)
- ;;The selected item in this list determines what will be seen in the grid to
- ;;69,"VAL",4,0)
- ;;the right. You may toggle between inpatient and outpatient medication
- ;;69,"VAL",5,0)
- ;;profiles. 'Scratch Pad' is a place were new med orders may be composed.
- ;;69,"VAL",6,0)
- ;;They will not be placed, however, until they are moved to an inpatient or
- ;;69,"VAL",7,0)
- ;;outpatient sheet.
- ;;70,"KEY")
- ;;ORWUH WHATSTHIS^lstMedsWrite
- ;;70,"VAL")
- ;;-1
- ;;70,"VAL",1,0)
- ;;Write Prescriptions
- ;;70,"VAL",2,0)
- ;;
- ;;70,"VAL",3,0)
- ;;This list contains commonly prescribed medications or VA drug classes
- ;;70,"VAL",4,0)
- ;;(depending on your selected preference). To write a new medication order:
- ;;70,"VAL",5,0)
- ;;
- ;;70,"VAL",6,0)
- ;;1) Click on a medication or 'other'.
- ;;70,"VAL",7,0)
- ;;
- ;;70,"VAL",8,0)
- ;;2) Upon selecting an item from the list, a dialog will appear that will
- ;;70,"VAL",9,0)
- ;;allow you to enter instructions for the medication.
- ;;70,"VAL",10,0)
- ;;
- ;;70,"VAL",11,0)
- ;;When closing this dialog, the new medication will be placed on the current
- ;;70,"VAL",12,0)
- ;;medications grid.
- ;;71,"KEY")
- ;;ORWUH WHATSTHIS^lstNotesList
- ;;71,"VAL")
- ;;-1
- ;;71,"VAL",1,0)
- ;;Notes List
- ;;71,"VAL",2,0)
- ;;
- ;;71,"VAL",3,0)
- ;;Titles of existing progress notes are listed here. To view a progress
- ;;71,"VAL",4,0)
- ;;note, simply click on the title. To write a new progress note:
- ;;71,"VAL",5,0)
- ;;
- ;;71,"VAL",6,0)
- ;;1) Click on 'New Progress Note', at the very top of the list.
- ;;71,"VAL",7,0)
- ;;
- ;;71,"VAL",8,0)
- ;;2) When 'New Progress Note' is clicked, a list of boilerplates appears.
- ;;71,"VAL",9,0)
- ;;You may select a boilerplate or just begin typing.
- ;;71,"VAL",10,0)
- ;;
- ;;71,"VAL",11,0)
- ;;3) To sign the progress note, choose 'Action | Sign' from the menu.
- ;;71,"VAL",12,0)
- ;;
- ;;71,"VAL",13,0)
- ;;The set of notes listed may be changed by choosing items from the 'View'
- ;;71,"VAL",14,0)
- ;;menu.
- ;;72,"KEY")
- ;;ORWUH WHATSTHIS^outOrdersSheet
- ;;72,"VAL")
- ;;-1
- ;;72,"VAL",1,0)
- ;;Order Sheet
- ;;72,"VAL",2,0)
- ;;
- ;;72,"VAL",3,0)
- ;;A list of possible order's sheets appears here. You may choose from
- ;;72,"VAL",4,0)
- ;;current orders, admission orders (if the patient is currently an
- ORXPAR02 ; ; Dec 17, 1997@11:35:35
- +1 ;;3.0;ORDER ENTRY/RESULTS REPORTING;;Dec 17, 1997
- +2 ;;
- LOAD ; load data into ^TMP (expects ROOT to be defined)
- +1 SET I=1
- FOR
- SET REF=$TEXT(DATA+I)
- IF REF=""
- QUIT
- SET VAL=$TEXT(DATA+I+1)
- Begin DoDot:1
- +2 SET I=I+2
- SET REF=$PIECE(REF,";",3,999)
- SET VAL=$PIECE(VAL,";",3,999)
- +3 SET @(ROOT_REF)=VAL
- End DoDot:1
- +4 GOTO ^ORXPAR03
- DATA ; parameter data
- +1 ;;57,"VAL",2,0)
- +2 ;;further details for any of the meds, click the name of the medication.
- +3 ;;58,"KEY")
- +4 ;;ORWUH WHATSTHIS^lstCNoK
- +5 ;;58,"VAL")
- +6 ;;-1
- +7 ;;58,"VAL",1,0)
- +8 ;;Next of Kin
- +9 ;;58,"VAL",2,0)
- +10 ;;
- +11 ;;58,"VAL",3,0)
- +12 ;;This lists the name and address of the next of kin.
- +13 ;;59,"KEY")
- +14 ;;ORWUH WHATSTHIS^lstCNotif
- +15 ;;59,"VAL")
- +16 ;;-1
- +17 ;;59,"VAL",1,0)
- +18 ;;Notifications
- +19 ;;59,"VAL",2,0)
- +20 ;;
- +21 ;;59,"VAL",3,0)
- +22 ;;A list of active notifications or alerts appears here. To view the
- +23 ;;59,"VAL",4,0)
- +24 ;;notification in detail, and potentially take action on it:
- +25 ;;59,"VAL",5,0)
- +26 ;;
- +27 ;;59,"VAL",6,0)
- +28 ;;1) Click on the notification to select it.
- +29 ;;59,"VAL",7,0)
- +30 ;;
- +31 ;;59,"VAL",8,0)
- +32 ;;2) Choose 'View | Details...' from the menu.
- +33 ;;59,"VAL",9,0)
- +34 ;;
- +35 ;;59,"VAL",10,0)
- +36 ;;The window that appears depends on the notification selected.
- +37 ;;60,"KEY")
- +38 ;;ORWUH WHATSTHIS^lstCPostings
- +39 ;;60,"VAL")
- +40 ;;-1
- +41 ;;60,"VAL",1,0)
- +42 ;;Postings
- +43 ;;60,"VAL",2,0)
- +44 ;;
- +45 ;;60,"VAL",3,0)
- +46 ;;A list of active crises/warning notes and directives appears here. To see
- +47 ;;60,"VAL",4,0)
- +48 ;;the full text of the note:
- +49 ;;60,"VAL",5,0)
- +50 ;;
- +51 ;;60,"VAL",6,0)
- +52 ;;1) Click on the note to select it.
- +53 ;;60,"VAL",7,0)
- +54 ;;
- +55 ;;60,"VAL",8,0)
- +56 ;;2) Choose 'View | Details...' from the menu.
- +57 ;;60,"VAL",9,0)
- +58 ;;
- +59 ;;60,"VAL",10,0)
- +60 ;;A window with the full text of the note will appear.
- +61 ;;61,"KEY")
- +62 ;;ORWUH WHATSTHIS^lstCProblems
- +63 ;;61,"VAL")
- +64 ;;-1
- +65 ;;61,"VAL",1,0)
- +66 ;;Problems
- +67 ;;61,"VAL",2,0)
- +68 ;;
- +69 ;;61,"VAL",3,0)
- +70 ;;A thumbnail view of the problem list is presented here. To view a
- +71 ;;61,"VAL",4,0)
- +72 ;;problem in greater detail:
- +73 ;;61,"VAL",5,0)
- +74 ;;
- +75 ;;61,"VAL",6,0)
- +76 ;;1) Click on the problem to select it.
- +77 ;;61,"VAL",7,0)
- +78 ;;
- +79 ;;61,"VAL",8,0)
- +80 ;;2) Choose 'View | Details...' from the menu.
- +81 ;;61,"VAL",9,0)
- +82 ;;
- +83 ;;61,"VAL",10,0)
- +84 ;;A window containing detailed information about the selected problem will
- +85 ;;61,"VAL",11,0)
- +86 ;;appear.
- +87 ;;62,"KEY")
- +88 ;;ORWUH WHATSTHIS^lstCVisits
- +89 ;;62,"VAL")
- +90 ;;-1
- +91 ;;62,"VAL",1,0)
- +92 ;;Visits
- +93 ;;62,"VAL",2,0)
- +94 ;;
- +95 ;;62,"VAL",3,0)
- +96 ;;A list of clinic visits and hospital admissions appears here. To see the
- +97 ;;62,"VAL",4,0)
- +98 ;;progress note from a clinic visit or discharge summary from an admission:
- +99 ;;62,"VAL",5,0)
- +100 ;;
- +101 ;;62,"VAL",6,0)
- +102 ;;1) Click on the visit to select it.
- +103 ;;62,"VAL",7,0)
- +104 ;;
- +105 ;;62,"VAL",8,0)
- +106 ;;2) Choose 'View | Details...' from the menu.
- +107 ;;62,"VAL",9,0)
- +108 ;;
- +109 ;;62,"VAL",10,0)
- +110 ;;A window with the note or summary will appear.
- +111 ;;63,"KEY")
- +112 ;;ORWUH WHATSTHIS^memCsltData
- +113 ;;63,"VAL")
- +114 ;;-1
- +115 ;;63,"VAL",1,0)
- +116 ;;Consult Report
- +117 ;;63,"VAL",2,0)
- +118 ;;
- +119 ;;63,"VAL",3,0)
- +120 ;;The text of a consult report is listed here.
- +121 ;;64,"KEY")
- +122 ;;ORWUH WHATSTHIS^memNotesData
- +123 ;;64,"VAL")
- +124 ;;-1
- +125 ;;64,"VAL",1,0)
- +126 ;;Progress Note
- +127 ;;64,"VAL",2,0)
- +128 ;;
- +129 ;;64,"VAL",3,0)
- +130 ;;Progress notes may be viewed and written here. When writing progress
- +131 ;;64,"VAL",4,0)
- +132 ;;notes, you may use the 'Action' menu to:
- +133 ;;64,"VAL",5,0)
- +134 ;;
- +135 ;;64,"VAL",6,0)
- +136 ;;1) Link the note to a problem.
- +137 ;;64,"VAL",7,0)
- +138 ;;
- +139 ;;64,"VAL",8,0)
- +140 ;;2) Place orders.
- +141 ;;64,"VAL",9,0)
- +142 ;;
- +143 ;;64,"VAL",10,0)
- +144 ;;3) View recent lab results to include into the note.
- +145 ;;64,"VAL",11,0)
- +146 ;;
- +147 ;;64,"VAL",12,0)
- +148 ;;The edit menu may be used to copy other places in the chart which many
- +149 ;;64,"VAL",13,0)
- +150 ;;then be pasted into a note.
- +151 ;;65,"KEY")
- +152 ;;ORWUH WHATSTHIS^memRadData
- +153 ;;65,"VAL")
- +154 ;;-1
- +155 ;;65,"VAL",1,0)
- +156 ;;Radiology Report
- +157 ;;65,"VAL",2,0)
- +158 ;;
- +159 ;;65,"VAL",3,0)
- +160 ;;The text of a radiology report is listed here.
- +161 ;;66,"KEY")
- +162 ;;ORWUH WHATSTHIS^memSpecData
- +163 ;;66,"VAL")
- +164 ;;-1
- +165 ;;66,"VAL",1,0)
- +166 ;;Specials Report
- +167 ;;66,"VAL",2,0)
- +168 ;;
- +169 ;;66,"VAL",3,0)
- +170 ;;The text of reports is displayed here.
- +171 ;;67,"KEY")
- +172 ;;ORWUH WHATSTHIS^memSummData
- +173 ;;67,"VAL")
- +174 ;;-1
- +175 ;;67,"VAL",1,0)
- +176 ;;Summary
- +177 ;;67,"VAL",2,0)
- +178 ;;
- +179 ;;67,"VAL",3,0)
- +180 ;;The text of the selected discharge summary appears here.
- +181 ;;68,"KEY")
- +182 ;;ORWUH WHATSTHIS^lstCsltList
- +183 ;;68,"VAL")
- +184 ;;-1
- +185 ;;68,"VAL",1,0)
- +186 ;;Consult List
- +187 ;;68,"VAL",2,0)
- +188 ;;
- +189 ;;68,"VAL",3,0)
- +190 ;;A list of pending and completed consults is listed here. To view a
- +191 ;;68,"VAL",4,0)
- +192 ;;consult, click on the title.
- +193 ;;69,"KEY")
- +194 ;;ORWUH WHATSTHIS^outMedsSheet
- +195 ;;69,"VAL")
- +196 ;;-1
- +197 ;;69,"VAL",1,0)
- +198 ;;Med Profile
- +199 ;;69,"VAL",2,0)
- +200 ;;
- +201 ;;69,"VAL",3,0)
- +202 ;;The selected item in this list determines what will be seen in the grid to
- +203 ;;69,"VAL",4,0)
- +204 ;;the right. You may toggle between inpatient and outpatient medication
- +205 ;;69,"VAL",5,0)
- +206 ;;profiles. 'Scratch Pad' is a place were new med orders may be composed.
- +207 ;;69,"VAL",6,0)
- +208 ;;They will not be placed, however, until they are moved to an inpatient or
- +209 ;;69,"VAL",7,0)
- +210 ;;outpatient sheet.
- +211 ;;70,"KEY")
- +212 ;;ORWUH WHATSTHIS^lstMedsWrite
- +213 ;;70,"VAL")
- +214 ;;-1
- +215 ;;70,"VAL",1,0)
- +216 ;;Write Prescriptions
- +217 ;;70,"VAL",2,0)
- +218 ;;
- +219 ;;70,"VAL",3,0)
- +220 ;;This list contains commonly prescribed medications or VA drug classes
- +221 ;;70,"VAL",4,0)
- +222 ;;(depending on your selected preference). To write a new medication order:
- +223 ;;70,"VAL",5,0)
- +224 ;;
- +225 ;;70,"VAL",6,0)
- +226 ;;1) Click on a medication or 'other'.
- +227 ;;70,"VAL",7,0)
- +228 ;;
- +229 ;;70,"VAL",8,0)
- +230 ;;2) Upon selecting an item from the list, a dialog will appear that will
- +231 ;;70,"VAL",9,0)
- +232 ;;allow you to enter instructions for the medication.
- +233 ;;70,"VAL",10,0)
- +234 ;;
- +235 ;;70,"VAL",11,0)
- +236 ;;When closing this dialog, the new medication will be placed on the current
- +237 ;;70,"VAL",12,0)
- +238 ;;medications grid.
- +239 ;;71,"KEY")
- +240 ;;ORWUH WHATSTHIS^lstNotesList
- +241 ;;71,"VAL")
- +242 ;;-1
- +243 ;;71,"VAL",1,0)
- +244 ;;Notes List
- +245 ;;71,"VAL",2,0)
- +246 ;;
- +247 ;;71,"VAL",3,0)
- +248 ;;Titles of existing progress notes are listed here. To view a progress
- +249 ;;71,"VAL",4,0)
- +250 ;;note, simply click on the title. To write a new progress note:
- +251 ;;71,"VAL",5,0)
- +252 ;;
- +253 ;;71,"VAL",6,0)
- +254 ;;1) Click on 'New Progress Note', at the very top of the list.
- +255 ;;71,"VAL",7,0)
- +256 ;;
- +257 ;;71,"VAL",8,0)
- +258 ;;2) When 'New Progress Note' is clicked, a list of boilerplates appears.
- +259 ;;71,"VAL",9,0)
- +260 ;;You may select a boilerplate or just begin typing.
- +261 ;;71,"VAL",10,0)
- +262 ;;
- +263 ;;71,"VAL",11,0)
- +264 ;;3) To sign the progress note, choose 'Action | Sign' from the menu.
- +265 ;;71,"VAL",12,0)
- +266 ;;
- +267 ;;71,"VAL",13,0)
- +268 ;;The set of notes listed may be changed by choosing items from the 'View'
- +269 ;;71,"VAL",14,0)
- +270 ;;menu.
- +271 ;;72,"KEY")
- +272 ;;ORWUH WHATSTHIS^outOrdersSheet
- +273 ;;72,"VAL")
- +274 ;;-1
- +275 ;;72,"VAL",1,0)
- +276 ;;Order Sheet
- +277 ;;72,"VAL",2,0)
- +278 ;;
- +279 ;;72,"VAL",3,0)
- +280 ;;A list of possible order's sheets appears here. You may choose from
- +281 ;;72,"VAL",4,0)
- +282 ;;current orders, admission orders (if the patient is currently an