[Home] [Help]
1: PACKAGE BODY ICX_CAT_POPULATE_PODOCS_PVT AS
2: /* $Header: ICXVPPDB.pls 120.17.12020000.2 2013/04/11 05:28:41 jiarsun ship $*/
3:
4: --Will have the two cursors 1. BPA and Quote 2. GBPA
5: --for upgrade
7: --Will have the three cursors
8: --for online changes to BPA, Quote and GBPA.
9:
10: -- Constants
11: G_PKG_NAME CONSTANT VARCHAR2(30):='ICX_CAT_POPULATE_PODOCS_PVT';
12:
13: g_upgrade_last_run_date DATE;
14: g_key NUMBER;
15: g_current_cursor VARCHAR2(20) := 'GBPA_CSR';
665: l_err_loc := 1500;
666: EXIT WHEN l_po_line_id_tbl.COUNT < ICX_CAT_UTIL_PVT.g_batch_size;
667: EXCEPTION
668: WHEN ICX_CAT_UTIL_PVT.g_snap_shot_too_old THEN
669: l_err_string := 'ICX_CAT_POPULATE_PODOCS_PVT.populateBPAs' ||l_err_loc
670: ||', Total processeded batches:' ||l_batch_count
671: ||', Cursor will be reopened with po_line_id:' ||l_start_po_line_id;
672: IF (FND_API.To_Boolean(ICX_CAT_UTIL_PVT.g_COMMIT)) THEN
673: ICX_CAT_UTIL_PVT.logAndCommitSnapShotTooOld(g_pkg_name, l_api_name, l_err_string);
1450: l_err_loc := 1500;
1451: EXIT WHEN l_po_line_id_tbl.COUNT < ICX_CAT_UTIL_PVT.g_batch_size;
1452: EXCEPTION
1453: WHEN ICX_CAT_UTIL_PVT.g_snap_shot_too_old THEN
1454: l_err_string := 'ICX_CAT_POPULATE_PODOCS_PVT.populateGBPAs' ||l_err_loc
1455: ||', Total processed batches:' ||l_batch_count
1456: ||', Cursor will be reopened with po_line_id:' ||l_start_po_line_id;
1457: IF (FND_API.To_Boolean(ICX_CAT_UTIL_PVT.g_COMMIT)) THEN
1458: ICX_CAT_UTIL_PVT.logAndCommitSnapShotTooOld(g_pkg_name, l_api_name, l_err_string);
2673: l_err_loc := 1200;
2674: EXIT WHEN l_po_line_id_tbl.COUNT < ICX_CAT_UTIL_PVT.g_batch_size;
2675: EXCEPTION
2676: WHEN ICX_CAT_UTIL_PVT.g_snap_shot_too_old THEN
2677: l_err_string := 'ICX_CAT_POPULATE_PODOCS_PVT.populateQuotes' ||l_err_loc
2678: ||', Total processed batches:' ||l_batch_count
2679: ||', Cursor will be reopened with po_line_id:' ||l_start_po_line_id;
2680: IF (FND_API.To_Boolean(ICX_CAT_UTIL_PVT.g_COMMIT)) THEN
2681: ICX_CAT_UTIL_PVT.logAndCommitSnapShotTooOld(g_pkg_name, l_api_name, l_err_string);
2760: l_api_name CONSTANT VARCHAR2(30) := 'buildCtxSqlForPODocs';
2761: l_err_loc PLS_INTEGER;
2762: BEGIN
2763: l_err_loc := 100;
2764: IF (NOT ICX_CAT_POPULATE_PODOCS_PVT.g_metadataTblFormed) THEN
2765: l_err_loc := 200;
2766: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2767: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2768: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
2773: ICX_CAT_BUILD_CTX_SQL_PVT.buildMetadataInfo
2774: (0, g_special_metadata_tbl, g_regular_nontl_metadata_tbl, g_regular_tl_metadata_tbl);
2775:
2776: l_err_loc := 300;
2777: ICX_CAT_POPULATE_PODOCS_PVT.g_metadataTblFormed := TRUE;
2778: END IF;
2779:
2780: l_err_loc := 400;
2781: IF (NOT ICX_CAT_POPULATE_PODOCS_PVT.g_CtxSqlForPODocsFormed) THEN
2777: ICX_CAT_POPULATE_PODOCS_PVT.g_metadataTblFormed := TRUE;
2778: END IF;
2779:
2780: l_err_loc := 400;
2781: IF (NOT ICX_CAT_POPULATE_PODOCS_PVT.g_CtxSqlForPODocsFormed) THEN
2782: l_err_loc := 500;
2783: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2784: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2785: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
2790: ICX_CAT_BUILD_CTX_SQL_PVT.buildCtxSql
2791: (0, ICX_CAT_UTIL_PVT.g_PODoc_const, 'NOTROWID', g_special_metadata_tbl,
2792: g_regular_nontl_metadata_tbl, g_regular_tl_metadata_tbl,
2793: g_all_ctx_sql_tbl, g_special_ctx_sql_tbl, g_regular_ctx_sql_tbl);
2794: ICX_CAT_POPULATE_PODOCS_PVT.g_CtxSqlForPODocsFormed := TRUE;
2795: END IF;
2796:
2797: l_err_loc := 700;
2798: p_special_ctx_sql_tbl := g_special_ctx_sql_tbl;
2808: RAISE;
2809: END buildCtxSqlForPODocs;
2810:
2811:
2812: END ICX_CAT_POPULATE_PODOCS_PVT;