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

Package: Lab Service

Routine: LRWRKLS1


Information

LRWRKLS1 ;DALOI/STAFF - LRWRKLST, CONT. ;12/06/10 17:05

Source Information

Source file <LRWRKLS1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 $$S^%ZTLOAD  ($$FMTE,$$HTE)^XLFDT  $$NS^XUAF4  
Lab Service 3 PRAC^LR7OMERG  GETDATA^LRUEPR  (DASH,PT)^LRX  
VA FileMan 3 $$GET1^DID  $$GET1^DIQ  ^DIR  

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

Package Total Caller Graph
Lab Service 2 LRHYLS1  LRWRKLST  

Entry Points

Name Comments DBIA/ICR reference
LST1 ;from LRWRKLST
TSTCOM ; Display test comments
CHKPAGE ;
LEDI ; print LEDI information

External References

Name Field # of Occurrence
$$S^%ZTLOAD CHKPAGE+5
$$GET1^DID LEDI+12, LEDI+13, LEDI+18
$$GET1^DIQ LST1+34, LST1+43, TSTCOM+13, LEDI+9, LEDI+16
^DIR CHKPAGE+15
PRAC^LR7OMERG LST1+41
GETDATA^LRUEPR LEDI+30
DASH^LRX LST1+17
PT^LRX LST1+7
$$FMTE^XLFDT LST1+13, LST1+14, LST1+15, LST1+27
$$HTE^XLFDT CHKPAGE+8
$$NS^XUAF4 LEDI+33

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LST1+17
Function Call: WRITE
  • Prompt: !,"ACCESSION: ",LRACC,?40,"PATIENT: ",PNM
  • Line Location: LST1+23
Function Call: WRITE
  • Prompt: !," ORDER #: ",LRCE,?41,"SSN/ID: ",SSN,!
  • Line Location: LST1+24
Function Call: WRITE
  • Prompt: ?44,"DOB: ",$$FMTE^XLFDT(DOB,"MZ")
  • Line Location: LST1+27
Function Call: WRITE
  • Prompt: !," LOCATION: ",$E($P(LRDX,"^",7),1,19)
  • Line Location: LST1+28
Function Call: WRITE
  • Prompt: !," PROVIDER: ",LRX
  • Line Location: LST1+36
Function Call: WRITE
  • Prompt: !?11,$$GET1^DIQ(200,PR_",",.01)
  • Line Location: LST1+43
Function Call: WRITE
  • Prompt: !," Order Comment:"
  • Line Location: LST1+54
Function Call: WRITE
  • Prompt: !?11,^(I,0)
  • Line Location: LST1+56
Function Call: WRITE
  • Prompt: !," CANCELED TEST: ",$P($G(^LAB(60,+LRX,0),"UNKNOWN"),"^")
  • Line Location: TSTCOM+11
Function Call: WRITE
  • Prompt: " "_$E($P($G(^LAB(62.05,+$P(LRX,"^",2),0),"ROUTINE"),"^"),1,15)
  • Line Location: TSTCOM+12
Function Call: WRITE
  • Prompt: " by: "_$$GET1^DIQ(200,+$P(LRX,"^",11)_",",.01)
  • Line Location: TSTCOM+13
Function Call: WRITE
  • Prompt: !?3,": "_LRY
  • Line Location: TSTCOM+17
Function Call: WRITE
  • Prompt: !," Accession Comment: ",LRACO
  • Line Location: TSTCOM+20
Function Call: WRITE
  • Prompt: !
  • Line Location: TSTCOM+22
Function Call: WRITE
  • Prompt: !!,"*** Report requested to stop by TaskMan ***"
  • Line Location: CHKPAGE+7
Function Call: WRITE
  • Prompt: !,"*** Task #",$G(ZTQUEUED,"UNKNOWN")," stopped at ",$$HTE^XLFDT($H)," ***"
  • Line Location: CHKPAGE+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKPAGE+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: LEDI+11
Function Call: WRITE
  • Prompt: $J($$GET1^DID(68.02,16.2,"","LABEL")_": ",17),$E(LRX,1,20)
  • Line Location: LEDI+12
Function Call: WRITE
  • Prompt: ?40,$$GET1^DID(68.02,16.4,"","LABEL"),": ",LRUID
  • Line Location: LEDI+13
Function Call: WRITE
  • Prompt: !,$J($$GET1^DID(68.02,16.1,"","LABEL")_": ",17),$E(LRX,1,20)
  • Line Location: LEDI+18
Function Call: WRITE
  • Prompt: !,?4,LRON(0)_$S(LRTYPE=3:" placer",1:" filler")_" order # "_LRON
  • Line Location: LEDI+34
Routine Call
  • DIR
  • Line Location:
    • CHKPAGE+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
68.02 GET1^DID,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] TSTCOM+11
^LAB(62.05 - [#62.05] TSTCOM+12
^LR - [#63] LST1+4, LST1+6, LEDI+27, LEDI+29
^LRO(68 - [#68] LST1+3, LST1+10, LST1+12, LST1+25, LEDI+7, LEDI+21, LEDI+22
^LRO(69 - [#69] LST1+53, LST1+56, TSTCOM+8, TSTCOM+9, TSTCOM+15, TSTCOM+16

Label References

Name Line Occurrences
CHKPAGE LST1+1, LST1+20, LST1+45, LST1+56, TSTCOM+18
LEDI LST1+49

Naked Globals

Name Field # of Occurrence
^( LST1+3, LST1+56
^(0 LST1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN LST1+6*
DIR CHKPAGE+13~
DIR(0 CHKPAGE+14*
DIROUT CHKPAGE+13~
DIRUT CHKPAGE+13~, CHKPAGE+16
>> DOB LST1+27
DUOUT CHKPAGE+13~
>> I LST1+55*, LST1+56*
IOSL CHKPAGE+11
IOST CHKPAGE+10
>> LN LST1+19*, LST1+38*, LST1+43*, LST1+54*, LST1+56*, TSTCOM+14*, TSTCOM+18*, TSTCOM+20*, TSTCOM+22*, CHKPAGE+11
, CHKPAGE+17*, LEDI+14*, LEDI+19*
>> LRAA LST1+3, LST1+10, LST1+12, LST1+25, LST1+41, LEDI+7, LEDI+21, LEDI+22
>> LRACC LST1+3*, LST1+23
>> LRACO LST1+9*, LST1+12*, TSTCOM+20
>> LRAD LST1+3, LST1+10, LST1+12, LST1+25, LST1+41, LEDI+7, LEDI+21
>> LRAN LST1+3, LST1+10, LST1+12, LST1+25, LST1+41, LEDI+7, LEDI+21
>> LRCE LST1+3*, LST1+24
LRDATA LEDI+28~, LEDI+30
LRDATA( LEDI+31, LEDI+33
LRDFN LEDI+4~, LEDI+6*, LEDI+24, LEDI+27, LEDI+29
>> LRDLA LST1+9*, LST1+14*, LST1+37
>> LRDLC LST1+9*, LST1+13*, LST1+31
>> LRDPF LST1+6*
>> LRDTO LST1+15*, LST1+29
>> LRDX LST1+3*, LST1+4, LST1+6, LST1+15, LST1+28, LST1+30, LST1+33, LST1+52, TSTCOM+22, LEDI+6
>> LREND CHKPAGE+16*
LRI TSTCOM+2~, TSTCOM+7*, TSTCOM+8*, TSTCOM+9, TSTCOM+15, TSTCOM+16
LRI(2 TSTCOM+14*, TSTCOM+15*, TSTCOM+16
LRIDT LEDI+4~, LEDI+22*, LEDI+23, LEDI+24
LRIENS LEDI+4~, LEDI+7*, LEDI+9, LEDI+16, LEDI+24*, LEDI+27, LEDI+29
LRJ LEDI+28~, LEDI+29*
LRON LEDI+28~, LEDI+31*, LEDI+32, LEDI+34
LRON(0 LEDI+31*, LEDI+33*, LEDI+34
>> LRPRAC LST1+33*, LST1+34, LST1+35
LRREF LEDI+28~, LEDI+29*, LEDI+30, LEDI+31, LEDI+33
LRSS LEDI+4~, LEDI+22*, LEDI+24
>> LRSTOP LST1+2, LST1+21, LST1+46, LST1+56, TSTCOM+4, TSTCOM+15, CHKPAGE+6*, CHKPAGE+10, CHKPAGE+16*
LRTYPE LEDI+4~, LEDI+27*, LEDI+29, LEDI+34
LRUID LEDI+4~, LEDI+9*, LEDI+10, LEDI+13
LRX LST1+33*, LST1+34*, LST1+35*, LST1+36, TSTCOM+2~, TSTCOM+9*, TSTCOM+10, TSTCOM+11, TSTCOM+12, TSTCOM+13
, LEDI+4~, LEDI+9*, LEDI+10, LEDI+12, LEDI+16*, LEDI+17, LEDI+18
LRY LST1+11~, LST1+12*, LST1+13, LST1+14, TSTCOM+2~, TSTCOM+16*, TSTCOM+17, LEDI+4~, LEDI+7*, LEDI+9
, LEDI+21*, LEDI+22
>> PNM LST1+23
PR LST1+40~, LST1+42*, LST1+43*
PRAC LST1+40~, LST1+41
PRAC( LST1+43
>> SSN LST1+24
U LST1+6, LST1+12, LST1+30, LST1+52, TSTCOM+22
X LST1+25*, LST1+26, CHKPAGE+13~
>> X1 LST1+52*, LST1+53, LST1+56, TSTCOM+8, TSTCOM+9, TSTCOM+15, TSTCOM+16
>> X2 LST1+52*, LST1+53, LST1+56, TSTCOM+8, TSTCOM+9, TSTCOM+15, TSTCOM+16
Y CHKPAGE+13~
>> ZTQUEUED CHKPAGE+5, CHKPAGE+8, CHKPAGE+10
>> ZTSTOP CHKPAGE+6*
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