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

Package: Lab Service

Routine: LRBLPBR


Information

LRBLPBR ; IHS/DIR/FJE - BB TESTS REPORT 3/28/94 11:59 ;

Source Information

Source file <LRBLPBR.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 4 ^LRBLPBR1  ^LRDPA  (L,S,SSN,V,YN)^LRU  (,BEG,END)^LRUTL  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Lab Service 4 LRBLP ADD  LRBLP DELETE  LRBLP PRINT ALL ON QUEUE  LRBLP PRINT SINGLE  
IHS View Patient Record 1 BVPRP  

Entry Points

Name Comments DBIA/ICR reference
A
C
SET ;S W=^LR(LRDFN,0),Y=$P(W,"^",3),(LRDPF,P)=$P(W,"^",2),X=^DIC(P,0,"GL"),X=@(X_Y_",0)"),Z=+$G(^(.104)),Z(1)="^"_$P($G(^DD(P,.104,0)),"^",3),SSN=$P(X,"^",9) D SSN^LRU
END
L
DEV
LST
CH
QUE
SGL
GETP
DEL

External References

Name Field # of Occurrence
^LRBLPBR1 LST+1
^LRDPA GETP, SGL
L^LRU QUE
S^LRU QUE
SSN^LRU SET+1
V^LRU END
YN^LRU CH, DEV, DEL
^LRUTL A
BEG^LRUTL DEV+1
END^LRUTL LST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!?3,"No blood bank data for ",LRP
  • Line Location: GETP+0
Function Call: WRITE
  • Prompt: !!,"Save reports for reprinting "
  • Line Location: CH+0
Function Call: WRITE
  • Prompt: !!,"Print component requests "
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: $C(7),!?3,"No blood bank data for ",LRP
  • Line Location: SGL+0
Function Call: WRITE
  • Prompt: $C(7),!!,"OK TO DELETE THE ",LRAA(1)," TEST REPORT QUEUE LIST"
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: $C(7),!,"LIST DELETED !"
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: !!,"FINE, LET'S FORGET IT",!
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !?30,"(",X," patient",$S(X>1:"s",1:""),")"
  • Line Location: C+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NO BLOOD BANK PATIENTS ON THE TEST REPORT QUEUE",!!
  • Line Location: L+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( SET+1
^DD(63.01 QUE
^DIC - [#1] SET+1
^LR - [#63] GETP, SET+1, SET+3, SGL
^LRO(69.2 - [#69.2] GETP+1*, QUE+2, LST+2!*, DEL!*, C, L
^TMP("LRBL" QUE!, LST+1, LST+3!, SET+5*
^VA(200 - [#200] SET+3

Label References

Name Line Occurrences
A GETP, CH, SGL, DEL
C CH, DEL
DEV SGL+2
END GETP, CH, DEV+1, LST+3, SGL, DEL, A
GETP GETP, GETP+2
L CH, DEL
LST QUE+1
SET QUE+1, QUE+2
SGL SGL

Naked Globals

Name Field # of Occurrence
^( LST+1, SET+1, SET+3
^(0 GETP+1*, SET+2, SET+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CH*, DEV*, DEL*
>> A QUE+2*
>> DFN SET+1*
DIC GETP!, SGL!
>> G CH, LST*, LST+1*, DEL, L*
>> HRCN SET+5
IO QUE
IOF LST+3
IOST LST+3
>> LR LST+1*
>> LR("Q" LST+1
>> LR("S" QUE+1, SGL+2*
>> LRAA GETP, GETP+1, CH, QUE+2, LST+2, SGL, DEL, C, L
>> LRAA(1 DEL
>> LRAPX CH*
>> LRDFN GETP, GETP+1, QUE+2*, LST+1*, SET+1, SET+3, SET+5, SGL
>> LRDPAF SGL*
>> LRDPF SET+1*
>> LRLLOC GETP+1, QUE+2*, SET+5, SGL+1*
>> LRMD SET+2*, SET+3*, SET+5
>> LRN( QUE*
>> LRN(2 DEV*
>> LRP GETP, SGL
>> LRSAV CH*, LST+2, SGL+2*
>> N LST+1*
>> P SET+1*
>> POP DEV+1
>> SSN SET+1*
U C
>> W SET+1*, SET+5
>> X GETP+1*, QUE*, SET+1*, SET+5, C*, A*
>> Y SET+1*, DEL
>> Z SET+1*, SET+2, SET+3*
>> Z(1 SET+1*, SET+2
>> ZTRTN DEV+1*
>> ZTSK DEV+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All