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

Package: Lab Service

Routine: LRHYLS1


Information

LRHYLS1 ;DALOI/HOAK - DISPLAY ORDERS ; 10/15/10 11:25am

Source Information

Source file <LRHYLS1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 6 PRAC^LR7OMERG  $$DTF^LRAFUNC1  BUILD^LRHYT2  (SCRNOFF,SCRNON)^LRHYUTL  LEDI^LRWRKLS1  (DASH,DD,PT)^LRX  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRHYF1  LRHYF2  

Entry Points

Name Comments DBIA/ICR reference
LEDI ; print LEDI information
CHKPAGE ;
FLASH ;
TSTCOM ;
LST1 ;

External References

Name Field # of Occurrence
^DIR CHKPAGE+5
PRAC^LR7OMERG LST1+32
$$DTF^LRAFUNC1 LST1+24
BUILD^LRHYT2 LST1+21
SCRNOFF^LRHYUTL FLASH+5
SCRNON^LRHYUTL FLASH+1
LEDI^LRWRKLS1 LEDI+1
DASH^LRX LST1+20, LST1+27
DD^LRX LST1+10, LST1+11
PT^LRX LST1+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"UID: ",?11,$G(^LRO(68,LRAA,1,LRAD,1,LRAN,.3))
  • Line Location: LST1+16
Function Call: WRITE
  • Prompt: !,"ACCESSION: ",$E(^LRO(68,LRAA,0),1,4)," ",$E(LRAD,4,7)," ",LRAN
  • Line Location: LST1+17
Function Call: WRITE
  • Prompt: !,"ORDER #: ",?11,LRCE
  • Line Location: LST1+18
Function Call: WRITE
  • Prompt: "Patient: ",$E(PNM,1,12)
  • Line Location: LST1+22
Function Call: WRITE
  • Prompt: ?22,"SSN: ",$P(SSN,"-",3)
  • Line Location: LST1+23
Function Call: WRITE
  • Prompt: ?33,"DOB: ",$$DTF^LRAFUNC1(DOB)
  • Line Location: LST1+24
Function Call: WRITE
  • Prompt: ?50,"PROVIDER: ",$S($D(^VA(200,LRPRAC,0)):$P(^(0),"^"),1:LRPRAC)
  • Line Location: LST1+26
Function Call: WRITE
  • Prompt: !?16,$P(^(0),"^")
  • Line Location: LST1+32
Function Call: WRITE
  • Prompt: !," Order Comment:"
  • Line Location: LST1+35
Function Call: WRITE
  • Prompt: !?11,^(LRHYI,0)
  • Line Location: LST1+38
Function Call: WRITE
  • Prompt: !," CANCELLED TEST: ",$S($D(^LAB(60,+X,0)):$P(^(0),"^"),1:"UNKNOWN")
  • Line Location: TSTCOM+4
Function Call: WRITE
  • Prompt: " "_$E($S($D(^LAB(62.05,LRURG,0)):$P(^(0),U),1:"ROUTINE"),1,15)
  • Line Location: TSTCOM+8
Function Call: WRITE
  • Prompt: " by: "_$P(^VA(200,$P(X,"^",11),0),"^")
  • Line Location: TSTCOM+9
Function Call: WRITE
  • Prompt: !?3,": "_^(0)
  • Line Location: TSTCOM+10
Function Call: WRITE
  • Prompt: !," Accession Comment: ",LRACO
  • Line Location: TSTCOM+11
Function Call: WRITE
  • Prompt: IOBON
  • Line Location: FLASH+1
Function Call: WRITE
  • Prompt: ?20,$S($D(^LAB(62.05,+LRURG,0)):$P(^(0),U),1:"")," "
  • Line Location: FLASH+3
Function Call: WRITE
  • Prompt: IOBOFF
  • Line Location: FLASH+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKPAGE+9
Routine Call
  • DIR
  • Line Location:
    • CHKPAGE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] TSTCOM+4
^LAB(62.05 - [#62.05] TSTCOM+8, FLASH+3
^LR - [#63] LST1+5, LST1+6
^LRO(68 - [#68] LST1+4, LST1+9, LST1+16, LST1+17, LST1+19
^LRO(69 - [#69] LST1+34, LST1+37, LST1+38, TSTCOM+3, TSTCOM+10
^VA(200 - [#200] LST1+26, LST1+32, TSTCOM+9

Label References

Name Line Occurrences
CHKPAGE LST1+2, LST1+14, LST1+30, LST1+38, TSTCOM+10
FLASH TSTCOM+6, TSTCOM+7

Naked Globals

Name Field # of Occurrence
^( LST1+4, LST1+38, TSTCOM+3, TSTCOM+10
^(0 LST1+6, LST1+26, LST1+32, TSTCOM+4, TSTCOM+8, TSTCOM+10, FLASH+3
^(3 LST1+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN LST1+6*
DIR CHKPAGE+3!
DIR(0 CHKPAGE+4*
>> DIRUT CHKPAGE+6
>> DOB LST1+24
>> DUOUT CHKPAGE+6
>> IOBOFF FLASH+5
>> IOBON FLASH+1
IOSL CHKPAGE+2
IOST CHKPAGE+1
>> LN LST1+13*, LST1+29*, LST1+35*, LST1+38*, TSTCOM+11*, CHKPAGE+2, CHKPAGE+8*
>> LRAA LST1+4, LST1+9, LST1+16, LST1+17, LST1+19, LST1+32
>> LRACC LST1+4*
>> LRACO LST1+8*, LST1+9*, TSTCOM+11
>> LRAD LST1+4, LST1+9, LST1+16, LST1+17, LST1+19, LST1+32
>> LRAN LST1+4, LST1+9, LST1+16, LST1+17, LST1+19, LST1+32
>> LRCE LST1+4*, LST1+18
>> LRDLA LST1+8*, LST1+9*, LST1+10*
>> LRDLC LST1+8*, LST1+10*
>> LRDPF LST1+6*
>> LRDTO LST1+11*
>> LRDX LST1+4*, LST1+5, LST1+6, LST1+11, LST1+25, LST1+33, TSTCOM+12
>> LREND CHKPAGE+7*
>> LRHYI LST1+36*, LST1+38*, TSTCOM+2*, TSTCOM+3*, TSTCOM+10
>> LRHYI(2 TSTCOM+10*
>> LRKUNKE LST1+1
>> LRNX0 LST1+37*
>> LRPRAC LST1+25*, LST1+26
>> LRSTOP LST1+3, LST1+15, LST1+31, LST1+38, TSTCOM+1, TSTCOM+10, CHKPAGE+1, CHKPAGE+6*, CHKPAGE+7
>> LRUID LST1+19*
LRURG TSTCOM+5~*, TSTCOM+6, TSTCOM+7, TSTCOM+8, FLASH+1, FLASH+3, FLASH+5
>> PNM LST1+22
PR LST1+32~*
PRAC LST1+32~
PRAC( LST1+32
PRAC(0 LST1+32
>> SSN LST1+23
U LST1+6, LST1+9, LST1+11, LST1+19, LST1+33, TSTCOM+5, TSTCOM+8, TSTCOM+12, FLASH+3
>> X TSTCOM+3*, TSTCOM+4, TSTCOM+5, TSTCOM+9
>> X1 LST1+33*, LST1+34, LST1+37, LST1+38, TSTCOM+3, TSTCOM+10
>> X2 LST1+33*, LST1+34, LST1+37, LST1+38, TSTCOM+3, TSTCOM+10
>> Y LST1+9*, LST1+10*, LST1+11*
>> ZTQUEUED CHKPAGE+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All