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

Package: Lab Service

Routine: LRORD1


Information

LRORD1 ;DALOI/STAFF - LAZY ACCESSION LOGGING ;03/07/12 16:38

Source Information

Source file <LRORD1.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
Lab Service 16 BALROR^LRBEBA3  $$CHKINP^LRBEBA4  ^LRDPA  LRWU4^LRFASTS  TIME^LROE  (GCOM,MORE,URG)^LRORD2  ^LRORD2A  GSNO^LRORD3  
EN^LRORDB  (,EN2,Q20)^LRORDD  ^LRORDST  ORDER^LROS  ORDER^LROW2  ENSTIK^LROW3  (COLTY,LOC)^LRWU  PRAC^LRWU1  
VA FileMan 3 NOW^%DTC  ^DIC  YN^DICN  

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 LRORD  LRORDD  

Entry Points

Name Comments DBIA/ICR reference
L2
Q12
Q11
LRFIRST
Q13
LEDI ;
Q13A
BAR
LRM
Q14
Q20A ;from LRORD2
MAX ; CHECK FOR MAXIUM ORDER FREQUENCY
URGG
DROP
MICRO
PRAC ;from LRFAST

External References

Name Field # of Occurrence
NOW^%DTC Q14+13
^DIC PRAC+5
YN^DICN MICRO+1
BALROR^LRBEBA3 Q14+2
$$CHKINP^LRBEBA4 Q14+1
^LRDPA L2+4
LRWU4^LRFASTS Q14+16
TIME^LROE Q14+10
GCOM^LRORD2 MICRO+7
MORE^LRORD2 LRM
URG^LRORD2 URGG+1
^LRORD2A Q14
GSNO^LRORD3 MICRO+4
EN^LRORDB LEDI+4
^LRORDD Q14
EN2^LRORDD MAX+2
Q20^LRORDD Q13A+6
^LRORDST Q14+15
ORDER^LROS MAX+10
ORDER^LROW2 Q11+7
ENSTIK^LROW3 Q14
COLTY^LRWU L2+6
LOC^LRWU Q12
PRAC^LRWU1 Q11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: L2+4
Function Call: WRITE
  • Prompt: !,"Choose one (or more, separated by commas) ('*' AFTER NUMBER TO CHANGE URGENCY) "
  • Line Location: LRFIRST+1
Function Call: WRITE
  • Prompt: !,X,?4,$P(^TMP("LRSTIK",$J,X),U,2)
  • Line Location: LRFIRST+5
Function Call: WRITE
  • Prompt: ?39," ",X,?44,$P(^TMP("LRSTIK",$J,X),U,2)
  • Line Location: LRFIRST+7
Function Call: READ
  • Prompt: "TEST number(s): "
  • Variable: LRSX
  • Timeout: DTIME
  • Line Location: LEDI+7
Function Call: WRITE
  • Prompt: !,"Something was mistyped, try again."
  • Line Location: Q13A+0
Function Call: WRITE
  • Prompt: !!,"LAB Order number: ",LRORD,!!
  • Line Location: Q14+4
Function Call: READ
  • Variable: %
  • Timeout: DTIME
  • Line Location: Q14+20
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: Q14+20
Function Call: WRITE
  • Prompt: $C(7),!!,"You have a duplicate: "
  • Line Location: MAX+6
Function Call: WRITE
  • Prompt: " for ",$P(^LAB(60,LRTSTS,0),U)
  • Line Location: MAX+9
Function Call: WRITE
  • Prompt: !,"You already have that test, do you really want another? N//"
  • Line Location: MAX+11
Function Call: WRITE
  • Prompt: !,"For ",$P(^TMP("LRSTIK",$J,LRSSX),U,2)
  • Line Location: URGG+0
Function Call: WRITE
  • Prompt: !!,"ORDER CANCELED",$C(7),!!
  • Line Location: DROP+0
Function Call: WRITE
  • Prompt: !,"Is there one sample for this patient's order"
  • Line Location: MICRO+0
Function Call: WRITE
  • Prompt: !,"The collection sample and site/specimen will be used for all tests ordered",!,"at this time for this patient."
  • Line Location: MICRO+3
Function Call: WRITE
  • Prompt: !,"Incompletely defined."
  • Line Location: MICRO+5
Function Call: WRITE
  • Prompt: !,"PRACTITIONER: ",X,$S($L(X):"//",1:"")
  • Line Location: PRAC+2
Routine Call
  • DIC
  • Line Location:
    • PRAC+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] MAX+2, MAX+4, MAX+9
^LR - [#63] L2+7
^LRO(69 - [#69] Q11+3, Q11+4
^TMP("LRSTIK" LRFIRST+4, LRFIRST+5, LRFIRST+6, LRFIRST+7, LEDI+13, Q13A+4, URGG
^VA(200 - [#200] PRAC+1

Label References

Name Line Occurrences
% BAR, %, MAX+11
BAR LEDI+3, LEDI+8
DROP L2+6, Q12, Q11, Q14, Q14+1, Q14+5
L2 Q11+8, Q14+17, DROP
LRFIRST L2+3, Q11+6, LEDI+7
LRM Q14
MICRO Q11+8, MICRO+3, MICRO+5
Q13 LRFIRST, Q13A
Q13A LEDI+5
Q14 BAR

Naked Globals

Name Field # of Occurrence
^( Q11+4
^(0 L2+7, Q11+3, Q11+4, MAX+4
^(1 Q11+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % BAR, Q14, Q14+13, %*, MAX+2, MICRO+1*, MICRO+2, MICRO+3
>> DA Q11+2*, Q11+3*, Q11+4
DFN L2+4!, L2+7*
DIC L2+4!, Q11+5!, Q14!, PRAC+5!
DIC("B" PRAC+1, PRAC+4
DIC(0 L2+4*
DTIME LEDI+7, %, PRAC+3
>> DTOUT L2+4, Q11+8, Q14+3, MICRO+4
DUOUT L2+4, Q11+8!, Q14+3, MICRO+2*, MICRO+4
>> I Q11+4*, LRFIRST+2*, LRFIRST+4, LRFIRST+6, LEDI+9*, LEDI+10
I7 MAX+1~, MAX+3*, MAX+4*, MAX+5
I9 MAX+1~, MAX+3*, MAX+4*
>> K BAR*
LR696IEN L2+2!
>> LRADDTST L2+4, L2+5, Q11+6*
LRBEQT L2+1~
LRBETS L2+1~
LRBETYP L2+1~
LRBEVT L2+1~
LRBEX L2+1~
LRBEY L2+1~, Q14+1*, Q14+3
LRBEZ L2+1~
LRCCOM L2+2!
>> LRCDT Q14+5, Q14+7*, Q14+9*, Q14+11, Q14+12, Q14+13*, Q14+14
>> LRCS( MAX+2
>> LRCSN MAX+2
>> LRDFN L2+4, L2+7, Q11+3, Q14+1
LRDMAX Q11+1!
>> LRDPF L2+7*, Q14+1
LRDTST Q11+1!
>> LRECOM MICRO+7*
>> LRECT Q14+5, Q14+13
>> LREDO Q13*, LEDI+9, LEDI+11*, LEDI+13*, Q13A
>> LREND L2, L2+6*, Q12, Q11
>> LRFASTS Q14+16
>> LRFIRST LRFIRST, LEDI+6*, LEDI+7*
>> LRFLOG Q11+8
LRGCOM L2+2!
>> LRIDT Q14+14*
>> LRK Q13A+1*
LRKIL L2+2!, Q14+17
>> LRLABKY L2+4
>> LRM BAR*
LRNATURE L2+2!
>> LRNT Q14+13*
>> LRODT Q11+3, Q11+4, Q14+1
>> LROR L2+3, Q14+15, DROP
>> LRORD Q11+6*, Q14+2, Q14+4
>> LRORDR L2+6
>> LRORDRR Q11+8, BAR, Q14+1, Q14+6
>> LRORDTIM Q14+8*, Q14+9, Q14+12*
LROT L2+2!, Q14
LROT( Q14
LROT(0 LEDI+3
>> LRPARAM L2+4, Q14
>> LRRSITE("SMID" LEDI+3, LEDI+4
>> LRRSTAT LEDI+3
LRSAME L2+2!, MICRO+6*
>> LRSAMP Q13A+5*, MAX+4, MICRO+5, MICRO+6
>> LRSD("CDT" Q14+6, Q14+7, Q14+8
>> LRSD("RUID" LEDI+3, LEDI+4
LRSN MAX+1~, MAX+7*, MAX+8*
>> LRSPEC Q13A+5*, MAX+2, MAX+4, MICRO+5, MICRO+6
>> LRSS Q14+1
>> LRSSX LEDI+10*, LEDI+11, LEDI+12*, LEDI+13, Q13A+1*, Q13A+3*, Q13A+4, URGG
>> LRST Q13A+3*
>> LRSX LRFIRST*, LEDI+7*, LEDI+8, LEDI+9, LEDI+10, Q13A+1
LRTMAX Q11+1!
LRTSTS Q13A+5*, MAX+2, MAX+4, MAX+8, MAX+9, MAX+10~
>> LRWP L2+3, LRFIRST, LEDI+5
>> LRWPC L2+3*, BAR
>> LRWPD LRFIRST+2, LRFIRST+6
>> PNM L2+4*
>> S Q11+3*, Q11+4
T Q11+1!
T( Q11+4*, MAX+4, MAX+8
TT Q11+1!
TT( Q11+4*, MAX+2
U L2+4, L2+7, Q11+3, Q11+8, LRFIRST+5, LRFIRST+7, Q13A+5, Q14, Q14+12, MAX+4
, MAX+9, URGG, MICRO+6, PRAC+1
X Q11+4*, LRFIRST+3~, LRFIRST+4*, LRFIRST+5, LRFIRST+6*, LRFIRST+7, Q13A+2~, Q13A+4*, Q13A+5, PRAC+1*
, PRAC+2, PRAC+3*, PRAC+4
>> Y PRAC+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All