Routine: ACGSPARA

Information

ACGSPARA ;IHS/OIRM/DSD/THL,AEF - SITE PARAMETER EDIT; [ 03/27/2000 4:37 PM ]

Source file <ACGSPARA.m>

Package	Total	Call Graph
Contracts and Grants	2	(DIC,DIE,DIR,FILE)^ACGSDIC HEAD^ACGSMENU
VA Fileman	1	^DIC

Package	Total	Caller Graph
Contracts and Grants	4	ACGSEXPX ACGSMENU ACGSTART ACGSVITG

Name	Comments	DBIA/ICR reference
EN
G2	;EP
G1
GEOLOC	;EP
SITE	;EP;TO SELECT THE PROCUREMENT OFFICE
PERS	;EP
EN1	;EP;TO CHECK AND SET SITE PARAMETERS
P1
G11	;EP

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?30,"EDIT SITE PARAMETERS" Line Location: EN+6
Function Call: WRITE	Prompt: !!,"Site Parameters must be set before you can proceed.",!,"Select the Contracting Office and System Configuration for your system.",! Line Location: EN1+1
Function Call: WRITE	Prompt: !!?80-$L(ACGX)\2,ACGX Line Location: G11+1
Function Call: WRITE	Prompt: !! Line Location: G11+3
Function Call: WRITE	Prompt: !!?80-$L(ACGX)\2,ACGX Line Location: P1+1
Function Call: WRITE	Prompt: !! Line Location: P1+3
Function Call: WRITE	Prompt: !,"SITE PARAMETERS NOT SET FOR PROCUREMENT OFFICE ",$P(Y,U,2) Line Location: SITE+9
Routine Call	DIC Line Location: SITE+5

Name	Field # of Occurrence
>> ACG4	EN1+6, SITE+8
>> ACGPARA	EN+2, EN1+1, EN1+6, SITE+8, SITE+9
ACGPODA	EN+1!, EN+4, EN+7, EN1+2, EN1+4, EN1+5, EN1+6, SITE+8*
ACGQUIT	EN+3, EN+7!, GEOLOC+1, GEOLOC+2!, G11+5, PERS+1, PERS+2!, P1+5, SITE+6*, SITE+7
ACGX	G11+1!, P1+1!
ACGY	EN1+6*, SITE+1~
>> ACGZ	EN*
>> DA	EN1+2, G2+1
>> DIC	EN+4, G11+2, P1+2, SITE+2
>> DIC("A"	G11+2, P1+2, SITE+4*
>> DIC(0	EN+4, G11+2, P1+2, SITE+3
>> DIE	EN1+2, G2+1
>> DINUM	EN+4*
>> DIR("A"	EN+7*
>> DIR("B"	EN+7*
>> DIR(0	EN+7*
>> DR	EN1+2, G2+1
U	EN1+5, EN1+6, SITE+8, SITE+9
>> X	EN+4, EN1+5
>> Y	EN+7, G11+5, G2+1, P1+5, SITE+6, SITE+8, SITE+9