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

Package: Lab Service

Routine: LRGEN1


Information

LRGEN1 ;SLC/RWF-GENERAL DATA DISPLAY ;2/19/91 10:35

Source Information

Source file <LRGEN1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZISC  ($$FMTE,$$NOW)^XLFDT  $$CJ^XLFSTR  
Lab Service 1 (DT,PT)^LRX  
Registration 1 KVAR^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 LRGEN  

Entry Points

Name Comments DBIA/ICR reference
DQ ;dequeued from LRGEN
WRTLN
AEDT(LRD,LRS,LRI,LRE,LRT) ;return Actual End DaTe
NX
NSET
LRPR
HEAD
HD1
LAST
BOT ;D KEYCOM^LRX:$E(IOST,1,2)'="C-"
B1
B2 ;Return to menu

External References

Name Field # of Occurrence
^%ZISC WRTLN
DT^LRX DQ+11
PT^LRX DQ+11
KVAR^VADPT DQ+15
$$FMTE^XLFDT DQ+2, DQ+3, LRPR+2, HEAD+5
$$NOW^XLFDT DQ+2, HEAD+5
$$CJ^XLFSTR HEAD+9, LAST

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: WRTLN+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="P-"
  • Line Location: WRTLN+0
Function Call: WRITE
  • Prompt: !,LRFOOT," ",LRDAT
  • Line Location: LRPR+8
Function Call: WRITE
  • Prompt: !,?13,LRSAMP,?20
  • Line Location: LRPR+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: !,"WORK COPY: ",PNM," ",SSN," Age:",AGE," ",?50,"Prt Date:",LRPDT
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(LRPRTF_" Pg:"_LRPAGE,LRIOM)
  • Line Location: HEAD+9
Function Call: WRITE
  • Prompt: ?20,LRHDR(LRSC)
  • Line Location: HEAD+10
Function Call: WRITE
  • Prompt: !,$S($D(LRTHER):" Ther.",1:" Ref")," Range",?17,LRHDR(LRSC,2)
  • Line Location: HEAD+11
Function Call: WRITE
  • Prompt: !,?13,"SPEC",?20,LRHDR(LRSC,1)
  • Line Location: HEAD+12
Function Call: WRITE
  • Prompt: !,LREQUAL
  • Line Location: HEAD+13
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("[ *** End Of Report *** ]",LRIOM),!
  • Line Location: LAST+0
Function Call: WRITE
  • Prompt: !,LREQUAL
  • Line Location: BOT+2
Function Call: WRITE
  • Prompt: !!," ------------------------------ COMMENTS ------------------------------"
  • Line Location: BOT+3
Function Call: WRITE
  • Prompt: !," Key: 'L' = reference Low, 'H' = reference Hi, '*' = critical range"
  • Line Location: BOT+4
Function Call: WRITE
  • Prompt: !,LRDASH
  • Line Location: BOT+6
Function Call: WRITE
  • Prompt: !,$C(II+64)
  • Line Location: BOT+9
Function Call: WRITE
  • Prompt: ?5,^(J,0)
  • Line Location: BOT+10
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $O(^LR(LRDFN,LRSUB,LRIDT1,1,J))
  • Line Location: BOT+10
Function Call: WRITE
  • Prompt: !,"WORK COPY - DO NOT FILE ",PNM,?60,SSN
  • Line Location: B1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: B1+1
Function Call: WRITE
  • Prompt: !?20," PRESS '^' TO STOP REPORT "
  • Line Location: B1+1
Function Call: WRITE
  • Prompt: !?20," PRESS 'Enter' TO RETURN TO THE MENU "
  • Line Location: B2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61 - [#61] LRPR+1
^LR - [#63] DQ+9, AEDT+3, AEDT+4, AEDT+5, NX+1, NX+2, NX+5, NX+6, NSET, LRPR+6
, LRPR+9, LRPR+11, HEAD+10, BOT+9, BOT+10, BOT+12

Label References

Name Line Occurrences
$$AEDT DQ+10
B2 LAST+1
BOT NX, NX+4
HD1 HEAD+3
HEAD DQ+11, NX
LAST NX+4, BOT+12
LRPR NX+8, NSET
NSET NX, NX+3
NX DQ+12
WRTLN DQ+13

Naked Globals

Name Field # of Occurrence
^( NX+1, LRPR+11, BOT+10, BOT+12
^(0 DQ+9, AEDT+4, NX+5, LRPR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE DQ+14!, HEAD+8
>> DFN DQ+9*
DTIME B1+1, B2+1
>> I LRPR+10*, LRPR+11, LRPR+12
II NX+6*, HEAD+3*, BOT+5~, BOT+7*, BOT+9
IO DQ+8
IOF DQ+5, WRTLN, HEAD+7
IOSL DQ+7
IOST DQ+5, WRTLN, BOT+1, B1+1, B2+1
>> J BOT+9*, BOT+10
LRAGE DQ+14!
>> LRBOT HEAD+3
>> LRCW DQ+9*, LRPR+13
LRD AEDT~, AEDT+3, AEDT+4, AEDT+5
LRDASH DQ+6*, DQ+14!, HEAD+2*, BOT+6
>> LRDAT LRPR+2*, LRPR+8
>> LRDFN DQ+9, DQ+10, NX+1, NX+2, NX+5, NX+6, NSET, LRPR+6, LRPR+9, LRPR+11
, HEAD+10, BOT+9, BOT+10, BOT+12
>> LRDPF DQ+9*
LRE AEDT~, AEDT+3
LREA AEDT+2~*, AEDT+6*, AEDT+7
>> LREDT DQ+3, DQ+10*, DQ+12, NX+1, NX+2, HEAD+3, BOT+12
>> LREND DQ+4*, DQ+12, NX, HEAD, HEAD+3*, HEAD+4, HD1, LAST+1*, BOT+12*, B1+1*
LREQUAL DQ+6*, DQ+14!, HEAD+2*, HEAD+13, BOT+2
>> LRFFLG LRPR+11*, LRPR+12
>> LRFOOT LRPR+5*, LRPR+7*, LRPR+8
>> LRHDR( HEAD+10, HEAD+11, HEAD+12
LRI AEDT~, AEDT+2
>> LRIDT DQ+5*, DQ+10, DQ+12, NX+1, NX+2*, NX+5, NX+6, NX+7, NSET*, NSET+1*
, LRPR+6, LRPR+7, LRPR+9, LRPR+11, HEAD, HEAD+3, HEAD+10, HD1+1*, BOT+12
>> LRIDT( NSET+1, HEAD+3, HD1+1*
>> LRIDT1 BOT+7*, BOT+9, BOT+10
LRIOM DQ+4*, DQ+6, DQ+14!, HEAD*, HEAD+2, HEAD+9, LAST
>> LRIX DQ+7, NX, NX+1, HEAD+3, HD1+1
>> LRIX( HD1+1
LRLAST DQ+14!, LAST, LAST+1*
LRN AEDT+2~, AEDT+5*, AEDT+6
>> LRND( AEDT+5, NX+6, LRPR+11
>> LRNOP NX+6*, NX+7
LRNOTE DQ+4!*, LRPR+7*, HD1+2!*, BOT+7, BOT+11!*
LRNOTE( LRPR+7*, BOT+7
LRPAGE DQ+1~, DQ+4*, HEAD+7*, HEAD+9
LRPDT DQ+1~, DQ+2*, HEAD+5*, HEAD+8
>> LRPR( LRPR+12
>> LRPRTF DQ+3*, HEAD+1*, HEAD+9
LRPTF DQ+1~
LRR AEDT+2~, AEDT+5*
LRRB DQ+14!
LRS AEDT~, AEDT+3, AEDT+4, AEDT+5
LRSAMP LRPR~, LRPR+1*, LRPR+9
>> LRSC NX, NX+1, NX+3, NX+7, NSET+1, HEAD+6, HEAD+10, HEAD+11, HEAD+12, HD1+1*
, HD1+2, HD1+3
>> LRSDT DQ+3
>> LRSSP NSET*
>> LRSUB DQ+10, NX+1, NX+2, NX+5, NX+6, NSET, LRPR+6, LRPR+9, LRPR+11, HD1+3*
, BOT+9, BOT+10, BOT+12
>> LRSUB( NX, NX+3, NX+7, HD1+3
LRSV DQ+4!, HD1+2!, HD1+3!
LRSV( NX+7*, NSET
LRT AEDT~, AEDT+4
>> LRTHER HEAD+11
>> LRTN LRPR+1*
>> LRTP DQ+10, NX+5
LRTREAT DQ+14!
LRUNKNOW DQ+14!
>> LRWPL DQ+7*, NX, NX+1, NX+4, NSET+1
LRX AEDT+2~*, AEDT+3*, AEDT+4, AEDT+5, AEDT+6, LRPR+9*, LRPR+12, LRPR+13*
>> LRY NX, NX+1*, NX+4*, NX+7, NSET+1*, LRPR+8*, LRPR+9*, HEAD+1*, HEAD+7*, HEAD+9*
, HEAD+10*, HEAD+11*, HEAD+12*, HEAD+13*, B1*
LRZ AEDT+2~, AEDT+4*
>> PNM HEAD+8, B1
>> S1 LRPR+10, HD1+1*
>> S2 LRPR+10, HD1+1*
SEX DQ+14!
>> SSN HEAD+8, B1
>> T LRPR+3*, LRPR+4*
U DQ+9, AEDT+4, NX+5, LRPR+1, LRPR+11
>> X LRPR+1*, LRPR+2, LRPR+4, LRPR+9*, LRPR+11*, LRPR+12, HEAD+10*, B1+1*, B2+1*
>> Z NX+5*, NSET*, LRPR+1
>> ZTQUEUED DQ+8
>> ZTREQ DQ+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All