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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ORAERPT

Package: Order Entry Results Reporting

Routine: ORAERPT


Information

ORAERPT ; SPFO/AJB - Alert Enhancements Reports ;Dec 18, 2019@08:09:39

Source Information

Source file <ORAERPT.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; main entry point
EN1 ; entry point for re-entering a date range
SETUP ; create entries in PROTOCOL file
; adds menus and actions based on data for filter selection
GIEN(NAME) ; get an IEN from #101
SUMMARY(MDIV) ;
DPSUMM(TXT,DIV) ; setup summary data to display
TOP10(MDIV) ;
CRTOP10 ; create the default top 10 list, highest values by type are default selections for the filtered search
DPTOP10(TXT,DIV) ; setup the top 10 list to display
ASKRNG ; ask user for the date range
CLEAN ; S DATA=$NA(^TMP($J,"ORAERPT",$H)),TMP=$NA(^TMP($J,"ORAETMP",$H))
ASK(Y,PARAM,DEFAULT,MENU,PROMPT,HELP) ;
DISPLAY(OUTPUT) ;
HDR1 ;
HDR2 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOCUON
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: @IOF,!,"Gathering notification data..."
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: IOCUON
  • Line Location: EN1+42
Function Call: WRITE
  • Prompt: !!,"No results found. Please enter another date range.",!
  • Line Location: EN1+44
Function Call: WRITE
  • Prompt: !!," Elapsed Time:",?(38+$L(TOTNTF)-$S(+TIME("Elapsed"):$L(+TIME("Elapsed")),1:2)),TIME("Elapsed")
  • Line Location: EN1+49
Function Call: WRITE
  • Prompt: !," Length of Date Range: ",?(38+$L(TOTNTF)-$L(+DIFF)),DIFF
  • Line Location: EN1+50
Function Call: WRITE
  • Prompt: !," Notifications Searched: ",TOTNTF
  • Line Location: EN1+51
Function Call: WRITE
  • Prompt: !," Notifications Searched/Second: ",?(38+$L(TOTNTF)-$L($FN(TOTNTF/TIME("Total"),"",0))),$FN(TOTNTF/TIME("Total"),"",0)
  • Line Location: EN1+52
Function Call: WRITE
  • Prompt: !," OE/RR & TIU Notifications Found: ",?(38+$L(TOTNTF)-$L(@TMP@(1,"TOTAL"))),@TMP@(1,"TOTAL")
  • Line Location: EN1+53
Function Call: WRITE
  • Prompt: !," Average Notifications/Day: ",?(38+$L(TOTNTF)-$L(AVG("ORTIU"))),AVG("ORTIU"),!
  • Line Location: EN1+55
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY+12
Function Call: WRITE
  • Prompt: !
  • Line Location: TOP10+2
Function Call: WRITE
  • Prompt: !
  • Line Location: TOP10+19
Function Call: WRITE
  • Prompt: "Enter the desired date range for the notification search.",!!
  • Line Location: ASKRNG+1
Function Call: WRITE
  • Prompt: "Search times typically vary from 30-90 seconds for each day searched.",!
  • Line Location: ASKRNG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKRNG+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKRNG+8
Function Call: WRITE
  • Prompt: OUTPUT(Y),!
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+6
Function Call: READ
  • Formatting: !
  • Prompt: "Press <ENTER> to continue or '^' to exit "
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: HDR(X),!
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: IOUOFF
  • Line Location: HDR2+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call