OR GXACTV OTHER ACTIVITY ORDER (60)    ORDER DIALOG (101.41)

• SEQUENCE:   1
  INDEX:   S.ACT
  ASK ON CONDITION:   I 0 ; uneditable
  SCREEN:   I $$ACTIVE^ORDD43(Y)
  DEFAULT:   S Y=$O(^ORD(101.43,"S.ACT","ACTIVITY",0))
  ITEM:   OR GTX ORDERABLE ITEM
  DISPLAY TEXT:   Order:
  REQUIRED:   YES
  ASK ON ACTION:   C
• SEQUENCE:   2
  HELP MESSAGE:   Enter any special instructions for this order, up to 240 characters.
  ITEM:   OR GTX FREE TEXT 1
  DISPLAY TEXT:   Instructions:
  ASK ON ACTION:   C
• SEQUENCE:   3
  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:   4
  HELP MESSAGE:   Enter the date/time to end this order.
  POST-SELECTION ACTION:   I $$FTDCOMP^ORCD("START DATE/TIME","STOP DATE/TIME",">") K DONE W $C(7),!,"Cannot end before start date/time!",!
  ITEM:   OR GTX STOP DATE/TIME
  ASK ON EDIT ONLY:   YES
  ASK ON ACTION:   RCW

This allows free text entry of an activity order.