Routine: BLRAGUT2

Package	Total	Call Graph
Kernel	2	($$DT,$$HTE)^XLFDT ($$CJ,$$TRIM)^XLFSTR
IHS Changes To Lab	1	(ADDTMENU,HEADERDT,HEADERPG,MENUDRVR,PRESSKEY)^BLRGMENU
IHS VA Utilities	1	^XBFMK
VA Fileman	1	^DIR

Package

Total

Call Graph

Kernel

($$DT,$$HTE)^XLFDT ($$CJ,$$TRIM)^XLFSTR

IHS Changes To Lab

(ADDTMENU,HEADERDT,HEADERPG,MENUDRVR,PRESSKEY)^BLRGMENU

IHS VA Utilities

^XBFMK

VA Fileman

^DIR

Entry Points

Name	Comments	DBIA/ICR reference
STCKRPTS	; EP - Show $STACK data in BLRENTRY global after an error
SHOSTACK	; EP - SHOw $STACK report
SHOSTCKI()	; EP - Initialization
GETDATE(DATER)	; EP -- Get Specific Date; Default entry is TODAY
SHOSTCKP	; EP - Print the report
SHOSTCKC	; EP - SHOw $STaCK -- Compilation of data

External References

Name	Field # of Occurrence
ADDTMENU^BLRGMENU	STCKRPTS+5
HEADERDT^BLRGMENU	SHOSTCKI+7, SHOSTCKI+13
HEADERPG^BLRGMENU	SHOSTCKP+3
MENUDRVR^BLRGMENU	STCKRPTS+8
PRESSKEY^BLRGMENU	SHOSTCKI+18, SHOSTCKP+12, GETDATE+8
^DIR	GETDATE+5
^XBFMK	GETDATE+1
$$DT^XLFDT	GETDATE+10
$$HTE^XLFDT	GETDATE+4
$$CJ^XLFSTR	STCKRPTS+8
$$TRIM^XLFSTR	STCKRPTS+3, SHOSTCKI+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?4,"Compilation complete." Line Location: SHOSTCKI+17
Function Call: WRITE	Prompt: !,?4 Line Location: SHOSTCKC+2
Function Call: WRITE	Prompt: "." Line Location: SHOSTCKC+8
Function Call: WRITE	Prompt: ! Line Location: SHOSTCKC+19
Function Call: WRITE	Prompt: $P(STR,"^") Line Location: SHOSTCKP+5
Function Call: WRITE	Prompt: ?9,$P(STR,"^",2) Line Location: SHOSTCKP+6
Function Call: WRITE	Prompt: ?19,$P(STR,"^",3) Line Location: SHOSTCKP+7
Function Call: WRITE	Prompt: ?34,ENTRY Line Location: SHOSTCKP+8
Function Call: WRITE	Prompt: ?44,$E($P(STR,"^",4,99),1,36),! Line Location: SHOSTCKP+9
Function Call: WRITE	Prompt: !,?5,"FileMan Quit Entered. Routine Ends.",! Line Location: GETDATE+7
Routine Call	DIR Line Location: GETDATE+5

Name	Line Occurrences (* Changed, ! Killed)
^BLRENTRY	SHOSTCKC+3, SHOSTCKC+5, SHOSTCKC+6, SHOSTCKC+7, SHOSTCKC+11, SHOSTCKC+12
^TMP("BLRAGUT2"	SHOSTACK+7!, SHOSTCKI+1!, SHOSTCKC+17*, SHOSTCKP+2, SHOSTCKP+4

Name	Line Occurrences
$$GETDATE	SHOSTCKI+9
$$SHOSTCKI	SHOSTACK+3
SHOSTCKC	SHOSTCKI+15
SHOSTCKP	SHOSTACK+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BLRVERN	STCKRPTS+3, SHOSTCKI+2
>> CURDATE	SHOSTCKC+1, SHOSTCKC+4, SHOSTCKC+5*, SHOSTCKC+6, SHOSTCKC+7, SHOSTCKC+11, SHOSTCKC+12, SHOSTCKC+17
>> CURPLACE	SHOSTCKC+12*, SHOSTCKC+15, SHOSTCKC+16
DATER	GETDATE~, GETDATE+10, GETDATE+11, GETDATE+13
>> DILOCKTM	STCKRPTS+1, SHOSTACK+1
>> DIR("A"	GETDATE+3*
>> DIR("B"	GETDATE+4*
>> DIR(0	GETDATE+2*
>> DISYS	STCKRPTS+1, SHOSTACK+1
DT	STCKRPTS+1, SHOSTACK+1
DTIME	STCKRPTS+1, SHOSTACK+1
>> DUOUT	GETDATE+6
DUZ	STCKRPTS+1, SHOSTACK+1
>> ENTRY	SHOSTCKC+1, SHOSTCKC+6, SHOSTCKC+7, SHOSTCKC+11, SHOSTCKC+12, SHOSTCKC+17, SHOSTCKP+1, SHOSTCKP+2, SHOSTCKP+4, SHOSTCKP+8
>> HEADER(1	SHOSTCKI+4*
>> HEADER(2	SHOSTCKI+5, SHOSTCKI+12, SHOSTCKI+20!, SHOSTCKI+21*
>> HEADER(3	SHOSTCKI+22*
>> HEADER(4	SHOSTCKI+23, SHOSTCKI+24, SHOSTCKI+25, SHOSTCKI+26, SHOSTCKI+27*
IO	STCKRPTS+1, SHOSTACK+1
>> IOBS	STCKRPTS+1, SHOSTACK+1
IOF	STCKRPTS+1, SHOSTACK+1
IOM	STCKRPTS+1, STCKRPTS+8, SHOSTACK+1
ION	STCKRPTS+1, SHOSTACK+1
>> IOS	STCKRPTS+1, SHOSTACK+1
IOSL	STCKRPTS+1, SHOSTACK+1
IOST	STCKRPTS+1, SHOSTACK+1
>> IOT	STCKRPTS+1, SHOSTACK+1
>> IOXY	STCKRPTS+1, SHOSTACK+1
>> LABEL	SHOSTCKC+1, SHOSTCKC+7, SHOSTCKC+11, SHOSTCKC+12, SHOSTCKC+17
>> LINES	SHOSTCKI+30, SHOSTCKP+3, SHOSTCKP+10
>> MAXLINES	SHOSTCKI+30*, SHOSTCKP+3
>> PG	SHOSTCKI+31*, SHOSTCKP+3
>> QFLG	SHOSTCKI+29*, SHOSTCKP+2, SHOSTCKP+3, SHOSTCKP+12
>> STACK	SHOSTCKC+10, SHOSTCKC+11, SHOSTCKC+12
>> STACK(	SHOSTCKC+13, SHOSTCKC+14, SHOSTCKC+15
>> STACKDT	SHOSTCKI+9, SHOSTCKC+4, SHOSTCKC+5
>> STACKNUM	SHOSTCKC+13*, SHOSTCKC+14, SHOSTCKC+15
>> STACKRTN	SHOSTCKC+16*, SHOSTCKC+17
>> STR	SHOSTCKP+4*, SHOSTCKP+5, SHOSTCKP+6, SHOSTCKP+7, SHOSTCKP+9
U	STCKRPTS+1, SHOSTACK+1
>> USER	SHOSTCKC+1, SHOSTCKC+3, SHOSTCKC+5, SHOSTCKC+6, SHOSTCKC+7, SHOSTCKC+11, SHOSTCKC+12, SHOSTCKC+17
>> X	STCKRPTS+1, SHOSTACK+1, SHOSTCKI+9*, SHOSTCKI+10
>> XPARSYS	STCKRPTS+1, SHOSTACK+1
>> XQXFLG	STCKRPTS+1, SHOSTACK+1
>> Y	GETDATE+10, GETDATE+11

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRAGUT2

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items