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: ORPRS01

Package: Order Entry Results Reporting

Routine: ORPRS01


Information

ORPRS01 ; slc/dcm - Hot'n Summary Report utilities ;6/10/97 15:37

Source Information

Source file <ORPRS01.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Order Entry Results Reporting 5 $$SHORT^ORPRS02  (PRES,SERV)^ORPRS09  $$DATE^ORU  PATIENT^ORU1  READ^ORUTL  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  
VA Fileman 2 ^%DT  ^DIR  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Order Entry Results Reporting 11 ORCXPND3  ORCXPNDR  OREOR0  ORPRS03  ORPRS04  ORPRS07  ORPRS09  ORPRS10  
ORPRS11  ORPRS12  ORPRS13  

Entry Points

Name Comments DBIA/ICR reference
DISP ;
BILD ;
RANGE(X1,X2) ; Get a date range for printing
EN(ORDG,ORSEL) ;Setup/Display groups
TERM(IOST) ;Setup terminal display values
STOP ; Call DIR at bottom of screen
POP ;
CUSTOM ; Selects order status and display group
HACT1 ;
P ; Get Patient(s)
R ;
DAY(DAY) ; Get a date for 24 hr printing
E ; Get Ending Date/time
HSTS(X) ;Help for status descriptions (ORRP STATUS MENU protocol)
PROC ;
D1 ;

External References

Name Field # of Occurrence
^%DT D1+7, R+8, E+8
^DIR STOP+6
$$SHORT^ORPRS02 P+3
PRES^ORPRS09 CUSTOM+5
SERV^ORPRS09 CUSTOM+7
$$DATE^ORU D1+2, R+2, E+2
PATIENT^ORU1 P+4
READ^ORUTL HACT1+3, DISP+1
$$FMTE^XLFDT D1+10, E+13, E+14
DISP^XQORM1 HSTS+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Order Entry Date: "_$S(+ORSDFLT>0:$$DATE^ORU(ORSDFLT,"AMTH DD, CCYY"),1:"T")_"// "
  • Line Location: D1+2
Function Call: WRITE
  • Prompt: $C(7),?40,"Invalid Date."
  • Line Location: D1+9
Function Call: WRITE
  • Prompt: !!,"Start Date [Time]: "_$S(ORSDFLT>0:$$DATE^ORU(ORSDFLT,"AMTH DD, CCYY"),1:ORSDFLT)_"// "
  • Line Location: R+2
Function Call: WRITE
  • Prompt: ?55,"Invalid Start Date/time."
  • Line Location: R+10
Function Call: WRITE
  • Prompt: !!,"Ending Date [Time] (inclusive): "_$S(+ORSDFLT>0:$$DATE^ORU(ORSDFLT,"AMTH DD, CCYY HR:MIN"),1:ORSDFLT)_"// "
  • Line Location: E+2
Function Call: WRITE
  • Prompt: ?57,"Invalid End Date/time."
  • Line Location: E+10
Function Call: WRITE
  • Prompt: !,"Valid selections are: "
  • Line Location: HSTS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HSTS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HSTS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HSTS+4
Function Call: WRITE
  • Prompt: " - "_^(0)
  • Line Location: HACT1+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,?((ORSTK*2)),$P(W,"^")
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: STOP+3
Routine Call
  • DIR
  • Line Location:
    • STOP+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] TERM+5
^ORD(100.98 - [#100.98] EN+10, PROC+1, DISP+2
^ORD(101 - [#101] HACT1+2, HACT1+3
^TMP("ORRX" HACT1+1!, HACT1+2*, HACT1+3, HACT1+4!
^XUTL("OR" P+2!

Label References

Name Line Occurrences
@( EN+8, EN+10, PROC+2
D1 D1+8, D1+9
E E+9, E+10
HACT1 HSTS+2
R R+9, R+10

Naked Globals

Name Field # of Occurrence
^( HACT1+3, TERM+5
^("ORLP" P+2!
^("ORV" P+2!
^("ORW" P+2!
^(0 HACT1+2, HACT1+3
^(5 TERM+5
^(7 TERM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DAY+6~, CUSTOM+1~
%DT DAY+6~, D1+6*, RANGE+3~, R+7*, E+7*
%H DAY+6~
%I DAY+6~
%T DAY+6~, RANGE+3~
%X P+1~
%Y P+1~, CUSTOM+1~
C P+1~, CUSTOM+1~
DAY DAY~, D1+1, D1+8!, D1+9!
DFN P+1~
DIC P+1~, CUSTOM+1~
DIR STOP+1~
DIR("?" STOP+5*
DIR("A" STOP+4*
DIR(0 STOP+4*
>> DIROUT P+5, D1+4*, CUSTOM+3
DTIME D1+3, R+3, E+3
>> DTOUT CUSTOM+3
>> DUOUT P+5
I P+1~, CUSTOM+1~, HACT1+2*, HACT1+3*, EN+10*, TERM+6*
IOF DISP+1
IOSL DISP+1, STOP+3
IOST STOP+2, TERM~, TERM+5
ORATTEND P+1~
>> ORBUF CUSTOM+2*
ORDG EN~, EN+5*, EN+9, PROC+1*, PROC+3, DISP+2, BILD+1
>> OREND P+5*, D1+1*, D1+4*, R+1*, R+4*, R+5, E+4*, E+5, CUSTOM+3*, CUSTOM+6
, CUSTOM+8
>> ORGRP( BILD+1*
ORMEM EN+6~, EN+9*, EN+10*, POP+1*, PROC+1, PROC+3*
>> ORPRES RANGE+4, CUSTOM+4*
ORSCPAT P+2!, P+4
ORSDFLT DAY+6~, D1+1*, D1+2, D1+5, RANGE+3~, R+1*, R+2, R+6, E+1*, E+2
, E+6
ORSEL EN~, EN+4*, EN+8, PROC+2
>> ORSHORT P+3*
>> ORSSTOP D1+10*, RANGE+4*, E+11*, E+12*, E+13*
>> ORSSTRT D1+10*, RANGE+4*, R+11*, E+1, E+12*, E+14*
ORSTK EN+6~, EN+7*, EN+9*, EN+10, POP+1*, PROC+1, PROC+3*, DISP+3
ORSTK( EN+9*, EN+10, POP+1, PROC+1*, PROC+3*
ORSTK(0 EN+9*
>> ORTERM(5 TERM+4*, TERM+5*
>> ORTERM(7 TERM+4*, TERM+5*, TERM+6*
W HACT1+2*, HACT1+3*, HACT1+4!, DISP+2*, DISP+3
X DAY+6~, D1+3*, D1+4, D1+5*, D1+8, RANGE+3~, R+3*, R+4, R+6*, R+9
, E+3*, E+4, E+6*, E+9, E+12*, CUSTOM+1~, HSTS~, HSTS+2, HACT1+4!, STOP+1~
, TERM+5*
X1 RANGE~, R+1, HACT1+3*
X2 RANGE~, E+1
XQORM CUSTOM+1~
XQORNOD CUSTOM+1~, HACT1+2
>> XQORPOP P+5*, D1+4*, R+4*, E+4*, CUSTOM+3*, CUSTOM+6*, CUSTOM+8*
XQORSPEW CUSTOM+1~
Y P+1~, DAY+6~, D1+9, D1+10, RANGE+3~, R+10, R+11, E+10, E+11, CUSTOM+1~
, HACT1+2*, HACT1+3*, STOP+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All