[Home] [Help]
277: , x_organization_name => l_oem_inv_org_name_to
278: );
279:
280: -- **** for debug information in readonly UT environment.--- begin ****
281: JMF_SHIKYU_RPT_UTIL.debug_output
282: (
283: p_output_to => 'FND_LOG.STRING'
284: ,p_api_name => G_MODULE_PREFIX || l_api_name || '.begin'
285: ,p_message => 'CVS Version(v 2.26 2006/02/14):' ||
328: (select set_of_books_id from hr_operating_units
329: where organization_id = p_ou_id);
330: END IF;
331: -- **** for debug information in readonly UT environment.--- begin ****
332: JMF_SHIKYU_RPT_UTIL.debug_output
333: (
334: p_output_to => 'FND_LOG.STRING'
335: ,p_api_name => G_MODULE_PREFIX || l_api_name
336: ,p_message => 'l_functional_currency:' || l_functional_currency ||
379: -- Valid parameter validation;
380: -- if all parameters are valid then continue; otherwise raise an error message in log;
381: --get the on hand components information,with inv_org,item_id
382: -- **** for debug information in readonly UT environment.--- begin ****
383: JMF_SHIKYU_RPT_UTIL.debug_output
384: (
385: p_output_to => 'FND_LOG.STRING'
386: ,p_api_name => G_MODULE_PREFIX || l_api_name
387: ,p_message => 'begin, p_rpt_mode:' || p_rpt_mode || ',p_ou_id:' || p_ou_id
399: ,p_item_number_to => p_item_number_to);
400:
401: -- for each record in the onhand information (inv_org, item), get the confirmation data
402: -- **** for debug information in readonly UT environment.--- begin ****
403: JMF_SHIKYU_RPT_UTIL.debug_output
404: (
405: p_output_to => 'FND_LOG.STRING'
406: ,p_api_name => G_MODULE_PREFIX || l_api_name
407: ,p_message => 'begin, p_rpt_mode:' || p_rpt_mode || ',p_ou_id:' || p_ou_id
422: validate_cfr_mid_temp(p_rcv_row_type => CFR_TMP_RCV_ROW);
423:
424: -- add the find data to temporary table for report, with the UOM Currency conversion
425: -- **** for debug information in readonly UT environment.--- begin ****
426: JMF_SHIKYU_RPT_UTIL.debug_output
427: (
428: p_output_to => 'FND_LOG.STRING'
429: ,p_api_name => G_MODULE_PREFIX || l_api_name
430: ,p_message => 'begin, p_rpt_mode:' || p_rpt_mode || ',p_ou_id:' || p_ou_id
446: -- Amy added to fix bug 5583680 end
447: );
448:
449: -- **** for debug information in readonly UT environment.--- begin ****
450: JMF_SHIKYU_RPT_UTIL.debug_output
451: (
452: p_output_to => 'FND_LOG.STRING'
453: ,p_api_name => G_MODULE_PREFIX || l_api_name
454: ,p_message => 'end, p_rpt_mode:' || p_rpt_mode || ',p_ou_id:' || p_ou_id
615: , g_module_prefix || l_api_name || '.begin'
616: , NULL);
617: END IF;
618: -- **** for debug information in readonly UT environment.--- begin ****
619: JMF_SHIKYU_RPT_UTIL.debug_output
620: (
621: p_output_to => 'FND_LOG.STRING'
622: ,p_api_name => G_MODULE_PREFIX || l_api_name
623: ,p_message => 'begin:' ||
647: INTO l_oem_inv_org_id, l_oem_inv_org_code, l_oem_inv_org_name;
648:
649: EXIT WHEN l_cur_get_oem_inv_org_info%NOTFOUND; -- no more oem organiztions
650: -- **** for debug information in readonly UT environment.--- begin ****
651: JMF_SHIKYU_RPT_UTIL.debug_output
652: (
653: p_output_to => 'FND_LOG.STRING'
654: ,p_api_name => G_MODULE_PREFIX || l_api_name
655: ,p_message => ',l_oem_inv_org_id:' || l_oem_inv_org_id ||
671: INTO l_tp_inv_org_id, l_tp_inv_org_code, l_supplier_id, l_supplier_site_id;
672:
673: EXIT WHEN l_cur_get_tp_inv_org_info%NOTFOUND; -- no more tp organiztions
674: -- **** for debug information in readonly UT environment.--- begin ****
675: JMF_SHIKYU_RPT_UTIL.debug_output
676: (
677: p_output_to => 'FND_LOG.STRING'
678: ,p_api_name => G_MODULE_PREFIX || l_api_name
679: ,p_message => ',l_tp_inv_org_id:' || l_tp_inv_org_id ||
742: --Set message name;
743: FND_MESSAGE.set_name('JMF', 'JMF_SHK_RPT_NO_DATA');
744: fnd_msg_pub.Add;
745: -- **** for debug information in readonly UT environment.--- begin ****
746: JMF_SHIKYU_RPT_UTIL.debug_output
747: (
748: p_output_to => 'FND_LOG.STRING'
749: ,p_api_name => G_MODULE_PREFIX || l_api_name
750: ,p_message => 'NO_DATA_FOUND'
761: , G_MODULE_PREFIX || l_api_name || '.exception'
762: , NULL);
763: END IF;
764: -- **** for debug information in readonly UT environment.--- begin ****
765: JMF_SHIKYU_RPT_UTIL.debug_output
766: (
767: p_output_to => 'FND_LOG.STRING'
768: ,p_api_name => G_MODULE_PREFIX || l_api_name
769: ,p_message => 'OTHERS'
833: , g_module_prefix || l_api_name || '.begin'
834: , NULL);
835: END IF;
836: -- **** for debug information in readonly UT environment.--- begin ****
837: JMF_SHIKYU_RPT_UTIL.debug_output
838: (
839: p_output_to => 'FND_LOG.STRING'
840: ,p_api_name => G_MODULE_PREFIX || l_api_name
841: ,p_message => 'begin:' ||
860: INTO l_supplier_id, l_supplier_site_id, l_oem_inv_org_id, l_tp_inv_org_id, l_item_id, l_project_id, l_task_id, l_onhand_quantity;
861:
862: EXIT WHEN l_cur_get_onhand_components%NOTFOUND;
863: -- **** for debug information in readonly UT environment.--- begin ****
864: JMF_SHIKYU_RPT_UTIL.debug_output
865: (
866: p_output_to => 'FND_LOG.STRING'
867: ,p_api_name => G_MODULE_PREFIX || l_api_name
868: ,p_message => ',l_supplier_id:' || l_supplier_id ||
921: IF l_onhand_quantity > 0
922: THEN
923: -- the found onhand quantity has no matched rcv_transactions
924: -- **** for debug information in readonly UT environment.--- begin ****
925: JMF_SHIKYU_RPT_UTIL.debug_output
926: (
927: p_output_to => 'FND_LOG.STRING'
928: ,p_api_name => G_MODULE_PREFIX || l_api_name
929: ,p_message => '** onhand quantity :' || l_onhand_quantity ||', has no matched rcv_transactions'
957: , G_MODULE_PREFIX || l_api_name || '.execption'
958: , NULL);
959: END IF;
960: -- **** for debug information in readonly UT environment.--- begin ****
961: JMF_SHIKYU_RPT_UTIL.debug_output
962: (
963: p_output_to => 'FND_LOG.STRING'
964: ,p_api_name => G_MODULE_PREFIX || l_api_name
965: ,p_message => 'WHEN OTHERS THEN'
1054: , g_module_prefix || l_api_name || '.begin'
1055: , NULL);
1056: END IF;
1057: -- **** for debug information in readonly UT environment.--- begin ****
1058: JMF_SHIKYU_RPT_UTIL.debug_output
1059: (
1060: p_output_to => 'FND_LOG.STRING'
1061: ,p_api_name => G_MODULE_PREFIX || l_api_name
1062: ,p_message => 'begin:' ||
1100: --Updated to fix bug 5509464 end
1101:
1102: EXIT WHEN l_cur_get_rcv_transaction_info%NOTFOUND;
1103: -- **** for debug information in readonly UT environment.--- begin ****
1104: JMF_SHIKYU_RPT_UTIL.debug_output
1105: (
1106: p_output_to => 'FND_LOG.STRING'
1107: ,p_api_name => G_MODULE_PREFIX || l_api_name
1108: ,p_message => 'begin:' ||
1130:
1131: IF l_rep_po_residual_pri > 0
1132: THEN
1133: --the possilbe unallocated rcv_transactions primary quantity
1134: l_rcv_unallocated_pri := jmf_shikyu_rpt_util.get_min3(p_number1 => l_rcv_unprocessed_primary_qty
1135: ,p_number2 => l_rep_po_residual_pri
1136: ,p_number3 => x_need_to_find_pri_qty);
1137:
1138: --insert data to rcv_temp marking the processed rcv_transaction,
1200: , G_MODULE_PREFIX || l_api_name || '.exception'
1201: , NULL);
1202: END IF;
1203: -- **** for debug information in readonly UT environment.--- begin ****
1204: JMF_SHIKYU_RPT_UTIL.debug_output
1205: (
1206: p_output_to => 'FND_LOG.STRING'
1207: ,p_api_name => G_MODULE_PREFIX || l_api_name
1208: ,p_message => 'WHEN OTHERS THEN'
1248: , g_module_prefix || l_api_name || '.begin'
1249: , NULL);
1250: END IF;
1251: -- **** for debug information in readonly UT environment.--- begin ****
1252: JMF_SHIKYU_RPT_UTIL.debug_output
1253: (
1254: p_output_to => 'FND_LOG.STRING'
1255: ,p_api_name => G_MODULE_PREFIX || l_api_name
1256: ,p_message => 'begin:' ||
1284: ,item_id)
1285: SELECT p_rep_po_unalloc_row_type
1286: ,plla.line_location_id
1287: ,uom_tl.uom_code
1288: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(p_tp_inv_org_id
1289: ,p_item_id)
1290: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1291: ,pla.item_id
1292: ,uom_tl.uom_code
1286: ,plla.line_location_id
1287: ,uom_tl.uom_code
1288: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(p_tp_inv_org_id
1289: ,p_item_id)
1290: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1291: ,pla.item_id
1292: ,uom_tl.uom_code
1293: -- Updated to fix potential issue of operations between null numbers
1294: -- ,plla.quantity_received) -
1292: ,uom_tl.uom_code
1293: -- Updated to fix potential issue of operations between null numbers
1294: -- ,plla.quantity_received) -
1295: ,NVL(plla.quantity_received,0)) -
1296: (SELECT SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.tp_organization_id
1297: ,jsr.shikyu_component_id
1298: -- fix bug 5702139
1299: -- ,uom_tl_s.uom_code
1300: ,decode(jsa.allocated_quantity
1352: AND jscmt.tp_inv_org_id = p_tp_inv_org_id
1353: AND jscmt.supplier_id = p_supplier_id
1354: AND jscmt.site_id = p_supplier_site_id)
1355: --updated to fix bug 5232863 start
1356: -- AND JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(pha.org_id
1357: AND JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1358: ,pla.item_id
1359: ,uom_tl.uom_code
1360: -- Updated to fix potential issue of operations between null numbers
1353: AND jscmt.supplier_id = p_supplier_id
1354: AND jscmt.site_id = p_supplier_site_id)
1355: --updated to fix bug 5232863 start
1356: -- AND JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(pha.org_id
1357: AND JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1358: ,pla.item_id
1359: ,uom_tl.uom_code
1360: -- Updated to fix potential issue of operations between null numbers
1361: -- ,plla.quantity_received) >
1359: ,uom_tl.uom_code
1360: -- Updated to fix potential issue of operations between null numbers
1361: -- ,plla.quantity_received) >
1362: ,NVL(plla.quantity_received,0)) >
1363: -- (SELECT SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.tp_organization_id
1364: (SELECT SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1365: --updated to fix bug 5232863 end
1366: ,jsr.shikyu_component_id
1367: -- fix bug 5702139
1360: -- Updated to fix potential issue of operations between null numbers
1361: -- ,plla.quantity_received) >
1362: ,NVL(plla.quantity_received,0)) >
1363: -- (SELECT SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.tp_organization_id
1364: (SELECT SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(p_tp_inv_org_id
1365: --updated to fix bug 5232863 end
1366: ,jsr.shikyu_component_id
1367: -- fix bug 5702139
1368: -- ,uom_tl_s.uom_code
1392:
1393: --update the residual_unallocated(quantity) column under UOM.
1394: UPDATE jmf_shikyu_cfr_mid_temp
1395: SET quantity = NVL(primary_unallocated_quantity,0) *
1396: JMF_SHIKYU_RPT_UTIL.po_uom_convert_p(primary_uom
1397: ,uom
1398: ,item_id)
1399: WHERE row_type = p_rep_po_unalloc_row_type
1400: AND quantity IS NULL --only for those do not get the primary uom
1432: , G_MODULE_PREFIX || l_api_name || '.execption'
1433: , NULL);
1434: END IF;
1435: -- **** for debug information in readonly UT environment.--- begin ****
1436: JMF_SHIKYU_RPT_UTIL.debug_output
1437: (
1438: p_output_to => 'FND_LOG.STRING'
1439: ,p_api_name => G_MODULE_PREFIX || l_api_name
1440: ,p_message => 'WHEN OTHERS THEN'
1474:
1475: l_rep_po_unallocated_pri rcv_transactions.primary_quantity%TYPE;
1476: BEGIN
1477: -- **** for debug information in readonly UT environment.--- begin ****
1478: JMF_SHIKYU_RPT_UTIL.debug_output
1479: (
1480: p_output_to => 'FND_LOG.STRING'
1481: ,p_api_name => G_MODULE_PREFIX || l_api_name
1482: ,p_message => 'begin:' ||
1551: , G_MODULE_PREFIX || l_api_name || '.execption'
1552: , NULL);
1553: END IF;
1554: -- **** for debug information in readonly UT environment.--- begin ****
1555: JMF_SHIKYU_RPT_UTIL.debug_output
1556: (
1557: p_output_to => 'FND_LOG.STRING'
1558: ,p_api_name => G_MODULE_PREFIX || l_api_name
1559: ,p_message => 'Exception: ' || SQLERRM
1597: l_api_name CONSTANT VARCHAR2(30) := 'set_rep_po_residual_unalloc';
1598:
1599: BEGIN
1600: -- **** for debug information in readonly UT environment.--- begin ****
1601: JMF_SHIKYU_RPT_UTIL.debug_output
1602: (
1603: p_output_to => 'FND_LOG.STRING'
1604: ,p_api_name => G_MODULE_PREFIX || l_api_name
1605: ,p_message => 'begin:' ||
1683: , G_MODULE_PREFIX || l_api_name || '.execption'
1684: , NULL);
1685: END IF;
1686: -- **** for debug information in readonly UT environment.--- begin ****
1687: JMF_SHIKYU_RPT_UTIL.debug_output
1688: (
1689: p_output_to => 'FND_LOG.STRING'
1690: ,p_api_name => G_MODULE_PREFIX || l_api_name
1691: ,p_message => 'WHEN OTHERS THEN'
1726:
1727: l_jmf_cfr_mid_temp_rcv_rows NUMBER;
1728: BEGIN
1729: -- **** for debug information in readonly UT environment.--- begin ****
1730: JMF_SHIKYU_RPT_UTIL.debug_output
1731: (
1732: p_output_to => 'FND_LOG.STRING'
1733: ,p_api_name => G_MODULE_PREFIX || l_api_name
1734: ,p_message => 'begin:' ||
1822: , G_MODULE_PREFIX || l_api_name || '.execption'
1823: , NULL);
1824: END IF;
1825: -- **** for debug information in readonly UT environment.--- begin ****
1826: JMF_SHIKYU_RPT_UTIL.debug_output
1827: (
1828: p_output_to => 'FND_LOG.STRING'
1829: ,p_api_name => G_MODULE_PREFIX || l_api_name
1830: ,p_message => 'WHEN OTHERS THEN'
1908: l_rcv_unconsumed_pri rcv_transactions.primary_quantity%TYPE;
1909:
1910: BEGIN
1911: -- **** for debug information in readonly UT environment.--- begin ****
1912: JMF_SHIKYU_RPT_UTIL.debug_output
1913: (
1914: p_output_to => 'FND_LOG.STRING'
1915: ,p_api_name => G_MODULE_PREFIX || l_api_name
1916: ,p_message => 'begin:' ||
1960: INTO l_rcv_transaction_id, l_rcv_unprocessed_primary_qty;
1961:
1962: EXIT WHEN l_cur_get_rcv_transaction_info%NOTFOUND;
1963: -- **** for debug information in readonly UT environment.--- begin ****
1964: JMF_SHIKYU_RPT_UTIL.debug_output
1965: (
1966: p_output_to => 'FND_LOG.STRING'
1967: ,p_api_name => G_MODULE_PREFIX || l_api_name
1968: ,p_message => 'begin:' ||
1986:
1987: IF l_sub_po_residual_pri > 0
1988: THEN
1989: --the possilbe unconsumed rcv_transactions primary quantity
1990: l_rcv_unconsumed_pri := jmf_shikyu_rpt_util.get_min3(p_number1 => l_rcv_unprocessed_primary_qty
1991: ,p_number2 => l_sub_po_residual_pri
1992: ,p_number3 => x_need_to_find_pri_qty);
1993:
1994: --insert data to rcv_temp marking the processed rcv_transaction,
2049: , G_MODULE_PREFIX || l_api_name || '.execption'
2050: , NULL);
2051: END IF;
2052: -- **** for debug information in readonly UT environment.--- begin ****
2053: JMF_SHIKYU_RPT_UTIL.debug_output
2054: (
2055: p_output_to => 'FND_LOG.STRING'
2056: ,p_api_name => G_MODULE_PREFIX || l_api_name
2057: ,p_message => 'WHEN OTHERS THEN'
2089: l_api_name CONSTANT VARCHAR2(30) := 'get_unconsumed_sub_po';
2090:
2091: BEGIN
2092: -- **** for debug information in readonly UT environment.--- begin ****
2093: JMF_SHIKYU_RPT_UTIL.debug_output
2094: (
2095: p_output_to => 'FND_LOG.STRING'
2096: ,p_api_name => G_MODULE_PREFIX || l_api_name
2097: ,p_message => 'begin:' ||
2133: ,item_id)
2134: SELECT p_sub_po_unconsumed_row_type
2135: ,sub_po.subcontract_po_shipment_id
2136: ,comp.uom
2137: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(sub_po.tp_organization_id
2138: ,comp.shikyu_component_id)
2139: ,((SELECT NVL(SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(sub_po.tp_organization_id
2140: ,jsa_a.shikyu_component_id
2141: ,jsa_a.uom
2135: ,sub_po.subcontract_po_shipment_id
2136: ,comp.uom
2137: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(sub_po.tp_organization_id
2138: ,comp.shikyu_component_id)
2139: ,((SELECT NVL(SUM(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(sub_po.tp_organization_id
2140: ,jsa_a.shikyu_component_id
2141: ,jsa_a.uom
2142: ,NVL(jsa_a.allocated_quantity
2143: ,0)))
2194:
2195: --update the primary UOM, primary_residual_unallocated
2196: UPDATE jmf_shikyu_cfr_mid_temp
2197: SET quantity = NVL(primary_unconsumed_quantity,0) *
2198: JMF_SHIKYU_RPT_UTIL.po_uom_convert_p(primary_uom
2199: ,uom
2200: ,item_id)
2201: WHERE row_type = p_sub_po_unconsumed_row_type
2202: AND quantity IS NULL --only for those do not get the quantity of uom
2232: , G_MODULE_PREFIX || l_api_name || '.execption'
2233: , NULL);
2234: END IF;
2235: -- **** for debug information in readonly UT environment.--- begin ****
2236: JMF_SHIKYU_RPT_UTIL.debug_output
2237: (
2238: p_output_to => 'FND_LOG.STRING'
2239: ,p_api_name => G_MODULE_PREFIX || l_api_name
2240: ,p_message => 'WHEN OTHERS THEN'
2274: l_api_name CONSTANT VARCHAR2(30) := 'get_unconsumed_rep_po';
2275:
2276: BEGIN
2277: -- **** for debug information in readonly UT environment.--- begin ****
2278: JMF_SHIKYU_RPT_UTIL.debug_output
2279: (
2280: p_output_to => 'FND_LOG.STRING'
2281: ,p_api_name => G_MODULE_PREFIX || l_api_name
2282: ,p_message => 'begin:' ||
2320: ,item_id)
2321: SELECT p_rep_po_unconsumed_row_type
2322: ,jsr.replenishment_po_shipment_id
2323: ,alloc.uom
2324: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(jsr.oem_organization_id
2325: ,alloc.shikyu_component_id)
2326: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.oem_organization_id
2327: ,alloc.shikyu_component_id
2328: ,alloc.uom
2322: ,jsr.replenishment_po_shipment_id
2323: ,alloc.uom
2324: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_uom_code(jsr.oem_organization_id
2325: ,alloc.shikyu_component_id)
2326: ,JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.oem_organization_id
2327: ,alloc.shikyu_component_id
2328: ,alloc.uom
2329: ,alloc.allocated_quantity) -
2330: NVL(wro.quantity_issued
2378:
2379: --update the primary UOM, primary_residual_unallocated
2380: UPDATE jmf_shikyu_cfr_mid_temp
2381: SET quantity = NVL(primary_unconsumed_quantity,0) *
2382: JMF_SHIKYU_RPT_UTIL.po_uom_convert_p(primary_uom
2383: ,uom
2384: ,item_id)
2385: WHERE row_type = p_rep_po_unconsumed_row_type
2386: AND quantity IS NULL --only for those do not get the quantity of uom
2417: , G_MODULE_PREFIX || l_api_name || '.execption'
2418: , NULL);
2419: END IF;
2420: -- **** for debug information in readonly UT environment.--- begin ****
2421: JMF_SHIKYU_RPT_UTIL.debug_output
2422: (
2423: p_output_to => 'FND_LOG.STRING'
2424: ,p_api_name => G_MODULE_PREFIX || l_api_name
2425: ,p_message => 'WHEN OTHERS THEN'
2459:
2460: l_sub_po_residual_pri rcv_transactions.primary_quantity%TYPE;
2461: BEGIN
2462: -- **** for debug information in readonly UT environment.--- begin ****
2463: JMF_SHIKYU_RPT_UTIL.debug_output
2464: (
2465: p_output_to => 'FND_LOG.STRING'
2466: ,p_api_name => G_MODULE_PREFIX || l_api_name
2467: ,p_message => 'begin:' ||
2531: , NULL);
2532: END IF;
2533: RETURN -1;
2534: -- **** for debug information in readonly UT environment.--- begin ****
2535: JMF_SHIKYU_RPT_UTIL.debug_output
2536: (
2537: p_output_to => 'FND_LOG.STRING'
2538: ,p_api_name => G_MODULE_PREFIX || l_api_name
2539: ,p_message => 'WHEN OTHERS THEN'
2602: l_residual_new_consumed_pri jmf_shikyu_cfr_mid_temp.primary_unconsumed_quantity%TYPE;
2603: l_cur_sub_po_consumed_pri jmf_shikyu_cfr_mid_temp.primary_unconsumed_quantity%TYPE;
2604: BEGIN
2605: -- **** for debug information in readonly UT environment.--- begin ****
2606: JMF_SHIKYU_RPT_UTIL.debug_output
2607: (
2608: p_output_to => 'FND_LOG.STRING'
2609: ,p_api_name => G_MODULE_PREFIX || l_api_name
2610: ,p_message => 'begin:' ||
2645:
2646: EXIT WHEN lcur_sub_po_temp_info%NOTFOUND;
2647:
2648: -- **** for debug information in readonly UT environment.--- begin ****
2649: JMF_SHIKYU_RPT_UTIL.debug_output
2650: (
2651: p_output_to => 'FND_LOG.STRING'
2652: ,p_api_name => G_MODULE_PREFIX || l_api_name
2653: ,p_message => 'begin:' ||
2656: ',l_residual_old_consumed_pri:' || l_residual_old_consumed_pri
2657: );
2658: -- **** for debug information in readonly UT environment.--- end ****
2659:
2660: l_cur_sub_po_consumed_pri := jmf_shikyu_rpt_util.get_min2(l_residual_old_consumed_pri
2661: ,l_residual_new_consumed_pri);
2662: UPDATE jmf_shikyu_cfr_mid_temp
2663: -- Updated to fix potential issue of operations between null numbers
2664: -- SET quantity = quantity -
2711: , G_MODULE_PREFIX || l_api_name || '.execption'
2712: , NULL);
2713: END IF;
2714: -- **** for debug information in readonly UT environment.--- begin ****
2715: JMF_SHIKYU_RPT_UTIL.debug_output
2716: (
2717: p_output_to => 'FND_LOG.STRING'
2718: ,p_api_name => G_MODULE_PREFIX || l_api_name
2719: ,p_message => 'WHEN OTHERS THEN'
2755:
2756: l_jmf_cfr_mid_temp_rcv_rows NUMBER;
2757: BEGIN
2758: -- **** for debug information in readonly UT environment.--- begin ****
2759: JMF_SHIKYU_RPT_UTIL.debug_output
2760: (
2761: p_output_to => 'FND_LOG.STRING'
2762: ,p_api_name => G_MODULE_PREFIX || l_api_name
2763: ,p_message => 'begin:' ||
2850: , G_MODULE_PREFIX || l_api_name || '.execption'
2851: , NULL);
2852: END IF;
2853: -- **** for debug information in readonly UT environment.--- begin ****
2854: JMF_SHIKYU_RPT_UTIL.debug_output
2855: (
2856: p_output_to => 'FND_LOG.STRING'
2857: ,p_api_name => G_MODULE_PREFIX || l_api_name
2858: ,p_message => 'WHEN OTHERS THEN'
2873: l_api_name CONSTANT VARCHAR2(30) := 'validate_cfr_mid_temp';
2874:
2875: BEGIN
2876: -- **** for debug information in readonly UT environment.--- begin ****
2877: JMF_SHIKYU_RPT_UTIL.debug_output
2878: (
2879: p_output_to => 'FND_LOG.STRING'
2880: ,p_api_name => G_MODULE_PREFIX || l_api_name
2881: ,p_message => 'begin:' ||
2907: UPDATE jmf_shikyu_cfr_mid_temp
2908: SET quantity = (NVL(primary_unallocated_quantity
2909: ,0) + NVL(primary_unconsumed_quantity
2910: ,0)) *
2911: JMF_SHIKYU_RPT_UTIL.po_uom_convert_p(JMF_SHIKYU_RPT_UTIL.uom_to_code(primary_uom)
2912: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(uom)
2913: ,item_id)
2914: WHERE row_type = CFR_TMP_RCV_ROW;
2915: COMMIT; -- for debug on UT ?????
2908: SET quantity = (NVL(primary_unallocated_quantity
2909: ,0) + NVL(primary_unconsumed_quantity
2910: ,0)) *
2911: JMF_SHIKYU_RPT_UTIL.po_uom_convert_p(JMF_SHIKYU_RPT_UTIL.uom_to_code(primary_uom)
2912: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(uom)
2913: ,item_id)
2914: WHERE row_type = CFR_TMP_RCV_ROW;
2915: COMMIT; -- for debug on UT ?????
2916: rpt_debug_show_mid_data(
2938: , G_MODULE_PREFIX || l_api_name || '.execption'
2939: , NULL);
2940: END IF;
2941: -- **** for debug information in readonly UT environment.--- begin ****
2942: JMF_SHIKYU_RPT_UTIL.debug_output
2943: (
2944: p_output_to => 'FND_LOG.STRING'
2945: ,p_api_name => G_MODULE_PREFIX || l_api_name
2946: ,p_message => 'WHEN OTHERS THEN'
2976: l_api_name CONSTANT VARCHAR2(30) := 'add_data_to_cfr_temp';
2977: l_p_currency_conversion_date DATE;
2978: BEGIN
2979: -- **** for debug information in readonly UT environment.--- begin ****
2980: JMF_SHIKYU_RPT_UTIL.debug_output
2981: (
2982: p_output_to => 'FND_LOG.STRING'
2983: ,p_api_name => G_MODULE_PREFIX || l_api_name
2984: ,p_message => 'begin:' ||
3005: ELSE
3006: l_p_currency_conversion_date := p_currency_conversion_date;
3007: END IF;
3008: -- **** for debug information in readonly UT environment.--- begin ****
3009: JMF_SHIKYU_RPT_UTIL.debug_output
3010: (
3011: p_output_to => 'FND_LOG.STRING'
3012: ,p_api_name => G_MODULE_PREFIX || l_api_name
3013: ,p_message => 'begin:' ||
3073: , G_MODULE_PREFIX || l_api_name || '.execption'
3074: , SQLERRM);
3075: END IF;
3076: -- **** for debug information in readonly UT environment.--- begin ****
3077: JMF_SHIKYU_RPT_UTIL.debug_output
3078: (
3079: p_output_to => 'FND_LOG.STRING'
3080: ,p_api_name => G_MODULE_PREFIX || l_api_name
3081: ,p_message => 'WHEN OTHERS THEN:' || SQLERRM
3101: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_data';
3102:
3103: BEGIN
3104: -- **** for debug information in readonly UT environment.--- begin ****
3105: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3106: ,p_api_name => G_MODULE_PREFIX || l_api_name
3107: ,p_message => 'begin:');
3108: -- **** for debug information in readonly UT environment.--- end ****
3109:
3189: pvc.middle_name || ',' || pvc.last_name contact_name
3190: ,cfr_mid.tp_inv_org_id tp_inv_org_id
3191: ,mp_tp.organization_code tp_inv_org_code
3192: ,cfr_mid.item_id item_id
3193: ,JMF_SHIKYU_RPT_UTIL.get_item_number(cfr_mid.tp_inv_org_id
3194: ,cfr_mid.item_id) item_number
3195: ,item_v.description item_description
3196: ,ooha.transactional_curr_code currency_code --or jmf_shikyu_components.Currency ,not ph.currency_code
3197: ,p_functional_currency functional_currency
3195: ,item_v.description item_description
3196: ,ooha.transactional_curr_code currency_code --or jmf_shikyu_components.Currency ,not ph.currency_code
3197: ,p_functional_currency functional_currency
3198: ,oola.unit_selling_price po_unit_price --not pl.unit_price
3199: ,JMF_SHIKYU_RPT_UTIL.convert_amount(ooha.transactional_curr_code
3200: ,p_functional_currency
3201: --Amy update for fixing currency conversing issue start
3202: --when paramter p_currency_conversion_date and p_currency_conversion_type are not specified,
3203: -- use sysdate and conversion_type in so as default value.
3214: ,(cfr_mid.quantity *
3215: PO_UOM_S.po_uom_convert_p(cfr_mid.uom
3216: ,cfr_mid.primary_uom
3217: ,cfr_mid.item_id)) value1 --item qty in Primary
3218: ,JMF_SHIKYU_RPT_UTIL.convert_amount(ooha.transactional_curr_code
3219: ,p_functional_currency
3220: --Amy update for fixing currency conversing issue start
3221: --when paramter p_currency_conversion_date and p_currency_conversion_type are not specified,
3222: -- use sysdate and conversion_type in so as default value.
3376: ,G_MODULE_PREFIX || l_api_name || '.execption'
3377: ,NULL);
3378: END IF;
3379: -- **** for debug information in readonly UT environment.--- begin ****
3380: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3381: ,p_api_name => G_MODULE_PREFIX || l_api_name
3382: ,p_message => 'WHEN OTHERS THEN');
3383: -- **** for debug information in readonly UT environment.--- end ****
3384:
3396: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_Comp_Estimated_data';
3397:
3398: BEGIN
3399: -- **** for debug information in readonly UT environment.--- begin ****
3400: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3401: ,p_api_name => G_MODULE_PREFIX || l_api_name
3402: ,p_message => 'begin:');
3403: -- **** for debug information in readonly UT environment.--- end ****
3404:
3640: ,G_MODULE_PREFIX || l_api_name || '.execption'
3641: ,NULL);
3642: END IF;
3643: -- **** for debug information in readonly UT environment.--- begin ****
3644: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3645: ,p_api_name => G_MODULE_PREFIX || l_api_name
3646: ,p_message => 'WHEN OTHERS THEN');
3647: -- **** for debug information in readonly UT environment.--- end ****
3648:
3662: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_SubPO_data';
3663:
3664: BEGIN
3665: -- **** for debug information in readonly UT environment.--- begin ****
3666: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3667: ,p_api_name => G_MODULE_PREFIX || l_api_name
3668: ,p_message => 'begin:');
3669: -- **** for debug information in readonly UT environment.--- end ****
3670:
3766: ,pa_tasks task
3767: --Added to get task end
3768: WHERE jsc.SHIKYU_COMPONENT_ID = cfr_mid_item_group.item_id
3769: AND jsc.OEM_ORGANIZATION_ID = cfr_mid_item_group.oem_inv_org_id
3770: AND jsc.UOM = JMF_SHIKYU_RPT_UTIL.uom_to_code(cfr_mid_item_group.uom)
3771: AND jsc.PRIMARY_UOM = JMF_SHIKYU_RPT_UTIL.uom_to_code(cfr_mid_item_group.primary_uom)
3772: AND jso.TP_ORGANIZATION_ID = cfr_mid_item_group.tp_inv_org_id
3773: AND jso.OEM_ORGANIZATION_ID = cfr_mid_item_group.oem_inv_org_id
3774: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = jsc.SUBCONTRACT_PO_SHIPMENT_ID
3767: --Added to get task end
3768: WHERE jsc.SHIKYU_COMPONENT_ID = cfr_mid_item_group.item_id
3769: AND jsc.OEM_ORGANIZATION_ID = cfr_mid_item_group.oem_inv_org_id
3770: AND jsc.UOM = JMF_SHIKYU_RPT_UTIL.uom_to_code(cfr_mid_item_group.uom)
3771: AND jsc.PRIMARY_UOM = JMF_SHIKYU_RPT_UTIL.uom_to_code(cfr_mid_item_group.primary_uom)
3772: AND jso.TP_ORGANIZATION_ID = cfr_mid_item_group.tp_inv_org_id
3773: AND jso.OEM_ORGANIZATION_ID = cfr_mid_item_group.oem_inv_org_id
3774: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = jsc.SUBCONTRACT_PO_SHIPMENT_ID
3775: AND jsc.SUBCONTRACT_PO_SHIPMENT_ID = jsa.SUBCONTRACT_PO_SHIPMENT_ID
3820: ,G_MODULE_PREFIX || l_api_name || '.execption'
3821: ,NULL);
3822: END IF;
3823: -- **** for debug information in readonly UT environment.--- begin ****
3824: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3825: ,p_api_name => G_MODULE_PREFIX || l_api_name
3826: ,p_message => 'WHEN OTHERS THEN');
3827: -- **** for debug information in readonly UT environment.--- end ****
3828:
3851: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_UnReceived_data';
3852:
3853: BEGIN
3854: -- **** for debug information in readonly UT environment.--- begin ****
3855: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
3856: ,p_api_name => G_MODULE_PREFIX || l_api_name
3857: ,p_message => 'begin:');
3858: -- **** for debug information in readonly UT environment.--- end ****
3859:
3942: FROM JMF_SHIKYU_CFR_RPT_TEMP jscrt
3943: WHERE jscrt.rpt_data_type = CFR_EXT_COMPONENT
3944: AND jscrt.oem_inv_org_id = jsr.oem_organization_id
3945: AND jscrt.tp_inv_org_id = jsr.tp_organization_id) > 0
3946: AND JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(oola.sold_from_org_id
3947: ,oola.inventory_item_id
3948: ,oola.order_quantity_uom
3949: ,NVL(oola.shipped_quantity
3950: ,0)) >
3947: ,oola.inventory_item_id
3948: ,oola.order_quantity_uom
3949: ,NVL(oola.shipped_quantity
3950: ,0)) >
3951: JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
3952: ,pla.item_id
3953: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
3954: ,NVL(plla.quantity_received
3955: ,0));*/
3949: ,NVL(oola.shipped_quantity
3950: ,0)) >
3951: JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
3952: ,pla.item_id
3953: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
3954: ,NVL(plla.quantity_received
3955: ,0));*/
3956: AND jsr.oem_organization_id = oem_haoutl.organization_id
3957: AND oem_haoutl.NAME >= NVL(p_oem_inv_org_name_from
3966: AND pv.vendor_name >= NVL(p_supplier_name_from, pv.vendor_name)
3967: AND pv.vendor_name <= NVL(p_supplier_name_to, pv.vendor_name)
3968: AND pvs.vendor_site_code >= NVL(p_supplier_site_code_from, pvs.vendor_site_code)
3969: AND pvs.vendor_site_code <= NVL(p_supplier_site_code_to, pvs.vendor_site_code)
3970: AND NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.oem_organization_id
3971: ,oola.inventory_item_id
3972: ,oola.order_quantity_uom
3973: ,NVL(oola.shipped_quantity
3974: ,0)),0) >
3971: ,oola.inventory_item_id
3972: ,oola.order_quantity_uom
3973: ,NVL(oola.shipped_quantity
3974: ,0)),0) >
3975: NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
3976: ,pla.item_id
3977: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
3978: ,NVL(plla.quantity_received
3979: ,0)),0);
3973: ,NVL(oola.shipped_quantity
3974: ,0)),0) >
3975: NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
3976: ,pla.item_id
3977: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
3978: ,NVL(plla.quantity_received
3979: ,0)),0);
3980: -- Amy updated to fix bug 5583680 end
3981: COMMIT; -- for debug on UT ?????
3999: ,G_MODULE_PREFIX || l_api_name || '.execption'
4000: ,NULL);
4001: END IF;
4002: -- **** for debug information in readonly UT environment.--- begin ****
4003: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4004: ,p_api_name => G_MODULE_PREFIX || l_api_name
4005: ,p_message => 'WHEN OTHERS THEN');
4006: -- **** for debug information in readonly UT environment.--- end ****
4007:
4022: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_Received_data';
4023:
4024: BEGIN
4025: -- **** for debug information in readonly UT environment.--- begin ****
4026: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4027: ,p_api_name => G_MODULE_PREFIX || l_api_name
4028: ,p_message => 'begin:');
4029: -- **** for debug information in readonly UT environment.--- end ****
4030:
4112: ,plla.promised_date)) <= p_days_received
4113: -- Bug 5583680: Fixed data issue for the Received Replenishments in
4114: -- Past xx Days section
4115: AND NVL(oola.shipped_quantity,0) > 0
4116: AND NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(jsr.oem_organization_id
4117: ,oola.inventory_item_id
4118: ,oola.order_quantity_uom
4119: ,NVL(oola.shipped_quantity
4120: ,0)),0) =
4117: ,oola.inventory_item_id
4118: ,oola.order_quantity_uom
4119: ,NVL(oola.shipped_quantity
4120: ,0)),0) =
4121: NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
4122: ,pla.item_id
4123: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
4124: ,NVL(plla.quantity_received
4125: ,0)),0);
4119: ,NVL(oola.shipped_quantity
4120: ,0)),0) =
4121: NVL(JMF_SHIKYU_RPT_UTIL.get_item_primary_quantity(plla.ship_to_organization_id
4122: ,pla.item_id
4123: ,JMF_SHIKYU_RPT_UTIL.uom_to_code(pla.unit_meas_lookup_code)
4124: ,NVL(plla.quantity_received
4125: ,0)),0);
4126: COMMIT; -- for debug on UT ?????
4127: IF g_fnd_debug = 'Y' AND
4144: ,G_MODULE_PREFIX || l_api_name || '.execption'
4145: ,NULL);
4146: END IF;
4147: -- **** for debug information in readonly UT environment.--- begin ****
4148: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4149: ,p_api_name => G_MODULE_PREFIX || l_api_name
4150: ,p_message => 'WHEN OTHERS THEN');
4151: -- **** for debug information in readonly UT environment.--- end ****
4152:
4164: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_Int_data';
4165:
4166: BEGIN
4167: -- **** for debug information in readonly UT environment.--- begin ****
4168: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4169: ,p_api_name => G_MODULE_PREFIX || l_api_name
4170: ,p_message => 'begin:');
4171: -- **** for debug information in readonly UT environment.--- end ****
4172:
4466: ,G_MODULE_PREFIX || l_api_name || '.execption'
4467: ,NULL);
4468: END IF;
4469: -- **** for debug information in readonly UT environment.--- begin ****
4470: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4471: ,p_api_name => G_MODULE_PREFIX || l_api_name
4472: ,p_message => SQLERRM);
4473: -- **** for debug information in readonly UT environment.--- end ****
4474:
4487: l_api_name CONSTANT VARCHAR2(30) := 'rpt_get_SubPO_data_Onhand';
4488:
4489: BEGIN
4490: -- **** for debug information in readonly UT environment.--- begin ****
4491: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4492: ,p_api_name => G_MODULE_PREFIX || l_api_name
4493: ,p_message => 'begin:');
4494: -- **** for debug information in readonly UT environment.--- end ****
4495:
4582: ,G_MODULE_PREFIX || l_api_name || '.execption'
4583: ,NULL);
4584: END IF;
4585: -- **** for debug information in readonly UT environment.--- begin ****
4586: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => 'FND_LOG.STRING'
4587: ,p_api_name => G_MODULE_PREFIX || l_api_name
4588: ,p_message => 'WHEN OTHERS THEN');
4589: -- **** for debug information in readonly UT environment.--- end ****
4590:
4650: l_get_rep_flag jmf_shikyu_cfr_mid_temp.get_rep_flag%TYPE;
4651:
4652: BEGIN
4653: -- **** for debug information in readonly UT environment.--- begin ****
4654: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4655: ,p_api_name => G_MODULE_PREFIX ||
4656: l_api_name
4657: ,p_message => '==jmf_shikyu_cfr_mid_temp data Begin==');
4658: -- **** for debug information in readonly UT environment.--- end ****
4680:
4681: EXIT WHEN l_cur_get_mid_temp_data%NOTFOUND;
4682:
4683: -- **** for debug information in readonly UT environment.--- begin ****
4684: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4685: ,p_api_name => G_MODULE_PREFIX ||
4686: l_api_name
4687: ,p_message => 'jmf_shikyu_cfr_mid_temp:' ||
4688: ';row_type[' || l_row_type || ']' ||
4708: END LOOP; --end loop of l_cur_get_mid_temp_data
4709: CLOSE l_cur_get_mid_temp_data;
4710:
4711: -- **** for debug information in readonly UT environment.--- begin ****
4712: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4713: ,p_api_name => G_MODULE_PREFIX ||
4714: l_api_name
4715: ,p_message => '==jmf_shikyu_cfr_mid_temp data end==');
4716: -- **** for debug information in readonly UT environment.--- end ****
4728: NULL;
4729:
4730: WHEN OTHERS THEN
4731: -- **** for debug information in readonly UT environment.--- begin ****
4732: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4733: ,p_api_name => G_MODULE_PREFIX ||
4734: l_api_name ||
4735: '.Exception'
4736: ,p_message => SQLERRM);
4826: l_value3 jmf_shikyu_cfr_rpt_temp.value3%TYPE;
4827:
4828: BEGIN
4829: -- **** for debug information in readonly UT environment.--- begin ****
4830: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4831: ,p_api_name => G_MODULE_PREFIX ||
4832: l_api_name
4833: ,p_message => '==jmf_shikyu_cfr_rpt_temp data Begin==');
4834: -- **** for debug information in readonly UT environment.--- end ****
4869:
4870: EXIT WHEN l_cur_get_temp_data%NOTFOUND;
4871:
4872: -- **** for debug information in readonly UT environment.--- begin ****
4873: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4874: ,p_api_name => G_MODULE_PREFIX ||
4875: l_api_name
4876: ,p_message => 'jmf_shikyu_cfr_rpt_temp:' ||
4877: ';rpt_mode[' ||
4935: END LOOP; --end loop of l_cur_get_mid_temp_data
4936: CLOSE l_cur_get_temp_data;
4937:
4938: -- **** for debug information in readonly UT environment.--- begin ****
4939: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4940: ,p_api_name => G_MODULE_PREFIX ||
4941: l_api_name
4942: ,p_message => '==jmf_shikyu_cfr_rpt_temp data end==');
4943: -- **** for debug information in readonly UT environment.--- end ****
4955: NULL;
4956:
4957: WHEN OTHERS THEN
4958: -- **** for debug information in readonly UT environment.--- begin ****
4959: JMF_SHIKYU_RPT_UTIL.debug_output(p_output_to => p_output_to
4960: ,p_api_name => G_MODULE_PREFIX ||
4961: l_api_name ||
4962: '.Exception'
4963: ,p_message => SQLERRM);