Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ORWOD

Package: Order Entry Results Reporting

Routine: ORWOD


Information

ORWOD ; SLC/GSS - Utility for Order Dialogs ; 7/24/09 9:55am

Source Information

Source file <ORWOD.m>

Entry Points

Name Comments DBIA/ICR reference
INSTALL ;Post-install entry point for OR*3*243
ATWILL ;Entry point for ORDER MENU MANAGEMENT menu - ORCM MGMT opt MR
MAIN ;Main calls for QO Reports
ANCSTR ;Determine QO usage - called by XSET and MM
XSET ;Set QO record for display
NTRY ;Compiling report
GETXT(LOOKIN,SUFFIX) ;Return text occuring prior to suffix
; e.g. LOOKIN="INFUSE OVER 30 MINUTES",SUFFIX=" MINUTES" returns '30'
MM ;Looks for 'MM' in Order Dialog / original code logic by James Hartin
MAILSU ;Set-up MAILMAN variables and format ^TMP("OR",$J,"MAIL")
SEND(XMSUB,USER) ;Send MailMan message to USER
; Text of message is located in ^TMP("OR",$J,"MAIL",LineNumbers0-n)
; Subject is the string XMSUB.
RETRY ;Get message number.
CLEANUP ; Clean-up

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This option generates two Quick Order (QO) reports to assist in the"
  • Line Location: ATWILL+1
Function Call: WRITE
  • Prompt: !,"evaluation of Med QOs that may need to be updated to accommodate the"
  • Line Location: ATWILL+2
Function Call: WRITE
  • Prompt: !,"three new fields exported in CPRS GUI v27: Route, IV Type and Schedule."
  • Line Location: ATWILL+3
Function Call: WRITE
  • Prompt: !,"One report lists Med QOs that are contained in another entry such as an"
  • Line Location: ATWILL+4
Function Call: WRITE
  • Prompt: !,"order menu, order set or reminder dialog. The other report lists Med QOs"
  • Line Location: ATWILL+5
Function Call: WRITE
  • Prompt: !,"that are stand alone and are not included in another entry. These reports"
  • Line Location: ATWILL+6
Function Call: WRITE
  • Prompt: !,"will be sent to you via Mailman.",!
  • Line Location: ATWILL+7
Function Call: WRITE
  • Prompt: " Enter Y or N",!
  • Line Location: ATWILL+9
Function Call: WRITE
  • Prompt: "...report not compiled"
  • Line Location: ATWILL+10
Function Call: WRITE
  • Prompt: !,"Compiling Med Quick Order check report..."
  • Line Location: ATWILL+11
Function Call: WRITE
  • Prompt: !,"...QO check report compiled and mailed to ",$P(^VA(200,DUZ,0),U)
  • Line Location: ATWILL+13
Function Call: WRITE
  • Prompt: !,"Error: No USER defined..message not sent!"
  • Line Location: RETRY+11
Info |  Source |  Entry Points |  Interaction Calls