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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BLRLUAC2

Package: IHS Changes To Lab

Routine: BLRLUAC2


Information

BLRLUAC2 ; IHS/OIT/MKK - IHS LRUPAC 2, reports ; [ 05/15/11 7:50 AM ]

Source Information

Source file <BLRLUAC2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 2 ($$FMTE,$$HTE)^XLFDT  ($$CJ,$$LJ,$$TRIM,$$UP)^XLFSTR  
VA Fileman 2 FIND^DIC  ^DIR  
IHS Changes To Lab 1 (ADDTMENU,HEADERDT,MENUDRFM,PRESSKEY)^BLRGMENU  
IHS VA Utilities 1 ^XBFMK  
Lab Service 1 V^LRU  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
IHS Changes To Lab 9 BLRF44DR  BLRLLPRR  BLRLUAC3  BLRLUAC4  BLRLUAC5  BLRLUAC6  BLRLUAC7  BLRLUAC8  
BLRLUACA  

Entry Points

Name Comments DBIA/ICR reference
BADJUJU ; EP -- Should never get here, but, if a user does, it's BAD ... VERY BAD.
BLRRTNSI ; EP - Initialization
JUSTSIZE(RTN,Y) ; EP
OUTINITV ; EP -- Initialization of variables
BLRRTNSL(RTN) ; EP - Report
GTIMEDT() ; EP - Set the DATETIME variable
TOTALS(TOTAL) ; EP
BLRRTNS ; EP - List ALL Routines that make up the BLR version of the LRUPAC series
PROGEND(MSG) ; EP -- Routine Ends
GETXTMPV(SORT,SELRAAB,LRSDT,LRLDT,BADMSG) ; EP -- Get data from ^BLRLUPAC( & set Variables
OUTHEAD ; EP -- Reset HEADER array & Display
SETARRAY ; EP -- Setup selection array
BLRRTNSB(RTN) ; EP - Breakout Data
HEADONE2(HEDONE) ; EP -- Don't put header before asking question
BLRRTNSR ; EP - Report
EP ; EP - Menu of Reports
ENDLOOP ; EP -- User ENDs LOOP
HEADONE(HEDONE) ; EP

External References

Name Field # of Occurrence
ADDTMENU^BLRGMENU OUTINITV+2, OUTINITV+3, OUTINITV+4, OUTINITV+5, OUTINITV+6, OUTINITV+7, OUTINITV+8, OUTINITV+9, OUTINITV+12
HEADERDT^BLRGMENU GTIMEDT+11, GTIMEDT+18, HEADONE+1, BLRRTNSR+1
MENUDRFM^BLRGMENU EP+13
PRESSKEY^BLRGMENU GTIMEDT+13, GETXTMPV+9, PROGEND+2, BLRRTNSR+8
FIND^DIC SETARRAY+11
^DIR GTIMEDT+31, HEADONE+6, HEADONE2+6
V^LRU PROGEND+3
^XBFMK GTIMEDT+4, GTIMEDT+19, HEADONE+2, HEADONE2+2
$$FMTE^XLFDT SETARRAY+4, SETARRAY+15, SETARRAY+16
$$HTE^XLFDT BLRRTNSL+4
$$CJ^XLFSTR BLRRTNSI+8
$$LJ^XLFSTR SETARRAY+25, SETARRAY+26, SETARRAY+31
$$TRIM^XLFSTR BLRRTNSB+8
$$UP^XLFSTR SETARRAY+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?4,"No Compiled Data exists.",!
  • Line Location: GTIMEDT+12
Function Call: WRITE
  • Prompt: !!,?4,BADMSG,!
  • Line Location: GETXTMPV+8
Function Call: WRITE
  • Prompt: ?64,$TR($J("",11)," ","-")
  • Line Location: TOTALS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TOTALS+2
Function Call: WRITE
  • Prompt: ?14,"TOTALS"
  • Line Location: TOTALS+3
Function Call: WRITE
  • Prompt: ?64,$J($FN(+$G(TOTAL),","),11)
  • Line Location: TOTALS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: TOTALS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADONE2+1
Function Call: WRITE
  • Prompt: !,?4,MSG," Routine Ends.",!
  • Line Location: PROGEND+1
Function Call: WRITE
  • Prompt: !,?4,"Number of routines = ",CNT,!
  • Line Location: BLRRTNSR+7
Function Call: WRITE
  • Prompt: $E(RTN,1,9)
  • Line Location: BLRRTNSL+3
Function Call: WRITE
  • Prompt: ?10,$TR($$HTE^XLFDT(DATETIME,"2MZ"),"@"," ")
  • Line Location: BLRRTNSL+4
Function Call: WRITE
  • Prompt: ?25,$J($FN(RTNSIZE,","),6)
  • Line Location: BLRRTNSL+5
Function Call: WRITE
  • Prompt: ?32,$J(RTNLINES,4)
  • Line Location: BLRRTNSL+6
Function Call: WRITE
  • Prompt: ?37,RTNPATCH
  • Line Location: BLRRTNSL+7
Function Call: WRITE
  • Prompt: ?43,$E(RTNDESC,1,(IOM-43))
  • Line Location: BLRRTNSL+8
Function Call: WRITE
  • Prompt: !
  • Line Location: BLRRTNSL+9
Routine Call
  • DIC
  • Line Location:
    • SETARRAY+11
Routine Call
  • DIR
  • Line Location:
    • GTIMEDT+31
    • HEADONE+6
    • HEADONE2+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRO(68 - [#68] FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BLRLUPAC( SETARRAY+1, SETARRAY+2, SETARRAY+7, SETARRAY+8, GETXTMPV+1
^ROUTINE( BLRRTNSR+4, BLRRTNSB+1, BLRRTNSB+3, BLRRTNSB+6, BLRRTNSB+10
^VA(200 - [#200] OUTINITV+11

Label References

Name Line Occurrences
$$GTIMEDT EP+10
BLRRTNSB BLRRTNSL+1
BLRRTNSI BLRRTNS+4
BLRRTNSL BLRRTNSR+5
BLRRTNSR BLRRTNS+6
JUSTSIZE BLRRTNSB+2
OUTHEAD GTIMEDT+8
OUTINITV EP+12
PROGEND ENDLOOP+3, BADJUJU+1
SETARRAY GTIMEDT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR GTIMEDT+1~, GTIMEDT+5*, GTIMEDT+22*, GTIMEDT+23*, GTIMEDT+24, SETARRAY+24*, SETARRAY+26
AZHL JUSTSIZE+1~, JUSTSIZE+4*, JUSTSIZE+6
AZHL0 JUSTSIZE+1~, JUSTSIZE+6*
BADMSG GETXTMPV~, GETXTMPV+7, GETXTMPV+8
BLRMMENU EP+5~, EP+14!
BLRVERN EP+5~, OUTINITV+1*, BLRRTNS+1~, BLRRTNSI+1*
BLRVERN2 BLRRTNS+1~, BLRRTNSI+2*
CNT GTIMEDT+1~, GTIMEDT+5*, GTIMEDT+22*, GTIMEDT+24, GTIMEDT+25*, SETARRAY+18*, SETARRAY+21, SETARRAY+22, SETARRAY+26, SETARRAY+27
, BLRRTNS+1~, BLRRTNSI+20*, BLRRTNSR+7, BLRRTNSL+10*
COL GTIMEDT+1~, GTIMEDT+5*, SETARRAY+19*
DASHER GTIMEDT+1~, GTIMEDT+29, SETARRAY+31*
DATETIME EP+6~, EP+8*, EP+9, GTIMEDT+14*, GTIMEDT+16*, GTIMEDT+17, GTIMEDT+33*, GTIMEDT+35*, GTIMEDT+37, GETXTMPV+1
, BLRRTNS+2~, BLRRTNSL+4, BLRRTNSB+1*
>> DIF JUSTSIZE+7*
>> DIR("A" GTIMEDT+21*, HEADONE+3*, HEADONE2+3*
>> DIR("B" HEADONE+4*, HEADONE2+4*
>> DIR("L" GTIMEDT+24*, GTIMEDT+26*, GTIMEDT+27*, GTIMEDT+28*, GTIMEDT+29*, GTIMEDT+30*
>> DIR(0 GTIMEDT+20*, HEADONE+5*, HEADONE2+5*
DIRTRICK EP+4~
>> DIRUT GTIMEDT+33, ENDLOOP+1
DTT GTIMEDT+1~, GTIMEDT+5*, SETARRAY+1*, SETARRAY+2, SETARRAY+4, SETARRAY+7, SETARRAY+8, SETARRAY+27
DUZ OUTINITV+11
ENDMSG EP+4~, ENDLOOP+1*, ENDLOOP+2*, ENDLOOP+3
EXTDTT GTIMEDT+1~, SETARRAY+4*, SETARRAY+5*, SETARRAY+26
G JUSTSIZE+1~, JUSTSIZE+2*
HEADER EP+2~, OUTHEAD+1!, BLRRTNS+1~
HEADER(1 OUTHEAD+2*, BLRRTNSI+4*
HEADER(2 OUTHEAD+3*, BLRRTNSI+5*
HEADER(3 BLRRTNSI+6*
HEADER(4 BLRRTNSI+8*, BLRRTNSI+9*, BLRRTNSI+10*
HEADER(5 BLRRTNSI+12*, BLRRTNSI+13*, BLRRTNSI+14*, BLRRTNSI+15*, BLRRTNSI+16*, BLRRTNSI+17*, BLRRTNSI+18*
HEDONE EP+2~, HEADONE~, HEADONE+7*, HEADONE2~, HEADONE2+7*
IOM BLRRTNSL+8
L60DESC EP+1~
LAB60IEN EP+1~
LINES EP+2~
LOOPER EP+1~, ENDLOOP+4*, BADJUJU+2*
LRAADESC GTIMEDT+1~, SETARRAY+12*, SETARRAY+13, SETARRAY+25
LRLDT EP+3~, GETXTMPV~, GETXTMPV+4*, GETXTMPV+6
LRSDT EP+3~, GETXTMPV~, GETXTMPV+3*, GETXTMPV+6
MAXLINES EP+2~
MSG PROGEND~, PROGEND+1
OUTARRAY GTIMEDT+1~
OUTARRAY("DILIST" SETARRAY+12
PG EP+2~
QFLG EP+2~
RTN BLRRTNS+2~, BLRRTNSR+3*, BLRRTNSR+4*, BLRRTNSR+5, BLRRTNSL~, BLRRTNSL+1, BLRRTNSL+3, BLRRTNSB~, BLRRTNSB+1, BLRRTNSB+2
, BLRRTNSB+3, BLRRTNSB+6, BLRRTNSB+10, JUSTSIZE~, JUSTSIZE+3, JUSTSIZE+4
RTNDESC BLRRTNS+2~, BLRRTNSL+8, BLRRTNSB+6*, BLRRTNSB+7*, BLRRTNSB+8*
RTNLINES BLRRTNS+2~, BLRRTNSL+6, BLRRTNSB+3*
RTNPATCH BLRRTNS+2~, BLRRTNSL+7, BLRRTNSB+10*, BLRRTNSB+11*
RTNSIZE BLRRTNS+2~, BLRRTNSL+5, BLRRTNSB+2
SELLRAA GTIMEDT+2~, SETARRAY+9*, SETARRAY+11, SETARRAY+12
SELRAAAB EP+3~, GETXTMPV+2*, GETXTMPV+6
SELRAAB GETXTMPV~
SELSTR GTIMEDT+2~, GTIMEDT+5*, GTIMEDT+20, SETARRAY+21*, SETARRAY+22*
SORT GETXTMPV~, GETXTMPV+1
SORTVAR GTIMEDT+2~, SETARRAY+7*, SETARRAY+8
SPECNAME EP+1~
SPECTYPE EP+1~
START GTIMEDT+2~, SETARRAY+15*, SETARRAY+25
STOP GTIMEDT+2~, SETARRAY+16*, SETARRAY+25
STR GTIMEDT+2~, SETARRAY+8*, SETARRAY+9, SETARRAY+15, SETARRAY+16, SETARRAY+25*, SETARRAY+26, GETXTMPV+1*, GETXTMPV+2, GETXTMPV+3
, GETXTMPV+4
TOTAL TOTALS~, TOTALS+4
VARIOUS GTIMEDT+2~
VARIOUS( GTIMEDT+23, GTIMEDT+24, SETARRAY+26*
WIDE GTIMEDT+2~, GTIMEDT+5*, SETARRAY+13*, SETARRAY+31
WOT GTIMEDT+2~, GTIMEDT+10
WOT( GTIMEDT+35, SETARRAY+27*
WOT("" GTIMEDT+21
WOTRTNS BLRRTNS+1~
>> X JUSTSIZE+3*, JUSTSIZE+4*, JUSTSIZE+6*
XCNP JUSTSIZE+1~, JUSTSIZE+8*
XTMPNODE EP+3~
Y GTIMEDT+35, ENDLOOP+2, HEADONE+7, HEADONE2+7, JUSTSIZE~
Z JUSTSIZE+5!

Marked Items

Name Field # of Occurrence
$T( OUTINITV+1, BLRRTNSI+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All