| ITEMS |
-
- SEQUENCE: 1
- INDEX: S.NURS
- ASK ON CONDITION: I 0 ; uneditable
- SCREEN: I $$ACTIVE^ORDD43(Y)
- XECUTABLE HELP: N IDX,SCR S IDX=$G(ORDIALOG(PROMPT,"D")),SCR=$G(ORDIALOG(PROMPT,"S")) D XHELP^ORDD43(IDX,SCR)
- DEFAULT: S Y=$O(^ORD(101.43,"S.NURS","DRESSING CHANGE",0))
- ITEM: OR GTX ORDERABLE ITEM
- REQUIRED: YES
-
- SEQUENCE: 2
- HELP MESSAGE: Enter the dressing site.
- ITEM: OR GTSKIN WOUND SITE
- ORDER TEXT SEQUENCE: 2
- LEADING TEXT: for
- DISPLAY TEXT: Site:
- REQUIRED: YES
- ASK ON ACTION: C
-
- SEQUENCE: 3
- HELP MESSAGE: Enter how often this order should happen (i.e., Q4H)
- DEFAULT: S Y="TID"
- ITEM: OR GTX FREQUENCY
- DISPLAY TEXT: Frequency:
- ASK ON ACTION: C
-
- SEQUENCE: 4
- HELP MESSAGE: Enter any special instructions for this order, up to 240 characters.
- ITEM: OR GTX FREE TEXT 1
- DISPLAY TEXT: Add'l Info:
- ASK ON EDIT ONLY: YES
- ASK ON ACTION: C
-
- SEQUENCE: 5
- HELP MESSAGE: Enter any additional instructions for this order, up to 80 characters.
- ITEM: OR GTX FREE TEXT 2
- ASK ON EDIT ONLY: YES
- ASK ON ACTION: C
-
- SEQUENCE: 6
- HELP MESSAGE: Enter the date/time to begin this order.
- DEFAULT: S Y="NOW"
- ITEM: OR GTX START DATE/TIME
- REQUIRED: YES
- ASK ON EDIT ONLY: YES
- ASK ON ACTION: RCW
-
- SEQUENCE: 7
- HELP MESSAGE: Enter the date/time to end this order.
- POST-SELECTION ACTION: I $$FTDCOMP^ORCD("START DATE/TIME","STOP DATE/TIME",">") K DONE,ORDIALOG(PROMPT,ORI) W $C(7),!,"Cannot end before start date/time!",!
- ITEM: OR GTX STOP DATE/TIME
- ASK ON EDIT ONLY: YES
- ASK ON ACTION: RCW
|
