[Home] [Help]
13: IS TABLE OF ar_ccid_by_gl_accounts.gl_account%TYPE
14: INDEX BY BINARY_INTEGER;
15:
16: TYPE components_type
17: IS TABLE OF ar_gl_acct_balances.component%TYPE
18: INDEX BY BINARY_INTEGER;
19:
20: TYPE natural_accounts_type
21: IS TABLE OF gl_code_combinations.segment1%TYPE
43: --}
44: INDEX BY BINARY_INTEGER;
45:
46: TYPE acctd_amount_dr_type
47: IS TABLE OF ar_gl_acct_balances.acctd_amount_dr%TYPE
48: INDEX BY BINARY_INTEGER;
49:
50: TYPE acctd_amount_cr_type
51: IS TABLE OF ar_gl_acct_balances.acctd_amount_cr%TYPE
47: IS TABLE OF ar_gl_acct_balances.acctd_amount_dr%TYPE
48: INDEX BY BINARY_INTEGER;
49:
50: TYPE acctd_amount_cr_type
51: IS TABLE OF ar_gl_acct_balances.acctd_amount_cr%TYPE
52: INDEX BY BINARY_INTEGER;
53:
54: TYPE amount_dr_type
55: IS TABLE OF ar_gl_acct_balances.amount_dr%TYPE
51: IS TABLE OF ar_gl_acct_balances.acctd_amount_cr%TYPE
52: INDEX BY BINARY_INTEGER;
53:
54: TYPE amount_dr_type
55: IS TABLE OF ar_gl_acct_balances.amount_dr%TYPE
56: INDEX BY BINARY_INTEGER;
57:
58: TYPE amount_cr_type
59: IS TABLE OF ar_gl_acct_balances.amount_cr%TYPE
55: IS TABLE OF ar_gl_acct_balances.amount_dr%TYPE
56: INDEX BY BINARY_INTEGER;
57:
58: TYPE amount_cr_type
59: IS TABLE OF ar_gl_acct_balances.amount_cr%TYPE
60: INDEX BY BINARY_INTEGER;
61:
62: TYPE code_combination_id_type
63: IS TABLE OF ar_gl_acct_balances.code_combination_id%TYPE
59: IS TABLE OF ar_gl_acct_balances.amount_cr%TYPE
60: INDEX BY BINARY_INTEGER;
61:
62: TYPE code_combination_id_type
63: IS TABLE OF ar_gl_acct_balances.code_combination_id%TYPE
64: INDEX BY BINARY_INTEGER;
65:
66: TYPE customer_trx_id_type
67: IS TABLE OF ar_gl_acct_balances.customer_trx_id%TYPE
63: IS TABLE OF ar_gl_acct_balances.code_combination_id%TYPE
64: INDEX BY BINARY_INTEGER;
65:
66: TYPE customer_trx_id_type
67: IS TABLE OF ar_gl_acct_balances.customer_trx_id%TYPE
68: INDEX BY BINARY_INTEGER;
69:
70: TYPE cash_receipt_id_type
71: IS TABLE OF ar_gl_acct_balances.cash_receipt_id%TYPE
67: IS TABLE OF ar_gl_acct_balances.customer_trx_id%TYPE
68: INDEX BY BINARY_INTEGER;
69:
70: TYPE cash_receipt_id_type
71: IS TABLE OF ar_gl_acct_balances.cash_receipt_id%TYPE
72: INDEX BY BINARY_INTEGER;
73:
74: TYPE adjustment_id_type
75: IS TABLE OF ar_gl_acct_balances.adjustment_id%TYPE
71: IS TABLE OF ar_gl_acct_balances.cash_receipt_id%TYPE
72: INDEX BY BINARY_INTEGER;
73:
74: TYPE adjustment_id_type
75: IS TABLE OF ar_gl_acct_balances.adjustment_id%TYPE
76: INDEX BY BINARY_INTEGER;
77:
78: TYPE org_id_type
79: IS TABLE OF ar_gl_acct_balances.org_id%TYPE
75: IS TABLE OF ar_gl_acct_balances.adjustment_id%TYPE
76: INDEX BY BINARY_INTEGER;
77:
78: TYPE org_id_type
79: IS TABLE OF ar_gl_acct_balances.org_id%TYPE
80: INDEX BY BINARY_INTEGER;
81:
82: TYPE last_update_date_type
83: IS TABLE OF ar_gl_acct_balances.last_update_date%TYPE
79: IS TABLE OF ar_gl_acct_balances.org_id%TYPE
80: INDEX BY BINARY_INTEGER;
81:
82: TYPE last_update_date_type
83: IS TABLE OF ar_gl_acct_balances.last_update_date%TYPE
84: INDEX BY BINARY_INTEGER;
85:
86: TYPE last_updated_by_type
87: IS TABLE OF ar_gl_acct_balances.last_updated_by%TYPE
83: IS TABLE OF ar_gl_acct_balances.last_update_date%TYPE
84: INDEX BY BINARY_INTEGER;
85:
86: TYPE last_updated_by_type
87: IS TABLE OF ar_gl_acct_balances.last_updated_by%TYPE
88: INDEX BY BINARY_INTEGER;
89:
90: TYPE creation_date_type
91: IS TABLE OF ar_gl_acct_balances.creation_date%TYPE
87: IS TABLE OF ar_gl_acct_balances.last_updated_by%TYPE
88: INDEX BY BINARY_INTEGER;
89:
90: TYPE creation_date_type
91: IS TABLE OF ar_gl_acct_balances.creation_date%TYPE
92: INDEX BY BINARY_INTEGER;
93:
94: TYPE created_by_type
95: IS TABLE OF ar_gl_acct_balances.created_by%TYPE
91: IS TABLE OF ar_gl_acct_balances.creation_date%TYPE
92: INDEX BY BINARY_INTEGER;
93:
94: TYPE created_by_type
95: IS TABLE OF ar_gl_acct_balances.created_by%TYPE
96: INDEX BY BINARY_INTEGER;
97:
98: TYPE last_update_login_type
99: IS TABLE OF ar_gl_acct_balances.last_update_login%TYPE
95: IS TABLE OF ar_gl_acct_balances.created_by%TYPE
96: INDEX BY BINARY_INTEGER;
97:
98: TYPE last_update_login_type
99: IS TABLE OF ar_gl_acct_balances.last_update_login%TYPE
100: INDEX BY BINARY_INTEGER;
101:
102: TYPE ref_cur IS REF CURSOR;
103:
309:
310: debug('update statement 2(a): ' || SQL%ROWCOUNT);
311:
312: l_update_stmt :=
313: 'UPDATE ar_gl_acct_balances bal
314: SET (trx_number, trx_type, trx_date, currency) =
315: (
316: SELECT receipt_number, rm.name, receipt_date, currency_code
317: FROM ' || g_ar_cash_receipts_all || ', '
354: debug('update statement 1(a): ' || SQL%ROWCOUNT);
355:
356:
357: l_update_stmt :=
358: 'UPDATE ar_gl_acct_balances bal
359: SET (trx_number, trx_type, trx_date, currency) =
360: (
361: SELECT trx_number, ctt.name, trx_date, invoice_currency_code
362: FROM ' || g_ra_customer_trx_all || ', '
931:
932: ELSE
933:
934: FORALL i IN 1..code_combination_id_tab.count
935: INSERT INTO ar_gl_acct_balances
936: (
937: component,
938: gl_account,
939: natural_account,
1437: COMMIT;
1438:
1439: -- now let us construct the data after the cut off date.
1440:
1441: l_delete_stmt := 'DELETE FROM ar_gl_acct_balances bal WHERE 1=1 ';
1442: l_delete_stmt := l_delete_stmt || g_balances_where;
1443: --debug('Delete Statement: ' || l_delete_stmt);
1444: EXECUTE IMMEDIATE l_delete_stmt;
1445: debug('number of rows deleted: ' || SQL%ROWCOUNT);
1452: p_end_date => p_gl_as_of_date,
1453: p_period_status => 'OPEN');
1454:
1455: debug('deleting all lines whose cr and dr cancel each other');
1456: l_delete_stmt := 'DELETE FROM ar_gl_acct_balances bal
1457: WHERE nvl(acctd_amount_dr,0) = nvl(acctd_amount_cr,0) ';
1458: l_delete_stmt := l_delete_stmt || g_balances_where;
1459: --debug('Delete Statement: ' || l_delete_stmt);
1460: EXECUTE IMMEDIATE l_delete_stmt;
1889: amount_dr,
1890: decode(sign(sum(nvl(amount_cr,0))-sum(nvl(amount_dr,0))), -1, 0,
1891: sum(nvl(amount_cr,0))-sum(nvl(amount_dr,0)))
1892: amount_cr
1893: FROM ar_gl_acct_balances bal,
1894: gl_code_combinations gcc
1895: WHERE bal.code_combination_id = gcc.code_combination_id ';
1896:
1897: -- l_dummy_where := ' WHERE 1=1 ';