Routine: BGPDUP

Package	Total	Call Graph
Kernel	3	HOME^%ZIS ^%ZISC ($$OPEN,$$STATUS)^%ZISH
VA Fileman	3	FILE^DICN (,IX1)^DIK ^DIR
IHS VA Utilities	2	^XBFMK EN^XBVK
IHS GPRA Information System	1	EOP^BGPDH

Entry Points

Name	Comments	DBIA/ICR reference
STRIP(Z)	;REMOVE CONTROLL CHARACTERS
READF	;read file
XIT	;
FILE	;upload global
PROC	;
DIR	;

External References

Name	Field # of Occurrence
HOME^%ZIS	XIT+3
^%ZISC	READF+7
$$OPEN^%ZISH	READF+3
$$STATUS^%ZISH	READF+6
EOP^BGPDH	XIT+1
FILE^DICN	PROC+21
^DIK	PROC+17
IX1^DIK	PROC+33
^DIR	DIR+3, DIR+7
^XBFMK	PROC+16, PROC+24
EN^XBVK	XIT+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This option is used to upload a SU's GPRA data.",!,"You must specify the directory in which the GPRA data file resides",!,"and then enter the filename of the GPRA data.",! Line Location: BGPDUP+5
Function Call: WRITE	Prompt: !!,"Directory not entered!! Bye." Line Location: DIR+4
Function Call: WRITE	Prompt: !,"Directory=",BGPDIR," ","File=",BGPFILE Line Location: DIR+10
Function Call: WRITE	Prompt: !,*7,"CANNOT OPEN (OR ACCESS) FILE '",BGPDIR,BGPFILE,"'." Line Location: READF+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: READF+6
Function Call: WRITE	Prompt: !!,"All done reading file",! Line Location: READF+8
Function Call: WRITE	Prompt: !,"Processing",! Line Location: PROC+1
Function Call: WRITE	Prompt: "error in data" Line Location: PROC+3
Function Call: WRITE	Prompt: !,"error uploading file......" Line Location: PROC+22
Function Call: WRITE	Prompt: !,"Data uploaded." Line Location: PROC+34
Routine Call	%ZIS Line Location: XIT+3
Routine Call	DIR Line Location: DIR+3 DIR+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BGPD - [#90240.01]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BGPD - [#90240.01]	PROC+6, PROC+27, PROC+28, PROC+29, PROC+30, PROC+31*
^TMP("BGPUPL"	READF+5!, READF+6*, PROC+2, PROC+25

Label References

Name	Line Occurrences
$$STRIP	READF+6
DIR	DIR+8
XIT	DIR+4, READF+4, PROC+22, PROC+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	XIT+8!
%Y	XIT+8!
A	XIT+6!
B	XIT+6!
BGP	XIT+8!
>> BGP0	PROC+2*, PROC+4, PROC+19
>> BGP1	PROC+7
>> BGP2	PROC+8
>> BGP3	PROC+9
>> BGP4	PROC+10
>> BGP5	PROC+11
>> BGP6	PROC+12
>> BGP8	PROC+13
>> BGP9	PROC+14
BGPC	READF+1~, READF+2, READF+6
>> BGPDIR	DIR+2, DIR+5, DIR+10, READF+3, READF+4
>> BGPFILE	DIR+6, DIR+9, DIR+10, READF+3, READF+4
>> BGPIEN	PROC+23*, PROC+27, PROC+28, PROC+29, PROC+30, PROC+31, PROC+33
BGPJ	XIT+8!
BGPLINE	XIT+8!
>> BGPOIEN	PROC+6, PROC+15, PROC+17
BGPTEXT	XIT+8!
BGPX	XIT+8!
C	XIT+6!
D	PROC+26*, PROC+27, PROC+28, PROC+29, PROC+30, PROC+31, XIT+6!
D0	PROC+20!
DA	DIR+3!, DIR+7!, PROC+17, PROC+33, XIT+8!
DD	PROC+20!
DIC	PROC+19*, XIT+8!
DIC(0	PROC+19*
>> DIK	PROC+17, PROC+33
DIR	DIR+1!, DIR+3!, DIR+7!
DIR("A"	DIR+3, DIR+7
DIR(0	DIR+3, DIR+7
>> DIRUT	DIR+4, DIR+8
>> DLAYGO	PROC+19*
DO	PROC+20!
DTIME	READF+6
E	XIT+6!
F	XIT+6!
G	XIT+6!
H	XIT+6!
I	READF+1~, READF+6, XIT+6!, STRIP+1~, STRIP+2
IO	READF+6
IOF	BGPDUP+4
IOPAR	XIT+2!
J	XIT+6!
K	XIT+6!
L	XIT+6!
M	XIT+6!
N	PROC+26*, PROC+27, PROC+28, PROC+29, PROC+30, PROC+31, XIT+6!, XIT+7!
N1	XIT+7!
N2	PROC+26*, PROC+27, PROC+28, PROC+29, PROC+30, XIT+7!
N3	PROC+26*, PROC+27, PROC+28, PROC+29, XIT+7!
N4	PROC+26*, PROC+27, PROC+28, XIT+7!
N5	PROC+26*, PROC+27, XIT+7!
N6	XIT+7!
O	XIT+6!
P	XIT+6!
Q	XIT+6!
R	XIT+6!
S	XIT+6!
T	XIT+6!
U	PROC+4, PROC+7, PROC+8, PROC+9, PROC+10, PROC+11, PROC+12, PROC+13, PROC+14, PROC+19
V	PROC+25*, PROC+26, XIT+6!
W	XIT+6!
X	READF+1~, READF+6, PROC+4, PROC+6, PROC+15, PROC+19, PROC+25*, XIT+5!, XIT+6!, XIT+8!
X1	XIT+5!
X2	XIT+5!
X3	XIT+5!
X4	XIT+5!
X5	XIT+5!
X6	XIT+5!
Y	DIR+5, DIR+9, READF+1~, READF+3, READF+4, PROC+4, PROC+6*, PROC+7, PROC+8, PROC+9 , PROC+10, PROC+11, PROC+12, PROC+13, PROC+14, PROC+22, PROC+23, XIT+6!, XIT+8!
Z	XIT+6!, STRIP~, STRIP+2*, STRIP+3

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPDUP

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: