Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ACGS2811

Package: Contracts and Grants

Routine: ACGS2811


Information

ACGS2811 ;IHS/OIRM/DSD/THL,AEF - UTILITY TO PRINT THE SMALL PURCHASE 281 REPORT - CONT; [ 03/27/2000 2:22 PM ]

Source Information

Source file <ACGS2811.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Contracts and Grants 1 HOLD^ACGSMENU  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contracts and Grants 2 ACGS281  ACGS282  

Entry Points

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

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

Label References

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

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All