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

Package: Order Entry Results Reporting

Routine: ORPRS03


Information

ORPRS03 ; slc/dcm - (@) Formerly known as prints ;12/7/00 13:15

Source Information

Source file <ORPRS03.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Order Entry Results Reporting 8 (FOOT,HEAD)^ORPR01  TERM^ORPRS01  PRT^ORPRS04  (CTOP,PBOT,PTOP)^ORPRS05  TEXT^ORQ12  $$INV^ORU  END^ORUDPA  (PGBRK,TIT)^ORUHDR  
Kernel 2 $$S^%ZTLOAD  $$FMTE^XLFDT  
Toolkit 1 $$GET^XPAR  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Order Entry Results Reporting 3 ORPRS04  ORPRS11  ORU  

Entry Points

Name Comments DBIA/ICR reference
PRT1(ORIFN,LENGTH) ;For kids sake
FLAG(ORIFN,INVERSE) ;Is order flagged?
ONE(ORIFN,ORSEQ,LENGTH) ;Single line format
EN ;Print orders
WAIT ;

External References

Name Field # of Occurrence
$$S^%ZTLOAD EN+1
^DIR EN+18
FOOT^ORPR01 WAIT+3
HEAD^ORPR01 WAIT+4
TERM^ORPRS01 ONE+5
PRT^ORPRS04 EN+27
CTOP^ORPRS05 EN+13
PBOT^ORPRS05 EN+20
PTOP^ORPRS05 EN+14
TEXT^ORQ12 ONE+17
$$INV^ORU ONE+9, ONE+12, ONE+14, ONE+21
END^ORUDPA EN+10
PGBRK^ORUHDR WAIT+6
TIT^ORUHDR WAIT+6
$$FMTE^XLFDT ONE+20
$$GET^XPAR EN+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"TASKED Report stopped by "_$P(^VA(200,DUZ,0),U)
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!?3,"No orders.",!!!
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: $C(7),!!,"Enter '^' to stop listing for current patient",!,"and '^^' to stop the entire report, or RETURN to continue"
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!!!!?(IOM-44)\2,"***** E N D O F R E P O R T ****",!
  • Line Location: EN+23
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+24
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+7
Function Call: WRITE
  • Prompt: ORSEQ_$S($L(ORSEQ)=1:" ",1:"")
  • Line Location: ONE+10
Function Call: WRITE
  • Prompt: $S($G(ORASTS)!(ORSTS):" "_$P(^ORD(100.01,$S($G(ORASTS):ORASTS,1:ORSTS),.1),"^"),1:" ")
  • Line Location: ONE+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: I>1
  • Line Location: ONE+18
Function Call: WRITE
  • Prompt: ?14,ORTX(I)
  • Line Location: ONE+18
Function Call: WRITE
  • Prompt: !?14
  • Condition for execution: ($X+9+$L(ORSTRT)+$S($L(ORSTOP):$L(ORSTOP)+8,1:0))>(LENGTH+14)
  • Line Location: ONE+20
Function Call: WRITE
  • Prompt: " Start: "_ORSTRT
  • Line Location: ONE+20
Function Call: WRITE
  • Prompt: " Stop: "_ORSTOP
  • Condition for execution: $L(ORSTOP)
  • Line Location: ONE+20
Function Call: WRITE
  • Prompt: ?(IOM-15),"(continued...)"
  • Line Location: WAIT+2
Function Call: WRITE
  • Prompt: !,"(...continued)"
  • Line Location: WAIT+4
Routine Call
  • DIR
  • Line Location:
    • EN+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] ONE+2, ONE+4, PRT1+5, FLAG+2
^ORD(100.01 - [#100.01] ONE+15
^TMP("ORR" EN+4, EN+5, EN+15, EN+27
^VA(200 - [#200] EN+1

Label References

Name Line Occurrences
$$FLAG ONE+6
ONE PRT1+5
WAIT PRT1+5

Naked Globals

Name Field # of Occurrence
^(0 ONE+3, ONE+4
^(3 ONE+3
^(6 FLAG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR EN+18!
DIR("A" EN+18*
DIR(0 EN+18*
>> DIROUT EN+1*
DIRUT EN+2~
DUOUT EN+2~, EN+27
DUZ EN+1
I EN+16*, ONE+1~, ONE+18*
INVERSE FLAG~, FLAG+2
IOF EN+21, EN+24
IOM EN+9, EN+23, WAIT+2
IOSL EN+9
IOST EN+13, EN+17, ONE+5, WAIT+5
LENGTH ONE~, ONE+16*, ONE+17, ONE+20, PRT1~, PRT1+5
>> OACTION ONE+4, ONE+17
ORAGE EN+3~, EN+13, EN+20
ORASTS ONE+1~, ONE+4*, ONE+15
ORBOT EN+2~, EN+9*, EN+16, EN+20
ORCHLD PRT1+3~, PRT1+4*, PRT1+5*
ORCONT EN+25!, EN+28!
>> ORDAD ONE+19
ORDOB EN+3~, EN+13, EN+20
OREL ONE+1~, ONE+3*, ONE+14, ONE+21
>> OREND EN+1*, EN+26*, PRT1+5, WAIT+4
ORFLAG ONE+1~, ONE+6*, ONE+9, ONE+12
>> ORFOOT WAIT+1, WAIT+3
>> ORHEAD WAIT+4
ORIFN ONE~, ONE+2, ONE+4, ONE+6, ONE+17, PRT1~, PRT1+5, FLAG~, FLAG+2
>> ORIOF WAIT+7
>> ORIOSL PRT1+5
ORL EN+3~
ORL(0 EN+13, EN+20
ORL(1 EN+13, EN+20
ORLINE EN+2~, EN+9*
>> ORLIST EN+4, EN+5, EN+15, EN+27
ORLST EN+2~, EN+26*, EN+27*
>> ORNO EN+4
ORNP EN+3~
>> ORPD EN+13, EN+20
ORPNM EN+3~, EN+13, EN+20
ORPV EN+3~
ORREQ EN+2~
ORREQ("O" EN+11*
ORSEND EN+13, EN+22, EN+25!, EN+28!
ORSEQ ONE~, ONE+3*, ONE+10
ORSEX EN+3~
>> ORSHORT EN+13, EN+14
ORSPG EN+2~, EN+12*, EN+13, EN+14, EN+25!, EN+28!
ORSPG("EOP" EN+13
ORSSN EN+3~, EN+13, EN+20
>> ORSSTOP EN+14
>> ORSSTRT EN+14
ORSTOP ONE+1~, ONE+3*, ONE+20*
ORSTRT ONE+1~, ONE+3*, ONE+20*
ORSTS ONE+1~, ONE+3*, ONE+15
>> ORTERM(5 ONE+5, ONE+6, ONE+8, ONE+11
>> ORTERM(7 ONE+13, ONE+21
>> ORTIT EN+13, EN+14, WAIT+6, WAIT+7
ORTS EN+3~
ORTX ONE+1~, ONE+17
ORTX( ONE+18
>> ORVP EN+9
ORWARD EN+3~, EN+13
SHELBY EN+2~, EN+5*, EN+8
U EN+1
>> X ONE+8*, ONE+9*, ONE+11*, ONE+12*, ONE+13*, ONE+14*, ONE+21*, FLAG+1*, FLAG+2*, FLAG+3
X3 ONE+1~, ONE+3*
Y EN+9*, EN+18!*, EN+19
YENKO EN+2~, EN+5*, EN+8
Z ONE+1~, ONE+19*, ONE+20
>> ZTSTOP EN+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All