[Home] [Help]
331: d_position := 20;
332: debug(d_module, d_position, 'Row created into PO_DRAFTS');
333:
334: d_position := 30;
335: debug(d_module, d_position, 'Create row into PO_HEADERS_DRAFT_ALL for the new Mod', FND_API.G_TRUE);
336:
337: PO_HEADERS_DRAFT_PKG.sync_draft_from_txn(
338: p_po_header_id => p_po_header_id,
339: p_draft_id => l_draft_id,
452: -- Fetch the CLM Source Document Number for Order off IDV
453: BEGIN
454: SELECT phda.clm_source_document_id
455: INTO l_clm_source_document_id
456: FROM po_headers_draft_all phda,
457: po_headers_all pha
458: WHERE phda.po_header_id = p_po_header_id
459: AND phda.draft_id = p_draft_id
460: AND pha.po_header_id = phda.clm_source_document_id
663:
664: d_position := 70;
665: debug(d_module, d_position, 'Update PO_DRAFT_HEADERS_ALL with the Mod-specific defaults and Multi-mod fields', FND_API.G_TRUE);
666:
667: UPDATE po_headers_draft_all
668: SET ame_approval_id = l_ame_approval_id,
669: ame_transaction_type = l_ame_transaction_type,
670: acceptance_required_flag = p_multi_mod_request_record.acceptance_required_flag,
671: acceptance_due_date = p_multi_mod_request_record.acceptance_due_date,
2139: l_doc_subtype,
2140: l_old_vendor_id,
2141: l_old_vendor_site_id,
2142: l_old_vendor_contact_id
2143: FROM po_headers_draft_all
2144: WHERE po_header_id = p_po_header_id
2145: AND draft_id = p_draft_id;
2146:
2147: d_position := 45;
2246:
2247: d_position := 80;
2248: debug(d_module, d_position, 'Updating the Mod with new Supplier details', FND_API.G_TRUE);
2249:
2250: UPDATE po_headers_draft_all
2251: SET vendor_id = l_new_vendor_id,
2252: vendor_site_id = l_new_vendor_site_id,
2253: vendor_contact_id = l_new_vendor_contact_id,
2254: --clm_supplier_name = l_new_vendor_name,
2384: d_api_name CONSTANT VARCHAR2(30) := 'START_MOD_APPROVAL';
2385: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
2386: d_position NUMBER;
2387:
2388: l_headers_draft_rec po_headers_draft_all%ROWTYPE;
2389: l_change_type_vendor CONSTANT VARCHAR2(30) := 'VENDOR_CHANGE';
2390:
2391: l_doc_type_code VARCHAR2(30);
2392: l_print_flag VARCHAR2(1) := 'N';
2407: debug(d_module, d_position, 'Fetch Headers Draft Row for the Mod');
2408:
2409: SELECT *
2410: INTO l_headers_draft_rec
2411: FROM po_headers_draft_all
2412: WHERE po_header_id = p_po_header_id
2413: AND draft_id = p_draft_id;
2414:
2415: -- Derive Document Type Code