Routine: BLR6249P

Package	Total	Call Graph
VA Fileman	3	FILE^DIE $$GET1^DIQ ^DIR
IHS VA Utilities	2	^XBCLS ^XBFMK
IHS Changes To Lab	1	BLRGSHSH^BLRGMENU
Kernel	1	($$FMDIFF,$$HTFM)^XLFDT

Package

Total

Call Graph

VA Fileman

FILE^DIE $$GET1^DIQ ^DIR

IHS VA Utilities

^XBCLS ^XBFMK

IHS Changes To Lab

BLRGSHSH^BLRGMENU

Kernel

($$FMDIFF,$$HTFM)^XLFDT

Name	Comments	DBIA/ICR reference
MAKERRS	; EP
PEP	; EP
EP	;
ARRYDUMP(ARRY)	;
ERRORMSG(WOT)	;

External References

Name	Field # of Occurrence
BLRGSHSH^BLRGMENU	PEP+7, MAKERRS+4
FILE^DIE	PEP+37, MAKERRS+23
$$GET1^DIQ	PEP+14, PEP+23, MAKERRS+11
^DIR	PEP+52, MAKERRS+38
^XBCLS	PEP+4
^XBFMK	PEP+12, PEP+32, PEP+49, MAKERRS+9, MAKERRS+18, MAKERRS+35
$$FMDIFF^XLFDT	PEP+30
$$HTFM^XLFDT	PEP+27

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),$C(7),! Line Location: EP+1
Function Call: WRITE	Prompt: !,"Run at Label",! Line Location: EP+2
Function Call: WRITE	Prompt: !,?5,"Making LA7 MESSAGE QUEUE ERROR MESSAGES Purgeable",! Line Location: PEP+10
Function Call: WRITE	Prompt: ?7,"" Line Location: PEP+41
Function Call: WRITE	Prompt: "." Line Location: PEP+42
Function Call: WRITE	Prompt: !,?7,"" Line Location: PEP+43
Function Call: WRITE	Prompt: !,!,?10,"Number of ""Errors"" in 62.49 Changed to Purgeable:",CNT,!,! Line Location: PEP+46
Function Call: WRITE	Prompt: !,!,?10,"No ""Errors"" found in 62.49",!,! Line Location: PEP+47
Function Call: WRITE	Prompt: !!,$TR($RE($J($RE("FILEMAN_ERROR_"),IOM))," _","* "),! Line Location: ERRORMSG+1
Function Call: WRITE	Prompt: ?10,"ERROR Occurred during ",$G(WOT),! Line Location: ERRORMSG+2
Function Call: WRITE	Prompt: $TR($J("_FILEMAN_ERROR",IOM)," _","* "),!! Line Location: ERRORMSG+5
Function Call: WRITE	Prompt: !,?5,ARRY,! Line Location: ARRYDUMP+4
Function Call: WRITE	Prompt: ?10,STR1,"=",@STR1,! Line Location: ARRYDUMP+5
Function Call: WRITE	Prompt: ?10,STR1,"=",@STR1,! Line Location: ARRYDUMP+7
Function Call: WRITE	Prompt: !,?5,"Making LA7 MESSAGE QUEUE PURGEABLE MESSAGES into ERROR MESSAGES again",! Line Location: MAKERRS+7
Function Call: WRITE	Prompt: ?7,"" Line Location: MAKERRS+27
Function Call: WRITE	Prompt: "." Line Location: MAKERRS+28
Function Call: WRITE	Prompt: !,?7,"" Line Location: MAKERRS+29
Function Call: WRITE	Prompt: !,!,?10,"Number of ""Purgeable"" Messages in 62.49 Changed to ""Errors"":",CNT,!,! Line Location: MAKERRS+32
Function Call: WRITE	Prompt: !,!,?10,"No ""Purgeable"" Messages found in 62.49",!,! Line Location: MAKERRS+33
Routine Call	DIE Line Location: PEP+37 MAKERRS+23
Routine Call	DIR Line Location: PEP+52 MAKERRS+38

FileNo	Call Tags
^LAHM(62.49 - [#62.49]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^LAHM(62.49 - [#62.49]	PEP+11, MAKERRS+8

Name	Line Occurrences
ARRYDUMP	ERRORMSG+3, ERRORMSG+4
ERRORMSG	PEP+17, PEP+24, PEP+38, MAKERRS+14, MAKERRS+24

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRY	ARRYDUMP~, ARRYDUMP+3, ARRYDUMP+4
CNT	PEP+1~, PEP+9, PEP+40, PEP+41, PEP+46, PEP+47, MAKERRS+6, MAKERRS+26, MAKERRS+27, MAKERRS+32 , MAKERRS+33
CURDATE	PEP+1~, PEP+27*, PEP+30
>> DIR("A"	PEP+51, MAKERRS+37
>> DIR(0	PEP+50, MAKERRS+36
DTBEG	PEP+2~
DTEND	PEP+2~
ERRS	PEP+1~, PEP+13!, PEP+22!, PEP+33!, ERRORMSG+4, MAKERRS+10!, MAKERRS+19!
ERRS("DIERR"	PEP+17, PEP+24, PEP+38, MAKERRS+14, MAKERRS+24, MAKERRS+25
FDA	PEP+1~, PEP+13!, PEP+22!, PEP+33!, ERRORMSG+3, MAKERRS+10!, MAKERRS+19!
FDA(	PEP+35, MAKERRS+21
HEADER	PEP+2~, MAKERRS+1~
HEADER(1	PEP+5, MAKERRS+2
HEADER(2	PEP+6, MAKERRS+3
IOM	ERRORMSG+1, ERRORMSG+5
MSG	PEP+1~, PEP+9, PEP+11, PEP+14, PEP+23, PEP+35, MAKERRS+6, MAKERRS+8, MAKERRS+11, MAKERRS+21
MSGDATE	PEP+1~, PEP+23, PEP+26, PEP+30
STATUS	PEP+1~, PEP+14, PEP+19, MAKERRS+11, MAKERRS+16
STR1	ARRYDUMP+1~, ARRYDUMP+3, ARRYDUMP+5, ARRYDUMP+6, ARRYDUMP+7
WOT	ERRORMSG~, ERRORMSG+2

Customize PDF page

Package: IHS Changes To Lab

Routine: BLR6249P

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: