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 [ 04/23/2003 9:02 AM ]

Source Information

Source file <LRWRKIN1.m>

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

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRWRKINC  

Entry Points

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

External References

Name Field # of Occurrence
^%ZISC LREND+3
Y^DIQ X+37
^DIR WAIT+3, CHKAA+22
DASH^LRX HED+30
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: ?LRCL,SSN
  • Line Location: X+20
Function Call: WRITE
  • Prompt: ?LRCL,HRCN
  • Line Location: X+30
Function Call: WRITE
  • Prompt: ?LRCL,$E(PNM,1,19)
  • Line Location: X+32
Function Call: WRITE
  • Prompt: ?LRCL,$S('LREXD&(IOM'<120):$E(LRST,1,15),1:$E(LRST,1,30))
  • Line Location: X+33
Function Call: WRITE
  • Prompt: ?82,SSN
  • Line Location: X+38
Function Call: WRITE
  • Prompt: ?82,HRCN
  • Line Location: X+40
Function Call: WRITE
  • Prompt: !,?23,$P(A,"^")
  • Line Location: X+43
Function Call: WRITE
  • Prompt: ?48,$E(Y,1,16)
  • Line Location: X+44
Function Call: WRITE
  • Prompt: ?67,$P(A,"^",5)
  • Line Location: X+45
Function Call: WRITE
  • Prompt: ?82,HRCN
  • Line Location: X+46
Function Call: WRITE
  • Prompt: !
  • Condition for execution: IOM<120
  • Line Location: X+48
Function Call: WRITE
  • Prompt: ?LRCL,LRMAN
  • Line Location: X+48
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: !!,"Test"
  • Line Location: HED+9
Function Call: WRITE
  • Prompt: ?23,"Urgency"
  • Line Location: HED+10
Function Call: WRITE
  • Prompt: ?34,"Accession"
  • Line Location: HED+11
Function Call: WRITE
  • Prompt: ?48,"Date/time"
  • Line Location: HED+12
Function Call: WRITE
  • Prompt: ?67,"Location"
  • Line Location: HED+13
Function Call: WRITE
  • Prompt: ?LRCL,"SSN"
  • Line Location: HED+18
Function Call: WRITE
  • Prompt: ?LRCL,"HCRN"
  • Line Location: HED+20
Function Call: WRITE
  • Prompt: ?LRCL,"Patient"
  • Line Location: HED+22
Function Call: WRITE
  • Prompt: ?LRCL,"Status"
  • Line Location: HED+23
Function Call: WRITE
  • Prompt: !,?23,"UID",?48,"Sending Site",?65,"Sender's UID"
  • Line Location: HED+24
Function Call: WRITE
  • Prompt: ?82,"SSN"
  • Line Location: HED+25
Function Call: WRITE
  • Prompt: ?82,"HCRN"
  • Line Location: HED+27
Function Call: WRITE
  • Prompt: !
  • Condition for execution: IOM<120
  • Line Location: HED+29
Function Call: WRITE
  • Prompt: ?LRCL,"Shipping Manifest"
  • Line Location: HED+29
Function Call: WRITE
  • Prompt: !
  • Line Location: HED+31
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+37
^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+17, X+36, 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+35~, X+36*, X+37, X+43, X+45, LREND+5!
AGE LREND+5!
B LREND+5!
C X+37*, 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
>> HRCN X+17*, X+30, X+46
I LREND+5!
IOF HED+1, LREND+1
IOM X+30, X+32, X+33, X+46, X+48, HED+3, HED+4, HED+16, HED+17, HED+20
, HED+22, HED+23, HED+27, HED+29
IOSL X+10
IOST X+12, HED+1, WAIT+1, LREND+1
J X+4*, X+14*, X+49, 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~, LREND+8!
LRACCN X+1~, X+6*, X+7*, X+9, X+17, X+26, X+36
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+17, X+26, X+36
, LREND+8!
LRCE LST1+3*, LREND+8!
LRCL X+30*, X+32*, X+33*, X+48*, HED+16*, HED+20, HED+22*, HED+23*, HED+29*, LREND+11!
LRCNT LREND+6!
LRCOLL X+17*, X+27, 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+49, WAIT+4*, LREND+10!
, CHKAA+24*
LREXD X+30, X+32, X+33, X+34, HED+20, HED+22, HED+23, HED+24, HED+27, HED+29
, 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+17*, X+28, LREND+11!
LRLO69 LREND+6!
LRMAN X+17*, X+48, 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+24, LREND+9!
LRSPEC LREND+7!
LRST X+17*, X+33, 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+17, X+24, X+36
LRU X+5*, X+25, LREND+11!
LRUR X+1~, X+4*, X+5*, X+7, X+9, X+17, X+36
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+17*, X+32, LREND+5!
POP LREND+5!
SEX LREND+5!
SSN LREND+5!
U LST1+6, LST1+7, LST1+8, LST1+9, X+17
W X+17*, LREND+5!
X WAIT+2~, LREND+5!, CHKAA+1~
X1 LREND+5!
X2 LREND+5!
Y LST1+8*, LST1+9, X+37*, X+44, 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