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

Package: Lab Service

Routine: LRWRKLST


Information

LRWRKLST ;DALOI/STAFF - LONG ACCESSION LIST ;Mar 22, 2021@17:48

Source Information

Source file <LRWRKLST.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Lab Service 7 $$STATUS^LREVENT  GETDATA^LRUEPR  (CHKPAGE,LST1)^LRWRKLS1  ADATE^LRWU  (LRAN,STAR)^LRWU3  ^LRWU4  URG^LRX  
Kernel 5 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$NS^XUAF4  
VA FileMan 2 ^DIC  ^DIR  
Registration 1 KVAR^VADPT  

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

Package Total Caller Graph
Lab Service 4 LR LOOKUP ACCESSION  LRACC1  LRMIACC1  LRVR  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
W ; from LRVER, LRVR
; Added to protect "%*" variables from %ZTLOAD corruption
ENT ;
TD ; Check tests on accession to determine if meets criteria to display.
; If incomplete only (LRUNC=1) and complete date then skip
; If not specific test selected (LRTSE=file #60 ien) then skip
; Otherwise set LRTST array with file #60 ien.
MICRO ;further evaluation for Microbiology test
TESTS ;
CHKAC() ;Are all tests complete?
TS2 ;
REF ; if referred test, display status and manifest
PHD ;
LST ;
HED ;
AC ;
LREND ;
EN ;
SINGLE ;
LR60DN(LRDN,LR60,LRTST) ; Retreive CH subscript dataname for a test

External References

Name Field # of Occurrence
^%ZIS W+27
^%ZISC W+28, W+34, ENT+23
^%ZTLOAD W+34
^DIC LRWRKLST+14, W+18
^DIR W+13, W+23
$$STATUS^LREVENT REF+10
GETDATA^LRUEPR REF+33
CHKPAGE^LRWRKLS1 TESTS+3, TS2+2
LST1^LRWRKLS1 LST+1, SINGLE+15
ADATE^LRWU PHD+3
LRAN^LRWU3 PHD+4
STAR^LRWU3 LRWRKLST+18
^LRWU4 SINGLE+8
URG^LRX ENT+9, SINGLE+4
KVAR^VADPT LREND+1
$$FMTE^XLFDT LRWRKLST+10, TS2+22
$$NOW^XLFDT LRWRKLST+10
$$NS^XUAF4 REF+17, REF+36

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Task ",$S($G(ZTSK):ZTSK,1:"NOT")," Queued"
  • Line Location: W+35
Function Call: WRITE
  • Prompt: !,$P(^(1),U,6)
  • Line Location: TESTS+16
Function Call: WRITE
  • Prompt: !,"ALL COMPLETED",!!
  • Line Location: TESTS+23
Function Call: WRITE
  • Prompt: !,"ALL COMPLETED",!!
  • Line Location: TESTS+25
Function Call: WRITE
  • Prompt: !," TEST: ",$P($G(^LAB(60,+LRXXX,0),"deleted test"),"^")
  • Line Location: TS2+6
Function Call: WRITE
  • Prompt: ?40,$S($D(LRURG(LRURG)):LRURG(LRURG),1:"")
  • Line Location: TS2+9
Function Call: WRITE
  • Prompt: ?55," LIST: ",$P($G(^LRO(68.2,+$P(LRXXX,U,3),0)),U,1)," ",$P($P(LRXXX,U,3),";",2,3)
  • Line Location: TS2+10
Function Call: WRITE
  • Prompt: !?3,": "_^(I,0)
  • Line Location: TS2+17
Function Call: WRITE
  • Prompt: !," COMPLETED: ",$$FMTE^XLFDT($P(LRXXX,U,5),"MZ")
  • Line Location: TS2+22
Function Call: WRITE
  • Prompt: !,?4,"REFERRAL STATUS..: "_$P(LREVNT,"^")_" ("_$P(LREVNT,"^",2)_")"
  • Line Location: REF+12
Function Call: WRITE
  • Prompt: !,?4,"SHIPPING MANIFEST: "_$P(LREVNT,"^",3)
  • Line Location: REF+13
Function Call: WRITE
  • Prompt: " using shipping config "_$P(LRSCFG(0),"^")
  • Line Location: REF+16
Function Call: WRITE
  • Prompt: !,?4,"SHIPPED TO.......: "_$P($$NS^XUAF4($P(LRSCFG(0),"^",3)),"^")
  • Line Location: REF+17
Function Call: WRITE
  • Prompt: !,?4,LRON(0)_$S(LRTYPE=3:" placer",1:" filler")_" order # "_LRON
  • Line Location: REF+37
Function Call: WRITE
  • Prompt: @IOF,!,"LONG FORM",?30,"NOT FOR WARD USE",!
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: "Accession Area: ",LRNAME,?40,LRDT,!!
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !,"Doesn't exist."
  • Line Location: SINGLE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: SINGLE+16
Routine Call
  • %ZIS
  • Line Location:
    • W+27
Routine Call
  • DIC
  • Line Location:
    • LRWRKLST+14
    • W+18
Routine Call
  • DIR
  • Line Location:
    • W+13
    • W+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(60 - [#60] Classic Fileman Calls
^LRO(68 - [#68] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] MICRO+4, TS2+6, LR60DN+3, LR60DN+8, LR60DN+9
^LAB(61 - [#61] TESTS+9
^LAB(62 - [#62] TESTS+10
^LAB(62.07 - [#62.07] MICRO+6
^LAHM(62.8 - [#62.8] REF+7, REF+9
^LAHM(62.9 - [#62.9] REF+8
^LR - [#63] MICRO+13, REF+30, REF+32
^LRO(68 - [#68] LRWRKLST+18, W+7, W+10, ENT+14, ENT+21, TD+7, TD+8, TD+10, TD+11, TD+13
, TD+14, MICRO+2, MICRO+3, MICRO+13, TESTS+6, TESTS+8, TESTS+22, CHKAC+2, CHKAC+3, CHKAC+4
, TS2+5, REF+4, REF+22, REF+23, AC+4, AC+6, AC+7, SINGLE+10, SINGLE+13
^LRO(68.2 - [#68.2] TS2+10
^LRO(69 - [#69] TESTS+15, TESTS+16, TS2+12, TS2+14, TS2+15, TS2+17

Label References

Name Line Occurrences
$$CHKAC TESTS+25
AC ENT+21
HED ENT+9, LST+1
LR60DN REF+25, LR60DN+12
LREND LRWRKLST+7, LRWRKLST+15, LRWRKLST+19, LRWRKLST+22, W+7, W+14, W+24, W+28, W+36, ENT+23
, SINGLE+18
LST ENT+17, AC+10
MICRO TD+13
PHD LRWRKLST+21
REF TS2+19
TD ENT+15, AC+8, SINGLE+15
TESTS ENT+17, AC+10, SINGLE+15
TS2 TESTS+20

Naked Globals

Name Field # of Occurrence
^( MICRO+13, TS2+17
^(0 TD+8, TESTS+8, CHKAC+4, CHKAC+5
^(1 TESTS+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% W+2~, LREND+2!
%A W+2~
%A0 W+2~
%B W+2~
%B1 W+2~
%B2 W+2~
%B3 W+2~
%BA W+2~
%BU W+2~
%C W+2~
%D1 W+2~
%D2 W+2~
%DT W+2~, LREND+2!
%E W+2~
%G W+2~
%H W+2~
%I W+2~
%J W+2~
%J1 W+3~
%K W+3~
%M W+3~
%N W+3~
%P W+3~
%S W+3~
%T W+3~, W+32~
%W W+3~
%W0 W+3~
%X W+3~
%Y W+3~
%ZIS W+27*, LREND+2!
A0 W+4~
AGE LREND+3!
C W+4~
D W+4~
DD W+4~
DDH W+4~
DDQ W+4~
DDSV W+4~
DFN LREND+3!
DG W+4~
DH W+4~
DIC LRWRKLST+13*, W+4~, W+16~, W+17*, LREND+3!, LREND+5!
DIC("S" LRWRKLST+6, LRWRKLST+8*
DIC(0 LRWRKLST+13*, W+17*
DIFLD W+4~
DIR W+4~, W+21!, LREND+3!
DIR("A" W+12*, W+22*
DIR("B" W+12*, W+22*
DIR(0 W+12*, W+22*
DIRO W+4~
DIROUT W+4~
DIRUT W+4~, W+14, W+24, LREND+3!
DISYS W+5~
DIX W+5~
DIY W+5~
DO W+5~
DOB LREND+3!
DP W+5~
DQ W+5~
DTOUT W+5~, LREND+3!
DU W+5~
DUOUT LREND+3!
DZ W+5~
I TS2+13~, TS2+16*, TS2+17*
IO ENT+8
IO("Q" W+31, W+36!
IOF HED+1
IOSL LST+1
IOST LST+1
K LREND+3!
LAST LRWRKLST+18, LREND+3!
LN TESTS+13*, TESTS+16*, TESTS+24*, TESTS+25*, TS2+7*, TS2+22*, REF+14*, REF+18*, HED+3*, LREND+3!
LR60 LR60DN~, LR60DN+3, LR60DN+8, LR60DN+9
LRA LREND+3!
LRAA LRWRKLST+14*, LRWRKLST+15, LRWRKLST+18, W+7, W+10, ENT+14, ENT+21, TD+7, TD+8, TD+10
, TD+11, TD+13, TD+14, MICRO+2, MICRO+3, MICRO+13, TESTS+6, TESTS+8, TESTS+22, CHKAC+2
, CHKAC+3, CHKAC+4, TS2+5, REF+4, REF+22, REF+23, AC+4, AC+6, AC+7, LREND+5!
, SINGLE+2~, SINGLE+10, SINGLE+13
LRACC LREND+4!, SINGLE+2~, SINGLE+8*
LRACO LREND+5!
LRAD W+7, ENT+14, ENT+21*, TD+7, TD+8, TD+10, TD+11, TD+13, TD+14, MICRO+2
, MICRO+3, MICRO+13, TESTS+6, TESTS+8, TESTS+22, CHKAC+2, CHKAC+3, CHKAC+4, TS2+5, REF+4
, REF+22, AC+4, AC+6, AC+7, LREND+5!, SINGLE+2~, SINGLE+10, SINGLE+13, SINGLE+14*
LRAN ENT+13*, ENT+14*, TD+7, TD+8, TD+10, TD+11, TD+13, TD+14, MICRO+2, MICRO+3
, MICRO+13, TESTS+6, TESTS+8, TESTS+22, CHKAC+2, CHKAC+3, CHKAC+4, TS2+5, REF+4, REF+22
, AC+5*, AC+6*, AC+7, LREND+6!, SINGLE+2~, SINGLE+9, SINGLE+10, SINGLE+13
LRB LREND+7!
LRC CHKAC+1~
LRC( CHKAC+4*
LRCE LREND+6!
LRDAT TD+8*, TESTS+15, TESTS+16, TS2+12, TS2+14, TS2+15, TS2+17, LREND+5!
LRDATA REF+31~, REF+33
LRDATA( REF+34, REF+36
LRDFN REF+2~, REF+21*, REF+29, REF+30, REF+32, LREND+8!
LRDFNX MICRO+1~, MICRO+2*, MICRO+13
LRDICS LRWRKLST+3~, LRWRKLST+6*, LRWRKLST+8
LRDLA LREND+4!
LRDLC LREND+4!
LRDN REF+2~, REF+24*, REF+25, REF+27*, REF+28*, REF+29, LR60DN~, LR60DN+12
LRDN( REF+28, LR60DN+4*
LRDPF LREND+6!
LRDT LRWRKLST+10*, HED+2, LREND+7!
LRDTO LREND+6!
LRDX REF+21, LREND+4!
LREDT LREND+8!
LREND LRWRKLST+12*, LRWRKLST+19, LRWRKLST+22, ENT+5*, ENT+15*, ENT+16, TD+7*, TD+17*, TESTS+4, TS2+3
, PHD+1, PHD+2*, PHD+3, AC+1, AC+8*, AC+9, LREND+7!, SINGLE+2~, SINGLE+6, SINGLE+7*
, SINGLE+9*
LREVNT REF+2~, REF+10*, REF+11, REF+12, REF+13
LREXCODE MICRO+1~, MICRO+4*, MICRO+5, MICRO+6*, MICRO+10
LRFAN ENT+13, LREND+7!
LRI TD+9*, TD+10*, TD+11, TD+13, TD+14, TD+15, MICRO+4, MICRO+13, MICRO+15, MICRO+17
, TESTS+19*, TESTS+20*, TS2+5, TS2+12, TS2+14, TS2+22, LREND+4!
LRIDT REF+2~, REF+23*, REF+29
LRIDTX MICRO+1~, MICRO+3*, MICRO+13
LRIENS REF+2~, REF+29*, REF+30, REF+32
LRIX LREND+7!
LRJ REF+31~, REF+32*
LRLAN ENT+14, LREND+7!
LRLAST LRWRKLST+18*, AC+4, LREND+6!
LRLLOC LREND+8!
LRLO69 TESTS+15*, TESTS+16, LREND+4!
LRMAN REF+2~, REF+5*, REF+6, REF+7, REF+9*, REF+10
LRMIAREA MICRO+1~, MICRO+10*, MICRO+13
LRMIPND ENT+2~, TD+5!
LRMIPND( MICRO+17*, TS2+22
LRNAC TESTS+18!, TESTS+22, TS2+23*, LREND+6!
LRNAME LRWRKLST+14*, W+10*, HED+2, LREND+7!
LRON REF+31~, REF+34*, REF+35, REF+37
LRON(0 REF+34*, REF+36*, REF+37
LRP CHKAC+1~, CHKAC+6
LRP( CHKAC+5*
LRPRAC LREND+6!
LRREF REF+31~, REF+32*, REF+33, REF+34, REF+36
LRROLL SINGLE+12~, SINGLE+13*, SINGLE+14
LRSAMP TESTS+8*, TESTS+10, LREND+4!
LRSCFG REF+2~, REF+5*, REF+7*, REF+8, REF+15
LRSCFG(0 REF+8*, REF+16, REF+17
LRSDT LREND+8!
LRSN TD+8*, TESTS+15, TESTS+16, TS2+12, TS2+14, TS2+15, TS2+17, LREND+6!
LRSPEC TESTS+8*, TESTS+9, LREND+4!
LRSS REF+2~, REF+23*, REF+25, REF+29
LRSTAR LRWRKLST+21, W+7, ENT+12, ENT+20, AC+3, LREND+6!
LRSTOP ENT+5*, ENT+14, ENT+21, TESTS+4, TS2+3, AC+1, AC+4, AC+6, LREND+8!, SINGLE+2~
, SINGLE+6, SINGLE+7*
LRT CHKAC+1~, CHKAC+3*, CHKAC+4, CHKAC+5
>> LRTEST REF+24*, REF+25
LRTK AC+3*, AC+4*, AC+6, LREND+8!
LRTSE W+9*, W+19*, TD+11, LREND+7!, SINGLE+2~, SINGLE+7*
LRTST ENT+2~, TD+5!, TD+17, REF+25, LREND+7!, LR60DN~
LRTST( TD+15*, MICRO+15*, TESTS+20, LR60DN+11
>> LRTYPE REF+30*, REF+32, REF+37
LRUID REF+2~, REF+4*, REF+10
LRUNC W+9*, W+25*, TD+14, MICRO+15, LREND+5!, SINGLE+2~, SINGLE+7*
LRURG TS2+5*, TS2+9, LREND+5!, SINGLE+2~
LRURG( TS2+9
LRWDTL ENT+21, LREND+8!
LRWRD LREND+5!
LRX LR60DN+1~, LR60DN+3*, LR60DN+4
LRXXX TS2+5*, TS2+6, TS2+10, TS2+22, REF+5, REF+10, REF+24, LREND+6!
LRY REF+2~, REF+22*, REF+23, LR60DN+1~, LR60DN+7*, LR60DN+8*, LR60DN+9
LRY(0 LR60DN+9*, LR60DN+10, LR60DN+11, LR60DN+12
PNM LREND+9!
POP W+28, LREND+8!
S1 TESTS+1~, TESTS+9*, TESTS+12
S2 TESTS+1~, TESTS+10*, TESTS+12
SEX LREND+9!
SSN LREND+9!
U LRWRKLST+14, LRWRKLST+18, W+10, TD+8, TD+13, MICRO+2, MICRO+3, MICRO+13, TESTS+8, TESTS+9
, TESTS+10, TESTS+16, TESTS+22, CHKAC+4, CHKAC+5, TS2+5, TS2+10, TS2+22, PHD+2*
X W+16~, TS2+13~, TS2+14*, TS2+15, TS2+17, LREND+9!
X1 W+5~, LREND+9!
X2 LREND+9!
XQH W+5~
Y LRWRKLST+14, W+15, W+16~, W+19, W+25, LREND+9!
Z LREND+9!
ZTDESC W+32~, W+33*
ZTIO W+32~
>> ZTQUEUED ENT+4
>> ZTREQ ENT+4*
ZTRTN W+32~, W+33*
ZTSAVE W+32~
ZTSAVE("LR*" W+33*
ZTSK W+32~, W+35, LREND+9!
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