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

Package: Lab Service

Routine: LRRP5


Information

LRRP5 ;DALOI/JBM/WTY - COLLECTION REPORT ;9/22/00

Source Information

Source file <LRRP5.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 ^%DT  ^DIC  ^DIR  
Lab Service 2 PRINT^LRRP5A  ($$Y2K,PT)^LRX  

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 LRRP5  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DATE ;
REPTYP ;
DEVICE ;
DQ ;
INIT ;
PROCESS ;For ea. specimen on date selected
; If collection type = requested type
; Get patient name & SSN,order#,collection sample & ordering location
; Store by patient,ssn,order#,collection sample
CNTSUM ;
PAUSE ;
WRAPUP ;
QUE ;

External References

Name Field # of Occurrence
^%DT DATE+2
^%ZIS DEVICE+1
HOME^%ZIS QUE+6
^%ZISC WRAPUP+2
^%ZTLOAD QUE+3
^DIC PROCESS+10, PROCESS+18, PROCESS+21, PROCESS+36, PROCESS+40
^DIR EN+4, REPTYP+3, PAUSE+1
PRINT^LRRP5A DQ+4
$$Y2K^LRX DATE+3, INIT+2
PT^LRX PROCESS+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"REPORT selection: "
  • Line Location: REPTYP+1
Routine Call
  • DIC
  • Line Location:
    • PROCESS+10
    • PROCESS+18
    • PROCESS+21
    • PROCESS+36
    • PROCESS+40
Routine Call
  • DIR
  • Line Location:
    • EN+4
    • REPTYP+3
    • PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+1
Routine Call
  • %ZIS
  • Line Location:
    • QUE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] PROCESS+37
^LRO(69 - [#69] PROCESS+5, PROCESS+6, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+34, PROCESS+35
^TMP($J INIT+1!, PROCESS+25*, PROCESS+28*, PROCESS+29, PROCESS+42*, PROCESS+43*, CNTSUM+3, CNTSUM+5, CNTSUM+7, CNTSUM+8
, CNTSUM+13, CNTSUM+14*, WRAPUP+3!

Label References

Name Line Occurrences
CNTSUM DQ+3
INIT DQ+1
PAUSE WRAPUP+1
PROCESS DQ+2
QUE DEVICE+3
WRAPUP EN+5, DATE+2, REPTYP+4, DEVICE+2, DEVICE+3, DQ+5

Naked Globals

Name Field # of Occurrence
^(0 CNTSUM+13*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% WRAPUP+4!
%DT DATE+1*, WRAPUP+4!
%DT("A" DATE+1*
%Y WRAPUP+4!
%ZIS DEVICE+1*, WRAPUP+4!
AGE WRAPUP+7!
DFN PROCESS+11*, WRAPUP+4!
DIC PROCESS+10*, PROCESS+18*, PROCESS+21*, PROCESS+36*, PROCESS+40*, WRAPUP+4!
DIC(0 PROCESS+10*, PROCESS+18*, PROCESS+21*, PROCESS+36*, PROCESS+40*
DIR REPTYP+2!, PAUSE+1!, WRAPUP+5!
DIR("A" EN+2*
DIR("B" EN+3*
DIR(0 EN+2*, REPTYP+2*, PAUSE+1*
DIROUT WRAPUP+4!
DIRUT EN+5, PAUSE+2, WRAPUP+4!
DOB WRAPUP+7!
DT INIT+2
DTOUT EN+5, REPTYP+4, PAUSE+2, WRAPUP+4!
DUOUT EN+5, REPTYP+4, PAUSE+2, WRAPUP+4!
I WRAPUP+4!
IO INIT+1
IO("Q" DEVICE+1!, DEVICE+3, QUE+1!
IOF WRAPUP+2
ION QUE+1
IOP DEVICE+1!
IOST WRAPUP+1
LRBLANK WRAPUP+8!
LRBUF WRAPUP+8!
LRC CNTSUM+1~, CNTSUM+11*, CNTSUM+12
LRCLCTD PROCESS+15*, PROCESS+23, PROCESS+24*, PROCESS+27*, PROCESS+43, WRAPUP+3!
>> LRCS PROCESS+17*, PROCESS+18
LRCS1 PROCESS+19*, PROCESS+29, PROCESS+42, PROCESS+43, WRAPUP+8!
LRCS3 WRAPUP+8!
LRCTYP PROCESS+7*, PROCESS+8, WRAPUP+5!
LRDAT INIT+2*, WRAPUP+5!
LRDFN PROCESS+7*, PROCESS+8, PROCESS+10, WRAPUP+6!
LRDPF PROCESS+11*, WRAPUP+6!
LRDUMY WRAPUP+5!
LREND EN+1*, EN+5*, DATE+2*, REPTYP+4*, DEVICE+2*, DEVICE+3*, INIT+2*, PAUSE+2*, WRAPUP+1, WRAPUP+7!
LRIFN PROCESS+37*, WRAPUP+5!
LRLCNT WRAPUP+8!
LRLOC PROCESS+7*, PROCESS+8, PROCESS+21, PROCESS+22*, PROCESS+25, PROCESS+28, PROCESS+43, CNTSUM+1~, CNTSUM+2*, CNTSUM+3*
, CNTSUM+5, CNTSUM+7, CNTSUM+8, CNTSUM+13, CNTSUM+14, WRAPUP+6!
LRODAT DATE+3*, WRAPUP+5!
LRODT DATE+3*, PROCESS+5, PROCESS+6, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+34, PROCESS+35, WRAPUP+6!
LRORD PROCESS+14*, PROCESS+29, PROCESS+42, PROCESS+43, WRAPUP+6!
LRP CNTSUM+1~, CNTSUM+12*, CNTSUM+13
LRPAG INIT+2*, WRAPUP+5!
LRPAT PROCESS+12*, PROCESS+25, PROCESS+28, PROCESS+29, PROCESS+42, PROCESS+43, CNTSUM+1~, CNTSUM+4*, CNTSUM+5*, CNTSUM+7
, CNTSUM+8, WRAPUP+6!
LRPATCNT CNTSUM+4*, CNTSUM+10*, CNTSUM+14, WRAPUP+3!
LRPNAM PROCESS+37*, PROCESS+38, WRAPUP+7!
LRRCNAM EN+6*, WRAPUP+5!
LRRCTYP EN+6*, PROCESS+8, WRAPUP+5!
LRREC PROCESS+6*, PROCESS+7, PROCESS+35*, PROCESS+36, PROCESS+40, CNTSUM+1~, CNTSUM+8*, CNTSUM+9, CNTSUM+11, WRAPUP+6!
LRRPT REPTYP+5*, WRAPUP+8!
LRSN PROCESS+4*, PROCESS+5*, PROCESS+6, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+34, PROCESS+35, WRAPUP+7!
LRSPC WRAPUP+7!
LRSSN PROCESS+12*, PROCESS+25, PROCESS+28, PROCESS+29, PROCESS+42, PROCESS+43, CNTSUM+1~, CNTSUM+6*, CNTSUM+7*, CNTSUM+8
, WRAPUP+6!
LRTAB WRAPUP+3!
LRTGLNAM WRAPUP+3!
LRTGLORD WRAPUP+3!
LRTN PROCESS+33*, PROCESS+34*, PROCESS+35, WRAPUP+6!
LRTNN PROCESS+29*, PROCESS+42*, PROCESS+43, WRAPUP+3!
LRTST PROCESS+37*, PROCESS+38*, PROCESS+39*, PROCESS+41*, PROCESS+42, WRAPUP+6!
LRU CNTSUM+1~, CNTSUM+11*, CNTSUM+12
LRURG WRAPUP+6!
LRWRD WRAPUP+6!
PNM PROCESS+11, PROCESS+12, WRAPUP+5!
POP DEVICE+2, WRAPUP+4!
SEX WRAPUP+7!
SSN PROCESS+12, WRAPUP+5!
U DATE+2, PROCESS+7, PROCESS+11, PROCESS+15, PROCESS+17, PROCESS+19, PROCESS+22, PROCESS+25, PROCESS+28, PROCESS+36
, PROCESS+37, PROCESS+40, PROCESS+41, PROCESS+43, CNTSUM+11, CNTSUM+13, CNTSUM+14
VA WRAPUP+4!
VADM WRAPUP+4!
VAERR WRAPUP+4!
X DATE+2, REPTYP+2!, REPTYP+5, PROCESS+10*, PROCESS+18*, PROCESS+21*, PROCESS+36*, PROCESS+40*, WRAPUP+4!
Y EN+6, DATE+3, REPTYP+2!, PROCESS+10, PROCESS+18, PROCESS+21, PROCESS+22, PROCESS+36, PROCESS+37, PROCESS+40
, PROCESS+41, WRAPUP+4!
Y(0 EN+6, PROCESS+11, PROCESS+19, PROCESS+22
ZTDESC WRAPUP+7!, QUE+2*
ZTIO WRAPUP+7!, QUE+1*
ZTQUEUED INIT+1, WRAPUP+2, WRAPUP+7!
ZTREQ INIT+1*, WRAPUP+8!
ZTRTN WRAPUP+7!, QUE+2*
ZTSAVE WRAPUP+7!
ZTSAVE("LR*" QUE+3*
>> ZTSK QUE+4, QUE+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All