Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCHCD0

Package: IFCAP

Routine: PRCHCD0


Information

PRCHCD0 ;WISC/AKS-Taskman job to zero out 'Monthly Purchase Limit' each month ; 7/12/01 5:03pm

Source Information

Source file <PRCHCD0.m>

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 PRCH ZERO MONTHLY PURCHASE  PRCHMA  PRCHNPO4  PRCHNRQ  

Entry Points

Name Comments DBIA/ICR reference
ZERO ; To zero out the monthly purchases at the beginning of every month.
ADJ1 ; Deduct amount from monthly purchases before amendment for new amount
; is approved if PO is from the current month and year only.
; PRCMCP is monthly card purchases, PRCHTAMT is original order amount
; PRCOLD is card balance after deducting the original order's amount
; DT is the current date, system-supplied.
LIMIT ; Check purchase card limits and add new purchase if limit is ok.
; Deduct discounts and add shipping charges if any is applicable.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Improper file."
  • Line Location: LIMIT+4
Function Call: WRITE
  • Prompt: !!!,?5,"The total amount of this order cannot be negative.",!
  • Line Location: LIMIT+12
Function Call: WRITE
  • Prompt: !!!,?5,"The total amount of this order is more than the Single Purchase limit",!,?5,"for the purchase card.",!
  • Line Location: LIMIT+18
Function Call: WRITE
  • Prompt: !!!,?5,"The total amount of this order and the previous purchases on this",!,?5,"purchase card is more than the monthly purchase limit.",!
  • Line Location: LIMIT+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC( ADJ1+10, LIMIT+8, LIMIT+10
^PRC(440.5 - [#440.5] ZERO+3*, ADJ1+12, LIMIT+7, LIMIT+16
^PRC(442 - [#442] ADJ1+7, ADJ1+8, LIMIT+6
^TMP("PRCHCD0" ADJ1+14*, LIMIT+15, LIMIT+16, LIMIT+21!

Naked Globals

Name Field # of Occurrence
^(0 LIMIT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT ADJ1+7
>> ERROR LIMIT+11*, LIMIT+17*, LIMIT+19*
>> FILE ADJ1+6, ADJ1+10, LIMIT+4, LIMIT+8, LIMIT+10
N ZERO+2~, ZERO+3*, LIMIT+5*, LIMIT+8*
PRCHCD ADJ1+8*, ADJ1+12, LIMIT+3~, LIMIT+6*, LIMIT+7, LIMIT+16
PRCHCD0 LIMIT+3~, LIMIT+7*, LIMIT+14
PRCHDLMT LIMIT+3~, LIMIT+14*, LIMIT+17
PRCHMLMT LIMIT+3~, LIMIT+14*, LIMIT+19
>> PRCHPO ADJ1+7, ADJ1+8, ADJ1+10, ADJ1+14, LIMIT+6, LIMIT+8, LIMIT+10, LIMIT+15, LIMIT+16, LIMIT+21
PRCHPURS LIMIT+3~, LIMIT+15*, LIMIT+16*, LIMIT+19
PRCHTAMT ADJ1+10*, ADJ1+11*, ADJ1+13, ADJ1+14!, LIMIT+3~, LIMIT+5*, LIMIT+8*, LIMIT+10*, LIMIT+11!, LIMIT+15
, LIMIT+16, LIMIT+17
PRCMCP ADJ1+12*, ADJ1+13, ADJ1+14!
PRCOLD ADJ1+13*, ADJ1+14!
U ZERO+3, ADJ1+7, ADJ1+8, ADJ1+10, ADJ1+12, LIMIT+6, LIMIT+8, LIMIT+10, LIMIT+14, LIMIT+15
, LIMIT+16
X1 ADJ1+7*, ADJ1+9, ADJ1+15!
X2 ADJ1+7*, ADJ1+9, ADJ1+15!
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All