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

Package: IHS Changes To Lab

Routine: BLRUER


Information

BLRUER ;IHS/MSC/MKK - ERROR TRACKING TASKED REPORT ;2/18/98 07:03 ;

Source Information

Source file <BLRUER.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
IHS Changes To Lab 2 (EEP,PRESSKEY)^BLRGMENU  ENTRYAUD^BLRUTIL  
Kernel 2 ($$DT,$$FMTE,$$HTFM)^XLFDT  EN^XUTMDEVQ  
Lab Service 2 (F,L,M,SSN,V)^LRU  END^LRUTL  
VA Fileman 2 $$FIND1^DIC  $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
A ; EP
BEGIN ; EP - Beginning
SET ; EP
END ; EP
W1 ; EP
P1 ; EP
H1 ; EP
H2 ; EP
H ; EP
B ; EP
EEP ; EP - Ersatz EP
DEBUGFOR ; EP - Check the FOR loop
P ; EP
DONTASK ; EP
QUE ; EP
W ; EP
GETPARAM ; EP - Get the parameters from the IHS LAB SUPERVISOR TASKED REPORTS PARAMETERS (#90475.7) file
X ; EP
TST ; EP

External References

Name Field # of Occurrence
EEP^BLRGMENU EEP+1
PRESSKEY^BLRGMENU BEGIN+3
ENTRYAUD^BLRUTIL DONTASK+16, QUE+14
$$FIND1^DIC DEBUGFOR+25
$$GET1^DIQ GETPARAM+7, GETPARAM+8, GETPARAM+9, GETPARAM+10, GETPARAM+11, GETPARAM+12, GETPARAM+13, GETPARAM+14, GETPARAM+15, GETPARAM+16
, QUE+11, DEBUGFOR+7, DEBUGFOR+8, DEBUGFOR+9, DEBUGFOR+10, DEBUGFOR+11, DEBUGFOR+12, DEBUGFOR+13, DEBUGFOR+14, DEBUGFOR+15
, DEBUGFOR+23, DEBUGFOR+26, DEBUGFOR+28
F^LRU H+2
L^LRU QUE+6
M^LRU H+1
SSN^LRU P+2
V^LRU END+1
END^LRUTL QUE+16
$$DT^XLFDT DONTASK+5, DEBUGFOR+18, DEBUGFOR+38
$$FMTE^XLFDT DONTASK+6, DONTASK+7, P+1, DEBUGFOR+19, DEBUGFOR+20, DEBUGFOR+40, DEBUGFOR+41
$$HTFM^XLFDT DONTASK+4, DEBUGFOR+17, DEBUGFOR+37
EN^XUTMDEVQ DONTASK+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?4,"This report can only be run from TASKMAN."
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: !!,LRA_" "_LRB,?14,LRDATE,?34,LRP," ",HRCN,?67,LRS
  • Line Location: P+3
Function Call: WRITE
  • Prompt: !?5,B(1)
  • Line Location: P+4
Function Call: WRITE
  • Prompt: !?5,$P(^LR(LRDFN,"CH",LRI,1,"AC",B,C),"^",3)
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>60
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: " (deleted by ",$S($P(X,"^",2)]"":$P(X,"^",2),1:$P(X,",")),")"
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: B+1
Function Call: WRITE
  • Prompt: "Test(s) ordered:"
  • Condition for execution: E=1
  • Line Location: B+1
Function Call: WRITE
  • Prompt: ?18,$P($G(^LAB(60,C,0)),"^"),?49,"Tech: ",J
  • Line Location: B+1
Function Call: WRITE
  • Prompt: !,LRC(1)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $L(LRC(1))>44
  • Line Location: H+2
Function Call: WRITE
  • Prompt: " From: ",LRSTR," To: ",LRLST,!,"Acc #",?14,"Date/Time",?34,"Name/HRCN",?67,"Specimen",!,LR("%")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LRA," ",LRB,?14,LRDATE,?34,LRP," ",HRCN," ",LRS
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: !,"Test(s) ordered:"
  • Line Location: H2+1
Function Call: WRITE
  • Prompt: ?4,"GPD1:",GPD1," -- ",$$GET1^DIQ(4,GPD1,.01),!
  • Line Location: DEBUGFOR+28
Function Call: WRITE
  • Prompt: ?9,"DUZ2:",DUZ2,"; DUZ2DESC:",DUZ2DESC,!
  • Line Location: DEBUGFOR+29
Function Call: WRITE
  • Prompt: ?9,"PREVREPT:",PREVREPT,!
  • Line Location: DEBUGFOR+30
Function Call: WRITE
  • Prompt: ?9,"SPECREJ:",SPECREJ,!
  • Line Location: DEBUGFOR+31
Function Call: WRITE
  • Prompt: ?9,"ACCDELC:",ACCDELC,!
  • Line Location: DEBUGFOR+32
Function Call: WRITE
  • Prompt: ?9,"LISTTEST:",LISTTEST,!
  • Line Location: DEBUGFOR+33
Function Call: WRITE
  • Prompt: ?9,"NEWPAGE:",NEWPAGE,!
  • Line Location: DEBUGFOR+34
Function Call: WRITE
  • Prompt: ?9,"DTRANGE:",DTRANGE,!
  • Line Location: DEBUGFOR+35
Function Call: WRITE
  • Prompt: ?9,"LRSDT:",LRSDT,?29,"LRLDT:",LRLDT,!
  • Line Location: DEBUGFOR+39
Function Call: WRITE
  • Prompt: ?9,"LRSTR:",LRSTR,?29,"LRLST:",LRLST,!
  • Line Location: DEBUGFOR+42
Function Call: WRITE
  • Prompt: ?9,"LRS:",LRS,?29,"LRE:",LRE,!
  • Line Location: DEBUGFOR+44
Function Call: WRITE
  • Prompt: ?9,"LRSDT:",LRSDT,?29,"LRLDT:",LRLDT,!
  • Line Location: DEBUGFOR+45
Routine Call
  • DIC
  • Line Location:
    • DEBUGFOR+25

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^%ZIS(1 - [#3.5] FIND1^DIC,  GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^BLRSITE - [#9009029] GET1^DIQ
90475.71 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRLSRP(1 DEBUGFOR+5
^DD("SITE" QUE+5
^DIC - [#1] P+2
^LAB(60 - [#60] TST+3, B+1
^LAB(61 - [#61] X+1
^LR - [#63] QUE+15, A+1, A+2, SET+1, P+2, P+4, P+5, P1+1
^LRO(68 - [#68] TST+1, TST+3
^LRO(69 - [#69] QUE+7, QUE+9
^TMP("LRDFN" QUE+4!, QUE+10*, QUE+13, QUE+15, QUE+16!
^TMP($J QUE+4!, SET+1*, W+1, W1+1, X+1
^VA(200 - [#200] P1+1, B+1

Label References

Name Line Occurrences
A QUE+15
B TST+3
DONTASK GETPARAM+22
END GETPARAM+24, DONTASK+18, QUE+16
H QUE+6, W+1, P+3, H1+1
H1 P+4, P+5, H2+1
H2 B+1
P X+1
P1 P+5
SET A+1, A+2
TST P+3
W QUE+16
W1 W+1
X W1+1

Naked Globals

Name Field # of Occurrence
^( QUE+9, X+1, P+4, TST+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DONTASK+11!, DONTASK+13*, DONTASK+17
A QUE+3~, QUE+15*, W+1*
ACCDELC GETPARAM+1~, GETPARAM+12*, DONTASK+2, DEBUGFOR+1~, DEBUGFOR+12*, DEBUGFOR+32
B QUE+3~, QUE+7*, QUE+9, A+2*, W+1*, P+4*, P+5*, P1+1
B(1 P+4*
C QUE+3~, P+5*, P1+1, TST+3*, B+1
D QUE+3~
D1 GETPARAM+1~, DEBUGFOR+1~
D1IEN GETPARAM+1~, GETPARAM+6*, GETPARAM+7, GETPARAM+8, GETPARAM+9, GETPARAM+10, GETPARAM+11, GETPARAM+12, GETPARAM+13, GETPARAM+14
, GETPARAM+15, GETPARAM+16, DEBUGFOR+1~, DEBUGFOR+6*, DEBUGFOR+7, DEBUGFOR+8, DEBUGFOR+9, DEBUGFOR+10, DEBUGFOR+11, DEBUGFOR+12
, DEBUGFOR+13, DEBUGFOR+14, DEBUGFOR+15, DEBUGFOR+23
DEVDESC GETPARAM+1~, DEBUGFOR+1~, DEBUGFOR+26*
DEVICE GETPARAM+1~, GETPARAM+16*, GETPARAM+20, DONTASK+15, DEBUGFOR+1~, DEBUGFOR+23*, DEBUGFOR+24, DEBUGFOR+25*, DEBUGFOR+26
>> DFN P+2*
>> DTRANGE GETPARAM+15*, DONTASK+4, DEBUGFOR+15*, DEBUGFOR+17, DEBUGFOR+35, DEBUGFOR+37
DUZ(2 QUE+11
DUZ2 GETPARAM+1~, GETPARAM+7*, GETPARAM+8*, DEBUGFOR+1~, DEBUGFOR+7*, DEBUGFOR+8*, DEBUGFOR+29
DUZ2DESC GETPARAM+1~, GETPARAM+9*, DEBUGFOR+1~, DEBUGFOR+9*, DEBUGFOR+29
E QUE+3~, P+5*, TST+3*, B+1*, H2+1*
E(1 TST+3*
G QUE+3~, TST+1*, TST+2*, TST+3
GPD0 GETPARAM+1~, GETPARAM+4*, GETPARAM+6
GPD1 GETPARAM+1~, GETPARAM+4*, GETPARAM+6, DEBUGFOR+4*, DEBUGFOR+5*, DEBUGFOR+6, DEBUGFOR+28
>> HRCN P+3, H1+1
I QUE+8~, QUE+9*
IO QUE+2
IOP DONTASK+11!, DONTASK+15*
IOSL P+3, P+4, P+5, B+1
IOST H+1
J QUE+3~, B+1*
LISTTEST GETPARAM+1~, GETPARAM+13*, DONTASK+9, DEBUGFOR+1~, DEBUGFOR+13*, DEBUGFOR+33
>> LR( TST+1*, TST+3
>> LR("%" H+2
>> LR("F" QUE+6*, H+1
>> LR("Q" QUE+5*, W+1, W1+1, X+1, P+3, P+4, P+5, TST+3, B+1, H+1
, H1+1, H2+1
>> LRA W+1*, W1+1, X+1, P+3, TST+1, TST+3, H1+1
>> LRB W+1*, W1+1, X+1, P+3, TST+1, TST+2, H1+1
>> LRC W+1*
>> LRC(1 DONTASK+1*, A+2, H+2
>> LRC(2 DONTASK+2*, A+1
>> LRC(3 DONTASK+3*, A+2
>> LRDATE P+1*, P+3, H1+1
LRDFN QUE+3~, QUE+15*, A+1, A+2, SET+1, W1+1*, X+1, P+2, P+4, P+5
, P1+1
>> LRDPF P+2*
>> LRE DONTASK+8*, QUE+7, DEBUGFOR+21*, DEBUGFOR+43*, DEBUGFOR+44
>> LRF DONTASK+9*, P+3
>> LRI QUE+15*, A+1, A+2, SET+1, X+1*, P+4, P+5, P1+1
>> LRL DONTASK+10*, W+1
>> LRLDT DONTASK+5*, DONTASK+7, DONTASK+8*, QUE+15, DEBUGFOR+18*, DEBUGFOR+20, DEBUGFOR+21*, DEBUGFOR+38*, DEBUGFOR+39, DEBUGFOR+41
, DEBUGFOR+43*, DEBUGFOR+45
>> LRLST DONTASK+7*, H+2, DEBUGFOR+20*, DEBUGFOR+41*, DEBUGFOR+42
>> LRP P+2*, P+3, H1+1
>> LRQ QUE+5*
>> LRQ(1 QUE+5*
>> LRS DONTASK+8*, QUE+7, X+1*, P+3, H1+1, DEBUGFOR+21*, DEBUGFOR+43*, DEBUGFOR+44
>> LRSDT DONTASK+4*, DONTASK+6, DONTASK+8*, QUE+15, DEBUGFOR+17*, DEBUGFOR+19, DEBUGFOR+21*, DEBUGFOR+37*, DEBUGFOR+39, DEBUGFOR+40
, DEBUGFOR+43*, DEBUGFOR+45
>> LRSTR DONTASK+6*, H+2, DEBUGFOR+19*, DEBUGFOR+40*, DEBUGFOR+42
>> LRT W1+1*, X+1, P+1, TST+1
LRX QUE+3~, TST+3*, B+1
NEWPAGE GETPARAM+1~, GETPARAM+14*, DONTASK+10, DEBUGFOR+1~, DEBUGFOR+14*, DEBUGFOR+34
PREVREPT GETPARAM+1~, GETPARAM+10*, DONTASK+1, DEBUGFOR+1~, DEBUGFOR+10*, DEBUGFOR+30
SHOTMP QUE+12~
SHOTMP("LRDFN" QUE+13*
SPECREJ GETPARAM+1~, GETPARAM+11*, DONTASK+1, DEBUGFOR+1~, DEBUGFOR+11*, DEBUGFOR+31
>> SSN P+2*
TRANGE GETPARAM+1~, DEBUGFOR+1~
U TST+3, B+1
V QUE+3~, P+2*
X QUE+3~, QUE+8~, QUE+9*, QUE+10, SET+1*, X+1*, P+2*, P1+1*, TST+1*, TST+2
Y QUE+3~, SET+1*, P+2*
Z QUE+3~, TST+1*, TST+3
>> ZTQUEUED BEGIN+1, BEGIN+4, QUE+1
>> ZTREQ BEGIN+4*, QUE+1*
>> ZTSAVE DONTASK+17
>> ZTSAVE("*" DONTASK+12*
ZTSK DONTASK+11!
Info |  Source |  Call 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