Routine: AUTTVLK

Information

AUTTVLK ; IHS/DIRM/JDM/DFM - VENDOR FILE INTERFACE ; [ 03/04/98 8:10 AM ]

Source Information

Source file <AUTTVLK.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	5	%XY^%RCR (,IX)^DIC FILE^DICN ^DIE ^DIR
IHS VA Utilities	1	^XBKVAR
Utility Tables	1	^AUTPVND

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHSPRE
Contracts and Grants	1	ACGSVEND

Entry Points

Name	Comments	DBIA/ICR reference
ADD1	;
DIE	;EP
DIC	;EP
KILL	;
FILE	;EP
DIR	;EP;
VND	;
ADDEXIT	;
1820	;EP;TO TRANSFER DATA FROM THE 18 TO 20 NODES DUE TO CHANGE IN DB
EN1	;EP - Set DIC("S") to check relation between Vendor and Package.
EN2	;
EN3	;
EN	;EP - Check relation between Vendor and Package.
PACKAGE	; -Determine Package.
T1	;
ADD	;EP - Add or Edit Vendor data.
TRIGGER	;EP - Set relation between Vendor and Contractor.
T	;
ENX	;EP - TO UPDATE THE PACKAGE MULTIPLE FROM AN EXTERNAL PACKAGE
QUIT	;
MAKE	;
UP	;EP - TEMP UTILITY TO UPDATE ALL VENDORS AS CHS VENDORS AND SELECTED
EXIT	;

External References

Name	Field # of Occurrence
%XY^%RCR	1820+3
^AUTPVND	VND+6
^DIC	DIC+1
IX^DIC	EXIT+3
FILE^DICN	FILE+2
^DIE	DIE+6
^DIR	DIR+2
^XBKVAR	ADD+1, 1820+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,7,7,"There appears to be an error in the PACKAGE file.",!,"Please report this to your site manager." Line Location: PACKAGE+4
Function Call: WRITE	Prompt: !!?22,"ADD OR EDIT VENDOR DATA",!?21,"\|==============================\|" Line Location: ADD1+2
Function Call: WRITE	Prompt: ! Line Location: EN2+4
Function Call: WRITE	Prompt: ! Line Location: EN3+3
Function Call: WRITE	Prompt: !! Line Location: EN3+7
Function Call: WRITE	Prompt: ?9,"VENDOR DATA FOR: ",AUTVENAM,! Line Location: VND+2
Function Call: WRITE	Prompt: !!,"Entry being edited by another user. Please try Later." Line Location: DIE+3
Routine Call	DIE Line Location: DIE+6
Routine Call	DIC Line Location: DIC+1
Routine Call	DIR Line Location: DIR+2
Routine Call	DIC Line Location: EXIT+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUTTVNDR - [#9999999.11]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACGS("H"	UP+5
^AUTTVNDR - [#9999999.11]	T+1, T1+1, T1+2, UP+3, ADD1+6, MAKE+3, 1820+3
^DIC(9.4 - [#9.4]	EN1+5, PACKAGE+3, PACKAGE+4, PACKAGE+5, UP+2, UP+3, UP+4, UP+5, MAKE+3

Label References

Name	Line Occurrences
ADD1	ADD+2
DIC	ADD1+4
DIE	EN3+8
DIR	EN2+5, MAKE+3, EN3+4
EN1	EN+1
EN2	ADD1+7
EN3	EN2+1, EN2+7
FILE	T1+6
KILL	EXIT+1, EN1+6, T+2
PACKAGE	EN1+4, TRIGGER+2, MAKE+2
T	UP+3, UP+5
T1	T+1
TRIGGER	MAKE+3
VND	EN2+2

Naked Globals

Name	Field # of Occurrence
^(0	PACKAGE+5, MAKE+3
^(11	ADD1+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %X	1820+3*
>> %Y	1820+3*
AUT	KILL+1!, PACKAGE+3*
AUTDA	ADDEXIT+1!, ADD1+6*, MAKE+1, MAKE+3, EN3+6, VND+5
AUTDDIE	EN3+9!
AUTDIC	KILL+1!
AUTDIC("S"	EN1+5*
AUTDIEDA	DIE+5*, DIE+7, DIE+9!
AUTI	ADDEXIT+1!
AUTMESS	EN3+9!
AUTOUT	DIR+1!
AUTQUIT	KILL+1!, PACKAGE+3, PACKAGE+5, PACKAGE+6!, ADD+2, ADDEXIT+1!, ADD1+5, ADD1+7, ADD1+8!, EN2+6* , MAKE+4, DIE+1!, DIE+3, DIE+4, DIE+8, DIR+1!, DIR+4
>> AUTTDA	T1+5*, T1+7
>> AUTVEEIN	ADD1+6*
AUTVENAM	ADDEXIT+1!, ADD1+6*, VND+2
AUTX	KILL+1!, PACKAGE+2*, PACKAGE+3
AUTY	KILL+1!, PACKAGE+3, PACKAGE+4, PACKAGE+5, ADD1+6, EN2+1, EN3+6, DIR+3
AUTZ	KILL+1!, EN1+5, PACKAGE+3, PACKAGE+4, PACKAGE+5, T+1, T1+1, T1+4, T1+5, UP+2 , UP+3, UP+4, UP+5, MAKE+3
D	DIC+2!
D0	VND+4~, VND+5*
DA	T+1, T1+1, T1+2, T1+4, T1+5, T1+7, UP+3, UP+5, MAKE+3, EN3+6* , DIC+2!, DIE+2, DIE+5, DIE+9!, FILE+3!, 1820+2, 1820+3
DA(1	T1+5*
DD	DIC+2!, FILE+1!, FILE+3!
DIC	EXIT+2, T1+5, ADD1+3, DIC+2!, FILE+3!
DIC("A"	ADD1+3*
DIC("DR"	T1+5*
DIC("S"	EN1+5*
DIC(0	EN+1, EN1+3, T1+5, ADD1+3
>> DICR(1	EXIT+2
DIE	ADD1+3, EN3+6, DIE+2, DIE+7, DIE+9!
DINUM	DIC+2!, FILE+3!
DIP	VND+3!, VND+7!
DIR	DIR+5!
DIR("?"	EN3+2*
DIR("A"	EN2+3, MAKE+3, EN3+1*
DIR("B"	EN2+3, MAKE+3
DIR(0	EN2+3, MAKE+3, EN3+1*
DIROUT	DIR+4, DIR+5!
DIRUT	DIR+4, DIR+5!
DO	FILE+1!
DR	EN3+6*, DIC+2!, DIE+9!, FILE+3!
DT	T1+4, T1+5
DTIME	T1+4
DTOUT	DIE+8, DIR+4, DIR+5!
DUOUT	DIE+8, DIR+4, DIR+5!
DUZ	T1+4
DXS	VND+3!, VND+7!
IO	T1+4
IOF	ADD1+1, VND+1
IOST	DIE+3
U	PACKAGE+2, PACKAGE+5, T1+4, ADD1+5, ADD1+6, MAKE+3, 1820+3
X	PACKAGE+3, PACKAGE+4!, T1+5*, ADD1+5
>> XQY0	EN1+2, PACKAGE+1, PACKAGE+2
>> Y	UP+3, UP+5, ADD1+5, ADD1+6, EN2+6, MAKE+3, EN3+5, EN3+6, DIR+3

Customize PDF page

Package: Utility Tables

Routine: AUTTVLK

Call Graph Total: 7

Caller Graph Total: 2