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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRLABLD0

Package: Lab Service

Routine: LRLABLD0


Information

LRLABLD0 ;DALOI/FHS/DRH/JMC - LABELS ON DEMAND FOR FUTURE LAB COLLECT ;8/29/94 12:36

Source Information

Source file <LRLABLD0.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT  
Lab Service 4 (,END)^LRLABELF  ($$URGA,BARID,LBLTYP,LRBAR,UID)^LRLABLD  CHK^LRLABLDS  PT^LRX  
VA FileMan 4 ^%DT  ^DIC  $$GET1^DIQ  ^DIR  

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

Package Total Caller Graph
Lab Service 3 LRLABELF  LRLABLDS  LRUFCL  

Entry Points

Name Comments DBIA/ICR reference
EN ;
SELLOC
QUE ; Tasked entry and interactive point.
SETUP ; Called by LRLABELF
T ;
T1 ;
LRTOP ;
P ;
QUIT ;
END ;
SEP ;
LRPICK ; Choose type of output
SELCOLTY ; Select collection Type(s) to Print
BLDTMP ; Build TMP global with order info.
; Called from above, LRLABLDS

External References

Name Field # of Occurrence
^%DT EN+8
^%ZIS SELLOC+11
^%ZISC SELLOC+16
^%ZTLOAD SELLOC+16
^DIC SELLOC+4
$$GET1^DIQ BLDTMP+6
^DIR EN+14, LRPICK+5, SELCOLTY+11
^LRLABELF QUE+20
END^LRLABELF QUE+21, END+1
$$URGA^LRLABLD P+9, SEP+13
BARID^LRLABLD P+8, SEP+12
LBLTYP^LRLABLD P+5, SEP+10
LRBAR^LRLABLD P+6, SEP+11
UID^LRLABLD P+8, SEP+12
CHK^LRLABLDS QUE+18
PT^LRX SETUP+7, BLDTMP+5
$$DT^XLFDT EN+5
$$FMADD^XLFDT QUE+2
$$FMTE^XLFDT EN+8, SETUP+3, P+7
$$NOW^XLFDT QUE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Future Lab, Immediate, Ward Collect and Send Patient Orders"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?5,"Enter each date to print separately",!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !?10,"No Orders For "_$$FMTE^XLFDT(Y)
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!?10,"Nothing selected ",!,$C(7)
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!?10,"No Locations Selected ",$C(7)
  • Line Location: SELLOC+7
Function Call: WRITE
  • Prompt: !?10,$S($G(ZTSK):"Queued to "_LRION,1:"Task NOT queued"),!
  • Line Location: SELLOC+17
Function Call: WRITE
  • Prompt: !
  • Line Location: SELCOLTY+2
Routine Call
  • DIC
  • Line Location:
    • SELLOC+4
Routine Call
  • DIR
  • Line Location:
    • EN+14
    • LRPICK+5
    • SELCOLTY+11
Routine Call
  • %ZIS
  • Line Location:
    • SELLOC+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] T+8, T+9, T1+4
^LAB(61 - [#61] LRTOP+3
^LAB(62 - [#62] SETUP+11, LRTOP+2
^LR - [#63] QUE+11, SETUP+6, BLDTMP+3
^LRO(69 - [#69] EN+8, QUE+7, QUE+9, SETUP+4, T+4, T+5, LRTOP+1
^TMP($J QUE+1!, QUE+2*, BLDTMP+8*

Label References

Name Line Occurrences
@( P+15, SEP+16
BLDTMP QUE+19
END EN+9, EN+10, EN+15, SELLOC+8, SELLOC+10, SELLOC+11, SELLOC+18
LRPICK EN+10
LRTOP SETUP+13
P SETUP+16
SELCOLTY SELLOC+9
SEP SETUP+10, P+1
T SETUP+14
T1 T+7

Naked Globals

Name Field # of Occurrence
^( SETUP+4, SETUP+6, T+8, T1+4
^(0 SETUP+6, SETUP+11, T+5, T1+4, BLDTMP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+3~, EN+6*
%DT("A" EN+6*
%DT(0 EN+7*
%ZIS EN+3~, SELLOC+11*
>> CNT EN+4*, QUE+3*
>> DFN SETUP+6*, BLDTMP+3*, BLDTMP+4
DIC SELLOC+1~, SELLOC+2*
DIC(0 SELLOC+2*
DIR EN+3~, EN+11!, LRPICK+2~, SELCOLTY+1~
DIR("?" EN+13*, LRPICK+3*
DIR("A" EN+13*, LRPICK+4*, SELCOLTY+7*, SELCOLTY+8*, SELCOLTY+9*
DIR(0 EN+12*, LRPICK+3*, SELCOLTY+10*
DIRUT EN+3~, EN+15, LRPICK+2~, LRPICK+6, SELCOLTY+1~, SELCOLTY+12
DT EN+5*, EN+7, QUE+2
DTOUT EN+3~, SELLOC+1~, SELLOC+5, LRPICK+2~, SELCOLTY+1~
DUOUT EN+3~, SELLOC+1~, SELLOC+5, LRPICK+2~, SELCOLTY+1~
I P+12*, SEP+2~, SEP+14*, SELCOLTY+5*, SELCOLTY+6, SELCOLTY+7, SELCOLTY+13*
IO P+10, SEP+15
IO("Q" SELLOC+12
ION SELLOC+14
>> LN EN+4*, QUE+3*
LRAA EN+3~, P+3~, P+4*, SEP+1~
LRACC P+7*, SEP+1~, SEP+7*
LRAD EN+3~
LRAN EN+3~, SEP+1~, SEP+6*
LRBAR P+3~, SEP+1~
LRBATCH EN+3~, EN+4*
LRCE SETUP+4*, SEP+1~, SEP+7*
LRCHLOC EN+3~, EN+4*, EN+16*, SELLOC
>> LRCLTY SETUP+5*, P+7
LRCNT SELCOLTY+1~, SELCOLTY+6*, SELCOLTY+8, SELCOLTY+10
LRCOLTY SELCOLTY+3!, SELCOLTY+4*, SELCOLTY+5, SELCOLTY+7, SELCOLTY+13
LRCOLTY( QUE+17, SELCOLTY+13*
>> LRCT SETUP+2, SETUP+3, P+7
LRCT0 EN+3~
LRCT0( EN+8*!, QUE+5
LRCT0(0 EN+9
LRDAT SETUP+3*, SEP+2~, SEP+6*
>> LRDFN QUE+19*, SETUP+6*, BLDTMP+3
>> LRDPF SETUP+6*, BLDTMP+3*, BLDTMP+4
LRDTC EN+3~, QUE+1!
LREND EN+4*, EN+10, SELLOC+5*, SELLOC+7*, SELLOC+8, SELLOC+10, QUE+8~, QUE+18*, LRPICK+6*, SELCOLTY+12*
LRI P+11*, P+12, P+13~
LRINFW SETUP+6*, SEP+2~, SEP+14*
LRION SELLOC+13~, SELLOC+14*, SELLOC+17
>> LRLABEL P+15, SEP+16
LRLLOC SETUP+8*, SETUP+10, P+1, SEP+3*, SEP+4, SEP+5~*
>> LRLOCF EN+4*
>> LRLOCF( SELLOC+6*, QUE+13
>> LRLOCF(0 SELLOC+7, QUE+13
LRN SETUP+15*, P+2, P+11, P+12, P+13~
>> LRNEWL SETUP+10, P+1, SEP+3*
>> LRODT QUE+4*, QUE+5*, QUE+7, QUE+9, SETUP+4, T+1, T+4, T+5, LRTOP+1, BLDTMP+8
LRORDLOC BLDTMP+2~, BLDTMP+6*, BLDTMP+7*, BLDTMP+8
LRPICK LRPICK+1!, LRPICK+7*
LRPREF P+14*, SEP+2~, SEP+8*
LRRB QUE+3*, SETUP+1*, SEP+2~, SEP+8*
>> LRSING SETUP+10, P+1
>> LRSN QUE+6*, QUE+7*, QUE+9, SETUP+4, T+4, T+5, LRTOP+1, BLDTMP+8
>> LRSN(0 QUE+9*, QUE+11, QUE+13, QUE+15, QUE+17, QUE+19, BLDTMP+6, BLDTMP+8
>> LRSN(1 QUE+9*
>> LRSTOP EN+4*, QUE+3*
>> LRTJ SETUP+9*, SETUP+11
>> LRTJDATA SETUP+11*, SETUP+12, SETUP+13
LRTOP SETUP+12*, SETUP+13, LRTOP+1*, LRTOP+3*, LRTOP+4*, SEP+2~, SEP+9*
LRTS T+2!, SEP+2~
LRTS( T+8*
LRTS(1 SEP+9*
LRTS(2 SEP+9*
>> LRTV T+5*, T+6, T+8, T+9, T1+2, T1+3, T1+4
>> LRTVOL SETUP+8*, SETUP+15, T1+4*, P+14*
LRUID EN+3~, SEP+2~
LRURG T+2!, T1+2*
LRURG0 T+3*, T1+3*, P+9, SEP+1~, SEP+8*, SEP+13
>> LRURGA P+9*, SEP+13*
>> LRVOL T1+2*, T1+4*
>> LRWRD BLDTMP+8
LRXL SETUP+15, T+3*, T+9*, SEP+1~, SEP+14*
N SETUP+1*, P+12*, SEP+2~, SEP+14*
>> NODE SETUP+4*, SETUP+5, SETUP+6, SETUP+8, SETUP+9, T1+4, LRTOP+2
PNM SEP+2~, SEP+4*, BLDTMP+8
>> POP SELLOC+11
>> S1 SETUP+12*, SETUP+15, P+14
>> S2 SETUP+13*, P+14
SSN SEP+2~, SEP+7*
>> T T+3*, T+4*, T+5, T+8, LRTOP+2*, LRTOP+4
U SELLOC+6, QUE+13, QUE+15, QUE+17, SETUP+5, SETUP+6, SETUP+8, SETUP+9, SETUP+12, SETUP+13
, T+8, T+9, T1+2, T1+3, T1+4, LRTOP+2, LRTOP+3, BLDTMP+3, BLDTMP+6, BLDTMP+8
X EN+3~, SELLOC+1~, T1+1~, T1+4*, LRPICK+2~, SELCOLTY+1~
Y EN+3~, EN+8, EN+16, SELLOC+1~, SELLOC+3, SELLOC+6, SETUP+2*, LRPICK+2~, LRPICK+7, SELCOLTY+1~
, SELCOLTY+13
Y(0 SELLOC+6
>> Y1 SETUP+2*
>> Y2 SETUP+1*
>> ZTDESC SELLOC+15*
>> ZTRTN SELLOC+15*
>> ZTSAVE("LR*" SELLOC+15*
ZTSK EN+3~, SELLOC+17
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 |  Naked Globals |  Local Variables  | All