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

Package: Lab Service

Routine: LRLISTPS


Information

LRLISTPS ;JMC/DALOI Print patient LAB DATA file Summary ;09/16/15 17:12

Source Information

Source file <LRLISTPS.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
Lab Service 3 EN^LRDIQ  ^LRDPA  EN^LRPARAM  
VA FileMan 3 ^%DT  EN^DDIOL  ^DIR  
Registration 1 KVA^VADPT  

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 LRLISTPS  

Entry Points

Name Comments DBIA/ICR reference
EN ; Print summary report based only on entry in file #63.
DQP ; Dequeue (TaskMan ) entry point and from above
LRRAW(LRDFN,LRSS,LRIDT) ; Display raw data from LR global.
WAIT ; Check if continue display
HEAD ; Print header
CLEAN ; Clean up and quit
STARTDT() ; Prompt for start date/time
ENDDT(LRSDT) ; Prompt for end date/time
DATE(LRPROMPT,LRDEFAULT,LRFLAGS) ;

External References

Name Field # of Occurrence
^%DT DATE+7
^%ZIS EN+36
HOME^%ZIS EN+37
^%ZISC EN+41, CLEAN+2
^%ZTLOAD EN+41
EN^DDIOL EN+42
^DIR EN+9, EN+25, EN+32, WAIT+6
EN^LRDIQ DQP+10, DQP+12
^LRDPA EN+5
EN^LRPARAM EN+4
KVA^VADPT CLEAN+5
$$FMTE^XLFDT EN+19, HEAD+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DQP+10
Function Call: WRITE
  • Prompt: !!,"Related LAB DATA file (#63) global listing",!
  • Line Location: LRRAW+4
Function Call: WRITE
  • Prompt: !,LRNODE," = ",@LRNODE
  • Line Location: LRRAW+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,"Patient Summary Report",?25,"WORK COPY ONLY - DO NOT FILE",?58,"Printed: ",$$FMTE^XLFDT(DT,"1Z")
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !,PNM,?30,SSN,?45," Sex: ",SEX
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: !," For date range: "_LREDAT_" to "_LRSDAT_" for "_LRSS(0)
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLEAN+1
Routine Call
  • DIR
  • Line Location:
    • EN+9
    • EN+25
    • EN+32
    • WAIT+6
Routine Call
  • %ZIS
  • Line Location:
    • EN+36
Routine Call
  • %ZIS
  • Line Location:
    • EN+37

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] DQP+8, LRRAW+6

Label References

Name Line Occurrences
$$DATE STARTDT+4, ENDDT+6
$$ENDDT EN+17
$$STARTDT EN+15
CLEAN DQP+17
HEAD DQP+4, WAIT+9
LRRAW DQP+15
WAIT DQP+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE+2~, DATE+6*
%DT("A" DATE+4*
%DT("B" DATE+5*
%ZIS EN+2~, EN+36*
DA EN+2~, DQP+9*
DIC EN+2~, DQP+6*
DIR EN+2~, EN+22!, EN+29!, WAIT+5~
DIR("?" EN+24*, EN+31*
DIR("A" EN+8*, EN+23*, EN+30*
DIR("B" EN+8*, EN+23*, EN+30*
DIR(0 EN+7*, EN+23*, EN+30*, WAIT+6*
DIRUT EN+2~, EN+10, EN+21, EN+26, EN+33, DQP+11, DQP+13, WAIT+5~
DR EN+2~, DQP+9*, DQP+12*
DT HEAD+4
DTOUT WAIT+5~, DATE+2~
DUOUT WAIT+5~
DX EN+2~, DQP+10!
IO DQP+2
IO("Q" EN+38
IOF DQP+3, HEAD+3, CLEAN+1
IOP EN+2~
IOSL WAIT+9
IOST DQP+3, WAIT+4, HEAD+3, CLEAN+1
LRDEFAULT DATE~, DATE+5
LRDFN EN+2~, EN+5, DQP+6, DQP+8, DQP+15, LRRAW~, LRRAW+6, LRRAW+9
LREDAT EN+2~, EN+19*, HEAD+6
LREDT EN+2~, EN+17*, EN+18, EN+19, DQP+7, ENDDT+4~, ENDDT+6*, ENDDT+7, ENDDT+11, ENDDT+12
, ENDDT+13*, ENDDT+18
LREND EN+2~, EN+13*, EN+16*, EN+18*, DQP+8, DQP+11*, DQP+13*, WAIT+4, WAIT+7*
LRFLAGS DATE~, DATE+6
LRIDT EN+2~, DQP+7*, DQP+8*, DQP+9, DQP+15, LRRAW~, LRRAW+6, LRRAW+9
LRIDTE EN+2~, DQP+7*
LRIDTS EN+2~, DQP+7*, DQP+8
LRLONG EN+2~, EN+13*, EN+27*
LRNODE LRRAW+2~, LRRAW+7*, LRRAW+8*, LRRAW+9
LRPROMPT DATE~, DATE+4
LRQUIT LRRAW+2~, LRRAW+7*, LRRAW+8, LRRAW+10*
LRRAW EN+2~, EN+13*, EN+34*, DQP+15
LRROOT LRRAW+2~, LRRAW+6*, LRRAW+7
LRSDAT EN+2~, EN+19*, HEAD+6
LRSDT EN+2~, EN+15*, EN+16, EN+17, EN+19, DQP+7, STARTDT+2~, STARTDT+4*, STARTDT+5, ENDDT~
, ENDDT+9, ENDDT+11, ENDDT+13, ENDDT+14*, ENDDT+16*
LRSS EN+2~, EN+11*, EN+21, DQP+6, DQP+8, DQP+15, LRRAW~, LRRAW+6, LRRAW+9
LRSS(0 EN+11*, HEAD+6
>> PNM HEAD+5
POP EN+2~, EN+37
>> SEX HEAD+5
>> SSN HEAD+5
X EN+2~, WAIT+5~, ENDDT+4~, ENDDT+12*, ENDDT+14, DATE+2~
Y EN+2~, EN+11, EN+27, EN+34, WAIT+5~, WAIT+7, DATE+2~, DATE+8, DATE+9
Y(0 EN+11
ZTDESC EN+39~, EN+40*
>> ZTQUEUED WAIT+4, CLEAN+2
>> ZTREQ CLEAN+3*
ZTRTN EN+39~, EN+40*
ZTSAVE EN+39~
ZTSAVE("LR*" EN+40*
ZTSK EN+39~, EN+42
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All