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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACGSPSUM

Package: Contracts and Grants

Routine: ACGSPSUM


Information

ACGSPSUM ;IHS/OIRM/DSD/THL,AEF - SUMMARY OF MODS FOR ACGPSUM; [ 03/27/2000 2:22 PM ]

Source Information

Source file <ACGSPSUM.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Contracts and Grants 2 ^ACGPTCS  HOLD^ACGSMENU  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Contracts and Grants 2 ACGPSUM  ACGPTCS1  

Entry Points

Name Comments DBIA/ICR reference
EN
ADHOC ;EP
EN1
TAIL ;EP;
EXIT ;
TOTAL

External References

Name Field # of Occurrence
^ACGPTCS ADHOC+4
HOLD^ACGSMENU TAIL+5, TOTAL+4, ADHOC+1, ADHOC+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?60,"PAGE: ",DC,!,$P(^ACGS(D0,"DT"),U,2)," (CON'T)"
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: ?54,$E($P(ACG(ACG),U,2),4,5),"/",$E($P(ACG(ACG),U,2),6,7),"/",$E($P(ACG(ACG),U,2),2,3)
  • Condition for execution: $P(ACG(ACG),U,2)?7N
  • Line Location: EN1+13
Function Call: WRITE
  • Prompt: ?68,$J($FN($P(ACG(ACG),U,3),"P,",0),12)
  • Line Location: EN1+13
Function Call: WRITE
  • Prompt: !!?30,"TOTAL AMOUNT",?45,"TOTAL DIRECT",?60,"TOTAL INDIR",!?30,"------------",?45,"------------",?60,"------------",!?30,$J($FN((ACGTD+ACGTI),"P,",0),12),?45,$J($FN(ACGTD,"P,",0),12),?60,$J($FN(ACGTI,"P,",0),12)
  • Line Location: EN1+14
Function Call: WRITE
  • Prompt: !!?18,"TOTALS FOR: ",ACGRPT
  • Line Location: TAIL+1
Function Call: WRITE
  • Prompt: !?30,"TOTAL AMOUNT",?45,"TOTAL DIRECT",?60,"TOTAL INDIRECT",!?30,"------------",?45,"------------",?60,"------------",!?30,$J($FN((ACGTOTD+ACGTOTI),"P,",0),12),?45,$J($FN(ACGTOTD,"P,",0),12),?60,$J($FN(ACGTOTI,"P,",0),12)
  • Line Location: TAIL+3
Function Call: WRITE
  • Prompt: !!?18,"TOTALS FOR PROCUREMENT OFFICE: ",$S($D(ACG4N):ACG4N,1:ACG4)
  • Line Location: TOTAL+0
Function Call: WRITE
  • Prompt: !?30,"TOTAL AMOUNT",?45,"TOTAL DIRECT",?60,"TOTAL INDIRECT",!?30,"------------",?45,"------------",?60,"------------",!?30,$J($FN((ACGTOTDT+ACGTOTIT),"P,",0),12),?45,$J($FN(ACGTOTDT,"P,",0),12),?60,$J($FN(ACGTOTIT,"P,",0),12)
  • Line Location: TOTAL+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACGS - [#9002330] EN1+7, EN1+8, EN1+10
^ACGS("C" EN1+5, EN1+7, ADHOC+4
^ACGTPA - [#9002330.1] EN1+13

Label References

Name Line Occurrences
EN1 EN

Naked Globals

Name Field # of Occurrence
^("DT" EN1+7
^("DT1" EN1+7
^("DT2" EN1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACG EN1+3~, EN1+4*, EN1+5*, EN1+6*, EN1+7*, EN1+8, EN1+12*, EN1+13
ACG( EN1+8*, EN1+12, EN1+13
>> ACG4 TOTAL
>> ACG4N TOTAL
>> ACGDC(1 ADHOC+4*
>> ACGDT EN1+7*, EN1+8
>> ACGDT1 EN1+7*, EN1+8
>> ACGDT2 EN1+7*, EN1+8
ACGI EN1+3~, EN1+5*, EN1+11, EN1+12*
>> ACGJ EN1+7*, EN1+10
ACGQUIT ADHOC+2!, ADHOC+4!
ACGRDAM ADHOC+3*, ADHOC+4*, ADHOC+5!
>> ACGRPT TAIL+1
>> ACGTD EN1*, EN1+8*, EN1+9, EN1+14, EN1+15*
>> ACGTI EN1*, EN1+8*, EN1+9, EN1+14, EN1+15*
>> ACGTOTD EN1+1*, EN1+9*, TAIL+2*, TAIL+3, TAIL+4*
>> ACGTOTDT EN1+2*, EN1+9*, TOTAL+1*, TOTAL+2, TOTAL+3*
>> ACGTOTI EN1+1*, EN1+9*, TAIL+2*, TAIL+3, TAIL+4*
>> ACGTOTIT EN1+2*, EN1+9*, TOTAL+1*, TOTAL+2, TOTAL+3*
>> ACGX ADHOC+3*, ADHOC+4, ADHOC+6
>> D0 EN1+5, EN1+7, EN1+10, ADHOC+3, ADHOC+4*, ADHOC+6*
>> DC EN1+10*
DIP ADHOC+4!
DXS ADHOC+4!
IOF EN1+10
IOSL EN1+10
IOST TAIL+5, TOTAL+4, ADHOC+1, ADHOC+4
U EN1+8, EN1+10, EN1+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All