File mfg/2013/base/src/xfiv10ub.i changed (mode: 100644) (index 578a33e..9ea262c) |
16 |
16 |
/* start of new code >> */
|
/* start of new code >> */
|
17 |
17 |
|
|
18 |
18 |
/*k2155* start added code >>> */
|
/*k2155* start added code >>> */
|
|
19 |
|
if global_domain = "augin"
|
|
20 |
|
then do:
|
19 |
21 |
run CalculateTaxPct(output vcTaxRate).
|
run CalculateTaxPct(output vcTaxRate).
|
20 |
22 |
|
|
21 |
23 |
put stream ft
|
put stream ft
|
|
... |
... |
put stream ft |
36 |
38 |
{us/xf/xfput.i vExciseAmount 338 "->>>>>>>>9.99" }
|
{us/xf/xfput.i vExciseAmount 338 "->>>>>>>>9.99" }
|
37 |
39 |
{us/xf/xfput.i vExciseAmount 351 "->>>>>>>>9.99" }
|
{us/xf/xfput.i vExciseAmount 351 "->>>>>>>>9.99" }
|
38 |
40 |
.
|
.
|
|
41 |
|
end.
|
39 |
42 |
/*d3519* end added code <<<< */
|
/*d3519* end added code <<<< */
|
40 |
43 |
/* end of new code << */
|
/* end of new code << */
|
File mfg/2013/base/src/xfiv10ue.i changed (mode: 100644) (index 172a7c9..99ce200) |
18 |
18 |
|
|
19 |
19 |
/*k2155* start added code >>> */
|
/*k2155* start added code >>> */
|
20 |
20 |
define variable vcTaxRate like tx2_tax_pct no-undo.
|
define variable vcTaxRate like tx2_tax_pct no-undo.
|
|
21 |
|
|
|
22 |
|
if global_domain = "augin"
|
|
23 |
|
then do:
|
21 |
24 |
run CalculateTaxPct(output vcTaxRate).
|
run CalculateTaxPct(output vcTaxRate).
|
22 |
25 |
|
|
23 |
26 |
put stream ft
|
put stream ft
|
|
... |
... |
put stream ft |
38 |
41 |
{us/xf/xfput.i vExciseAmount 338 "->>>>>>>>9.99" }
|
{us/xf/xfput.i vExciseAmount 338 "->>>>>>>>9.99" }
|
39 |
42 |
{us/xf/xfput.i vExciseAmount 351 "->>>>>>>>9.99" }
|
{us/xf/xfput.i vExciseAmount 351 "->>>>>>>>9.99" }
|
40 |
43 |
.
|
.
|
|
44 |
|
end.
|
41 |
45 |
/*d3519* end added code <<<< */
|
/*d3519* end added code <<<< */
|
42 |
46 |
|
|
43 |
47 |
|
|
File mfg/2013/base/src/xfivrp9ams.i changed (mode: 100644) (index d7f882e..e8d883b) |
... |
... |
def var lvLineExcise as dec. |
13 |
13 |
def var lvLineGST as dec.
|
def var lvLineGST as dec.
|
14 |
14 |
def var lvUnitPrice as dec.
|
def var lvUnitPrice as dec.
|
15 |
15 |
def var lvExtLine as dec.
|
def var lvExtLine as dec.
|
|
16 |
|
if global_domain = "augin"
|
|
17 |
|
then do:
|
16 |
18 |
{us/bbi/gprun.i ""xxgetexcise.p""
|
{us/bbi/gprun.i ""xxgetexcise.p""
|
17 |
19 |
"(idh_inv_nbr,
|
"(idh_inv_nbr,
|
18 |
20 |
idh_line,
|
idh_line,
|
|
... |
... |
def var lvExtLine as dec. |
20 |
22 |
output lvLineGST,
|
output lvLineGST,
|
21 |
23 |
output lvUnitPrice,
|
output lvUnitPrice,
|
22 |
24 |
output lvExtLine)"}
|
output lvExtLine)"}
|
|
25 |
|
end.
|
23 |
26 |
/*d3519* end added code */
|
/*d3519* end added code */
|
24 |
27 |
|
|
25 |
28 |
/* IF WE HAVE A SERVICE CONTRACT AND THIS INVOICE WAS NOT CREATED */
|
/* IF WE HAVE A SERVICE CONTRACT AND THIS INVOICE WAS NOT CREATED */
|
|
... |
... |
assign |
44 |
47 |
else tot_ex_tax.
|
else tot_ex_tax.
|
45 |
48 |
|
|
46 |
49 |
/*d3519* start added code */
|
/*d3519* start added code */
|
|
50 |
|
if global_domain = "augin"
|
|
51 |
|
then do:
|
47 |
52 |
tot_tax = lvLineGST * idh_qty_inv.
|
tot_tax = lvLineGST * idh_qty_inv.
|
48 |
53 |
ext_price = idh_price + lvLineExcise.
|
ext_price = idh_price + lvLineExcise.
|
|
54 |
|
end.
|
49 |
55 |
/*d3519* end added code */
|
/*d3519* end added code */
|
50 |
56 |
/*** LINE DETAIL RECORDS ***/
|
/*** LINE DETAIL RECORDS ***/
|
51 |
57 |
if desc2 = "" then
|
if desc2 = "" then
|
|
... |
... |
put stream ft |
71 |
77 |
else 0") 054 "->>>>>>>>9.999999999" }
|
else 0") 054 "->>>>>>>>9.999999999" }
|
72 |
78 |
{us/xf/xfput.i idh_um 074 "x(02)" } /* uom */
|
{us/xf/xfput.i idh_um 074 "x(02)" } /* uom */
|
73 |
79 |
/*d3519* start added code >>> */
|
/*d3519* start added code >>> */
|
74 |
|
{us/xf/xfput.i lvunitprice 076 "->>>>>>>>9.99999" }
|
|
|
80 |
|
if global_domain = "augin"
|
|
81 |
|
then do:
|
|
82 |
|
{us/xf/xfput.i lvunitprice 076 "->>>>>>>>9.99999" }
|
|
83 |
|
end.
|
|
84 |
|
else do:
|
|
85 |
|
{us/xf/xfput.i "(if idh_fsm_type <> 'FSM-RO':U then idh_price ~
|
|
86 |
|
else if idh_fsm_type = 'FSM-RO':U ~
|
|
87 |
|
and idh_fix_pr then idh_fixed_price ~
|
|
88 |
|
else 0)" 076 "->>>>>>>>9.99999" }
|
|
89 |
|
end.
|
75 |
90 |
/*d3519* end added code <<< */
|
/*d3519* end added code <<< */
|
76 |
91 |
|
|
77 |
92 |
/*d3519* start deleted code >>>
|
/*d3519* start deleted code >>>
|
File mfg/2013/base/src/xfivto19m5.i changed (mode: 100644) (index e6affe6..e93c873) |
... |
... |
put stream ft |
21 |
21 |
put stream ft skip.
|
put stream ft skip.
|
22 |
22 |
/*d3519* START Added code >>>> */
|
/*d3519* START Added code >>>> */
|
23 |
23 |
def var totalExcise as dec.
|
def var totalExcise as dec.
|
|
24 |
|
if global_domain = "augin"
|
|
25 |
|
then do:
|
24 |
26 |
{us/bbi/gprun.i ""xxgetexcisetotals.p""
|
{us/bbi/gprun.i ""xxgetexcisetotals.p""
|
25 |
27 |
"(ih_inv_nbr,
|
"(ih_inv_nbr,
|
26 |
28 |
output totalExcise,
|
output totalExcise,
|
27 |
29 |
output invtot_tax_amt,
|
output invtot_tax_amt,
|
28 |
30 |
output invtot_line_total)"}
|
output invtot_line_total)"}
|
29 |
31 |
invtot_line_total = invtot_line_total + totalExcise.
|
invtot_line_total = invtot_line_total + totalExcise.
|
|
32 |
|
end.
|
30 |
33 |
/*d3519* End Added code >>>> */
|
/*d3519* End Added code >>>> */
|
31 |
34 |
|
|
32 |
35 |
/*** TRAILER - RECORD TYPE "5" ***/
|
/*** TRAILER - RECORD TYPE "5" ***/
|