Routine: ACGS2811

Package	Total	Call Graph
Contracts and Grants	1	HOLD^ACGSMENU

Package	Total	Caller Graph
Contracts and Grants	2	ACGS281 ACGS282

Entry Points

External References

Name	Field # of Occurrence
HOLD^ACGSMENU	ACGS2811+14, ACGS2811+52, ACGS2811+74, ACGS2811+103

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"1. TARIFF/REGULATED" Line Location: ACGS2811+4
Function Call: WRITE	Prompt: !," ACQUISITION" Line Location: ACGS2811+6
Function Call: WRITE	Prompt: !,"2. CONTRACT FOR GOV" Line Location: ACGS2811+9
Function Call: WRITE	Prompt: !," OR INTNAT ORG" Line Location: ACGS2811+11
Function Call: WRITE	Prompt: !,"3. SMALL PURCHASE" Line Location: ACGS2811+15
Function Call: WRITE	Prompt: !," (FAR PART 13)" Line Location: ACGS2811+17
Function Call: WRITE	Prompt: !,"4. DO (GSA SCHED)" Line Location: ACGS2811+20
Function Call: WRITE	Prompt: !,"5. DO (OTH FED SCHED" Line Location: ACGS2811+23
Function Call: WRITE	Prompt: !,"6. DO (ALL OTHER)" Line Location: ACGS2811+26
Function Call: WRITE	Prompt: !,"7. OTHER PROC METHOD" Line Location: ACGS2811+29
Function Call: WRITE	Prompt: !," PERRY POINT" Line Location: ACGS2811+32
Function Call: WRITE	Prompt: !," VA - HINES" Line Location: ACGS2811+35
Function Call: WRITE	Prompt: !," FEDSTRIP" Line Location: ACGS2811+38
Function Call: WRITE	Prompt: !," IMPREST FUND" Line Location: ACGS2811+41
Function Call: WRITE	Prompt: !," SF-44" Line Location: ACGS2811+44
Function Call: WRITE	Prompt: !,"8. TOTAL NEW AWARDS" Line Location: ACGS2811+47
Function Call: WRITE	Prompt: !," AND MODIFICATIONS" Line Location: ACGS2811+49
Function Call: WRITE	Prompt: ?20,"\|",$J($P(ACGPM(ACG4XX,1),U,3),8),?30,"\|",$J($FN(ACGPM(ACG4XX,"A1"),"P",0),9),?40,"\|",$J($FN(ACGPM(ACG4XX,"A2"),"P",0),9),?50,"\|",$J($FN(ACGPM(ACG4XX,"A3"),"P",0),9),?60,"\|",$J($FN(ACGPM(ACG4XX,"A4"),"P",0),9),?70,"\|" Line Location: ACGS2811+50
Function Call: WRITE	Prompt: $J($FN($P(ACGPM(ACG4XX,1),U,4),"P",0),9) Line Location: ACGS2811+51
Function Call: WRITE	Prompt: !?4,"COMPETITION" Line Location: ACGS2811+54
Function Call: WRITE	Prompt: ! Line Location: ACGS2811+56
Function Call: WRITE	Prompt: !,"9. COMPETED" Line Location: ACGS2811+57
Function Call: WRITE	Prompt: !,"10.NOT AVAILABLE FOR" Line Location: ACGS2811+60
Function Call: WRITE	Prompt: !," COMPETITION" Line Location: ACGS2811+62
Function Call: WRITE	Prompt: ! Line Location: ACGS2811+65
Function Call: WRITE	Prompt: !,"11.NOT COMPETED" Line Location: ACGS2811+66
Function Call: WRITE	Prompt: !,"12.TOT MODIFICATIONS" Line Location: ACGS2811+69
Function Call: WRITE	Prompt: !," (EXCLUDING -L 3)" Line Location: ACGS2811+71
Function Call: WRITE	Prompt: @IOF,!?15,"PART II - SELECTED SOCIOECONOMIC STATISTICS" Line Location: ACGS2811+75
Function Call: WRITE	Prompt: !?15,"(includes both new awards and modifications)" Line Location: ACGS2811+76
Function Call: WRITE	Prompt: !?10,"PREFERENCE PROGRAM",?40,"\|",?50,"TYPE OF CONTRACTOR" Line Location: ACGS2811+78
Function Call: WRITE	Prompt: !,"----------------------------------------\|---------------------------------------" Line Location: ACGS2811+79
Function Call: WRITE	Prompt: !?20,"\| NUMBER \| TOTAL \| \| NUMBER \| TOTAL" Line Location: ACGS2811+80
Function Call: WRITE	Prompt: !?5,"CATEGORY",?20,"\| OF \| NET \| CATEGORY \| OF \| NET" Line Location: ACGS2811+81
Function Call: WRITE	Prompt: !?20,"\| ACTIONS \| DOLLARS \| \| ACTIONS \| DOLLARS" Line Location: ACGS2811+82
Function Call: WRITE	Prompt: !,"13.SMALL BUS. SMALL \|",?30,"\|",?40,"\|18.SMALL DISADVAN \|",?70,"\|" Line Location: ACGS2811+84
Function Call: WRITE	Prompt: !," PURCHASE SETASIDE\|" Line Location: ACGS2811+85
Function Call: WRITE	Prompt: ?40,"\| BUSINESS \|" Line Location: ACGS2811+86
Function Call: WRITE	Prompt: !,"14.LABOR SURPLUS \|",?30,"\|",?40,"\|19.WOMAN OWND SMALL\|",?70,"\|" Line Location: ACGS2811+87
Function Call: WRITE	Prompt: !," AREA SET-ASIDE \|" Line Location: ACGS2811+88
Function Call: WRITE	Prompt: ?40,"\| BUSINESS \|" Line Location: ACGS2811+89
Function Call: WRITE	Prompt: !,"15.COMB LABOR SURP/ \|",?30,"\|",?40,"\|20.SHELTERED \|",?70,"\|" Line Location: ACGS2811+90
Function Call: WRITE	Prompt: !," SM BUS. SET-ASIDE\|" Line Location: ACGS2811+91
Function Call: WRITE	Prompt: ?40,"\| WORKSHOP \|" Line Location: ACGS2811+92
Function Call: WRITE	Prompt: !,"16.BUY INDIAN \|" Line Location: ACGS2811+93
Function Call: WRITE	Prompt: ?40,"\|21.UNICOR \|" Line Location: ACGS2811+94
Function Call: WRITE	Prompt: !,"17.OTHER \|" Line Location: ACGS2811+95
Function Call: WRITE	Prompt: ?40,"\|22.BUY INDIAN \|" Line Location: ACGS2811+96
Function Call: WRITE	Prompt: !?40,"\|23.OTHER \|" Line Location: ACGS2811+97
Function Call: WRITE	Prompt: !,"PERSON SUBMITTING REPORT" Line Location: ACGS2811+99
Function Call: WRITE	Prompt: !,"NAME",?25,"\| SIGNATURE",?50,"\| PHONE",?65,"\| DATE" Line Location: ACGS2811+101
Function Call: WRITE	Prompt: !,ACGDUZ,?25,"\|",?50,"\| ",ACGPHONE,?65,"\| ",ACGTODAY Line Location: ACGS2811+102
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: L+0
Function Call: WRITE	Prompt: !?20,"\|---------\|---------\|---------\|---------\|---------\|---------" Line Location: L1+0
Function Call: WRITE	Prompt: ?20,"\| \| \| \| \| \|" Line Location: L11+0
Function Call: WRITE	Prompt: ?20,"\| \|XXXXXXXXX\|XXXXXXXXX\|XXXXXXXXX\|XXXXXXXXX\|" Line Location: L111+0
Function Call: WRITE	Prompt: !,"--------------------\|---------\|---------\|---------\|---------\|---------\|---------" Line Location: L2+0
Function Call: WRITE	Prompt: !,"--------------------\|---------\|---------\|-------------------\|---------\|---------" Line Location: L3+0
Function Call: WRITE	Prompt: ?20,"\|",$J(X,8),?30,"\|",$J($FN(X(1),"P",0),9),?40,"\|",$J($FN(X(2),"P",0),9),?50,"\|",$J($FN(X(3),"P",0),9),?60,"\|",$J($FN(X(4),"P",0),9),?70,"\|",$J($FN(ACG5,"P",0),9) Line Location: L4+3
Function Call: WRITE	Prompt: $J($S($P(X(1),U,2):$P(X(1),U,2),1:0),8)," \|",$J($FN(+X(1),"P",0),9) Line Location: L5+2

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACG4XX	ACGS2811+50, ACGS2811+51, ACGS2811+85, ACGS2811+86, ACGS2811+88, ACGS2811+89, ACGS2811+91, ACGS2811+92, ACGS2811+93, ACGS2811+94 , ACGS2811+95, ACGS2811+96, ACGS2811+97, L4+1, L4+2
>> ACG5	L4, L4+1, L4+3
>> ACGDUZ	ACGS2811+102
>> ACGPHONE	ACGS2811+102
>> ACGPM(	ACGS2811+50, ACGS2811+51, L4+1, L4+2
>> ACGPP(	ACGS2811+85, ACGS2811+88, ACGS2811+91, ACGS2811+93, ACGS2811+95
>> ACGTC(	ACGS2811+86, ACGS2811+89, ACGS2811+92, ACGS2811+94, ACGS2811+96, ACGS2811+97
>> ACGTODAY	ACGS2811+102
>> ACGX	ACGS2811+18, ACGS2811+21, ACGS2811+24, ACGS2811+27, ACGS2811+30, ACGS2811+33, ACGS2811+36, ACGS2811+39, ACGS2811+42, ACGS2811+45 , ACGS2811+58, ACGS2811+63, ACGS2811+67*, L4+1, L4+2
IOF	ACGS2811+75
IOST	ACGS2811+14, ACGS2811+52, ACGS2811+74, ACGS2811+103
U	ACGS2811+50, ACGS2811+51, L4+2, L5+2
>> X	ACGS2811+85, ACGS2811+86, ACGS2811+88, ACGS2811+89, ACGS2811+91, ACGS2811+92, ACGS2811+93, ACGS2811+94, ACGS2811+95, ACGS2811+96 , ACGS2811+97, L4+1, L4+2, L4+3, L5, Y
>> X(	L4+1, Y
>> X(1	L4+3, L5*, L5+2
>> X(2	L4+3
>> X(3	L4+3
>> X(4	L4+3
>> Y	Y*

Customize PDF page

Package: Contracts and Grants

Routine: ACGS2811

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend:

Name	Line Occurrences
L	ACGS2811+53, ACGS2811+55, ACGS2811+73, ACGS2811+77, ACGS2811+98, ACGS2811+100, ACGS2811+104
L11	ACGS2811+16, ACGS2811+48, ACGS2811+56, ACGS2811+61, ACGS2811+65
L111	ACGS2811+5, ACGS2811+7, ACGS2811+10, ACGS2811+12, ACGS2811+70, ACGS2811+72
L2	ACGS2811+3, ACGS2811+8, ACGS2811+13, ACGS2811+19, ACGS2811+22, ACGS2811+25, ACGS2811+28, ACGS2811+31, ACGS2811+34, ACGS2811+37 , ACGS2811+40, ACGS2811+43, ACGS2811+46, ACGS2811+59, ACGS2811+64, ACGS2811+68
L3	ACGS2811+83
L4	ACGS2811+18, ACGS2811+21, ACGS2811+24, ACGS2811+27, ACGS2811+30, ACGS2811+33, ACGS2811+36, ACGS2811+39, ACGS2811+42, ACGS2811+45 , ACGS2811+58, ACGS2811+63, ACGS2811+67
L5	ACGS2811+85, ACGS2811+86, ACGS2811+88, ACGS2811+89, ACGS2811+91, ACGS2811+92, ACGS2811+93, ACGS2811+94, ACGS2811+95, ACGS2811+96 , ACGS2811+97
Y	L4+1, L5+1

Name	Comments	DBIA/ICR reference
L11
L
L4
L5
L2
L3
L1
Y
L111