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

Package: Lab Service

Routine: LRNODRAW


Information

LRNODRAW ;SLC/CJS - PRINT LIST OF NON-DRAW ORDERS ;8/11/97

Source Information

Source file <LRNODRAW.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Lab Service 2 FNDLOC^LRDRAW  (DD,PT)^LRX  
VA FileMan 1 (,DD)^%DT  

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

Package Total Caller Graph
Lab Service 1 LRNODRAW  

Entry Points

Name Comments DBIA/ICR reference
END
GO
ORD
PRNT ;
PRN ;
EN

External References

Name Field # of Occurrence
^%DT LRNODRAW+2, GO
DD^%DT GO
^%ZIS LRNODRAW+3
^%ZISC GO+4
^%ZTLOAD LRNODRAW+4
FNDLOC^LRDRAW LRNODRAW+2
DD^LRX GO, PRN+7
PT^LRX PRN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?10," You may enter 'ALL' as a response",!
  • Line Location: LRNODRAW+2
Function Call: READ
  • Variable: %
  • Timeout: DTIME
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF,!,"LIST OF PATIENT LAB ORDERS NOT DRAWN "_Y
  • Line Location: GO+0
Function Call: WRITE
  • Prompt: ?60,Y
  • Line Location: GO+0
Function Call: WRITE
  • Prompt: !,"REPORT EMPTY"
  • Line Location: GO+3
Function Call: WRITE
  • Prompt: !,"Finished",!
  • Line Location: GO+4
Function Call: WRITE
  • Prompt: !!,PNM,?40,SSN,!,"LOCATION: ",LRLLOC,?30,"NON-DRAW",?40,"Order: ",^LRO(69,LRODT,1,LRSN,.1)
  • Line Location: PRN+2
Function Call: WRITE
  • Prompt: !,"TESTS: "
  • Line Location: PRN+3
Function Call: WRITE
  • Prompt: ?9,$P(^LAB(60,+X,0),U)
  • Line Location: PRN+6
Function Call: WRITE
  • Prompt: " Accessioned "_Y
  • Line Location: PRN+7
Function Call: WRITE
  • Prompt: !?9,"COMBINED WITH ORDER # "_LRCOMB
  • Line Location: PRN+8
Function Call: WRITE
  • Prompt: !?9,"Canceled by: "_$P(^VA(200,$P(X,"^",11),0),"^")
  • Line Location: PRN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRN+10
Routine Call
  • %ZIS
  • Line Location:
    • LRNODRAW+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] PRN+5, PRN+6
^LR - [#63] PRN+1
^LRO(69 - [#69] GO+1, ORD, PRNT+1, PRNT+2, PRNT+3, PRNT+4, PRNT+5, PRNT+6, PRNT+7, PRN+2
, PRN+4
^VA(200 - [#200] PRN+9

Label References

Name Line Occurrences
% %
END LRNODRAW+2, LRNODRAW+3, GO+4
GO LRNODRAW+3, EN
ORD GO+1, GO+2
PRN PRNT+5, PRNT+6
PRNT ORD

Naked Globals

Name Field # of Occurrence
^( PRN+4
^(0 PRNT+3, PRN+1
^(1 PRNT+1, PRNT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END!, %*
%DT LRNODRAW+2*, END!, GO*
%H END!
%X END!
%Y END!
%ZIS LRNODRAW+2*, LRNODRAW+3*, END!
A END!
DFN END!, PRN+1*
DIC END!
DTIME %
>> DTOUT %*
I END!, GO+1*, PRN+3*, PRN+4*
IO LRNODRAW+3
IO("Q" LRNODRAW+4!
IO(0 LRNODRAW+3
IOF GO
J END!
K END!
LRBECAUS END!, PRNT+5*, PRNT+6*, PRNT+7*, PRN+11
LRCOMB END!, PRN+4*, PRN+8
LRDC END!, GO*, GO+3, ORD*
LRDFN END!, PRNT+4*, PRN+1
LRDPF END!, PRN+1*
LRIO END!
LRIOZERO END!
LRLLOC LRNODRAW+2*, END!, GO+1*, GO+2, ORD, PRN+2
LRLWC END!
LRODT LRNODRAW+2*, END!, GO, GO+1, ORD, PRNT+1, PRNT+2, PRNT+3, PRNT+4, PRNT+5
, PRNT+6, PRNT+7, PRN+2, PRN+4
LRPGM END!
LRSN END!, ORD*, PRNT+1, PRNT+2, PRNT+3, PRNT+4, PRNT+5, PRNT+6, PRNT+7, PRN+2
, PRN+4
LRTIME END!
PNM END!, PRN+2
POP LRNODRAW+3, END!
SSN END!, PRN+2
U LRNODRAW+2*, PRNT+1, PRNT+2, PRNT+3, PRNT+5, PRNT+6, PRNT+7, PRN+1, PRN+4, PRN+6
X END!, GO*, PRN+4*, PRN+5, PRN+6, PRN+9
Y LRNODRAW+2, END!, GO*, PRN+4*, PRN+7
Z END!
ZTDTH LRNODRAW+4*!
ZTIO LRNODRAW+4!
>> ZTQUEUED EN
>> ZTREQ EN*
ZTRTN LRNODRAW+4*!
ZTSAVE LRNODRAW+4!
ZTSAVE("L*" LRNODRAW+4*
ZTSK LRNODRAW+4!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All