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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: LRLABLDS

Package: Lab Service

Routine: LRLABLDS


Information

LRLABLDS ;DALOI/FHS/DRH - PRINT SINGLE LABELS ON DEMAND FOR FUTURE LAB COLLECT ;8/29/94 12:36

Source Information

Source file <LRLABLDS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 $$EXTERNAL^DILFD  EN^DIQ  ^DIR  
Kernel 2 ^%ZIS  ^%ZTLOAD  
Lab Service 2 (,END)^LRLABELF  BLDTMP^LRLABLD0  

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

Package Total Caller Graph
Lab Service 2 LRLABLD0  LRUFCLS  

Entry Points

Name Comments DBIA/ICR reference
EN ;
GET
QUE ;
CHK ; Check order for collection type/status/date-time
CLEAN ;

External References

Name Field # of Occurrence
^%ZIS GET+14
^%ZTLOAD GET+19
$$EXTERNAL^DILFD CHK+5
EN^DIQ GET+6
^DIR EN+6, GET+11
^LRLABELF QUE+8
END^LRLABELF CLEAN+1
BLDTMP^LRLABLD0 QUE+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,"Number does not exist",!,$C(7)
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: GET+9
Function Call: WRITE
  • Prompt: !,$C(7),"Can not print label for Order Number: ",$P($G(^LRO(69,LRODT,1,LRSN,.1),"Unknown"),U)
  • Line Location: CHK+16
Function Call: WRITE
  • Prompt: !,?26,"Specimen #: ",LRSN
  • Line Location: CHK+17
Function Call: WRITE
  • Prompt: !,?5,"Reason - ",LRMSG,!
  • Line Location: CHK+18
Routine Call
  • %ZIS
  • Line Location:
    • GET+14
Routine Call
  • DIR
  • Line Location:
    • EN+6
    • GET+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
69.01 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(69 - [#69] EN+4, EN+8, GET+2, GET+3, GET+4, QUE+3, QUE+4, CHK+11, CHK+16
^TMP($J EN+2!

Label References

Name Line Occurrences
CHK GET+6, QUE+6
CLEAN EN+7, GET+12, GET+15, GET+19, QUE+10
EN EN+8, GET+8, GET+13, GET+16, QUE+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS GET+14!*
A CLEAN+2!
DA GET!, GET+5*, CLEAN+2!
DA(1 GET+5*
DIC EN+1~, GET+5*, CLEAN+2!
DIR EN+1~, GET+9!
DIR("?" EN+5*
DIR("A" EN+4*, GET+10*
DIR("B" GET+10*
DIR(0 EN+4*, GET+10*
DIRUT EN+1~, EN+7, GET+12
DTOUT EN+1~
DX CLEAN+2!
IO QUE+1
IO("Q" GET+16
IO(0 CHK+15
LRAA EN+1~
LRAD EN+1~
LRAN EN+1~
LRBATCH EN+1~, EN+3*, CHK+13
>> LRDFN QUE+7*
>> LREND GET+1*, GET+7, QUE+2*, QUE+6, CHK+2*, CHK+3*, CHK+4*, CHK+5*, CHK+6*, CHK+7
, CHK+12*, CHK+13
LRMSG CHK+1~, CHK+3*, CHK+4*, CHK+5*, CHK+6*, CHK+12*, CHK+18
>> LRODT GET+2*, GET+3, GET+4, GET+5, QUE+3, QUE+4, CHK+11, CHK+16
LROK EN+1~, GET+1*, GET+7*, GET+8, QUE+2*, QUE+5*, QUE+6*, QUE+8, CHK+8~, CHK+9*
, CHK+11*, CHK+12
>> LRORDN EN+9*, GET+2, GET+3, QUE+3
>> LRPICK EN+3*, CHK+14
>> LRSING EN+3*
>> LRSN GET+1*, GET+3*, GET+4, GET+5, QUE+2*, QUE+3*, QUE+4, CHK+11, CHK+16, CHK+17
>> LRSN(0 GET+4*, QUE+4*, QUE+7, CHK+3, CHK+4
>> LRSN(1 GET+4*, QUE+4*, CHK+5, CHK+6
LRTEST CHK+8~, CHK+10*, CHK+11*
LRUID EN+1~
>> POP GET+15
U CHK+3, CHK+4, CHK+5, CHK+6, CHK+11, CHK+16
>> Y EN+8, EN+9, GET+13
>> ZTDESC GET+17*
>> ZTQUEUED QUE+5, QUE+9, CHK+14
>> ZTRTN GET+17*
>> ZTSAVE("LR*" GET+18*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All