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

Package: Lab Service

Routine: LRTSTSET


Information

LRTSTSET ;SLC/CJS/JAH - JAM TESTS ONTO (OR OFF) ACCESSIONS ; 04-Feb-2014 15:40 ; MKK

Source Information

Source file <LRTSTSET.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Lab Service 6 NEW^LR7OB1  $$VER^LR7OU1  DADD^LRBEBA31  OT^LROR6  ADDTST^LRTSTJAM  CAP^LRWLST12  
IHS Changes To Lab 4 ^BLRALAF  ADDTST^BLRDIAG  ^BLREVTQ  $$ADDON^BLRUTIL  
VA Fileman 2 ^DIC  (,UPDATE)^DIE  
Automated Lab Instruments 1 EN^LA7ADL  
Kernel 1 ($$DT,$$FMTE,$$HTFM,$$NOW)^XLFDT  
Order Entry Results Reporting 1 FILE^ORX  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LR7OMERG  LRPHSET2  LRTSTJAM  

Entry Points

Name Comments DBIA/ICR reference
69
SETOR ; EP
EN ;
B ; Q:$D(LRPHSET) W !?5,$P(^LAB(60,LRTS,0),U,1)," ADDED" K DIC("B") Q:$D(LRTSAD(2)) G ADDTST^LRTSTJAM
TRYAGAIN ; EP

External References

Name Field # of Occurrence
^BLRALAF B+5
ADDTST^BLRDIAG 69+17
^BLREVTQ B+7
$$ADDON^BLRUTIL B+5
^DIC EN+11
^DIE 69+6
UPDATE^DIE TRYAGAIN+4
EN^LA7ADL EN+5
NEW^LR7OB1 SETOR+16
$$VER^LR7OU1 SETOR+1
DADD^LRBEBA31 69+9
OT^LROR6 SETOR+2
ADDTST^LRTSTJAM EN+1, B+7
CAP^LRWLST12 EN+3, EN+7
FILE^ORX SETOR+12
$$DT^XLFDT TRYAGAIN+16
$$FMTE^XLFDT 69+13
$$HTFM^XLFDT TRYAGAIN+16
$$NOW^XLFDT 69+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,"Sorry This accession "_LRAN_" No longer exist",!?10," Accession may have been deleted.",!,$C(7)
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?7,"Someone else is editing this order",!,$C(7)
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !?5,$P(^LAB(60,LRTS,0),U,1)," ADDED"
  • Line Location: B+0
Function Call: WRITE
  • Prompt: !?5,$P(^LAB(60,LRTS,0),U,1)," ADDED"
  • Line Location: B+7
Routine Call
  • DIE
  • Line Location:
    • TRYAGAIN+4
Routine Call
  • DIE
  • Line Location:
    • 69+6
Routine Call
  • DIC
  • Line Location:
    • EN+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] SETOR+3
^LAB(60 - [#60] EN+11, SETOR+8, SETOR+10, B+7
^LAB(61 - [#61] SETOR+7
^LAB(62 - [#62] SETOR+7
^LAB(62.05 - [#62.05] SETOR+9
^LAB(69.9 - [#69.9] SETOR+10, SETOR+11
^LR - [#63] SETOR+3
^LRO(68 - [#68] EN+1, EN+2*, EN+3*, EN+4, EN+5, EN+6*, EN+7*, 69+1, B+5
^LRO(69 - [#69] EN+8, 69+8, 69+14, 69+15*, 69+19, SETOR+3, SETOR+6, SETOR+13*, SETOR+17
^ORD(100.99 - [#100.99] SETOR+2
^SC("C" SETOR+6
^XTMP("LRTSTSET" TRYAGAIN+12*, TRYAGAIN+13*, TRYAGAIN+14*, TRYAGAIN+15*, TRYAGAIN+16*

Label References

Name Line Occurrences
TRYAGAIN EN+13

Naked Globals

Name Field # of Occurrence
^( 69+14*, SETOR+3, SETOR+6
^(0 EN+2*, EN+3*, EN+6*, 69+14*, SETOR+6, SETOR+7, SETOR+10
^(1 SETOR+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BLRLOG B+7
>> BLROPT B+4*, B+7
>> BLROPT(0 B+4*
DA EN+9!, 69+2*, 69+19!, SETOR+11*, SETOR+17!
DA(1 EN+10*
DA(2 EN+10*
DIC EN+9!, EN+10*, 69+2, 69+19!, SETOR+17!
DIC("B" B+7!
DIC(0 EN+11*
DIE EN+9!, 69+2*, 69+19!, SETOR+17!
DLAYGO EN+11*, 69+19!, SETOR+17!
DR EN+9!, 69+2*, 69+4*, 69+5*, 69+19!, SETOR+17!
DT 69+14
DUZ 69+14
DUZ(2 B+5
ERRS TRYAGAIN+1~, TRYAGAIN+5
FDA TRYAGAIN+1~, TRYAGAIN+13
FDA( TRYAGAIN+3*
IENARRAY TRYAGAIN+1~, TRYAGAIN+14
IENARRAY(1 TRYAGAIN+7
IENS TRYAGAIN+1~, TRYAGAIN+2*, TRYAGAIN+3
>> LRAA EN+1, EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, 69+1, B+5, B+7
>> LRACD EN+4*, EN+6, EN+7
>> LRAD EN+1, EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, 69+1, B+5, B+7
>> LRAN EN+1, EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, 69+1, B+5, B+7
LRBEFN SETOR+17!
LRBERF 69+9, 69+10!, SETOR+17!
LRBETN 69+8*, 69+9, 69+10!
LRBEX SETOR+17!
LRFLG 69+19, SETOR+14!
>> LRIDT B+5*
LRLB SETOR+3*, SETOR+9, SETOR+14!
>> LRNATURE SETOR+2*, SETOR+16
>> LRODT EN+8, EN+10, 69+8, 69+9, 69+14, 69+15, 69+17, 69+19, SETOR+3, SETOR+6
, SETOR+11, SETOR+13, SETOR+16, SETOR+17, B+7, TRYAGAIN+2, TRYAGAIN+12, TRYAGAIN+13, TRYAGAIN+14, TRYAGAIN+15
LRORSAMP SETOR+5*, SETOR+7, SETOR+14!
LRORSPEC SETOR+6*, SETOR+7, SETOR+14!
LRORTYPE SETOR+5*, SETOR+9, SETOR+14!
>> LRPARAM EN+3, EN+7
>> LRPHSET B+3
>> LRSN EN+8, EN+10, 69+8, 69+9, 69+14, 69+15, 69+17, 69+19, SETOR+3, SETOR+6
, SETOR+11, SETOR+13, SETOR+16, SETOR+17, B+7, TRYAGAIN+2, TRYAGAIN+12, TRYAGAIN+13, TRYAGAIN+14, TRYAGAIN+15
>> LRSS B+5*
>> LRTS EN+2, EN+3, EN+4, EN+6, EN+7, EN+11, 69+9, 69+17, SETOR+8, SETOR+15
, B+7, TRYAGAIN+3, TRYAGAIN+7, TRYAGAIN+12, TRYAGAIN+13, TRYAGAIN+14, TRYAGAIN+15
>> LRTSAD(1 EN+4*
>> LRTSAD(2 B+7
>> LRTSP EN+2, 69+7, 69+8
>> LRURG EN+2, EN+6, SETOR+9
LRXDA EN+9!, 69+2*, 69+9, 69+11, 69+14, 69+19!, SETOR+1, SETOR+6, SETOR+11, SETOR+13
, SETOR+14!
LRXDA(3 69+1*, 69+3, 69+5
LTS SETOR+15~, SETOR+16
LTS( SETOR+15*
>> NOW TRYAGAIN+11*, TRYAGAIN+12, TRYAGAIN+13, TRYAGAIN+14, TRYAGAIN+15
>> OREPDUZ SETOR+4*
>> ORIFN SETOR+13
>> ORIT SETOR+6*, SETOR+10
>> ORL SETOR+5*, SETOR+6*
>> ORLOG SETOR+4*
>> ORNATR SETOR+2*, SETOR+4*
>> ORNP SETOR+5*
>> ORPCL SETOR+10*, SETOR+11*
>> ORPK SETOR+11*
>> ORPURG SETOR+10*
>> ORSTRT SETOR+6*
>> ORSTS SETOR+10*
>> ORTO SETOR+10*
>> ORTX(1 SETOR+8*, SETOR+9*
>> ORVP SETOR+3*
U EN+2, EN+3, EN+6, EN+7, 69+3, 69+5, B+4, B+5, B+7
X EN+11*, 69+12~, 69+14*, SETOR+3*, SETOR+4, SETOR+5, SETOR+6*, SETOR+7*, SETOR+8
>> X1 SETOR+3*, SETOR+6
>> XQY0 B+4
Y EN+13, 69, 69+2, 69+12~, 69+13*, 69+14, SETOR+7*, SETOR+8, TRYAGAIN+5*, TRYAGAIN+7*
, TRYAGAIN+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All