Routine: ACGS281

Package	Total	Call Graph
Contracts and Grants	6	^ACGS2811 B1^ACGS282 DIR^ACGSDIC FY^ACGSEXP HOLD^ACGSMENU (,DONE)^ACGSZIS
VA Fileman	2	WAIT^DICD EN1^DIP
Kernel	1	^%ZIS

Entry Points

External References

Name	Field # of Occurrence
^%ZIS	REPORT
^ACGS2811	HEAD+17
B1^ACGS282	BEGIN+8
DIR^ACGSDIC	ZIS+3, ZIS+8, ZIS+13, QT+3, CO+2
FY^ACGSEXP	QT+7
HOLD^ACGSMENU	R1+9
^ACGSZIS	ZIS+17
DONE^ACGSZIS	REPORT+3, R1, R1+3, R1+11
WAIT^DICD	R1+5
EN1^DIP	R1+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ZIS+2
Function Call: WRITE	Prompt: ! Line Location: ZIS+7
Function Call: WRITE	Prompt: ! Line Location: ZIS+12
Function Call: WRITE	Prompt: ! Line Location: QT+2
Function Call: WRITE	Prompt: !?15,"FEDERAL PROCUREMENT DATA SYSTEM (FPDS)",!?15,"SUMMARY CONTRACT ACTION REPORT ($100,000 OR LESS)" Line Location: HEAD+2
Function Call: WRITE	Prompt: !,"A. REPORT PERIOD",?25,"B. REPORT TYPE",?55,"C. REPORTING AGENCY CODE" Line Location: HEAD+3
Function Call: WRITE	Prompt: !,"FY: ",ACGFY," QT: ",ACGQT,?25,"\|",$S(ACGORIGN=1:"XX",1:" "),"\| ORIGINAL \|",$S(ACGORIGN=2:"XX",1:" "),"\| REVISION" Line Location: HEAD+4
Function Call: WRITE	Prompt: !,"D. REPORTING AGENCY NAME",?27,"E. CONTRACT OFFICE CODE",?52,"F. CONTRACT OFFICE NAME" Line Location: HEAD+6
Function Call: WRITE	Prompt: !?3,"INDIAN HEALTH SERVICE",?30,ACG4XX,?55,$P(^ACGPO($P(ACGPARA,U),0),U) Line Location: HEAD+7
Function Call: WRITE	Prompt: !?15,"PART I - PRIME CONTRACT ACTIONS OF $100,000 OR LESS" Line Location: HEAD+9
Function Call: WRITE	Prompt: !,"NEW AWARDS AND MODIFICATIONS",?30,"\|",?40,"NET DOLLAR AMOUNTS" Line Location: HEAD+11
Function Call: WRITE	Prompt: !,"------------------------------\|-------------------------------------------------" Line Location: HEAD+12
Function Call: WRITE	Prompt: !?20,"\| NUMBER \| SMALL \| LARGE \|DOMESTIC \| \|" Line Location: HEAD+13
Function Call: WRITE	Prompt: !,?20,"\| OF \|BUSINESS \|BUSINESS \|OUTSIDE/ \| OTHER \| TOTAL" Line Location: HEAD+14
Function Call: WRITE	Prompt: !,"PROCUREMENT METHOD",?20,"\| ACTIONS \|CONCERNS \|CONCERNS \|FOREIGN \| ENTITIES\| DOLLARS" Line Location: HEAD+15
Function Call: WRITE	Prompt: !?20,"\| (a) \| (b) \| (c) \| (d) \| (e) \| (f) " Line Location: HEAD+16
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: L+0
Routine Call	%ZIS Line Location: REPORT

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACGS - [#9002330]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACGPARA(1	EN
^ACGPO - [#9002334]	HEAD+7
^ACGS("R"	BEGIN+8
^DD("DD"	HEAD+1
^VA(200 - [#200]	ZIS

Label References

Name	Line Occurrences
BEGIN	R1+1
CO	EN1+3
EN1	EN+1
HEAD	R1+1
L	HEAD+5, HEAD+8, HEAD+10
QT	EN1+1
R1	REPORT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACG	EXIT!, BEGIN+1, BEGIN+2, BEGIN+4, BEGIN+5, BEGIN+6*
ACG1	EXIT!, BEGIN+1, BEGIN+4
ACG19	EXIT!
ACG26	EXIT!
ACG26X	EXIT!, BEGIN+7*
ACG27	EXIT!
ACG303	EXIT!
ACG304	EXIT!
ACG305	EXIT!
ACG306	EXIT!
ACG307	EXIT!
ACG4X	EXIT!, EN1+4, REPORT+2, REPORT+3, CO+4
ACG4XX	EXIT!, EN1+4, REPORT+2, R1+7, BEGIN+1, BEGIN+2, BEGIN+3, BEGIN+4, BEGIN+5, BEGIN+6 , CO+4*, HEAD+7
ACG5	EXIT!
ACGBEG	EXIT!, BEGIN+7, BEGIN+8
ACGBEGIN	EXIT!, R1+6, BEGIN+7, PERIOD+2*
ACGCMP	EXIT!
ACGCMP(	BEGIN+4*
ACGDT	EXIT!
ACGDUZ	EXIT!, ZIS, ZIS+1, ZIS+5
ACGEND	EXIT!, R1+6, BEGIN+8, PERIOD+2, PERIOD+4
ACGFY	EXIT!, PERIOD, PERIOD+2, PERIOD+6, HEAD+4
>> ACGIOP	REPORT*, R1+6
>> ACGORIGN	ZIS+15*, HEAD+4
>> ACGPARA	EN*, EN1+3, EN1+4, HEAD+7
ACGPHONE	EXIT!, ZIS+15*
ACGPM	EXIT!
ACGPM(	BEGIN+1, BEGIN+2, BEGIN+3*
ACGPP	EXIT!
ACGPP(	BEGIN+5*
ACGQIT	EXIT!
ACGQT	EXIT!, QT+5, QT+6, QT+8*, PERIOD, PERIOD+2, PERIOD+4, PERIOD+6, HEAD+4
ACGQTX	QT+6*, QT+8!
ACGQUIT	EXIT!, EN1!, EN1+2!, EN1+3, ZIS+4, ZIS+9, ZIS+14, ZIS+18, REPORT*, REPORT+2! , R1, QT+4, QT+9, CO+3
ACGRDA	EXIT!
>> ACGSDOC	ZIS+10*, R1+4
ACGSP	EXIT+1!
ACGT	EXIT!, BEGIN!
ACGTC	EXIT!
ACGTC(	BEGIN+6*
ACGTODAY	EXIT!, HEAD+1*
ACGX	EXIT!
ACGY	EXIT+1!
>> BY	R1+6*
>> DIC	R1+6*
>> DIR("?"	ZIS+1, ZIS+6, QT+1, CO+1
>> DIR("A"	ZIS+1, ZIS+6, ZIS+11, QT+1, CO+1*
>> DIR("B"	ZIS+1, ZIS+6, ZIS+11*
>> DIR(0	ZIS+1, ZIS+6, ZIS+11, QT+1, CO, CO+1
>> DIS(0	R1+6, R1+7
DT	PERIOD+4, HEAD+1
DUZ	ZIS
>> FLDS	R1+6*
>> FR	R1+6*
IO	REPORT+1
IOF	R1+2, R1+10
ION	REPORT
>> IOP	REPORT, R1+6
IOST	R1+5, R1+9
>> POP	REPORT
>> TO	R1+6*
U	EN1+3, EN1+4, ZIS, HEAD+7
>> Y	ZIS+4, ZIS+5, ZIS+10, ZIS+14, ZIS+15, QT+5, CO+4, HEAD+1*
ZTDESC	EXIT!, ZIS+16*
>> ZTQUEUED	REPORT
ZTRTN	EXIT!, ZIS+16*

Customize PDF page

Package: Contracts and Grants

Routine: ACGS281

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:

Name	Comments	DBIA/ICR reference
BEGIN
EN
CO
ZIS
PERIOD
L
HEAD	;EP;TO PRINT HEADER
EN1
EXIT
REPORT
QT	;EP;TO DETERMINE DATE RANGE FOR QUARTERS
R1