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 ; IHS/DIR/FJE - 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 Total: 4

Package Total Call Graph
Lab Service 3 ADD^LROW  EN^LRPARAM  (DD,PT)^LRX  
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LROR6  

Entry Points

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

External References

Name Field # of Occurrence
YN^DICN TST+3
ADD^LROW A+2
EN^LRPARAM EN+3
DD^LRX PT+4, PT+5
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: !!,"ORDER #: ",LRORD,?30,"PATIENT: ",PNM,?60,"HRCN: ",HRCN
  • Line Location: PT+3
Function Call: WRITE
  • Prompt: !," DRAW TIME: ",Y
  • Line Location: PT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PT+5
Function Call: WRITE
  • Prompt: " LAB ARRIVAL: ",Y
  • Line Location: PT+5
Function Call: WRITE
  • Prompt: ?30,"PHYSICIAN: ",LRMD
  • Line Location: PT+8
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+6
^LAB(60 - [#60] TEST
^LAB(62 - [#62] PT+7
^LAB(62.05 - [#62.05] TEST
^LR - [#63] PT+1
^LRO(68 - [#68] TEST+1
^LRO(69 - [#69] EN+1, EN+2, EN+3, A, A+1, B, PT, PT+4, PT+5, PT+8
, TST, TST+1, TST+2, TST+3, TEST
^VA(200 - [#200] PT+8

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, B, PT+6, TST+2
^(0 EN+2, A, A+1, PT, PT+1, PT+7, PT+8, TEST, TEST+1
^(1 A+1, PT+4, TST+1
^(3 PT+5
^(4 A

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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