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: PRCHDSP1

Package: IFCAP

Routine: PRCHDSP1


Information

PRCHDSP1 ;BOISE/TKW,ID/RSD,WISC/AKS-DISPLAY AMENDMENT ;8/26/94 13:41

Source Information

Source file <PRCHDSP1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
IFCAP 4 DT^PRCHDSP  $$DECODE^PRCHES6  $$DECODE^PRCHES7  DIWP^PRCUTL  
Kernel 1 KILL^%ZTLOAD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IFCAP 2 PRCHDSP  PRCHDSP2  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
ACC
ITEM
EXIT
A
H
HDR
EN2 ;ADJUSTMENT VOUCHER
EN2H
PAUSE

External References

Name Field # of Occurrence
KILL^%ZTLOAD EXIT
DT^PRCHDSP EN2+4, EN2+5
$$DECODE^PRCHES6 ITEM+4, EN2+4
$$DECODE^PRCHES7 ACC+4
DIWP^PRCUTL A

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "12.ACCOUNTING AND APPROPRIATION DATA (If required)"
  • Line Location: ACC+1
Function Call: WRITE
  • Prompt: ?50,"TOTAL AMOUNT: $",$J($P(PRCHP0,U,15),10,2)
  • Line Location: ACC+1
Function Call: WRITE
  • Prompt: " $",$J($S(X<0:-X,1:X),10,2)
  • Line Location: ACC+3
Function Call: WRITE
  • Prompt: ?51,"/ES/"_X
  • Line Location: ACC+4
Function Call: WRITE
  • Prompt: !,PRCHUL
  • Line Location: ACC+5
Function Call: WRITE
  • Prompt: "__"_Y_"__ copies to the issuing office.",!,PRCHUL
  • Line Location: ACC+10
Function Call: WRITE
  • Prompt: !!,"14.DESCRIPTION OF AMENDMENT/MODIFICATION (Organized by UCF section headings,",!?42,"including solicitation/contract",!?42,"subject matter where feasible.)",!
  • Line Location: ACC+11
Function Call: WRITE
  • Prompt: ?3,^(I,0),!
  • Line Location: ITEM+0
Function Call: WRITE
  • Prompt: !,PRCHUL,!,"15A.NAME AND TITLE OF SIGNER(Type or print)",?43,"|16A.NAME AND TITLE OF CONTRACTING",!?43,"| OFFICER (Type or print)",!
  • Line Location: ITEM+2
Function Call: WRITE
  • Prompt: ?43,"| ",$$DECODE^PRCHES6(D0,D1)," Contracting Officer",!,$E(PRCHUL,1,43),"|",$E(PRCHUL,1,35),!
  • Line Location: ITEM+4
Function Call: WRITE
  • Prompt: ?3,"|"
  • Line Location: A+1
Function Call: WRITE
  • Prompt: PRCHTYP,"."
  • Condition for execution: J=1
  • Line Location: A+1
Function Call: WRITE
  • Prompt: ?6,^(I,0),!
  • Line Location: A+1
Function Call: WRITE
  • Prompt: "___|",$E(PRCHUL,1,75),!
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !
  • Line Location: H+0
Function Call: WRITE
  • Prompt: @IOF,$S($D(PRCHREPR):$E(PRCHUL,1,35)_" **REPRINT** "_$E(PRCHUL,49,80),1:PRCHUL)
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !?2,"AMENDMENT OF SOLICITATION/MODIFICATION OF CONTRACT",?54,"| PAGE",!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: $E(PRCHUL,1,54),"|"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: $E(PRCHUL,1,Y)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "_________"
  • Condition for execution: Z
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: PRCHPG,$E(PRCHUL,1,Y),"________"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: PRCHPG,$E(PRCHUL,1,Y),"________"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: PRCHPG,$E(PRCHUL,1,Y),"________"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: $E(PRCHUL,1,X)
  • Condition for execution: X>0
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?3,^(I,0),!
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: !,PRCHUL,!,"Approve subject to final action on R/S on items indicated.",?65,"| DATE | P.O. NO.",!,$E(PRCHUL,1,65),"|",?77,"|",!
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: "SIGNATURE OF CONTRACTING OFFICER",?65,"|",?77,"|",!,?65,"|",?77,"|",!
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: "/ES/"_X_" "
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: ?65,"| "
  • Line Location: EN2+5
Function Call: WRITE
  • Prompt: ?77,"|",!,$E(PRCHUL,1,65),"|",$E(PRCHUL,1,11),"|",$E(PRCHUL,1,19),!
  • Line Location: EN2+5
Function Call: WRITE
  • Prompt: @IOF,?5,"SUBJECT: ADJUSTMENT VOUCHER"
  • Line Location: EN2H+0
Function Call: WRITE
  • Prompt: " **REPRINT**"
  • Condition for execution: $D(PRCHREPR)
  • Line Location: EN2H+0
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: EN2H+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAUSE+0
Function Call: WRITE
  • Prompt: " ^ TO QUIT"
  • Line Location: PAUSE+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J ITEM, EXIT!, EN2+1
^UTILITY($J EXIT!, A!, A+1

Label References

Name Line Occurrences
EN2H EN2+1
EXIT EN2+5
H ITEM
HDR ACC, ITEM+1, ITEM+2, H
PAUSE ACC, H

Naked Globals

Name Field # of Occurrence
^( ITEM, A+1, EN2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 ACC+4, ITEM+3, ITEM+4, EN2+4
>> D1 ACC+4, ITEM+4, EN2+4
>> DA ACC+4*, ITEM+3*, A, EN2+4*
DTIME PAUSE
>> I ITEM*, A+1*, EN2+1*, EN2+2*
IOF HDR, EN2H
>> J A+1*
>> P ACC+4*, ITEM+3*, EN2+4*
>> PRCH0 ACC+1, A, EN2+5
>> PRCH1 ACC+4, ITEM+3, EN2+4
>> PRCHDY ACC+11*, ITEM*, ITEM+1, ITEM+2, H*, HDR+4*, EN2+1*, EN2+2, EN2H*
>> PRCHP0 ACC+1, ACC+2
>> PRCHPG HDR+3, HDR+4*
>> PRCHREPR HDR, EN2H
>> PRCHTYP A, A+1
>> PRCHUL ACC+5, ITEM+2, ITEM+4, A+2, HDR, HDR+2, HDR+3, EN2+3, EN2+5
>> PRCHX A, A+1
U ACC+1, ACC+2, ACC+4, ITEM+3, A, EN2+4, EN2+5
>> X ACC, ACC+1*, ACC+2, ACC+3, ACC+4*, ITEM+3*, A*, H, HDR+3*, EN2+4*
, PAUSE*
>> Y A, HDR+3*, EN2+4*, EN2+5*
>> Z HDR+3*
ZTSK EXIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All