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 |  Local Variables  | All
Print Page as PDF
Routine: LRWRKIN1

Package: Lab Service

Routine: LRWRKIN1


Information

LRWRKIN1 ;SLC/DCM/CJS-LRWRKINC, CONT ;2/22/87 11:39 AM

Source Information

Source file <LRWRKIN1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 ^%ZISC  $$FMTE^XLFDT  
VA FileMan 2 Y^DIQ  ^DIR  
Lab Service 1 (DASH,EQUALS,PT)^LRX  
Registration 1 KVA^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: 1

Package Total Caller Graph
Lab Service 1 LRWRKINC  

Entry Points

Name Comments DBIA/ICR reference
LST1 ;from LRWRKINC
X ;from LRWRKINC
HED ; Print header
WAIT ;from LRWRKINC
LREND ;
CHKAA ; Check if user wants to use criteria from another chosen area.

External References

Name Field # of Occurrence
^%ZISC LREND+3
Y^DIQ X+23
^DIR WAIT+3, CHKAA+22
DASH^LRX HED+16
EQUALS^LRX X+11
PT^LRX LST1+6
KVA^VADPT LREND+4
$$FMTE^XLFDT LST1+7, LST1+9, LST1+10, CHKAA+12, CHKAA+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$E($S(LRSORTBY=1:$P(LRTSTN,"^",2),1:LRTSTN),1,20),?23,$E(LRU,1,9),?34,LRACC,?47," ",LRCOLL,?65,$E(LRLLOC,1,15)
  • Line Location: X+16
Function Call: WRITE
  • Prompt: ?LRCL,SSN
  • Line Location: X+17
Function Call: WRITE
  • Prompt: ?LRCL,$E(PNM,1,19)
  • Line Location: X+18
Function Call: WRITE
  • Prompt: ?LRCL,$S('LREXD&(IOM'<120):$E(LRST,1,15),1:$E(LRST,1,30))
  • Line Location: X+19
Function Call: WRITE
  • Prompt: ?82,SSN
  • Line Location: X+24
Function Call: WRITE
  • Prompt: !
  • Condition for execution: IOM<120
  • Line Location: X+25
Function Call: WRITE
  • Prompt: ?LRCL,LRMAN
  • Line Location: X+25
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: "INCOMPLETE STATUS REPORT *** NOT FOR WARD USE ***",?(IOM-16),LRDT
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !,"Accession Area(s):",?(IOM-10),"Page: ",LRPAGE
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !,LRNAME(LRINDEX)
  • Line Location: HED+6
Function Call: WRITE
  • Prompt: !!,"Test",?23,"Urgency",?34,"Accession",?48,"Date/time",?65,"Location"
  • Line Location: HED+7
Function Call: WRITE
  • Prompt: ?LRCL,"SSN"
  • Line Location: HED+10
Function Call: WRITE
  • Prompt: ?LRCL,"Patient"
  • Line Location: HED+11
Function Call: WRITE
  • Prompt: ?LRCL,"Status"
  • Line Location: HED+12
Function Call: WRITE
  • Prompt: !,?23,"UID",?48,"Sending Site",?65,"Sender's UID"
  • Line Location: HED+13
Function Call: WRITE
  • Prompt: ?82,"SSN"
  • Line Location: HED+14
Function Call: WRITE
  • Prompt: !
  • Condition for execution: IOM<120
  • Line Location: HED+15
Function Call: WRITE
  • Prompt: ?LRCL,"Shipping Manifest"
  • Line Location: HED+15
Function Call: WRITE
  • Prompt: !
  • Line Location: HED+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LREND+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKAA+22
Routine Call
  • DIR
  • Line Location:
    • WAIT+3
    • CHKAA+22

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(68.02 X+23
^LR - [#63] LST1+5
^LRO(68 - [#68] LST1+2, LST1+3, LST1+4, LST1+8
^TMP("LRWRKINC" LREND+13!, CHKAA+3, CHKAA+5, CHKAA+6, CHKAA+7
^TMP($J X+3, X+5, X+7, X+9, X+15, X+22, LREND+13!

Label References

Name Line Occurrences
HED X+13
WAIT X+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LREND+5!
%DT LREND+5!
%X LREND+5!
%Y LREND+5!
%ZIS LREND+5!
A X+21~, X+22*, X+23, X+24, LREND+5!
AGE LREND+5!
B LREND+5!
C X+23*, LREND+5!
DFN LST1+6*, LREND+5!
DIC LREND+5!
DICS LREND+5!
DIR WAIT+2~, CHKAA+1~
DIR("?" CHKAA+20*, CHKAA+21*
DIR("A" CHKAA+15*, CHKAA+16, CHKAA+18*, CHKAA+19*
DIR(0 WAIT+3*, CHKAA+17*
DIRUT WAIT+2~, WAIT+4, CHKAA+1~, CHKAA+23
DOB LREND+5!
DTOUT WAIT+2~, CHKAA+1~, CHKAA+24
DUOUT WAIT+2~, CHKAA+1~, CHKAA+24
I LREND+5!
IOF HED+1, LREND+1
IOM X+17, X+18, X+19, X+24, X+25, HED+3, HED+4, HED+8, HED+9, HED+10
, HED+11, HED+12, HED+14, HED+15
IOSL X+10
IOST X+12, HED+1, WAIT+1, LREND+1
J X+4*, X+14*, X+26, LREND+5!
K LREND+5!
L LREND+5!
LA LREND+10!
LAST LREND+5!
LRAA LST1+2, LST1+3, LST1+4, LST1+8, LREND+8!, CHKAA+10
LRAA(0 CHKAA+9, CHKAA+21
LRACC LST1+4*, X+1~, X+15*, X+16, LREND+8!
LRACCN X+1~, X+6*, X+7*, X+9, X+15, X+22
LRACO LST1+8*, LREND+7!
LRAD LST1+2, LST1+3, LST1+4, LST1+8, LREND+8!
LRAN LST1+2, LST1+3, LST1+4, LST1+8, X+1~, X+8*, X+9*, X+15, X+22, LREND+8!
LRCE LST1+3*, LREND+8!
LRCL X+17*, X+18*, X+19*, X+25*, HED+8*, HED+10, HED+11*, HED+12*, HED+15*, LREND+11!
LRCNT LREND+6!
LRCOLL X+15*, X+16, LREND+7!
LRCUTOFF LREND+6!
LRDAT LREND+10!
LRDFN LREND+11!
LRDLA LST1+8*, LST1+10*, LREND+6!
LRDLC LST1+1*, LST1+9*, LREND+6!
LRDPF LST1+6*, LREND+8!
LRDT HED+3, LREND+10!
LRDTO LST1+1*, LST1+7*, LREND+8!
LRDX LST1+2*, LST1+5, LST1+7, LREND+6!
LRDX(0 LST1+5*, LST1+6
LREDT LREND+11!
LREND X+2*, X+3, X+5, X+7, X+9, X+10, X+12, X+26, WAIT+4*, LREND+10!
, CHKAA+24*
LREXD X+17, X+18, X+19, X+20, HED+10, HED+11, HED+12, HED+13, HED+14, HED+15
, LREND+10!
LREXNREQ LREND+9!
LREXTST LREND+10!
LRFAN LREND+10!, CHKAA+1~, CHKAA+11*, CHKAA+13
LRFI LREND+10!
LRINDEX HED+5*, HED+6*, LREND+8!, CHKAA+1~, CHKAA+2*, CHKAA+14*, CHKAA+15, CHKAA+17, CHKAA+18
LRINDEX( CHKAA+14*, CHKAA+23
LRIOZERO LREND+11!
LRIX LREND+10!
LRLAN LREND+10!, CHKAA+11*, CHKAA+13
LRLAST CHKAA+1~, CHKAA+11*, CHKAA+12, CHKAA+13
LRLLOC X+15*, X+16, LREND+11!
LRLO69 LREND+6!
LRMAN X+15*, X+25, LREND+10!
LRNAC LREND+8!
LRNAME LREND+10!
LRNAME( HED+6
LRNOCNTL LREND+10!
LRPAGE HED+1, HED+2*, HED+4, LREND+9!
LRPRAC LREND+9!
LRRB LREND+7!
LRSAMP LREND+6!
LRSDT LREND+11!
LRSN LREND+8!
LRSORTBY X+16, LREND+9!
LRSPEC LREND+7!
LRST X+15*, X+19, LREND+11!
LRSTAR LREND+9!, CHKAA+1~, CHKAA+11*, CHKAA+12
LRTK LREND+11!
LRTREA LREND+7!
LRTSE LREND+11!
LRTSTN X+1~, X+2*, X+3*, X+5, X+7, X+9, X+15, X+16, X+22
LRU X+5*, X+16, LREND+11!
LRUR X+1~, X+4*, X+5*, X+7, X+9, X+15, X+22
LRURG LREND+7!
LRURG( X+5
>> LRUSEAA CHKAA+2*, CHKAA+23*
LRVERVER LREND+11!
LRWDTL LREND+11!
LRWRD LREND+7!
LRX LREND+9!, LREND+12!, CHKAA+1~, CHKAA+2*, CHKAA+3*, CHKAA+5, CHKAA+6, CHKAA+7, CHKAA+10, CHKAA+14
LRY LREND+12!, CHKAA+1~, CHKAA+8*, CHKAA+12*, CHKAA+13*, CHKAA+15
LRZ LREND+12!, CHKAA+1~, CHKAA+2*, CHKAA+4*, CHKAA+5*, CHKAA+6, CHKAA+7, CHKAA+14
LRZ(0 CHKAA+6*, CHKAA+9, CHKAA+15
LRZ(1 CHKAA+7*, CHKAA+11
PNM X+15*, X+18, LREND+5!
POP LREND+5!
SEX LREND+5!
SSN X+15*, X+17, X+24, LREND+5!
U LST1+6, LST1+7, LST1+8, LST1+9, X+15
W X+15*, LREND+5!
X WAIT+2~, LREND+5!, CHKAA+1~
X1 LREND+5!
X2 LREND+5!
Y LST1+8*, LST1+9, X+23*, X+24, WAIT+2~, LREND+5!, CHKAA+1~, CHKAA+23
Z LREND+5!
>> ZTQUEUED LREND+2
>> ZTREQ LREND+2*
ZTSK LREND+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All