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

Package: IFCAP

Routine: PRCHDAM


Information

PRCHDAM ;WISC/DJM,ID/RSD-DISPLAY AN AMENDMENT ;2/12/98 2:38 PM

Source Information

Source file <PRCHDAM.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
IFCAP 3 REASON^PRCHDAM0  START^PRCHDAM1  DIWP^PRCUTL  
Kernel 1 ^%ZIS  

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

Package Total Caller Graph
IFCAP 4 PRCFFMOM  PRCFFUA1  PRCHAM  PRCHMA  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
ACC
CO
Q ;exit point
ITEM
CONT
CHKP
PGE
DT
X8
EN2 ;ADJUSTMENT VOUCHER DISPLAY

External References

Name Field # of Occurrence
^%ZIS V+5
REASON^PRCHDAM0 ACC+10
START^PRCHDAM1 ITEM
DIWP^PRCUTL ITEM+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y>0
  • Line Location: V+5
Function Call: WRITE
  • Prompt: !,"2. MOD. NO.: ",?15,"| 3. EFFECTIVE DATE: ",?46,"| 4. REQUISITION/P.O. REQ. NO.: "
  • Line Location: V+5
Function Call: WRITE
  • Prompt: !?6,$P(PRCHD0,U,1),?15,"| "
  • Line Location: V+6
Function Call: WRITE
  • Prompt: ?46,"| ",$S(Y:Y_"/",1:" "),$P($P($G(^PRC(443.6,D0,0)),U,1),"-",2),!,PRCHDUL
  • Line Location: V+8
Function Call: WRITE
  • Prompt: !,"8. NAME AND ADDRESS OF CONTRACTOR ",?40,"| 10A. MODIFICATION OF CONTRACT/ORDER",!?5,$P(X,U,1),?40,"| NO."
  • Line Location: V+9
Function Call: WRITE
  • Prompt: ?52,$P($G(^PRC(443.6,PRCHPO,0)),U)
  • Line Location: V+10
Function Call: WRITE
  • Prompt: !?5,$P(X,U,I),?40,"|"
  • Line Location: V+11
Function Call: WRITE
  • Prompt: !?5,$P(X,U,6),", ",$P($G(^DIC(5,+$P(X,U,7),0)),U,2)," ",$P(X,U,8),?40,"|"
  • Line Location: V+12
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>40
  • Line Location: V+13
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: V+13
Function Call: WRITE
  • Prompt: !
  • Line Location: V+13
Function Call: WRITE
  • Prompt: " $",$J($S(X<0:-X,1:X),10,2)
  • Condition for execution: X
  • Line Location: ACC+0
Function Call: WRITE
  • Prompt: ?50,"TOTAL AMOUNT: $",$J($P(PRCHDP0,U,15),10,2)
  • Line Location: ACC+1
Function Call: WRITE
  • Prompt: !,PRCHDUL
  • Line Location: ACC+2
Function Call: WRITE
  • Prompt: !,$P(Y,U,1),". ",$P(Y,U,2),!?3,$P(PRCHD0,U,7),!,PRCHDUL
  • Line Location: ACC+2
Function Call: WRITE
  • Prompt: !," IMPORTANT: Contractor is ",$S($P(PRCHD0,U,5)="Y":"",1:"not "),"required to sign this document and return"
  • Line Location: ACC+3
Function Call: WRITE
  • Prompt: !,?4,$S($P(PRCHD0,U,5)="Y":+$P(PRCHD0,U,6)_" ",1:""),"copies to the issuing office."
  • Line Location: ACC+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ACC+5
Function Call: WRITE
  • Prompt: !!?8,"ENTER '^' TO HALT: "
  • Line Location: ACC+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ACC+5
Function Call: WRITE
  • Prompt: !,"14. DESCRIPTION OF MODIFICATION (organized by UCF section heading,",!?5," including contract subject matter where feasible.)",!,PRCHDUL,!!
  • Line Location: ACC+7
Function Call: WRITE
  • Prompt: !!,"Except as provided herein, all terms and conditions of the document referenced",!,"in Item 10A, as heretofore changed, remains unchanged and in full force and",!,"effect.",!,PRCHDUL
  • Line Location: ACC+9
Function Call: WRITE
  • Prompt: !,"CONTRACTING OFFICER: "
  • Line Location: CO+0
Function Call: WRITE
  • Prompt: ?22,$P(Y,",",2)," ",$P(Y,",",1),!!
  • Line Location: CO+0
Function Call: WRITE
  • Prompt: ?8,"ENTER '^' TO HALT: "
  • Line Location: CO+1
Function Call: WRITE
  • Prompt: !,^(I,0)
  • Line Location: CONT+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PGE+0
Function Call: WRITE
  • Prompt: !!?8,"ENTER '^' TO HALT: "
  • Line Location: PGE+0
Function Call: WRITE
  • Prompt: Y\100#100,"/",Y#100\1,"/",Y\10000+1700
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !?10,"ADJUSTMENT VOUCHER "
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !,PRCHDUL
  • Line Location: EN2+1
Routine Call
  • %ZIS
  • Line Location:
    • V+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] V+12
^PRC(440 - [#440] V+9
^PRC(443.6 - [#443.6] V+4, V+8, V+10, ITEM, ITEM+1, X8
^PRCD(442.2 - [#442.2] ACC+2
^PRCS(410 - [#410] V+7
^UTILITY($J Q+1!, ITEM!, CONT, CONT+1
^VA(200 - [#200] CO

Label References

Name Line Occurrences
CHKP CONT+1
CO EN2+1
CONT ITEM
DT V+6, EN2+1
EN2 V+5
ITEM ACC+7, EN2+1
PGE ACC+8, CHKP, EN2+1
Q ACC+5, ACC+7, ACC+8
X8 V+11

Naked Globals

Name Field # of Occurrence
^( V+4, ITEM+1, CONT, CONT+1
^(0 V+7
^(1 V+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS V+4*
>> CTNO X8*, X8+1
>> D0 V+3*, V+4, V+8, ITEM, ITEM+1, X8
>> D1 V+3*, V+4, ITEM, ITEM+1
>> DA ITEM+1
>> DIWF ITEM*
>> DIWL ITEM*, CONT, CONT+1
>> DIWR ITEM*
DTIME ACC+5, CO+1, PGE
>> I V+11*, CONT*, CONT+1*, CHKP
IOF V+5, ACC+5, PGE+1
>> IOP V+4*
IOSL ACC+8, CHKP, EN2+1
J V+11*, V+12, V+13, CONT!*
J( CONT*, CONT+1, CHKP
>> L CONT*
>> PRC("SITE" V+4*
>> PRCHAM V+3
PRCHD0 V+4*, V+6, ACC, ACC+2, ACC+3, ACC+4, Q+1!, EN2+1
PRCHD1 V+4*, CO, Q+1!
PRCHDAV V+4*, V+5, Q+1!, ITEM
PRCHDP0 V+4*, V+7, ACC, ACC+1, Q+1!
PRCHDP1 V+4*, V+9, Q+1!
PRCHDUL V+4*, V+8, ACC, ACC+2, ACC+7, ACC+9, Q+1!, EN2+1
PRCHII Q+1!, ITEM+1*
PRCHLC1 ACC+6*, ACC+7, ACC+8, Q+1!, CONT+1, CHKP, PGE*, PGE+1*, EN2+1*
PRCHLC2 ACC+6*, ACC+8, Q+1!, CONT+1*, CHKP, PGE+1*, EN2+1*
>> PRCHPO V+3, V+10
U V+3*, V+4*, V+6, V+7, V+8, V+9, V+10, V+11, V+12, ACC
, ACC+1, ACC+2, ACC+3, ACC+4, CO, ITEM, EN2+1
X V+9*, V+11, V+12, ACC*, ACC+1, ACC+5*, CO+1*, Q+1!, ITEM+1*, PGE*
X( V+11, V+12, V+13, X8+1*, X8+2, X8+3*, X8+4*
X8 V+2~, V+11, V+12, V+13, X8*, X8+1, X8+2*, X8+3*, X8+4*
X9 V+2~, X8+1*, X8+3*, X8+4*
>> Y V+6*, V+7*, V+8, ACC+2*, CO*, DT, EN2+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All