File mfg/2013/base/src/sorp1002.p changed (mode: 100644) (index c407fa5..495ab9a) |
... |
... |
repeat while available so_mstr: |
996 |
996 |
end. |
end. |
997 |
997 |
/*d2561* end added code <<< */ |
/*d2561* end added code <<< */ |
998 |
998 |
if execname = "sosorp20.p" then do: |
if execname = "sosorp20.p" then do: |
999 |
|
{us/so/sorphfrm.i} /* Form definitions for phead1 */ |
|
|
999 |
|
/*d2561* {us/so/sorphfrm.i} /* Form definitions for phead1 */ */ |
|
1000 |
|
/*d2561*/ {xxrphfrm.i} /* Form definitions for phead1 */ |
1000 |
1001 |
|
|
1001 |
1002 |
run GetHeading. |
run GetHeading. |
1002 |
1003 |
view frame phead1. |
view frame phead1. |
File mfg/2013/base/src/xxihtfrm.i changed (mode: 100644) (index 29266af..6f8fc10) |
... |
... |
form |
38 |
38 |
ih_trl1_amt no-label |
ih_trl1_amt no-label |
39 |
39 |
tr1pct colon 53 |
tr1pct colon 53 |
40 |
40 |
":" at 60 |
":" at 60 |
41 |
|
tr1tax no-label |
|
|
41 |
|
tr1tax to 77 no-label |
42 |
42 |
container_charge_total colon 13 |
container_charge_total colon 13 |
43 |
43 |
user_desc[2] to 53 no-label |
user_desc[2] to 53 no-label |
44 |
44 |
ih_trl2_cd format "x(2)" to 58 no-label |
ih_trl2_cd format "x(2)" to 58 no-label |
|
... |
... |
form |
46 |
46 |
ih_trl2_amt no-label |
ih_trl2_amt no-label |
47 |
47 |
tr2pct colon 53 |
tr2pct colon 53 |
48 |
48 |
":" at 60 |
":" at 60 |
49 |
|
tr2tax no-label |
|
|
49 |
|
tr2tax to 77 no-label |
50 |
50 |
line_charge_total colon 13 |
line_charge_total colon 13 |
51 |
51 |
user_desc[3] to 53 no-label |
user_desc[3] to 53 no-label |
52 |
52 |
ih_trl3_cd format "x(2)" to 58 no-label |
ih_trl3_cd format "x(2)" to 58 no-label |
|
... |
... |
form |
54 |
54 |
ih_trl3_amt no-label |
ih_trl3_amt no-label |
55 |
55 |
tr3pct colon 53 |
tr3pct colon 53 |
56 |
56 |
":" at 60 |
":" at 60 |
57 |
|
tr3tax no-label |
|
|
57 |
|
tr3tax to 77 no-label |
58 |
58 |
invcrdt at 3 no-label |
invcrdt at 3 no-label |
59 |
59 |
tax_amt colon 60 skip |
tax_amt colon 60 skip |
60 |
60 |
g_mgmt_curr colon 20 |
g_mgmt_curr colon 20 |
File mfg/2013/base/src/xxivhfrm.i changed (mode: 100644) (index 613e152..6811852) |
... |
... |
form header |
47 |
47 |
today at 58
|
today at 58
|
48 |
48 |
company[6] at 4 skip(1)
|
company[6] at 4 skip(1)
|
49 |
49 |
getTermLabelRtColon("BILL_TO",8) at 8 ih_bill
|
getTermLabelRtColon("BILL_TO",8) at 8 ih_bill
|
50 |
|
getTermLabelRtColon("SOLD_TO",8) at 46 ih_ship
|
|
|
50 |
|
getTermLabelRtColon("SHIP_TO",8) at 46 ih_ship
|
51 |
51 |
skip(1)
|
skip(1)
|
52 |
52 |
billto[1] at 8 soldto[1] at 46
|
billto[1] at 8 soldto[1] at 46
|
53 |
53 |
billto[2] at 8 soldto[2] at 46
|
billto[2] at 8 soldto[2] at 46
|
File mfg/2013/base/src/xxrphfrm.i added (mode: 100644) (index 0000000..8686121) |
|
1 |
|
/* xxrphfrm.i - DRAFT INVOICE PRINT HEADER FRAME DEFINITION */ |
|
2 |
|
/* sorphfrm.i - DRAFT INVOICE PRINT HEADER FRAME DEFINITION */ |
|
3 |
|
/* Copyright 1986 QAD Inc. All rights reserved. */ |
|
4 |
|
/* $Id$: */ |
|
5 |
|
/* Revision: 1.4 BY: Katie Hilbert DATE: 06/08/06 ECO: *Q0LK* */ |
|
6 |
|
/* Revision: 1.5 BY: Katie Hilbert DATE: 03/14/07 ECO: *R0C6* */ |
|
7 |
|
/* Revision: 1.6 BY: Juncheng Cui DATE: 05/07/08 ECO: *R0SD* */ |
|
8 |
|
/* Revision: 1.7 BY: Xiaolei Meng DATE: 07/31/09 ECO: *R1N2* */ |
|
9 |
|
/* $Revision$ BY: Yizhou Mao DATE: 08/27/09 ECO: *R1Q6* */ |
|
10 |
|
/* BGL LAST MODIFIED: 2014-FEB-12 BY: gbg *d2561 */ |
|
11 |
|
/*-Revision end---------------------------------------------------------------*/ |
|
12 |
|
|
|
13 |
|
|
|
14 |
|
/*d2561* start added code >>> */ |
|
15 |
|
form header |
|
16 |
|
skip(3) |
|
17 |
|
company[1] at 4 |
|
18 |
|
vcHeading1 to 80 format "x(28)" |
|
19 |
|
company[2] at 4 |
|
20 |
|
company[3] at 4 |
|
21 |
|
getTermLabelRtColon("INVOICE",14) to 56 format "x(14)" |
|
22 |
|
getTermLabelRtColon("REVISION",10) to 76 format "x(10)" |
|
23 |
|
so_rev to 80 |
|
24 |
|
company[4] at 4 |
|
25 |
|
getTermLabelRtColon("INVOICE_DATE",14) to 56 format "x(14)" |
|
26 |
|
getTermLabel("PAGE_OF_REPORT",5) + ": " + |
|
27 |
|
string(page-number - pages,">>9") format "x(9)" to 80 |
|
28 |
|
company[5] at 4 |
|
29 |
|
getTermLabelRtColon("PRINT_DATE",14) to 56 format "x(14)" |
|
30 |
|
today at 58 |
|
31 |
|
company[6] at 4 skip(1) |
|
32 |
|
getTermLabel("BILL_TO",15) + ": " + so_bill at 8 format "x(25)" |
|
33 |
|
getTermLabel("SHIP_TO",15) + ": " + so_cust at 46 format "x(25)" |
|
34 |
|
skip(1) |
|
35 |
|
billto[1] at 8 |
|
36 |
|
soldto[1] at 46 |
|
37 |
|
billto[2] at 8 |
|
38 |
|
soldto[2] at 46 |
|
39 |
|
billto[3] at 8 |
|
40 |
|
soldto[3] at 46 |
|
41 |
|
billto[4] at 8 |
|
42 |
|
soldto[4] at 46 |
|
43 |
|
billto[5] at 8 |
|
44 |
|
soldto[5] at 46 |
|
45 |
|
billto[6] at 8 |
|
46 |
|
soldto[6] at 46 |
|
47 |
|
skip(2) |
|
48 |
|
covatreglbl to 15 |
|
49 |
|
covatreg |
|
50 |
|
vatreglbl to 55 |
|
51 |
|
vatreg |
|
52 |
|
with frame phead1 page-top width 90. |
|
53 |
|
/*d2561* end added code <<< */ |
|
54 |
|
|
|
55 |
|
/*d2561* start deleted code >>>> |
|
56 |
|
form header |
|
57 |
|
skip(3) |
|
58 |
|
company[1] at 4 |
|
59 |
|
vcHeading1 to 80 format "x(28)" |
|
60 |
|
company[2] at 4 |
|
61 |
|
company[3] at 4 |
|
62 |
|
getTermLabelRtColon("INVOICE",14) to 56 format "x(14)" |
|
63 |
|
getTermLabelRtColon("REVISION",10) to 76 format "x(10)" |
|
64 |
|
so_rev to 80 |
|
65 |
|
company[4] at 4 |
|
66 |
|
getTermLabelRtColon("INVOICE_DATE",14) to 56 format "x(14)" |
|
67 |
|
getTermLabel("PAGE_OF_REPORT",5) + ": " + |
|
68 |
|
string(page-number - pages,">>9") format "x(9)" to 80 |
|
69 |
|
company[5] at 4 |
|
70 |
|
getTermLabelRtColon("PRINT_DATE",14) to 56 format "x(14)" |
|
71 |
|
today at 58 |
|
72 |
|
company[6] at 4 skip(1) |
|
73 |
|
getTermLabel("BILL_TO",15) + ": " + so_bill at 8 format "x(25)" |
|
74 |
|
getTermLabel("SOLD_TO",15) + ": " + so_cust at 46 format "x(25)" |
|
75 |
|
skip(1) |
|
76 |
|
billto[1] at 8 |
|
77 |
|
soldto[1] at 46 |
|
78 |
|
billto[2] at 8 |
|
79 |
|
soldto[2] at 46 |
|
80 |
|
billto[3] at 8 |
|
81 |
|
soldto[3] at 46 |
|
82 |
|
billto[4] at 8 |
|
83 |
|
soldto[4] at 46 |
|
84 |
|
billto[5] at 8 |
|
85 |
|
soldto[5] at 46 |
|
86 |
|
billto[6] at 8 |
|
87 |
|
soldto[6] at 46 |
|
88 |
|
skip(2) |
|
89 |
|
covatreglbl to 15 |
|
90 |
|
covatreg |
|
91 |
|
vatreglbl to 55 |
|
92 |
|
vatreg |
|
93 |
|
with frame phead1 page-top width 90. |
|
94 |
|
*d2561* end deleted code <<<<<< */ |
File mfg/2013/base/src/xxtotfrm.i changed (mode: 100644) (index f7d4860..150ce75) |
... |
... |
form |
39 |
39 |
so_trl1_amt no-label |
so_trl1_amt no-label |
40 |
40 |
/*d2561*/ tr1pct colon 53 |
/*d2561*/ tr1pct colon 53 |
41 |
41 |
/*d2561*/ "." colon 60 |
/*d2561*/ "." colon 60 |
42 |
|
/*d2561*/ tr1tax no-label |
|
|
42 |
|
/*d2561*/ tr1tax to 77 no-label |
43 |
43 |
container_charge_total colon 13 |
container_charge_total colon 13 |
44 |
44 |
user_desc[2] to 53 no-label |
user_desc[2] to 53 no-label |
45 |
45 |
so_trl2_cd format "x(2)" to 58 no-label |
so_trl2_cd format "x(2)" to 58 no-label |
|
... |
... |
form |
47 |
47 |
so_trl2_amt no-label |
so_trl2_amt no-label |
48 |
48 |
/*d2561*/ tr2pct colon 53 |
/*d2561*/ tr2pct colon 53 |
49 |
49 |
/*d2561*/ ":" colon 60 |
/*d2561*/ ":" colon 60 |
50 |
|
/*d2561*/ tr2tax no-label |
|
|
50 |
|
/*d2561*/ tr2tax to 77 no-label |
51 |
51 |
line_charge_total colon 13 |
line_charge_total colon 13 |
52 |
52 |
user_desc[3] to 53 no-label |
user_desc[3] to 53 no-label |
53 |
53 |
so_trl3_cd format "x(2)" to 58 no-label |
so_trl3_cd format "x(2)" to 58 no-label |
|
... |
... |
form |
55 |
55 |
so_trl3_amt no-label |
so_trl3_amt no-label |
56 |
56 |
/*d2561*/ tr3pct colon 53 |
/*d2561*/ tr3pct colon 53 |
57 |
57 |
/*d2561*/ ":" colon 60 |
/*d2561*/ ":" colon 60 |
58 |
|
/*d2561*/ tr3tax no-label |
|
|
58 |
|
/*d2561*/ tr3tax to 77 no-label |
59 |
59 |
invcrdt at 3 no-label |
invcrdt at 3 no-label |
60 |
60 |
tax_amt colon 60 skip |
tax_amt colon 60 skip |
61 |
61 |
tax_edit_lbl format "x(28)" to 30 no-label |
tax_edit_lbl format "x(28)" to 30 no-label |