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

Package: Lab Service

Routine: LROR9


Information

LROR9 ;SLC/DCM - ADD TESTS TO AN EXISTING ORDER THRU OE/RR; 9/23/88 15:15 ;2/8/91 07:29 ;

Source Information

Source file <LROR9.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 3 ADD^LROW  EN^LRPARAM  (DD,PT)^LRX  
VA FileMan 1 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: 1

Package Total Caller Graph
Lab Service 1 LROR6  

Entry Points

Name Comments DBIA/ICR reference
EN
END
A
B
PT
TST
TEST

External References

Name Field # of Occurrence
YN^DICN TST+3
ADD^LROW A+2
EN^LRPARAM EN+3
DD^LRX PT+3, PT+4
PT^LRX PT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Cannot add to this order."
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,"Cannot add to this order."
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"Tests have been accessioned, call the lab to add tests to the same order."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: " NO PATIENT"
  • Line Location: PT+0
Function Call: WRITE
  • Prompt: !!,"ORDER #: ",LRORD,?30,"PATIENT: ",PNM,?60,"SSN: ",SSN
  • Line Location: PT+2
Function Call: WRITE
  • Prompt: !," DRAW TIME: ",Y
  • Line Location: PT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PT+4
Function Call: WRITE
  • Prompt: " LAB ARRIVAL: ",Y
  • Line Location: PT+4
Function Call: WRITE
  • Prompt: ?30,"PHYSICIAN: ",LRMD
  • Line Location: PT+7
Function Call: WRITE
  • Prompt: !,"COMMENT: ",$P(^(1),"^",6)
  • Line Location: TST+1
Function Call: WRITE
  • Prompt: !,?3,^(I,0)
  • Line Location: TST+2
Function Call: WRITE
  • Prompt: !,"Is this the one"
  • Line Location: TST+3
Function Call: WRITE
  • Prompt: !," TEST: ",$S($D(^LAB(60,+X,0)):$P(^(0),"^"),1:"UNKNOWN"),?28," "
  • Line Location: TEST+0
Function Call: WRITE
  • Prompt: $S($D(^LAB(62.05,LRURG,0)):$P(^(0),"^"),1:"ROUTINE")
  • Line Location: TEST+0
Function Call: WRITE
  • Prompt: ?38," ",$S($D(^LRO(68,+$P(X,"^",4),0)):$P(^(0),"^"),1:""),?50," ",$P(X,"^",5)
  • Line Location: TEST+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PT+5
^LAB(60 - [#60] TEST
^LAB(62 - [#62] PT+6
^LAB(62.05 - [#62.05] TEST
^LR - [#63] PT+1
^LRO(68 - [#68] TEST+1
^LRO(69 - [#69] EN+1, EN+2, EN+3, AA+1, BPTPT+3, PT+4, PT+7
TSTTST+1, TST+2, TST+3, TEST
^VA(200 - [#200] PT+7

Label References

Name Line Occurrences
A EN+3
B A
END EN+2
PT EN+3
TEST TST

Naked Globals

Name Field # of Occurrence
^( A+1, BPT+5, TST+2
^(0 EN+2, AA+1, PTPT+1, PT+6, PT+7, TESTTEST+1
^(1 A+1, PT+3, TST+1
^(3 PT+4
^(4 A

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TST+3*
>> DA A+1*
>> DFN PT+1*, PT+5
DIC END+2!
>> I A+1*, B*, TST*, TST+2*, TEST
J END+1!
K END+1!
L END+2!, PT+7*
LR2ORD EN+2*, END+1!
LRAA END+2!
LRAAO END+2!
LRACN0 END+2!
LRAD END+2!
LRADDTST EN+3*, END!, TST+3*
LRAN END+2!
LRBED END!
LRBLOOD END+2!
LRC END+2!
LRCCOM END!
LRCDT END!
LRCOM END!
LRCS END!
LRCSN END!
LRCSP END!
LRCSS END!
LRCSX END!
LRCW END+2!
LRDFN END!, A+1, PT*, PT+1
LRDPF END!, PT+1*
LRDT0 END+2!
LRDTO END!
LREND END!
LREXP END!
LRFLOG END!
LRFOOT END+2!
LRGCOM END!
LRHF END+2!
LRI END!
LRIO END!
LRIOZERO END!
LRJ END+2!
LRLAB END+2!
LRLL END+2!
LRLLOC END!, TST+3*
LRLWC END!, TST+3*
LRM END!
LRMAX END+1!
LRMD END+2!, PT+7*
LRMOR END+1!
LRNCWL END!
LRNN END+1!
>> LRNOP TEST*
LROD0 END+2!
LROD1 END+2!
LROD3 END+2!
LRODT EN*, EN+1, EN+2, EN+3, END+1!, AA+1, BPTPT+3
PT+4, PT+7, TSTTST+1, TST+2, TST+3, TEST
LRODTSV END+2!
>> LROLLOC TST+3*
LROOS END+2!
LROR END+2!, PT*, PT+6
LRORD EN+3*, END+1!, PT+2, TST+3
LRORDER END!
LRORDTIM END!, TST+3*
LRORIFN END!
LRORN END+2!
LROS END+2!
LROSD END+2!
LROT END+3!
LRPARAM EN+3, END+2!
LRPLASMA END+2!
LRPR END+1!
LRPRAC END+1!, TST+3*
LRROD END+3!
LRSAME END+1!
LRSAMP END+1!, A*, B
LRSAV END+3!
LRSERUM END+2!
LRSN EN*, EN+1, EN+2, EN+3, END+1!, ABPTPT+3, PT+4
PT+7, TSTTST+1, TST+2, TST+3, TEST
LRSN1 END+1!
LRSNO END+1!
LRSNSV END+2!
LRSORD END+3!
LRSPEC END+1!, A*, B
LRSS END+3!
LRSSP END+1!
LRSSX END!
LRSTIK END!
LRSVSN END!
LRTEST END+1!
LRTIME END+1!
LRTN EN*, EN+2, END+1!
LRTNSV END+2!
LRTP END+1!
LRTSN END+1!
LRTSTN END+1!
LRTSTNM END!
LRTSTS END+3!
LRTXD END!
LRTXP END!
LRTY END+1!
LRUNKNOW END+2!
LRUNQ END+2!
LRUR END+1!
LRURG END+2!, TEST*
LRURINE END+2!
LRUSI END+1!
LRUSNM END+1!
LRWPC END!
LRWRD END+2!
LRXS END+1!
LRXST END+1!
LRY END+1!
LRZ END+3!
LRZX END+2!
NOW END+2!
>> ORPK EN
PNM END+1!, PT+2
S END+1!, A+1*
SEX END+1!
SSN END+1!, PT+2
T END!, A+1!
T( A+1*
X END+1!, A*, TST+3*, TEST*, TEST+1
X1 END+2!
X3 END!
X3( B*
X5 END+2!
Y END+1!, PT+3*, PT+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All