Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORS100

Package: Order Entry Results Reporting

Routine: ORS100


Information

ORS100 ; SLC/RAF-unsigned orders search ;10/19/00 14:02

Source Information

Source file <ORS100.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 5 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$REPEAT^XLFSTR  
Order Entry Results Reporting 1 LOOP^ORS100A  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Order Entry Results Reporting 5 OR UNSIGNED ORDERS  ORS100A  ORS100B  ORSNAST1  ORSNAST2  

Entry Points

Name Comments DBIA/ICR reference
EN ;
TYPE ;sets DIR call to ask the user to select the type of order status
SORT ;sets DIR call to ask for the sorting criteria
SINGLE ;sets DIR call to ask the user if they want to sort for a single
LONER ;sets DIR call to allow the user to select the specific sort entity
SDATE ;sets DIR call to ask the user for a starting date
EDATE ;sets DIR call to ask the user for an ending date (optional)
SWITCH ;takes the date input from the user and does a switcheroo so the program
SUMONLY ;ask if summary only or full detail
TASK ;
STATS ;SERVICE/SECTION statistics
PV ;PROVIDER statistics
PT ;PATIENT statistics
L ;LOCATION statistics
EB ;ENTERED BY statistics
D ;DIVISION statistics
EXIT
LOC(LOC) ;resolves the location pointer
USER(USER) ;resolves user pointers
STAT(STA) ;resolves pointer to the order status file
SER(SER) ;resolves pointer to the service/section file
DIV(LOC) ;determines the division based on the entry in file 44
HDR ;Print header

External References

Name Field # of Occurrence
^%ZIS TASK+1
^%ZISC EXIT+1
^%ZTLOAD TASK+7
^DIR TYPE+4, SORT+4, SINGLE+6, LONER+7, SDATE+4, EDATE+4, SUMONLY+2, HDR+2
LOOP^ORS100A TASK+8
$$FMTE^XLFDT SDATE+4, EDATE+4
$$REPEAT^XLFSTR HDR+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?30,"Unsigned Orders Search",!?15,"This report is formatted for a 132 column output.",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,?32,"REQUEST QUEUED"
  • Line Location: TASK+7
Function Call: WRITE
  • Prompt: !,"There are no statistics for the selected sort range."
  • Line Location: STATS+2
Function Call: WRITE
  • Prompt: !?41,"Subtotal",?51,LCNT
  • Line Location: D+8
Function Call: WRITE
  • Prompt: !?5,"Total orders for Division: ",DIV_" = "_DCNT
  • Line Location: D+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: @RPDT
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: @HDR
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: @HDR1
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",IOM),!
  • Line Location: HDR+7
Routine Call
  • %ZIS
  • Line Location:
    • TASK+1
Routine Call
  • DIR
  • Line Location:
    • TYPE+4
    • SORT+4
    • SINGLE+6
    • LONER+7
    • SDATE+4
    • EDATE+4
    • SUMONLY+2
    • HDR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] DIV+3
^DIC(49 - [#49] SER+2
^ORD(100.01 - [#100.01] STAT+2
^SC - [#44] LOC+2, DIV+2
^TMP("ORSTATS" EN+5!, STATS+2, STATS+3, STATS+7, STATS+8, PV+1, PV+5, PV+6, PT+1, PT+5
, PT+6, L+1, L+5, L+6, EB+1, EB+5, EB+6, D+1, D+3, D+4
, D+6, EXIT!
^TMP("ORUNS" EN+5!, EXIT!
^VA(200 - [#200] USER+2

Label References

Name Line Occurrences
EXIT TYPE+4, SORT+4, SINGLE+6, LONER+2, SDATE+4, EDATE+4
HDR STATS+2, STATS+6, STATS+10, PV+4, PV+8, PT+4, PT+8, L+4, L+8, EB+4
, EB+8, D+5, D+7

Naked Globals

Name Field # of Occurrence
^( STATS+9, PV+7, PT+7, L+7, EB+7, D+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS TASK+1*
CNT EN+1~
DASH EN+1~
DATE EN+1~
DCNT EN+1~, D+3*, D+8*, D+9
DFN EN+1~
DIR EN+1~, TYPE+4!, SORT+4!, SINGLE+6!, LONER+7!, SDATE+4!, EDATE+4!, SUMONLY+2!, HDR+2!
DIR("?" TYPE+3*, SORT+3*, SINGLE+5*, LONER+6*, SDATE+3*, EDATE+3*, SUMONLY+1*
DIR("A" TYPE+2*, SORT+2*, SINGLE+3*, LONER+5*, SDATE+2*, EDATE+2*, SUMONLY+1*
DIR("B" SINGLE+4*, SUMONLY+1*
DIR(0 TYPE+1*, SORT+1*, SINGLE+2*, LONER+4*, SDATE+1*, EDATE+1*, SUMONLY+1*, HDR+2*
DIRUT EN+1~
DIV EN+1~, D+3*, D+4, D+6, D+9
DTOUT EN+1~, TYPE+4, SORT+4, SINGLE+6, LONER+7, SDATE+4, EDATE+4
DUOUT EN+1~, TYPE+4, SORT+4, SINGLE+6, LONER+7, SDATE+4, EDATE+4
EDATE EN+1~, EDATE+4*, SWITCH+2*
EDT EN+1~, EDATE+4*
HDR EN+2~, STATS+4*, PV+2*, PT+2*, L+2*, EB+2*, D+2*, HDR+5
HDR1 EN+2~, STATS+5*, PV+3*, PT+3*, L+3*, EB+3*, D+5*, HDR+6
IEN EN+2~
IO TASK+8
IO("Q" TASK+2!
IOF EN+6, HDR+3
IOM HDR+7
ION TASK+3
>> IOS EB+8
IOSL STATS+10, PV+8, PT+8, L+8, D+7
IOST HDR+2, HDR+3
LCNT EN+2~, D+4*, D+7*, D+8
LOC EN+2~, L+5*, L+6, L+7, D+4*, D+6, LOC~, LOC+2, DIV~, DIV+2
LONER EN+2~, LONER+2
LONER( LONER+7*
LONUM EN+2~
PAGE EN+2~, STATS+1*, HDR+2, HDR+3, HDR+8*
PAT EN+2~
PNM EN+2~, PV+6*, PV+7, PT+5*, PT+6, PT+7, EB+6*, EB+7
>> POP TASK+1
PROV EN+2~, STATS+8*, STATS+9, PV+5*, PV+6, PV+7, PT+6*, PT+7, L+6*, L+7
, D+6*, D+7
QUIT EN+2~, LONER+2, LONER+3, LONER+7*
RPDT EN+2~, HDR+4
SD1 EN+3~, SDATE+4*, SWITCH+2
SD2 EN+3~, EDATE+4*, SWITCH+2
SDATE EN+3~, SDATE+4*, SWITCH+2*
SDT EN+3~, SDATE+4*
SER EN+3~, STATS+7*, STATS+8, STATS+9, SER~, SER+2
SINGLE EN+3~, SINGLE+6*, LONER+2
SORT EN+3~, SORT+4*, SINGLE+3, LONER+4, LONER+5, STATS+3, PV+1, PT+1, L+1, EB+1
, D+1
SSN EN+3~
STA STAT~, STAT+2
STATUS EN+3~
STOP EN+3~, STATS+2, STATS+7, STATS+8, STATS+10, STATS+11, STATS+12, PV+5, PV+6, PV+8
, PV+9, PV+10, PT+5, PT+6, PT+8, PT+9, PT+10, L+5, L+6, L+8
, L+9, L+10, EB+5, EB+6, EB+8, EB+9, EB+10, D+3, D+4, D+5
, D+6, D+7, D+8, D+9, HDR+2*
SUB EN+3~
SUMONLY EN+3~, SUMONLY+2*, STATS+1*, HDR+1
TOT EN+3~, STATS+6*, STATS+10*, STATS+12, PV+4*, PV+8*, PV+10, PT+4*, PT+8*, PT+10
, L+4*, L+8*, L+10, EB+4*, EB+8*, EB+10
TOT0 EN+3~, STATS+7*, STATS+9*, STATS+11, PV+5*, PV+8*, PV+9, PT+5*, PT+7*, PT+9
, L+5*, L+7*, L+9, EB+5*, EB+7*, EB+9
TOT1 EN+3~, STATS+9*, STATS+10, PV+7*, PV+8, PT+7*, PT+8, L+7*, L+8, EB+7*
, EB+8
TYPE EN+4~, TYPE+4*
U EN+5*, LONER+7, LOC+2, USER+2, STAT+2, SER+2, DIV+2, DIV+3
USER USER~, USER+2
VA EN+4~
VADM EN+4~
VAERR EN+4~
WHEN EN+4~
WHO EN+4~, EB+5*, EB+6, EB+7
X LOC+1~, LOC+2*, LOC+3, USER+1~, USER+2*, USER+3, STAT+1~, STAT+2*, STAT+3, SER+1~
, SER+2*, SER+3, DIV+1~, DIV+2*, DIV+3*, DIV+4
Y EN+4~, TYPE+4, SORT+4, SINGLE+6, LONER+3, LONER+7, SDATE+4, EDATE+4, SUMONLY+2, HDR+2
>> ZTDESC TASK+3*
>> ZTIO TASK+3*
>> ZTRTN TASK+4*
>> ZTSAVE("EDATE" TASK+5*
>> ZTSAVE("EDT" TASK+6*
>> ZTSAVE("LONER*" TASK+6*
>> ZTSAVE("SDATE" TASK+5*
>> ZTSAVE("SDT" TASK+6*
>> ZTSAVE("SINGLE" TASK+5*
>> ZTSAVE("SORT" TASK+4*
>> ZTSAVE("SUMONLY" TASK+6*
>> ZTSAVE("TYPE" TASK+4*
>> ZTSK TASK+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All