[Home] [Help]
307: l_err_string VARCHAR2(4000);
308: l_batch_count PLS_INTEGER;
309: l_row_count PLS_INTEGER;
310: l_count PLS_INTEGER;
311: l_BPA_line_status_rec ICX_CAT_POPULATE_STATUS_PVT.g_BPA_line_status_rec_type;
312: l_BPA_line_status PLS_INTEGER;
313: l_current_ctx_item_rec ICX_CAT_POPULATE_ITEM_PVT.g_ctx_item_rec_type;
314: l_current_flag_rec ICX_CAT_POPULATE_ITEM_PVT.g_bpa_online_flag_rec_type;
315:
525: THEN
526: l_err_loc := 700;
527: -- The GBPAs created for bulkload items will not be in approved
528: -- status during upgrade, so treat them as valid during upgrade.
529: l_BPA_line_status := ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE;
530: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
531: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
532: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
533: 'bpa status is hard-coded to valid for' ||
547: l_BPA_line_status_rec.expiration_date := l_expiration_date_tbl(i);
548: l_BPA_line_status_rec.system_date := l_system_date_tbl(i);
549:
550: l_err_loc := 900;
551: l_BPA_line_status := ICX_CAT_POPULATE_STATUS_PVT.getBPALineStatus(l_BPA_line_status_rec);
552: END IF;
553:
554: l_err_loc := 1000;
555: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
552: END IF;
553:
554: l_err_loc := 1000;
555: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
556: l_BPA_line_status = ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE)
557: THEN
558: l_err_loc := 1100;
559: l_current_ctx_item_rec.inventory_item_id := l_inv_item_id_tbl(i);
560: l_current_ctx_item_rec.po_line_id := l_po_line_id_tbl(i);
1341:
1342: FOR i in 1..l_po_line_id_tbl.COUNT LOOP
1343: l_err_loc := 700;
1344: --First get the status of the current GBPA line
1345: l_GBPA_line_status := ICX_CAT_POPULATE_STATUS_PVT.getGlobalAgreementStatus(l_enabled_flag_tbl(i));
1346:
1347: l_err_loc := 800;
1348: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
1349: l_GBPA_line_status = ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE)
1345: l_GBPA_line_status := ICX_CAT_POPULATE_STATUS_PVT.getGlobalAgreementStatus(l_enabled_flag_tbl(i));
1346:
1347: l_err_loc := 800;
1348: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
1349: l_GBPA_line_status = ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE)
1350: THEN
1351: l_err_loc := 900;
1352: l_current_ctx_item_rec.inventory_item_id := l_inv_item_id_tbl(i);
1353: l_current_ctx_item_rec.po_line_id := l_po_line_id_tbl(i);
1677: pv.vendor_name supplier,
1678: ph.global_agreement_flag global_agreement_flag,
1679: --For Quote line status
1680: DECODE(ph.type_lookup_code, 'QUOTATION',
1681: ICX_CAT_POPULATE_STATUS_PVT.getQuoteLineStatus(pl.po_line_id),
1682: NULL) quote_status,
1683: --For blanket line status
1684: ph.approved_date,
1685: NVL(ph.authorization_status, 'INCOMPLETE') authorization_status,
1777: pv.vendor_name supplier,
1778: ph.global_agreement_flag global_agreement_flag,
1779: --For Quote line status
1780: DECODE(ph.type_lookup_code, 'QUOTATION',
1781: ICX_CAT_POPULATE_STATUS_PVT.getQuoteLineStatus(pl.po_line_id),
1782: NULL) quote_status,
1783: --For blanket line status
1784: ph.approved_date,
1785: NVL(ph.authorization_status, 'INCOMPLETE') authorization_status,
1848: l_err_string VARCHAR2(4000);
1849: l_batch_count PLS_INTEGER;
1850: l_row_count PLS_INTEGER;
1851: l_count PLS_INTEGER;
1852: l_BPA_line_status_rec ICX_CAT_POPULATE_STATUS_PVT.g_BPA_line_status_rec_type;
1853: l_podoc_status PLS_INTEGER;
1854: l_current_ctx_item_rec ICX_CAT_POPULATE_ITEM_PVT.g_ctx_item_rec_type;
1855:
1856: ----- Start of declaring columns selected in the cursor -----
2065: THEN
2066: l_err_loc := 700;
2067: -- The GBPAs created for bulkload items will not be in approved
2068: -- status during upgrade, so treat them as valid during upgrade.
2069: l_podoc_status := ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE;
2070: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2071: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2072: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
2073: 'bpa status is hard-coded to valid for' ||
2087: l_BPA_line_status_rec.expiration_date := l_expiration_date_tbl(i);
2088: l_BPA_line_status_rec.system_date := l_system_date_tbl(i);
2089:
2090: l_err_loc := 900;
2091: l_podoc_status := ICX_CAT_POPULATE_STATUS_PVT.getBPALineStatus(l_BPA_line_status_rec);
2092: END IF;
2093: ELSE
2094: l_podoc_status := l_quote_status_tbl(i);
2095: END IF;
2095: END IF;
2096:
2097: l_err_loc := 1000;
2098: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
2099: l_podoc_status = ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE)
2100: THEN
2101: l_err_loc := 1100;
2102: l_current_ctx_item_rec.inventory_item_id := l_inv_item_id_tbl(i);
2103: l_current_ctx_item_rec.po_line_id := l_po_line_id_tbl(i);
2321: NVL(ph.vendor_id, -2) supplier_id,
2322: NVL(pl.vendor_product_num, '##NULL##') supplier_part_num,
2323: NVL(pl.supplier_part_auxid, '##NULL##') supplier_part_auxid,
2324: NVL(ph.vendor_site_id, -2) supplier_site_id,
2325: ICX_CAT_POPULATE_STATUS_PVT.getQuoteLineStatus(pl.po_line_id) status,
2326: pl.ip_category_id ip_category_id,
2327: ic.category_name ip_category_name,
2328: NVL(pl.item_revision, '-2') item_revision,
2329: ph.po_header_id,
2569:
2570: FOR i in 1..l_po_line_id_tbl.COUNT LOOP
2571: l_err_loc := 700;
2572: IF (l_ctx_rowid_tbl(i) IS NOT NULL OR
2573: l_status_tbl(i) = ICX_CAT_POPULATE_STATUS_PVT.VALID_FOR_POPULATE)
2574: THEN
2575: l_err_loc := 800;
2576: l_current_ctx_item_rec.inventory_item_id := l_inv_item_id_tbl(i);
2577: l_current_ctx_item_rec.po_line_id := l_po_line_id_tbl(i);