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

Package: Lab Service

Routine: LREPIRS


Information

LREPIRS ;VA/DALOI/CKA - EPI-LOCAL REPORT/SPREADSHEET ; 5/14/03

Source Information

Source file <LREPIRS.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 HOME^%ZIS  ^%ZTLOAD  
VA Fileman 2 NOW^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LREPI GENERATE REPORT/SP  

Entry Points

Name Comments DBIA/ICR reference
LOCALL ;SELECT ALL LOCAL PATHOGENS
CHK ;CHECK TO SEE IF ITS OK
TASK ;LETS TASK THIS JOB
TITLE
PICKALL ;SELECT ALL ASSOCIATED PARAMETERS
ALL
SEG ;CHOOSE SEGMENTS FOR SPREADSHEET
EXIT ;
DATE ;Select Search Date
CRI
RORS ;REPORT OR SPREADSHEET

External References

Name Field # of Occurrence
NOW^%DTC LREPIRS+5
HOME^%ZIS TITLE+5
^%ZTLOAD TASK+8
^DIR CRI+11, DATE+3, DATE+8, RORS+3, TITLE+2, ALL+3, SEG+10, SEG+31, SEG+45, SEG+56
, SEG+65, SEG+77, SEG+93

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?(IOM/2-15),"Laboratory Generate Local Report/Spreadsheet option"
  • Line Location: LREPIRS+9
Function Call: WRITE
  • Prompt: !,"Sorry No Pathogens Selected"
  • Line Location: CRI+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: RORS+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: TASK+2
Function Call: WRITE
  • Prompt: @IOF,!!,"The Task has been queued",!,"Task # ",$G(ZTSK)
  • Line Location: TASK+9
Function Call: WRITE
  • Prompt: !,"Choose the segments to capture for ",$S(LRREP=1:"report.",1:"spreadsheet.")
  • Line Location: SEG+1
Function Call: WRITE
  • Prompt: !,"1-PID"
  • Line Location: SEG+2
Function Call: WRITE
  • Prompt: !,"2-PV1"
  • Line Location: SEG+3
Function Call: WRITE
  • Prompt: !,"3-DG1"
  • Line Location: SEG+4
Function Call: WRITE
  • Prompt: !,"4-NTE"
  • Line Location: SEG+5
Function Call: WRITE
  • Prompt: !,"5-OBR"
  • Line Location: SEG+6
Function Call: WRITE
  • Prompt: !,"6-OBX"
  • Line Location: SEG+7
Routine Call
  • %ZIS
  • Line Location:
    • TITLE+5
Routine Call
  • DIR
  • Line Location:
    • CRI+11
    • DATE+3
    • DATE+8
    • RORS+3
    • TITLE+2
    • ALL+3
    • SEG+10
    • SEG+31
    • SEG+45
    • SEG+56
    • SEG+65
    • SEG+77
    • SEG+93

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(69.5 - [#69.5] PICKALL+1, LOCALL+1, CHK+1, CHK+3, CHK+4, CHK+5, CHK+6
^ORD(101 - [#101] LREPIRS+8, CHK+5
^TMP($J EXIT+6!
^XTMP("LREPI" TITLE+4*
^XTMP("LREPILOCALREP" RORS+7
^XTMP("LREPILOCALSPSHT" RORS+9

Label References

Name Line Occurrences
ALL CRI, CRI+3
CHK PICKALL+1, LOCALL+1
CRI CRI+3, CRI+14, DATE+4
DATE CRI+2, CRI+5, DATE+9, RORS+4
EXIT CRI, CRI+15, RORS+7, RORS+9
LOCALL CRI+5
PICKALL CRI+2
RORS RORS+11, TITLE+3
SEG RORS+11
TASK TITLE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LREPIRS+6
%DT EXIT+3!
D0 EXIT+1!
DIR CRI+1!, CRI+4!, DATE+1!, DATE+6!, RORS+1!, TITLE!, EXIT+5!, ALL!, SEG+8!, SEG+29!
, SEG+43!, SEG+54!, SEG+63!, SEG+75!, SEG+91!
DIR("?" ALL+2*
DIR("A" CRI+9*, DATE+2*, DATE+7*, TITLE+1*, ALL+1*
DIR("B" ALL+1*
DIR("S" CRI+10*
DIR(0 CRI+9*, DATE+3*, DATE+8*, RORS+2*, TITLE+1*, ALL+1*, SEG+9*, SEG+30*, SEG+44*, SEG+55*
, SEG+64*, SEG+76*, SEG+92*
DIROUT CRI+1!, CRI+4!, CRI+14, EXIT+5!
DIRUT CRI, CRI+1!, CRI+3, CRI+4!, CRI+8, CRI+12, DATE+1!, DATE+4, DATE+6!, DATE+9
, RORS+1!, RORS+4, RORS+11, TITLE!, TITLE+3, EXIT+5!, ALL!, SEG+8!, SEG+11, SEG+29!
, SEG+32, SEG+43!, SEG+46, SEG+54!, SEG+57, SEG+63!, SEG+66, SEG+75!, SEG+78, SEG+91!
, SEG+94
DT DATE+3, DATE+8, TASK+5
DTOUT CRI+1!, CRI+4!, CRI+14, EXIT+5!
DUOUT CRI+1!, CRI+4!, CRI+14, EXIT+5!
DUZ TASK+3
I EXIT+5!, SEG+33*, SEG+47*, SEG+58*, SEG+67*, SEG+79*, SEG+95*
IOF LREPIRS+9, CRI+7, TASK+9
IOM LREPIRS+9
J EXIT+1!
LRALL CRI+2, CRI+5, CRI+6, EXIT+1!, ALL+4*
LRAUTO EXIT+1!
LRBEG EXIT+1!
LRCYCLE CRI!, EXIT+1!, CHK+1*, CHK+6
LRDT EXIT+1!
LRDUZ EXIT+2!, TASK+3*
LREND EXIT+1!
LREPI CRI!, CRI+15, EXIT+1!, TASK+1
LREPI( CRI+13*, PICKALL+1*, LOCALL+1*
LRHDG EXIT+4!
LRLC EXIT+4!
LRLRDT LREPIRS+6*, RORS+7, RORS+9, TITLE+4, EXIT+4!
LRMSG CRI*, CRI+3*, EXIT+1!, ALL+1
LROK EXIT+1!, PICKALL+1, LOCALL+1, CHK+2*, CHK+3*, CHK+4*, CHK+5*, CHK+6*
LROVR EXIT+1!
LRPROT LREPIRS+7*, LREPIRS+8*, EXIT+4!
LRREP RORS+5*, RORS+7, RORS+9, TITLE+4, EXIT+2!, SEG+1, SEG+15, SEG+35, SEG+49, SEG+60
, SEG+69, SEG+81
LRRNDT EXIT+2!
LRRPE DATE+10*, EXIT+2!
LRRPS DATE+5*, EXIT+2!
LRRTYPE LREPIRS+7*, EXIT+2!, TASK+5
LRSEG EXIT+5!
LRSEG("DG1" SEG+48*, SEG+58*
LRSEG("NTE" SEG+59*, SEG+67*
LRSEG("OBR" SEG+68*, SEG+79*
LRSEG("OBX" SEG+80*, SEG+95*
LRSEG("PID" SEG+13*, SEG+33*
LRSEG("PV1" SEG+34*, SEG+47*
LRY EXIT+2!, SEG+12*, SEG+13, SEG+34, SEG+48, SEG+59, SEG+68, SEG+80
U CHK+1, CHK+3, CHK+4, CHK+5, CHK+6
X EXIT+3!
X1 EXIT+3!
Y CRI+13, DATE+5, DATE+10, RORS+5, TITLE+4, EXIT+3!, PICKALL+1*, LOCALL+1*, CHK+1, CHK+3
, CHK+4, CHK+5, CHK+6, ALL+4, SEG+12, SEG+33, SEG+47, SEG+58, SEG+67, SEG+79
, SEG+95
ZTDESC EXIT+3!, TASK+7*
ZTDTH EXIT+3!, TASK+5*
ZTIO EXIT+3!, TASK+7*
>> ZTQUEUED TASK+9
ZTRTN EXIT+3!, TASK+7*
ZTSAVE EXIT+2!, TASK+4!
ZTSAVE("LR*" TASK+6*
ZTSAVE("LRRTYPE" TASK+5*
ZTSK EXIT+3!, TASK+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All