[Home] [Help]
95: WHEN NO_DATA_FOUND THEN
96: RAISE global_vs_id_error;
97: END;
98: g_insert_statement := '
99: INSERT INTO gcs_entry_lines_gt
100: (entry_id, cal_period_id,
101: ptd_debit_balance_e,
102: ptd_credit_balance_e,
103: ytd_debit_balance_e,
723: IF (l_mapping_required = 'N') THEN
724: IF (p_balance_type_code = 'ADB' AND p_currency_type_code = 'ENTERED') THEN
725: FORALL counter IN l_periods_list.FIRST..l_periods_list.LAST
726:
727: INSERT INTO gcs_entry_lines_gt
728: (entry_id, cal_period_id,
729: ptd_debit_balance_e,
730: ptd_credit_balance_e,
731: ytd_debit_balance_e,
759: AND fb.financial_elem_id = 140;
760: ELSIF (p_balance_type_code = 'ADB') THEN
761: FORALL counter IN l_periods_list.FIRST..l_periods_list.LAST
762:
763: INSERT INTO gcs_entry_lines_gt
764: (entry_id, cal_period_id,
765: ptd_debit_balance_e,
766: ptd_credit_balance_e,
767: ytd_debit_balance_e,
797: --Bugfix 5232063: Do not assume Financial Element is populated
798: --Bugfix 5329620: Added l_curr_where_clause
799: FORALL counter IN l_periods_list.FIRST..l_periods_list.LAST
800:
801: INSERT INTO gcs_entry_lines_gt
802: (entry_id, cal_period_id,
803: ptd_debit_balance_e,
804: ptd_credit_balance_e,
805: ytd_debit_balance_e,
834: --Bugfix 5232063: Do not assume Financial Element is populated
835: --Bugfix 5329620: Added l_curr_where_clause
836: FORALL counter IN l_periods_list.FIRST..l_periods_list.LAST
837:
838: INSERT INTO gcs_entry_lines_gt
839: (entry_id, cal_period_id,
840: ptd_debit_balance_e,
841: ptd_credit_balance_e,
842: ytd_debit_balance_e,
960: BEGIN
961: SELECT 'Y'
962: INTO l_has_row_flag
963: FROM DUAL
964: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines_gt WHERE entry_id = l_entry_id);
965:
966: gcs_entry_pkg.create_entry_header
967: (x_errbuf => errbuf,
968: x_retcode => retcode,
1005: BEGIN
1006: SELECT 'Y'
1007: INTO l_has_stat_row_flag
1008: FROM DUAL
1009: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines_gt WHERE entry_id = l_stat_entry_id);
1010:
1011: gcs_entry_pkg.create_entry_header
1012: (x_errbuf => errbuf,
1013: x_retcode => retcode,
1048: l_has_stat_row_flag := 'N';
1049: l_stat_entry_id := NULL;
1050: END;
1051:
1052: -- insert data into gcs_entry_lines table
1053: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1054: THEN
1055: fnd_log.STRING (fnd_log.level_statement,
1056: g_pkg_name || '.' || l_api_name,
1054: THEN
1055: fnd_log.STRING (fnd_log.level_statement,
1056: g_pkg_name || '.' || l_api_name,
1057: '
1058: INSERT /*+ APPEND */ INTO gcs_entry_lines
1059: (entry_id,
1060: ptd_debit_balance_e,
1061: ptd_credit_balance_e,
1062: ytd_debit_balance_e,
1080: FND_GLOBAL.USER_ID,
1081: SYSDATE,
1082: FND_GLOBAL.USER_ID,
1083: FND_GLOBAL.LOGIN_ID
1084: FROM gcs_entry_lines_gt fb,
1085: fem_ln_items_attr flia,
1086: fem_ext_acct_types_attr fea_attr
1087: WHERE fb.line_item_id = flia.line_item_id
1088: AND flia.attribute_id = l_line_item_type_attr
1094: );
1095: END IF;
1096:
1097:
1098: INSERT /*+ APPEND */ INTO gcs_entry_lines
1099: (entry_id,
1100: ptd_debit_balance_e,
1101: ptd_credit_balance_e,
1102: ytd_debit_balance_e,
1120: FND_GLOBAL.USER_ID,
1121: SYSDATE,
1122: FND_GLOBAL.USER_ID,
1123: FND_GLOBAL.LOGIN_ID
1124: FROM gcs_entry_lines_gt fb,
1125: fem_ln_items_attr flia,
1126: fem_ext_acct_types_attr fea_attr
1127: WHERE fb.line_item_id = flia.line_item_id
1128: AND flia.attribute_id = l_line_item_type_attr
1164: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1165: THEN
1166: fnd_log.STRING (fnd_log.level_statement,
1167: g_pkg_name || '.' || l_api_name,
1168: ' UPDATE gcs_entry_lines gel
1169: SET gel.ytd_balance_e = gel.xtd_balance_e,
1170: gel.ytd_debit_balance_e = gel.ptd_debit_balance_e,
1171: gel.ytd_credit_balance_e = gel.ptd_credit_balance_e
1172: WHERE gel.entry_id = '||l_entry_id ||'
1181: AND feata.version_id = ' || g_eatc_batc_ver_id || '
1182: AND feata.ext_account_type_code = flia.dim_attribute_varchar_member
1183: AND gel.line_item_id = flia.line_item_id)');
1184: END IF;
1185: UPDATE gcs_entry_lines gel
1186: SET gel.ytd_balance_e = gel.xtd_balance_e,
1187: gel.ytd_debit_balance_e = gel.ptd_debit_balance_e,
1188: gel.ytd_credit_balance_e = gel.ptd_credit_balance_e
1189: WHERE gel.entry_id = l_entry_id
1202: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1203: THEN
1204: fnd_log.STRING (fnd_log.level_statement,
1205: g_pkg_name || '.' || l_api_name,
1206: ' UPDATE gcs_entry_lines gel
1207: SET (gel.ytd_balance_e, gel.ytd_credit_balance_e,gel.ytd_debit_balance_e) =
1208: (SELECT NVL (fb.ytd_balance_e, 0)
1209: + NVL (gel.xtd_balance_e, 0),
1210: NVL (fb.ytd_credit_balance_e, 0)
1227: AND fb.source_system_code = ' || l_source_system_code||'
1228: )
1229: WHERE gel.entry_id = '||l_entry_id);
1230: END IF;
1231: UPDATE gcs_entry_lines gel
1232: SET (gel.ytd_balance_e, gel.ytd_credit_balance_e,gel.ytd_debit_balance_e) =
1233: (SELECT NVL (fb.ytd_balance_e, 0)
1234: + NVL (gel.xtd_balance_e, 0),
1235: NVL (fb.ytd_credit_balance_e, 0)
1326: INTO l_precision, l_stat_precision
1327: FROM fnd_currencies fc_1, fnd_currencies fc_stat
1328: WHERE fc_1.currency_code = p_source_currency_code
1329: AND fc_stat.currency_code = 'STAT';
1330: INSERT INTO gcs_entry_lines
1331: (entry_id,
1332: ptd_debit_balance_e,
1333: ptd_credit_balance_e,
1334: ytd_debit_balance_e,
1349: ROUND(ytd_debit_balance_e * p_owner_percentage/decode(entry_id, l_entry_id, l_precision, l_stat_precision))*decode(entry_id, l_entry_id, l_precision, l_stat_precision)
1350: - ROUND(ytd_credit_balance_e * p_owner_percentage/decode(entry_id, l_entry_id, l_precision, l_stat_precision))*decode(entry_id, l_entry_id, l_precision, l_stat_precision),
1351: creation_date, created_by, last_update_date,
1352: last_updated_by, last_update_login
1353: FROM gcs_entry_lines
1354: WHERE entry_id in ( l_entry_id, l_stat_entry_id);
1355: -- end of bug fix 3800183
1356: --bug fix 3797312
1357: IF l_proportional_entry_id IS NOT NULL THEN
1400: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1401: THEN
1402: fnd_log.STRING (fnd_log.level_statement,
1403: g_pkg_name || '.' || l_api_name,
1404: ' UPDATE gcs_entry_lines gel
1405: SET gel.intercompany_id = ( SELECT intercompany_id
1406: FROM gcs_interco_map_dtls gimd
1407: WHERE gimd.line_item_id = gel.line_item_id
1408: )
1411: FROM gcs_interco_map_dtls gimd
1412: WHERE gimd.line_item_id = gel.line_item_id
1413: );');
1414: END IF;
1415: UPDATE gcs_entry_lines gel
1416: SET gel.intercompany_id = ( SELECT intercompany_id
1417: FROM gcs_interco_map_dtls gimd
1418: WHERE gimd.line_item_id = gel.line_item_id
1419: )
1442:
1443: DELETE FROM gcs_entry_headers
1444: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1445: l_proportional_entry_id, l_stat_proportional_entry_id);
1446: DELETE FROM gcs_entry_lines
1447: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1448: l_proportional_entry_id, l_stat_proportional_entry_id);
1449:
1450: IF fnd_log.g_current_runtime_level <= fnd_log.level_error
1465:
1466: DELETE FROM gcs_entry_headers
1467: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1468: l_proportional_entry_id, l_stat_proportional_entry_id);
1469: DELETE FROM gcs_entry_lines
1470: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1471: l_proportional_entry_id, l_stat_proportional_entry_id);
1472:
1473: IF fnd_log.g_current_runtime_level <= fnd_log.level_error
1512:
1513: DELETE FROM gcs_entry_headers
1514: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1515: l_proportional_entry_id, l_stat_proportional_entry_id);
1516: DELETE FROM gcs_entry_lines
1517: WHERE entry_id IN (l_entry_id, l_stat_entry_id,
1518: l_proportional_entry_id, l_stat_proportional_entry_id);
1519:
1520: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
1594: THEN
1595: fnd_log.STRING (fnd_log.level_statement,
1596: g_pkg_name || '.' || l_api_name,
1597: '
1598: INSERT /*+ APPEND */ INTO gcs_entry_lines
1599: (entry_id,
1600: ptd_debit_balance_e,
1601: ptd_credit_balance_e,
1602: ytd_debit_balance_e,
1642: AND gcia.load_id = gdsd.load_id GROUP BY decode(fb.currency_code, ''STAT'', x_stat_entry_id, x_entry_id);'
1643: );
1644: END IF;
1645:
1646: INSERT /*+ APPEND */ INTO gcs_entry_lines
1647: (entry_id,
1648: ptd_debit_balance_e,
1649: ptd_credit_balance_e,
1650: ytd_debit_balance_e,
1730: BEGIN
1731: SELECT 'Y'
1732: INTO l_has_row_flag
1733: FROM DUAL
1734: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines WHERE entry_id = x_entry_id);
1735: EXCEPTION
1736: WHEN NO_DATA_FOUND THEN
1737: l_has_row_flag := 'N';
1738: END;
1739: BEGIN
1740: SELECT 'Y'
1741: INTO l_has_stat_row_flag
1742: FROM DUAL
1743: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines WHERE entry_id = x_stat_entry_id);
1744: EXCEPTION
1745: WHEN NO_DATA_FOUND THEN
1746: l_has_stat_row_flag := 'N';
1747: END;
1763: AND cal_period_id = p_target_cal_period_id
1764: AND balance_type_code = p_balance_type_code
1765: AND most_recent_flag = 'Y'
1766: );
1767: UPDATE gcs_entry_lines gel
1768: SET (ptd_debit_balance_e, ptd_credit_balance_e, xtd_balance_e,
1769: ytd_debit_balance_e, ytd_credit_balance_e, ytd_balance_e) =
1770: (SELECT gel.ptd_debit_balance_e - gel_pre.ptd_debit_balance_e,
1771: gel.ptd_credit_balance_e - gel_pre.ptd_credit_balance_e,
1772: gel.xtd_balance_e - gel_pre.xtd_balance_e,
1773: gel.ytd_debit_balance_e - gel_pre.ytd_debit_balance_e,
1774: gel.ytd_credit_balance_e - gel_pre.ytd_credit_balance_e,
1775: gel.ytd_balance_e - gel_pre.ytd_balance_e
1776: FROM gcs_entry_lines gel_pre
1777: WHERE gel_pre.entry_id = decode(gel.entry_id,
1778: x_entry_id,
1779: l_pre_entry_id,
1780: l_pre_stat_entry_id)
1780: l_pre_stat_entry_id)
1781: )
1782: WHERE gel.entry_id in (x_entry_id, x_stat_entry_id)
1783: AND EXISTS (SELECT 1
1784: FROM gcs_entry_lines gel_pre
1785: WHERE gel_pre.entry_id = decode(gel.entry_id,
1786: x_entry_id,
1787: l_pre_entry_id,
1788: l_pre_stat_entry_id)
1930: INTO l_precision, l_stat_precision
1931: FROM fnd_currencies fc_1, fnd_currencies fc_stat
1932: WHERE fc_1.currency_code = p_source_currency_code
1933: AND fc_stat.currency_code = 'STAT';
1934: INSERT INTO gcs_entry_lines
1935: (entry_id,
1936: ptd_debit_balance_e,
1937: ptd_credit_balance_e,
1938: ytd_debit_balance_e,
1953: ROUND(ytd_debit_balance_e * p_owner_percentage/decode(entry_id, x_entry_id, l_precision, l_stat_precision))*decode(entry_id, x_entry_id, l_precision, l_stat_precision)
1954: - ROUND(ytd_credit_balance_e * p_owner_percentage/decode(entry_id, x_entry_id, l_precision, l_stat_precision))*decode(entry_id, x_entry_id, l_precision, l_stat_precision),
1955: creation_date, created_by, last_update_date,
1956: last_updated_by, last_update_login
1957: FROM gcs_entry_lines
1958: WHERE entry_id in ( x_entry_id, x_stat_entry_id);
1959: IF x_prop_entry_id IS NOT NULL THEN
1960: gcs_templates_dynamic_pkg.balance (p_entry_id => x_prop_entry_id,
1961: p_template => l_temp_record,
1985: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
1986: THEN
1987: fnd_log.STRING (fnd_log.level_statement,
1988: g_pkg_name || '.' || l_api_name,
1989: ' UPDATE gcs_entry_lines gel
1990: SET gel.intercompany_id = ( SELECT intercompany_id
1991: FROM gcs_interco_map_dtls gimd
1992: WHERE gimd.line_item_id = gel.line_item_id
1993: )
1996: FROM gcs_interco_map_dtls gimd
1997: WHERE gimd.line_item_id = gel.line_item_id
1998: );');
1999: END IF;
2000: UPDATE gcs_entry_lines gel
2001: SET gel.intercompany_id = ( SELECT intercompany_id
2002: FROM gcs_interco_map_dtls gimd
2003: WHERE gimd.line_item_id = gel.line_item_id
2004: )