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

Package: Lab Service

Routine: LROW


Information

LROW ;SLC/CJS/JAH - LAB ORDER ENTRY, WARD ;8/10/04

Source Information

Source file <LROW.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Lab Service 14 BALROW^LRBEBA3  $$CHKINP^LRBEBA4  (,EN2)^LRDPA  LROW^LRORDD  ^LRORDIM  ^LROW1  REST^LROW2  ^LROW3  
LREND^LROW4  NEXTCOL^LROW5  ^LRPARAM  (COLTY,LOC)^LRWU  PRAC^LRWU1  DT^LRX  
VA FileMan 3 NOW^%DTC  YN^DICN  ^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: 5

Package Total Caller Graph
Lab Service 5 LRAD2ORD  LROE1  LROR9  LROW  LROW5  

Entry Points

Name Comments DBIA/ICR reference
W10 ;
Q12
Q12A
PRAC
MORE ;from LROR
NOMORE ;from LROR
W20 ;from LROE1
L5 ;from LROR, LROR4
L5A ;R !,"Select: ",X:DTIME G LEND:X["^"!'$T,L5:X="" S X=$E(X,1)
L5B ;
LEND ;from LROW5
TIME ;from LROW5
ADD ;from LRAD2ORD

External References

Name Field # of Occurrence
NOW^%DTC W10+3
YN^DICN PRAC+1
^DIR NOMORE+5
BALROW^LRBEBA3 MORE+5
$$CHKINP^LRBEBA4 MORE+4
^LRDPA W10+5
EN2^LRDPA W10+3, W10+6
LROW^LRORDD NOMORE+3
^LRORDIM L5B+2
^LROW1 MORE+3
REST^LROW2 NOMORE+4
^LROW3 NOMORE+2
LREND^LROW4 W10+5, Q12+1, NOMORE+2
NEXTCOL^LROW5 L5B+3
^LRPARAM W10+2
COLTY^LRWU L5B+1
LOC^LRWU Q12
PRAC^LRWU1 PRAC
DT^LRX W10+2, ADD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"ORDER CANCELED",!!
  • Line Location: PRAC+0
Function Call: WRITE
  • Prompt: !,"Will the urgency for all tests ordered for this patient at this time be",!,$P(^LAB(62.05,+$P(^LAB(69.9,1,3),U,2),0),U)
  • Line Location: PRAC+1
Function Call: WRITE
  • Prompt: " Answer 'Y'es or 'N'o."
  • Line Location: PRAC+1
Function Call: WRITE
  • Prompt: !!,$C(7),"ORDER CANCELED",!!
  • Line Location: PRAC+2
Function Call: WRITE
  • Prompt: !," (S)END patient to lab",!," (W)ARD collect & deliver",!," (B)LOOD orders for lab draw",!," (I)MMED Lab Collect ",!
  • Line Location: L5+1
Function Call: WRITE
  • Prompt: !,"Enter 'S' for SEND TO LAB",!?6,"'W' for WARD COLLECT",!?6,"'B' for BLOOD COLLECTED BY LAB.",!?6,"'I' for Immediate Lab Collect",!?6,"'^' to Exit."
  • Line Location: L5A+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: TIME+2
Routine Call
  • DIR
  • Line Location:
    • NOMORE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(62.05 - [#62.05] PRAC+1
^LAB(69.9 - [#69.9] PRAC+1, PRAC+3
^LR - [#63] W10+7
^LRO(69 - [#69] Q12A, MORE+2, L5B+2*, L5B+3*

Label References

Name Line Occurrences
@( NOMORE+7
L5 Q12+1
LEND MORE+4
MORE W10+4, NOMORE+7
NOMORE MORE+6
PRAC Q12+2
Q12A MORE+2
W10 W10+6, Q12, PRAC, PRAC+2, MORE+7, NOMORE+2, NOMORE+6, NOMORE+7, ADD+1
W20 NOMORE+2

Naked Globals

Name Field # of Occurrence
^( Q12A
^(0 Q12A, MORE+2
^(1 MORE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % W10+3, PRAC+1*, PRAC+2, PRAC+3, NOMORE+2
>> DA Q12A, MORE+2*
DFN W10+3, W10+5!, W10+6
DIC W10+5!, PRAC+1!
DIC(0 W10+5*
DIR NOMORE+5!
DIR("A" NOMORE+5*
DIR("B" NOMORE+5*
DIR(0 NOMORE+5*
>> DIROUT MORE+6
DTOUT W10+4!, W10+5, NOMORE+2
>> DUOUT W10+5
DUZ NOMORE+1
>> I Q12A*, PRAC+1*
>> LRADDTST W10+2, W10+4, MORE+6, NOMORE+2, NOMORE+4, W20+1, ADD+1
LRBEODT W10+1!
LRBEOT W10+1!
LRBEQT W10+1!
LRBERF W10+1!
LRBETS W10+1!
LRBETYP W10+1!
LRBEVT W10+1!
LRBEX W10+1!, MORE+1!, NOMORE+4!
LRBEY W10+1!, MORE+4*
LRBEZ W10+1!
>> LRCCOM MORE+3*
LRCDT W10+3*, NOMORE+1, W20+1!, L5B+2
LRCOM W10+4!, MORE+1!
>> LRDFN W10+5, W10+7, MORE+2, MORE+4, NOMORE+1
LRDMAX MORE+1!
>> LRDPF W10+7*, MORE+4
LRDTST MORE+1!
>> LREND Q12, Q12+1, PRAC, PRAC+2*, NOMORE+7, L5B+1, L5B+2*, L5B+3, LEND+1*
LRLLOC NOMORE+1, W20+1!
>> LRLWC NOMORE+1, NOMORE+7, L5B+2
>> LRMOR W10+4*
LRNATURE W10+2!
>> LRNN W10+4*
>> LRODT Q12A, MORE+2, MORE+4, MORE+5, NOMORE+1, L5B+2, L5B+3
LROLLOC W20+1!
>> LRORDTIM NOMORE+1
LRORIFN NOMORE+4!
LROT MORE+1!
LROUTINE PRAC+1!, PRAC+3*, NOMORE+7!
>> LRPRAC NOMORE+1
>> LRSAMP MORE+2*
LRSN W10+4!*, MORE+5, W20+1!
LRSNO NOMORE+1*, W20+1!
>> LRSS MORE+4
LRSTATUS W20+1!
LRTCOM W10+4!, MORE+1!
>> LRTEST MORE+5
LRTMAX MORE+1!
LRTREA W20+1!
>> LRTSTN MORE+7
LRURG PRAC+1!, NOMORE+7!
LRXST W10+5!, NOMORE+2, W20+1!
LRY PRAC+1!, NOMORE+7!
>> PNM W10+5*
>> S Q12A*
T MORE+1!
T( Q12A*
TT MORE+1!
TT( Q12A*
U W10+2*, W10+4, W10+7, PRAC+1, PRAC+3, MORE+2, MORE+6
>> X Q12A*
X3 W10+2!, W10+5!, NOMORE+7!
>> Y W10+6, NOMORE+6, TIME+1*, TIME+2
>> Z TIME+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All