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

Package: Lab Service

Routine: LRSPRPTA


Information

LRSPRPTA ;DALOI/STAFF - CY/EM/SP PATIENT RPT (cont'd) ;03/21/13 15:29

Source Information

Source file <LRSPRPTA.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Lab Service 8 ATTEND^LRAPBR1  (,F,P)^LRAPF  GETPCP^LRAPUTL  RETLST^LRRPL  (A,F,S,W)^LRSPRPT  ^LRSPRPT1  ^LRSPRPTM  ^LRUA  
Kernel 1 $$REPEAT^XLFSTR  

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 LRSPRPT  

Entry Points

Name Comments DBIA/ICR reference
EN ; from LRSPRPT
; Suppress SNOMED codes except on Preliminary
PPL ; Print any performing laboratories

External References

Name Field # of Occurrence
ATTEND^LRAPBR1 EN+34
^LRAPF EN+10, EN+43, EN+48, EN+53, EN+60, EN+66, EN+72, EN+79, EN+80, PPL+8
, PPL+14
F^LRAPF EN+43, EN+48, EN+53, EN+60, EN+66, EN+72, EN+79, EN+80, EN+91, PPL+8
, PPL+14
P^LRAPF EN+44
GETPCP^LRAPUTL EN+8
RETLST^LRRPL PPL+4
A^LRSPRPT EN+13
F^LRSPRPT EN+26, EN+27, EN+28, EN+29, EN+58, EN+64, EN+70, EN+76
S^LRSPRPT EN+83
W^LRSPRPT EN+12, EN+26, EN+27, EN+28, EN+29, EN+46
^LRSPRPT1 EN+84
^LRSPRPTM EN+55, EN+62, EN+68, EN+74
^LRUA EN+6
$$REPEAT^XLFSTR PPL+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Submitted by: ",LRW(5),?44,"Date obtained: ",LRTK
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !,"Specimen (Received ",LRTK(1),"):"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !?14,"*+* SUPPLEMENTARY REPORT HAS BEEN ADDED *+*"
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !?19,"*+* REFER TO BOTTOM OF REPORT *+*",!
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !,"Comment:"
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !,^LR(LRDFN,LRSS,LRI,99,LRB,0)
  • Line Location: EN+22
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+26
Function Call: WRITE
  • Prompt: !,"Brief Clinical History:"
  • Line Location: EN+26
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+27
Function Call: WRITE
  • Prompt: !,"Preoperative Diagnosis:"
  • Line Location: EN+27
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+28
Function Call: WRITE
  • Prompt: !,"Operative Findings:"
  • Line Location: EN+28
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+29
Function Call: WRITE
  • Prompt: !,"Postoperative Diagnosis:"
  • Line Location: EN+29
Function Call: WRITE
  • Prompt: !?27,"Surgeon/physician: ",LRMD
  • Line Location: EN+35
Function Call: WRITE
  • Prompt: !,?26,LRMD("SR-ATTEND")
  • Line Location: EN+37
Function Call: WRITE
  • Prompt: !,?26,$P(LRMD("ERR"),"^",2)
  • Line Location: EN+38
Function Call: WRITE
  • Prompt: !,LR("%1")
  • Line Location: EN+40
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+50
Function Call: WRITE
  • Prompt: ?31,$S(LRSS="SP":"Pathology Resident: ",LRSS="CY":"Screened by: ",LRSS="EM":"Prepared by: ",1:" "),LRRMD
  • Line Location: EN+51
Function Call: WRITE
  • Prompt: !,LR(69.2,.13)
  • Line Location: EN+54
Function Call: WRITE
  • Prompt: !,LR(69.2,.03)
  • Line Location: EN+61
Function Call: WRITE
  • Prompt: !,LR(69.2,.04)
  • Line Location: EN+67
Function Call: WRITE
  • Prompt: !,LR(69.2,.14)
  • Line Location: EN+73
Function Call: WRITE
  • Prompt: !,"Supplementary Report:"
  • Line Location: EN+81
Function Call: WRITE
  • Prompt: !!,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: PPL+10
Function Call: WRITE
  • Prompt: !,"Performing Laboratory:",!
  • Line Location: PPL+11
Function Call: WRITE
  • Prompt: !,"Performing Laboratory (cont'd):",!
  • Line Location: PPL+14
Function Call: WRITE
  • Prompt: !,LRPL(LRJ)
  • Line Location: PPL+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] EN+4, EN+14, EN+52, EN+55, EN+59, EN+62, EN+65, EN+68, EN+71, EN+74
, EN+79, EN+82, EN+83
^LRO(69.2 - [#69.2] EN+3

Label References

Name Line Occurrences
PPL EN+87

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
IOM PPL+10
IOSL EN+42, EN+48, EN+53, EN+60, EN+66, EN+72, EN+80, PPL+8, PPL+14
>> LR( EN+3*, EN+54, EN+61, EN+67, EN+73, EN+79
>> LR("%1" EN+40
>> LR("DIWF" EN+25*, EN+30*!, EN+57*, EN+64*
>> LR("F" EN+11*
>> LR("Q" EN+10, EN+13, EN+26, EN+27, EN+28, EN+29, EN+42, EN+48, EN+52, EN+53
, EN+58, EN+59, EN+60, EN+64, EN+65, EN+66, EN+70, EN+71, EN+72, EN+76
, EN+79, EN+80, EN+82, EN+84, PPL+8, PPL+13, PPL+14
>> LR("SPSM" EN+2*
>> LR(0 EN+55*, EN+62*, EN+68*, EN+74*
>> LRA EN+12, EN+26, EN+27, EN+28, EN+29, EN+40, EN+46
>> LRAA EN+3
>> LRDFN EN+4, EN+8, EN+14, EN+52, EN+55, EN+59, EN+62, EN+65, EN+68, EN+71
, EN+74, EN+79, EN+82, EN+83, PPL+4
>> LRI EN+4, EN+8, EN+14, EN+52, EN+55, EN+59, EN+62, EN+65, EN+68, EN+71
, EN+74, EN+79, EN+82, EN+83, PPL+4
LRJ PPL+2~, PPL+12*, PPL+13*, PPL+15
>> LRMD EN+34, EN+35
>> LRMD("SR-ATTEND" EN+37
>> LRMD("SR-SURGEON" EN+36
LRO EN+4!, EN+91*
LRPL PPL+2~, PPL+4, PPL+5
LRPL( PPL+13, PPL+15
>> LRPRAC EN+8
>> LRPRE EN+2, EN+90
>> LRQ EN+5*
>> LRRC EN+47
>> LRRMD EN+51
>> LRSS EN+4, EN+8, EN+14, EN+51, EN+52, EN+55, EN+59, EN+62, EN+65, EN+68
, EN+71, EN+74, EN+79, EN+82, EN+83, PPL+4
>> LRTK EN+11
>> LRTK(1 EN+13
>> LRV EN+13*, EN+26*, EN+27*, EN+28*, EN+29*, EN+58*, EN+64*, EN+70*, EN+76*, EN+82*
, EN+83
>> LRW(5 EN+11
LRX PPL+2~
U EN+55, EN+62, EN+74
>> X EN+83*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All