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

Package: Lab Service

Routine: LRLABXT


Information

LRLABXT ;SLC/TGA - REPRINTS DEMAND LABELS ;2/19/91 10:38

Source Information

Source file <LRLABXT.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Lab Service 4 (GO,LBLTYP,LRBAR,PSET)^LRLABLD  ^LRLABLIO  ^LRWU4  KVAR^LRX  
Kernel 3 PKILL^%ZISP  (CLOSE,OPEN,USE)^%ZISUTL  ^%ZTLOAD  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 2 LRLABXOL  LRLABXT  
IHS Changes To Lab 1 BLRAG02  

Entry Points

Name Comments DBIA/ICR reference
LOAD ; Tasked entry point and from above.
EN ; Reprint labels
SETTMP ; Setup TMP global with accession to reprint.
IOCHK ; Select and check label printer.
; Called from above, LRLABXOL
K ; Cleanup
PRINT ;
; Called by above, LRLABXOL
ASK ;

External References

Name Field # of Occurrence
PKILL^%ZISP K+2
CLOSE^%ZISUTL K+2
OPEN^%ZISUTL EN+3, IOCHK+10
USE^%ZISUTL EN+4, ASK+1, ASK+35
^%ZTLOAD ASK+31
^DIR EN+7, ASK+10, ASK+25
GO^LRLABLD PRINT+8
LBLTYP^LRLABLD LOAD+4
LRBAR^LRLABLD PRINT+7
PSET^LRLABLD LOAD+1
^LRLABLIO IOCHK+3
^LRWU4 ASK+5, ASK+18
KVAR^LRX K+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+12
Function Call: WRITE
  • Prompt: !,"Labels ",$S($G(ZTSK):"queued to "_$P(LRLABLIO,";")_" Task #"_ZTSK,1:"NOT queued"),!
  • Line Location: ASK+32
Function Call: WRITE
  • Prompt: !!,"Printing labels on ",$P(LRLABLIO,";"),!
  • Line Location: ASK+34
Function Call: WRITE
  • Prompt: !,$C(7),"Unable to open device"
  • Line Location: IOCHK+12
Routine Call
  • DIR
  • Line Location:
    • EN+7
    • ASK+10
    • ASK+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(68 - [#68] ASK+7, ASK+14, PRINT+2, PRINT+3, PRINT+4, PRINT+5
^TMP("LRLABXT" ASK+3!, ASK+20, LOAD+2, SETTMP+1*, K+8!

Label References

Name Line Occurrences
ASK ASK+28, LOAD+8
IOCHK EN+1
K EN+2, EN+8, ASK+27, LOAD+7
PRINT LOAD+5
SETTMP ASK+16, ASK+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% K+4!
%ZIS IOCHK+8~, IOCHK+9*, IOCHK+10
A K+4!
B K+4!
DIC K+4!
DIR EN+5!, ASK+10!, ASK+23~
DIR("A" EN+6*, ASK+9*, ASK+24*
DIR("B" EN+6*, ASK+9*, ASK+24*
DIR(0 EN+6*, ASK+9*, ASK+24*
DIRUT EN+5!, EN+8, ASK+11, ASK+23~, ASK+26
DTOUT EN+5!, ASK+19, ASK+23~
DUOUT EN+5!, ASK+19, ASK+23~
>> FIRST ASK+7*, ASK+13
I K+4!
I1 K+4!
IO("Q" IOCHK+5, K+4!
IOM ASK+15
IOP IOCHK+8~, IOCHK+9*, IOCHK+10, K+4!
J K+4!
K K+4!
L K+4!
LAST ASK+13*, ASK+14, K+4!
LRAA ASK+7, ASK+14, LOAD+3*, PRINT+2, PRINT+3, PRINT+4, PRINT+5, SETTMP+1, K+5!
LRACC ASK+2*, PRINT+5*, K+5!
LRAD ASK+7, ASK+14, LOAD+3*, PRINT+2, PRINT+3, PRINT+4, PRINT+5, SETTMP+1, K+5!, K+6!
LRAN ASK+6, ASK+7, ASK+9, ASK+13*, ASK+14*, ASK+17, ASK+20, LOAD+3*, PRINT+2, PRINT+3
, PRINT+4, PRINT+5, SETTMP+1, K+5!
LRBAR K+7!
LRBAR0 K+7!
LRBAR1 K+7!
LRBARID K+7!
LRCE PRINT+4*, K+5!
LRCNT ASK+2*, ASK+22, ASK+24, SETTMP+1*, K+5!
LRDAT K+5!
LRDFN K+5!
LRDPF K+5!
LREXMPT ASK+2*, K+5!
LRFN K+6!
LRINFW K+5!
LRLABEL K+5!
LRLABLIO EN+2, ASK+29, ASK+32, ASK+34, IOCHK+2, IOCHK+5, IOCHK+6, IOCHK+9, IOCHK+13!, K+6!
LRLABLIO("Q" ASK+28, IOCHK+7
LRLABX LOAD+2*, LOAD+3, LOAD+6, K+6!
LRLF K+5!
LRLLOC PRINT+3*, K+6!
LRNN K+6!
LRNOLABL K+6!
LRODT PRINT+3*, K+5!
LRPRAC K+6!
LRPREF K+5!
LRQUIT ASK+2*, ASK+6*, ASK+11*, ASK+17, ASK+19*, ASK+20*, ASK+22, ASK+26*, ASK+27, K+6!
LRRB PRINT+6*, K+6!
LRSN PRINT+3*, K+6!
LRSSP K+5!
LRTJ K+6!
LRTJDATA K+6!
LRTOP K+6!
LRTS K+6!
LRTV K+6!
LRTVOL K+6!
LRTXT K+6!
LRTYPE EN+9*, ASK+4, ASK+17, K+6!
LRUID K+7!
LRURG K+7!
LRURG0 K+7!
LRURGA K+7!
LRVOL K+6!
LRX K+7!
LRXL K+7!
N K+4!
POP IOCHK+11, K+4!
R K+4!
S1 K+4!
S2 K+4!
T K+4!
U PRINT+3
X EN+5!, ASK+7*, ASK+9, ASK+23~, PRINT+3*, K+4!
Y EN+5!, EN+9, ASK+13, ASK+23~, ASK+26, K+4!
Z K+4!
ZTDESC ASK+29*, ASK+33!
ZTIO ASK+29*, ASK+33!
>> ZTQUEUED LOAD+7, K+1
>> ZTREQ K+1*
ZTRTN ASK+29*, ASK+33!
ZTSAVE ASK+33!
ZTSAVE("^TMP(""LRLABXT"",$J," ASK+30*
ZTSK ASK+32, ASK+33!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All