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

Package: Lab Service

Routine: LRBLJCK


Information

LRBLJCK ;AVAMC/REG - INVENTORY ABO/RH CK ;7/30/95 15:38 ; 12/18/00 2:03pm

Source Information

Source file <LRBLJCK.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Lab Service 7 ($$READ,$$STRIP,BAR)^LRBLB  ^LRBLBU  DT^LRBLU  (,S)^LRBLW  (D,V,WAIT,YN)^LRU  ^LRUTL  X^LRUWK  
VA FileMan 3 ^%DT  ^DIC  ^DIE  

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 LRBLIUC  

Entry Points

Name Comments DBIA/ICR reference
SD
ST
E
ABO
RH
EN ;
ASK
I
A
END

External References

Name Field # of Occurrence
^%DT I+2
^DIC E+5
^DIE E+6, A
$$READ^LRBLB E
$$STRIP^LRBLB E+2
BAR^LRBLB EN+3
^LRBLBU E+1
DT^LRBLU E+6, I+4
^LRBLW ABO+1, RH+1
S^LRBLW EN+1
D^LRU I+3
V^LRU EN+1, END
WAIT^LRU I+3
YN^LRU EN+3, A
^LRUTL EN+1
X^LRUWK EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: E+0
Function Call: WRITE
  • Prompt: !!,$C(7),$S($D(^DD(65,.01,3)):^(3),1:""),!
  • Line Location: E+4
Function Call: WRITE
  • Prompt: $C(7)," (NOT IN INVENTORY FILE)"
  • Line Location: E+5
Function Call: WRITE
  • Prompt: !!,"Enter TEST COMMENT(s) "
  • Line Location: EN+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!?14,"1) Enter by invoice# (batch)",!?14,"2) Entry by unit ID",!,"Select 1 or 2:"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: $C(7),!,"Enter a '1' to automatically request data entry for all units in a given invoice",!,"Enter a '2' to specify unit ID"
  • Line Location: ASK+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: I+0
Function Call: WRITE
  • Prompt: !,^(3)
  • Condition for execution: $D(^(3))
  • Line Location: I+0
Function Call: WRITE
  • Prompt: $C(7),!!,"There are no units in inventory for invoice# ",LRA," for "
  • Line Location: I+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: I+3
Function Call: WRITE
  • Prompt: !!,LRD(1)
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!,"WANT TO STOP LOOPING "
  • Line Location: A+0
Routine Call
  • DIC
  • Line Location:
    • E+5
Routine Call
  • DIE
  • Line Location:
    • E+6
    • A

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRD(65 - [#65] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(65 E+3, E+4, I
^LAB(66 - [#66] SD, ST
^LRD(65 - [#65] SD, ST, ABO, RH
^TMP($J SD*, ST*, I+3, I+4

Label References

Name Line Occurrences
@( I+3
A I+4
ABO E+6, A+1
ASK ASK+1, I+3
E E+1, E+4, E+5, E+7, ASK+2, I+5
END E, EN+1, EN+2, EN+3, ASK, I, I+2
I I
RH E+6, A+1

Naked Globals

Name Field # of Occurrence
^(0 I
^(3 E+4, I
^(4 E+4, I

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+3*, A*
%DT I+2*!
%DT("A" I+2*
%DT(0 I+2*
>> A SD*, ST*, ABO*, RH*, EN+2*
>> DA E+6*, A*
DIC E+5*!
DIC("S" E+5*
DIC(0 E+5*
>> DIE E+6*, ASK+2*, A*
>> DR E+6*, A*
DTIME ASK, I
DUZ EN+1
>> LR E+1, E+2
>> LR("M" EN+1*
>> LR(2 E+1
>> LR(3 ASK+2*
>> LRA SD, ST, I+1*, I+3, I+4*
>> LRAA(4 EN+1
>> LRB I+2*, I+3
>> LRCAPA E+6, ABO+1, RH+1, EN+2, A+1
>> LRD I+4*, A
>> LRD(1 I+4*, A
LRE EN+1!, I+4, I+5, A*
>> LRQ EN+3*
LRT ABO!*, RH!*, EN+2!, EN+3!
LRT( ABO*, RH*, EN+2
>> LRW( EN+2*
>> LRW("ABO" ABO
>> LRW("RH" RH
>> LRW(10 E*, E+6, A*, A+1
>> LRW(11 E*, E+6, A*, A+1
>> LRX E+6*, ABO, RH, A*
>> T SD*
U ASK, I
X SD*, ST*, E*, E+1, E+2, E+3!, E+4, EN+1*, EN+2*, ASK*
, ASK+1, ASK+2, I*, I+1
>> Y SD*, ST, E+5, E+6, EN+1, EN+2*, I+2, I+3*, A
>> Y(1 SD*
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