Routine: FBAAMPRG

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

FBAAMPRG ;AISC/DMK-PURGE TRANSMITTED MRA'S ;5/24/1999

Source Information

Source file <FBAAMPRG.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
VA FileMan	2	^%DT ^DIK

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Fee Basis	1	FBAA MRA PURGE

Entry Points

Name	Comments	DBIA/ICR reference
ASK
END
DELVET
DELVEN
DELIPAC

External References

Name	Field # of Occurrence
^%DT	ASK
^DIK	DELVET, DELVEN, DELIPAC

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ASK+0
Function Call: WRITE	Prompt: !!,*7,"No transmitted MRA's currently on file!",! Line Location: ASK+2
Function Call: WRITE	Prompt: !,?25,"Deleting....",! Line Location: ASK+3
Function Call: WRITE	Prompt: !!,?16,"Total Veteran MRA's deleted: ",CNT,!,?16,"Total Vendor MRA's deleted: ",MCNT,!,?16,"Total IPAC MRA's deleted: ",ICNT,! Line Location: ASK+20

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^FBAA(161.25 - [#161.25]	Classic Fileman Calls
^FBAA(161.26 - [#161.26]	Classic Fileman Calls
^FBAA(161.96 - [#161.96]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FBAA(161.25 - [#161.25]	ASK+2, ASK+6, ASK+8
^FBAA(161.26 - [#161.26]	ASK+2, ASK+4, ASK+9
^FBAA(161.95 - [#161.95]	ASK+16
^FBAA(161.96 - [#161.96]	ASK+2, ASK+5, ASK+12, ASK+14
^FBAAA - [#161]	ASK+9
^FBAAV - [#161.2]	ASK+8

Label References

Name	Line Occurrences
ASK	ASK
DELIPAC	ASK+5, ASK+17
DELVEN	ASK+7, ASK+8
DELVET	ASK+4, ASK+9
END	ASK, ASK+2

Naked Globals

Name	Field # of Occurrence
^(0	ASK+6, ASK+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	ASK*!
%DT("A"	ASK*
%DT(0	ASK*
CNT	ASK+3, ASK+4, ASK+9*, ASK+20, END!
DA	ASK+1~, ASK+4, ASK+5, ASK+7, ASK+8, ASK+9, ASK+17
DIK	ASK+1~, DELVET, DELVEN, DELIPAC*
DT	ASK
F	END!
FBAAPD	ASK*, ASK+4, ASK+5, ASK+6, END!
I	ASK+4, ASK+5, ASK+6, ASK+8, ASK+9, ASK+12, ASK+14, ASK+17, END!
ICNT	ASK+3, ASK+5, ASK+17*, ASK+20, END!
IVA	ASK+13~, ASK+14*, ASK+15, ASK+16
J	ASK+4, ASK+5, ASK+6, ASK+8, ASK+9*, END!
K	ASK+6*, ASK+7, END!
MCNT	ASK+3, ASK+7, ASK+8*, ASK+20, END!
U	ASK+14
X	ASK, END!
Y	ASK, END!