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

Package: Lab Service

Routine: LRNDLST


Information

LRNDLST ;SLC/CJS - PRINT LIST OF NON-DRAW ORDERS ;2/19/91 11:03 ;

Source Information

Source file <LRNDLST.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Lab Service 3 EN^LRDIQ  FNDLOC^LRDRAW  DD^LRX  
VA FileMan 1 ^%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 LRNDLST  

Entry Points

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

External References

Name Field # of Occurrence
^%DT LRNDLST+2
^%ZIS LRNDLST+4
^%ZISC END+1, GO+7
^%ZTLOAD LRNDLST+5
EN^LRDIQ PRNT+5
FNDLOC^LRDRAW LRNDLST+2
DD^LRX GO

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?10," You may enter 'ALL' as a response",!
  • Line Location: LRNDLST+2
Function Call: WRITE
  • Prompt: !!?10,"Report Queued to device "_ION,!
  • Line Location: LRNDLST+5
Function Call: READ
  • Variable: %
  • Timeout: DTIME
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: END+3
Function Call: READ
  • Prompt: ""'^' TO HALT: ""
  • Variable: W
  • Timeout: DTIME
  • Line Location: GO+1
Function Call: WRITE
  • Prompt: !,"REPORT EMPTY"
  • Line Location: GO+4
Function Call: WRITE
  • Prompt: !,"Finished",!
  • Line Location: GO+5
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="P-"
  • Line Location: GO+5
Function Call: WRITE
  • Prompt: @IOF,!,"LIST OF PATIENT LAB ORDERS NOT DRAWN "_Y,!!!?10,"LISTING FOR ( ",LRLLOC," ) ",?50,"PG: ",PG,!
  • Line Location: ORD+4
Function Call: WRITE
  • Prompt: @IOF,!!?10,"LISTING FOR ( ",LRLLOC," ) ",?50,"PG: ",PG,!
  • Line Location: PRNT+4
Routine Call
  • %ZIS
  • Line Location:
    • LRNDLST+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(69 - [#69] GO+2, GO+3, ORD+1, PRNT+2, PRNT+3

Label References

Name Line Occurrences
% %
END LRNDLST+2, LRNDLST+4, GO+7
GO LRNDLST+4, EN
ORD GO+2, GO+3
PRNT GO+2, GO+3

Naked Globals

Name Field # of Occurrence
^(1 ORD+1, PRNT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END+1!, %*
%DT LRNDLST+2*, END+1!
%H END+1!
%X END+1!
%Y END+1!
%ZIS LRNDLST+2*, LRNDLST+4*, END+1!
A END+1!
>> D0 PRNT+5*
>> DA PRNT+5*
DFN END+1!
DIC END+1!, GO!, PRNT+5*
DIRUT END+1!, PRNT+5
DR GO!*
DTIME %, GO+6, ORD+3, PRNT+4
>> DTOUT PRNT+5*
DX GO!
DX(0 END!, GO+1*
I END+1!
IO LRNDLST+4
IO("Q" LRNDLST+5!
IO(0 LRNDLST+4
IOF GO+5, ORD+4, PRNT+4, EN
ION LRNDLST+5
IOST GO+5, GO+6, ORD+3, PRNT+4, EN
J END+1!
K END+1!
LRBECAUS END+1!
LRBEG LRNDLST+3*, GO+6, ORD+3, ORD+4!, PRNT+4
LRCOMB END+1!
LRDC END+1!, GO*, GO+2*, GO+3*, GO+4
LRDFN END+1!
LRDPF END+1!
LRIO END+1!
LRIOZERO END+1!
LRLLOC LRNDLST+2*, END+1!, GO+2*, GO+3, ORD+4, PRNT+4
LRLWC END+1!
LRODT LRNDLST+2*, END+1!, GOGO+2, GO+3, ORD+1, PRNT+2, PRNT+3, PRNT+5
LROUT END!, %*, GO*, GO+2, GO+3, ORDORD+4*, PRNT+1, PRNT+4*, PRNT+5*
LRPGM END+1!
LRSN END+1!, GO+2*, GO+3*, ORD+1, PRNT+2, PRNT+3, PRNT+5
LRTIME END+1!
>> LRTOP GO+2*, GO+3*, ORD+2, ORD+4*
>> PG GO*, ORD+2*, ORD+4, PRNT+4*
PNM END+1!
POP LRNDLST+4, END+1!
S END!, PRNT+1~, PRNT+5*
SSN END+1!
U LRNDLST+2*, GO*, ORD+1, PRNT+2, PRNT+3
>> W GO+6*, ORD+2*, ORD+3*, ORD+4, PRNT+4*
X END+1!, GO!
Y LRNDLST+2, END+1!, GO*, ORD+4
Z END+1!
>> ZTDESC LRNDLST+5*
>> ZTIO LRNDLST+5*
>> ZTQUEUED EN
>> ZTREQ EN*
>> ZTRTN LRNDLST+5*
>> ZTSAVE("LRBEG" LRNDLST+5*
>> ZTSAVE("LRLLOC" LRNDLST+5*
>> ZTSAVE("LRODT" LRNDLST+5*
ZTSK END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All