[Home] [Help]
1782: -- p_keey_summary = 'Y'
1783: BEGIN
1784: SELECT 'N'
1785: INTO l_keep_summary
1786: FROM dual
1787: WHERE exists (SELECT 'approved document'
1788: FROM po_headers
1789: WHERE po_header_id = interface.po_header_id
1790: AND NVL(approved_flag, 'N') IN ('R', 'Y'));
2471:
2472: l_progress:= '270';
2473: SELECT po_releases_s.nextval
2474: INTO g_po_release_id
2475: FROM sys.dual;
2476:
2477: /*
2478: ** assign the document id to get passed back to the
2479: ** calling module.
3364: /**
3365: --mchandak 02/11/2002
3366: --Bug# 2219743
3367: --Added logic to default secondary qnty,UOM and grade in po_lines
3368: --if common purchasing is installed for OPM dual item
3369: IF(g_document_subtype='STANDARD' or g_document_subtype='PLANNED') AND NOT GML_PO_FOR_PROCESS.check_po_for_proc
3370: THEN
3371: x_retvar := FND_INSTALLATION.get_app_info(x_product,x_opm_installed,x_dummy,x_dummy);
3372: BEGIN
3419: IF ic_item_mst_rec.item_no is not null
3420: THEN
3421: interface.preferred_grade := ic_item_mst_rec.qc_grade;
3422:
3423: IF ic_item_mst_rec.dualum_ind >= 1
3424: THEN
3425: interface.secondary_unit_of_measure:= po_gml_db_common.get_apps_uom_code(ic_item_mst_rec.item_um2);
3426: x_order_opm_um := po_gml_db_common.get_opm_uom_code(interface.unit_meas_lookup_code);
3427: po_gml_db_common.validate_quantity(
3425: interface.secondary_unit_of_measure:= po_gml_db_common.get_apps_uom_code(ic_item_mst_rec.item_um2);
3426: x_order_opm_um := po_gml_db_common.get_opm_uom_code(interface.unit_meas_lookup_code);
3427: po_gml_db_common.validate_quantity(
3428: ic_item_mst_rec.item_id,
3429: ic_item_mst_rec.dualum_ind,
3430: x_quantity,
3431: x_order_opm_um,
3432: ic_item_mst_rec.item_um2,
3433: x_secondary_qty);
3434: interface.secondary_quantity := x_secondary_qty;
3435: ELSE
3436: interface.secondary_quantity := null;
3437: interface.secondary_unit_of_measure := null;
3438: END IF; -- ic_item_mst_rec.dualum_ind >= 1
3439: ELSE
3440: interface.secondary_quantity := null;
3441: interface.preferred_grade := null;
3442: interface.secondary_unit_of_measure := null;
4051: l_progress:='330';
4052:
4053: SELECT po_lines_s.nextval
4054: INTO x_po_line_id
4055: FROM sys.dual;
4056:
4057: l_progress:='340';
4058:
4059: /* GA FPI start */
4282: p_message => 'interface.secondary_quantity : '||interface.secondary_quantity);
4283: END IF;
4284:
4285: --
4286: -- IF secondary quantity is null and item is dual uom control , default the secondary qty.
4287: IF (g_document_subtype='STANDARD' OR g_document_subtype='PLANNED' OR g_document_type = 'PA')
4288: THEN
4289: IF interface.item_id is not null THEN
4290: IF item.secondary_uom_code IS NOT NULL THEN
5070: -- because x_po_line_id is the blanket line_id for 'Release'
5071: -- Introducing the 'If' statement for checking that its not a release
5072: IF (g_document_subtype <> 'RELEASE') THEN
5073:
5074: /** If FSP org and item combination is dual uom control, update the po lines secondary quantity
5075: with the default conversion based on the PO lines quantity **/
5076:
5077: --
5078:
6169: /*Bug 5629398 End */
6170:
6171:
6172: --
6173: --If item is dual uom control and secondary quantity is NULL, derive it
6174: IF x_secondary_unit_of_measure IS NOT NULL THEN
6175: IF interface.secondary_quantity IS NULL THEN
6176: PO_UOM_S.uom_convert (x_quantity,
6177: nvl(x_shipment_uom, interface.unit_meas_lookup_code),
6414: END IF;
6415:
6416: SELECT po_line_locations_s.nextval
6417: INTO x_line_location_id
6418: FROM sys.dual;
6419:
6420: -- bug: 404191
6421: -- Get the taxable_flag based on the following priority
6422: -- 1. preferences (global.po_taxable_flag)
6529: p_message => 'interface.trxn_flow_header_id='||interface.transaction_flow_header_id);
6530: END IF;
6531:
6532: --
6533: -- If item is dual uom control and secondary quantity is NULL, derive it
6534: IF interface.item_id IS NOT NULL THEN
6535: IF interface.secondary_quantity IS NULL THEN
6536: PO_UOM_S.get_secondary_uom( interface.item_id,
6537: interface.destination_organization_id,
6598: nvl(interface.receipt_required_flag,
6599: nvl(vendor.receipt_required_flag,
6600: nvl(params.receiving_flag, 'N')))))))
6601: INTO l_inspection_required_flag, l_receipt_required_flag
6602: FROM dual;
6603:
6604: EXCEPTION
6605:
6606: when others THEN
9308: -- secondary qty and secondary uom not getting populated for requisition lines
9309: -- when requisition is created using IP.
9310: -- default secondary qty and uom if
9311: -- opm is installed.
9312: -- destination org. is process and item is process and item is dual uom control.
9313:
9314: -- bug# 3386353
9315: -- Sourcing when doing overaward creates additional PO line with the extra qty.
9316: -- If the line is OPM item with dual uom control then the shipment corresponding
9312: -- destination org. is process and item is process and item is dual uom control.
9313:
9314: -- bug# 3386353
9315: -- Sourcing when doing overaward creates additional PO line with the extra qty.
9316: -- If the line is OPM item with dual uom control then the shipment corresponding
9317: -- to the extra PO line created by Sourcing does not have secondary uom and
9318: -- secondary quantity with ship to organization as process org.
9319: -- default secondary UOM and secondary quantity in such a case (non req backed lines)
9320: -- the requisition line id would be null in po_lines_interface .
9451: END IF;
9452:
9453: SELECT po_headers_s.nextval
9454: INTO x_po_header_id
9455: FROM sys.dual;
9456:
9457:
9458: /*
9459: ** Assign the document id to get passed back to the calling
14155:
14156: begin
14157: SELECT po_line_locations_s.nextval
14158: INTO x_line_location_id
14159: FROM sys.dual;
14160: exception
14161: when others then
14162: IF g_debug_unexp THEN --< Bug 3210331: use proper debugging >
14163: PO_DEBUG.debug_exc(p_log_head => g_log_head||l_api_name,