280: WHERE quote_header_id = l_header_id
281: AND quote_line_id IS NULL;
282:
283: BEGIN
284: IF aso_debug_pub.g_debug_flag = 'Y' THEN
285: aso_debug_pub.add('beginning of map_quote_to_order ', 1, 'Y');
286: END IF;
287:
288: -- initialize OM record types
281: AND quote_line_id IS NULL;
282:
283: BEGIN
284: IF aso_debug_pub.g_debug_flag = 'Y' THEN
285: aso_debug_pub.add('beginning of map_quote_to_order ', 1, 'Y');
286: END IF;
287:
288: -- initialize OM record types
289:
291: px_header_rec => l_header_rec,
292: px_line_tbl => l_line_tbl,
293: p_line_tbl_count => p_line_shipment_tbl.count
294: );
295: IF aso_debug_pub.g_debug_flag = 'Y' THEN
296: aso_debug_pub.add('initialized OM rec types ', 1, 'N');
297: END IF;
298:
299: l_header_rec.accounting_rule_id := p_qte_rec.accounting_rule_id;
292: px_line_tbl => l_line_tbl,
293: p_line_tbl_count => p_line_shipment_tbl.count
294: );
295: IF aso_debug_pub.g_debug_flag = 'Y' THEN
296: aso_debug_pub.add('initialized OM rec types ', 1, 'N');
297: END IF;
298:
299: l_header_rec.accounting_rule_id := p_qte_rec.accounting_rule_id;
300: l_header_rec.agreement_id:= p_qte_rec.contract_id;
338: l_header_rec.Contract_Template_Id := p_qte_rec.Contract_Template_ID;
339: l_header_rec.Contract_Source_Doc_Type_Code := 'QUOTE';
340: l_header_rec.Contract_Source_Document_Id := p_qte_rec.quote_header_id;
341:
342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
339: l_header_rec.Contract_Source_Doc_Type_Code := 'QUOTE';
340: l_header_rec.Contract_Source_Document_Id := p_qte_rec.quote_header_id;
341:
342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
340: l_header_rec.Contract_Source_Document_Id := p_qte_rec.quote_header_id;
341:
342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
341:
342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
349: aso_debug_pub.add('Contract_Source_Document_Id: '||l_header_rec.Contract_Source_Document_Id, 1, 'Y');
342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
349: aso_debug_pub.add('Contract_Source_Document_Id: '||l_header_rec.Contract_Source_Document_Id, 1, 'Y');
350: END IF;
343: aso_debug_pub.add('Customer_Signature: '||l_header_rec.Customer_Signature,1,'Y');
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
349: aso_debug_pub.add('Contract_Source_Document_Id: '||l_header_rec.Contract_Source_Document_Id, 1, 'Y');
350: END IF;
351:
344: aso_debug_pub.add('Customer_Signature_date: '||l_header_rec.Customer_Signature_date, 1, 'Y');
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
349: aso_debug_pub.add('Contract_Source_Document_Id: '||l_header_rec.Contract_Source_Document_Id, 1, 'Y');
350: END IF;
351:
352: -- end of hyang new okc
345: aso_debug_pub.add('Supplier_Signature: '||l_header_rec.Supplier_Signature, 1, 'Y');
346: aso_debug_pub.add('Supplier_Signature_date: '||l_header_rec.Supplier_Signature_date, 1, 'Y');
347: aso_debug_pub.add('Contract_Template_Id: '||l_header_rec.Contract_Template_Id, 1, 'Y');
348: aso_debug_pub.add('Contract_Source_Doc_Type_Code: '||l_header_rec.Contract_Source_Doc_Type_Code, 1, 'Y');
349: aso_debug_pub.add('Contract_Source_Document_Id: '||l_header_rec.Contract_Source_Document_Id, 1, 'Y');
350: END IF;
351:
352: -- end of hyang new okc
353:
356:
357: l_header_rec.conversion_rate_date := p_qte_rec.exchange_rate_date ;
358: l_header_rec.conversion_type_code := p_qte_rec.exchange_type_code ;
359:
360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
361: aso_debug_pub.add('before functional currency'||p_qte_rec.currency_code,1,'N');
362: aso_debug_pub.add('set of books id prof: '||l_set_of_books_id, 1, 'N');
363: aso_debug_pub.add('conversion type prof: '||l_conversion_type, 1, 'N');
364: END IF;
357: l_header_rec.conversion_rate_date := p_qte_rec.exchange_rate_date ;
358: l_header_rec.conversion_type_code := p_qte_rec.exchange_type_code ;
359:
360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
361: aso_debug_pub.add('before functional currency'||p_qte_rec.currency_code,1,'N');
362: aso_debug_pub.add('set of books id prof: '||l_set_of_books_id, 1, 'N');
363: aso_debug_pub.add('conversion type prof: '||l_conversion_type, 1, 'N');
364: END IF;
365:
358: l_header_rec.conversion_type_code := p_qte_rec.exchange_type_code ;
359:
360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
361: aso_debug_pub.add('before functional currency'||p_qte_rec.currency_code,1,'N');
362: aso_debug_pub.add('set of books id prof: '||l_set_of_books_id, 1, 'N');
363: aso_debug_pub.add('conversion type prof: '||l_conversion_type, 1, 'N');
364: END IF;
365:
366: -- vtariker: 3057860: overriding profile value if value is passed in hdr
359:
360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
361: aso_debug_pub.add('before functional currency'||p_qte_rec.currency_code,1,'N');
362: aso_debug_pub.add('set of books id prof: '||l_set_of_books_id, 1, 'N');
363: aso_debug_pub.add('conversion type prof: '||l_conversion_type, 1, 'N');
364: END IF;
365:
366: -- vtariker: 3057860: overriding profile value if value is passed in hdr
367: IF l_header_rec.conversion_type_code IS NOT NULL OR
424:
425: END IF; -- conversion
426: END IF; -- currency code not null
427:
428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
429: aso_debug_pub.add('l_header_rec.conversion_rate: '||l_header_rec.conversion_rate,1,'N');
430: aso_debug_pub.add('l_header_rec.conversion_rate_date: '||l_header_rec.conversion_rate_date,1,'N');
431: aso_debug_pub.add('l_header_rec.conversion_type_code: '||l_header_rec.conversion_type_code,1,'N');
432: aso_debug_pub.add('before customer account ', 1, 'Y' );
425: END IF; -- conversion
426: END IF; -- currency code not null
427:
428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
429: aso_debug_pub.add('l_header_rec.conversion_rate: '||l_header_rec.conversion_rate,1,'N');
430: aso_debug_pub.add('l_header_rec.conversion_rate_date: '||l_header_rec.conversion_rate_date,1,'N');
431: aso_debug_pub.add('l_header_rec.conversion_type_code: '||l_header_rec.conversion_type_code,1,'N');
432: aso_debug_pub.add('before customer account ', 1, 'Y' );
433: END IF;
426: END IF; -- currency code not null
427:
428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
429: aso_debug_pub.add('l_header_rec.conversion_rate: '||l_header_rec.conversion_rate,1,'N');
430: aso_debug_pub.add('l_header_rec.conversion_rate_date: '||l_header_rec.conversion_rate_date,1,'N');
431: aso_debug_pub.add('l_header_rec.conversion_type_code: '||l_header_rec.conversion_type_code,1,'N');
432: aso_debug_pub.add('before customer account ', 1, 'Y' );
433: END IF;
434:
427:
428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
429: aso_debug_pub.add('l_header_rec.conversion_rate: '||l_header_rec.conversion_rate,1,'N');
430: aso_debug_pub.add('l_header_rec.conversion_rate_date: '||l_header_rec.conversion_rate_date,1,'N');
431: aso_debug_pub.add('l_header_rec.conversion_type_code: '||l_header_rec.conversion_type_code,1,'N');
432: aso_debug_pub.add('before customer account ', 1, 'Y' );
433: END IF;
434:
435: IF p_qte_rec.cust_account_id is not NULL
428: IF aso_debug_pub.g_debug_flag = 'Y' THEN
429: aso_debug_pub.add('l_header_rec.conversion_rate: '||l_header_rec.conversion_rate,1,'N');
430: aso_debug_pub.add('l_header_rec.conversion_rate_date: '||l_header_rec.conversion_rate_date,1,'N');
431: aso_debug_pub.add('l_header_rec.conversion_type_code: '||l_header_rec.conversion_type_code,1,'N');
432: aso_debug_pub.add('before customer account ', 1, 'Y' );
433: END IF;
434:
435: IF p_qte_rec.cust_account_id is not NULL
436: AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN
435: IF p_qte_rec.cust_account_id is not NULL
436: AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN
437: l_header_rec.sold_to_org_id := p_qte_rec.cust_account_id;
438: l_cust_account_id := p_qte_rec.cust_account_id;
439: IF aso_debug_pub.g_debug_flag = 'Y' THEN
440: aso_debug_pub.add('validating cust account ' || l_cust_account_id || 'for party' || p_qte_rec.party_id, 1, 'N');
441: END IF;
442: ASO_PARTY_INT.Validate_CustAccount (
443: p_init_msg_list => FND_API.G_FALSE,
436: AND p_qte_rec.cust_account_id <> FND_API.G_MISS_NUM THEN
437: l_header_rec.sold_to_org_id := p_qte_rec.cust_account_id;
438: l_cust_account_id := p_qte_rec.cust_account_id;
439: IF aso_debug_pub.g_debug_flag = 'Y' THEN
440: aso_debug_pub.add('validating cust account ' || l_cust_account_id || 'for party' || p_qte_rec.party_id, 1, 'N');
441: END IF;
442: ASO_PARTY_INT.Validate_CustAccount (
443: p_init_msg_list => FND_API.G_FALSE,
444: p_party_id => p_qte_rec.party_id,
445: p_cust_account_id=> l_cust_account_id,
446: x_return_status => l_return_status,
447: x_msg_count => l_msg_count,
448: x_msg_data => l_msg_data);
449: IF aso_debug_pub.g_debug_flag = 'Y' THEN
450: aso_debug_pub.add(' done validating customer.return status = ' || l_return_status ,1, 'Y');
451: END IF;
452: IF l_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
453: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
446: x_return_status => l_return_status,
447: x_msg_count => l_msg_count,
448: x_msg_data => l_msg_data);
449: IF aso_debug_pub.g_debug_flag = 'Y' THEN
450: aso_debug_pub.add(' done validating customer.return status = ' || l_return_status ,1, 'Y');
451: END IF;
452: IF l_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
453: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
454: FND_MESSAGE.Set_Name('ASO', 'ASO_API_INVALID_ID');
460: ELSE
461: IF p_operation = 'CREATE' THEN
462: IF p_qte_rec.party_id is not NULL
463: AND p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
464: IF aso_debug_pub.g_debug_flag = 'Y' THEN
465: aso_debug_pub.add('deriving cust account id:p_qte_rec.party_id: '||p_qte_rec.party_id, 1, 'N');
466: END IF;
467: ASO_CHECK_TCA_PVT.Customer_Account(
468: p_api_version => 1.0,
461: IF p_operation = 'CREATE' THEN
462: IF p_qte_rec.party_id is not NULL
463: AND p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
464: IF aso_debug_pub.g_debug_flag = 'Y' THEN
465: aso_debug_pub.add('deriving cust account id:p_qte_rec.party_id: '||p_qte_rec.party_id, 1, 'N');
466: END IF;
467: ASO_CHECK_TCA_PVT.Customer_Account(
468: p_api_version => 1.0,
469: p_Party_Id => p_qte_rec.party_id,
481: FND_MSG_PUB.ADD;
482: END IF;
483: raise FND_API.G_EXC_ERROR;
484: END IF;
485: IF aso_debug_pub.g_debug_flag = 'Y' THEN
486: aso_debug_pub.add('Cust_Accnt_Id in'||l_cust_account_id, 1, 'N');
487: END IF;
488: -- update quote header if account is created
489: IF upper(p_qte_rec.quote_source_code) = 'ORDER CAPTURE QUOTES' THEN
482: END IF;
483: raise FND_API.G_EXC_ERROR;
484: END IF;
485: IF aso_debug_pub.g_debug_flag = 'Y' THEN
486: aso_debug_pub.add('Cust_Accnt_Id in'||l_cust_account_id, 1, 'N');
487: END IF;
488: -- update quote header if account is created
489: IF upper(p_qte_rec.quote_source_code) = 'ORDER CAPTURE QUOTES' THEN
490: UPDATE ASO_QUOTE_HEADERS_ALL
500: l_header_rec.sold_to_org_id := l_cust_account_id;
501: END IF;
502: END IF;
503: IF p_operation = 'UPDATE' THEN
504: IF aso_debug_pub.g_debug_flag = 'Y' THEN
505: aso_debug_pub.add('before query = ' || p_qte_rec.order_id , 1, 'Y');
506: END IF;
507: OPEN get_cust_account_id(p_qte_rec.order_id);
508: FETCH get_cust_account_id INTO l_header_rec.sold_to_org_id;
501: END IF;
502: END IF;
503: IF p_operation = 'UPDATE' THEN
504: IF aso_debug_pub.g_debug_flag = 'Y' THEN
505: aso_debug_pub.add('before query = ' || p_qte_rec.order_id , 1, 'Y');
506: END IF;
507: OPEN get_cust_account_id(p_qte_rec.order_id);
508: FETCH get_cust_account_id INTO l_header_rec.sold_to_org_id;
509: IF aso_debug_pub.g_debug_flag = 'Y' THEN
505: aso_debug_pub.add('before query = ' || p_qte_rec.order_id , 1, 'Y');
506: END IF;
507: OPEN get_cust_account_id(p_qte_rec.order_id);
508: FETCH get_cust_account_id INTO l_header_rec.sold_to_org_id;
509: IF aso_debug_pub.g_debug_flag = 'Y' THEN
510: aso_debug_pub.add('after query = ' || l_header_rec.sold_to_org_id, 1, 'Y');
511: END IF;
512: CLOSE get_cust_account_id;
513: IF l_header_rec.sold_to_org_id is NULL THEN
506: END IF;
507: OPEN get_cust_account_id(p_qte_rec.order_id);
508: FETCH get_cust_account_id INTO l_header_rec.sold_to_org_id;
509: IF aso_debug_pub.g_debug_flag = 'Y' THEN
510: aso_debug_pub.add('after query = ' || l_header_rec.sold_to_org_id, 1, 'Y');
511: END IF;
512: CLOSE get_cust_account_id;
513: IF l_header_rec.sold_to_org_id is NULL THEN
514: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
524:
525: IF p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
526: p_qte_rec.invoice_to_cust_account_id IS NOT NULL AND
527: p_qte_rec.invoice_to_cust_account_id <> l_cust_account_id THEN
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id, 1, 'N');
530: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_qte_rec.invoice_to_cust_account_id, 1, 'N');
531: END IF;
532: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
525: IF p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
526: p_qte_rec.invoice_to_cust_account_id IS NOT NULL AND
527: p_qte_rec.invoice_to_cust_account_id <> l_cust_account_id THEN
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id, 1, 'N');
530: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_qte_rec.invoice_to_cust_account_id, 1, 'N');
531: END IF;
532: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
533: p_api_version => 1.0,
526: p_qte_rec.invoice_to_cust_account_id IS NOT NULL AND
527: p_qte_rec.invoice_to_cust_account_id <> l_cust_account_id THEN
528: IF aso_debug_pub.g_debug_flag = 'Y' THEN
529: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id, 1, 'N');
530: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_qte_rec.invoice_to_cust_account_id, 1, 'N');
531: END IF;
532: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
533: p_api_version => 1.0,
534: p_sold_to_cust_account => l_cust_account_id,
537: x_return_status => l_return_status,
538: x_msg_count => l_msg_count,
539: x_msg_data => l_msg_data
540: );
541: IF aso_debug_pub.g_debug_flag = 'Y' THEN
542: aso_debug_pub.add('after cust_acct_reltn:l_return_status: '||l_return_status, 1, 'N');
543: END IF;
544: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
545: RAISE FND_API.G_EXC_ERROR;
538: x_msg_count => l_msg_count,
539: x_msg_data => l_msg_data
540: );
541: IF aso_debug_pub.g_debug_flag = 'Y' THEN
542: aso_debug_pub.add('after cust_acct_reltn:l_return_status: '||l_return_status, 1, 'N');
543: END IF;
544: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
545: RAISE FND_API.G_EXC_ERROR;
546: END IF;
546: END IF;
547:
548: END IF;
549:
550: IF aso_debug_pub.g_debug_flag = 'Y' THEN
551: aso_debug_pub.add('before org contact', 1, 'N');
552: aso_debug_pub.add('p_qte_rec.org_contact_id: ' || p_qte_rec.org_contact_id,1, 'N');
553: END IF;
554: IF p_qte_rec.party_id is not null and
547:
548: END IF;
549:
550: IF aso_debug_pub.g_debug_flag = 'Y' THEN
551: aso_debug_pub.add('before org contact', 1, 'N');
552: aso_debug_pub.add('p_qte_rec.org_contact_id: ' || p_qte_rec.org_contact_id,1, 'N');
553: END IF;
554: IF p_qte_rec.party_id is not null and
555: p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
548: END IF;
549:
550: IF aso_debug_pub.g_debug_flag = 'Y' THEN
551: aso_debug_pub.add('before org contact', 1, 'N');
552: aso_debug_pub.add('p_qte_rec.org_contact_id: ' || p_qte_rec.org_contact_id,1, 'N');
553: END IF;
554: IF p_qte_rec.party_id is not null and
555: p_qte_rec.party_id <> FND_API.G_MISS_NUM THEN
556:
562: ELSE
563: l_org_contact := p_qte_rec.org_contact_id;
564: END IF;
565:
566: IF aso_debug_pub.g_debug_flag = 'Y' THEN
567: aso_debug_pub.add('l_org_contact: ' || l_org_contact,1, 'N');
568: END IF;
569: IF l_org_contact is not NULL AND
570: l_org_contact <> FND_API.G_MISS_NUM THEN
563: l_org_contact := p_qte_rec.org_contact_id;
564: END IF;
565:
566: IF aso_debug_pub.g_debug_flag = 'Y' THEN
567: aso_debug_pub.add('l_org_contact: ' || l_org_contact,1, 'N');
568: END IF;
569: IF l_org_contact is not NULL AND
570: l_org_contact <> FND_API.G_MISS_NUM THEN
571: IF aso_debug_pub.g_debug_flag = 'Y' THEN
567: aso_debug_pub.add('l_org_contact: ' || l_org_contact,1, 'N');
568: END IF;
569: IF l_org_contact is not NULL AND
570: l_org_contact <> FND_API.G_MISS_NUM THEN
571: IF aso_debug_pub.g_debug_flag = 'Y' THEN
572: aso_debug_pub.add('deriving org_contact_role:l_header_rec.sold_to_org_id: ' || l_header_rec.sold_to_org_id,1, 'N');
573: END IF;
574: get_org_contact_role(
575: p_Org_Contact_Id => l_org_contact
568: END IF;
569: IF l_org_contact is not NULL AND
570: l_org_contact <> FND_API.G_MISS_NUM THEN
571: IF aso_debug_pub.g_debug_flag = 'Y' THEN
572: aso_debug_pub.add('deriving org_contact_role:l_header_rec.sold_to_org_id: ' || l_header_rec.sold_to_org_id,1, 'N');
573: END IF;
574: get_org_contact_role(
575: p_Org_Contact_Id => l_org_contact
576: ,p_Cust_account_id => l_header_rec.sold_to_org_id
577: ,x_return_status => l_return_status
578: ,x_party_id => l_org_contact_party_id
579: ,x_cust_account_role_id => l_header_rec.sold_to_contact_id
580: );
581: IF aso_debug_pub.g_debug_flag = 'Y' THEN
582: aso_debug_pub.add('after get org contact. sold_to_contact_id = ' || l_header_rec.sold_to_contact_id ,1, 'N');
583: END IF;
584: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
585: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
578: ,x_party_id => l_org_contact_party_id
579: ,x_cust_account_role_id => l_header_rec.sold_to_contact_id
580: );
581: IF aso_debug_pub.g_debug_flag = 'Y' THEN
582: aso_debug_pub.add('after get org contact. sold_to_contact_id = ' || l_header_rec.sold_to_contact_id ,1, 'N');
583: END IF;
584: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
585: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
586: THEN
591: END IF;
592:
593: IF l_header_rec.sold_to_contact_id is NULL OR
594: l_header_rec.sold_to_contact_id = FND_API.G_MISS_NUM THEN
595: IF aso_debug_pub.g_debug_flag = 'Y' THEN
596: aso_debug_pub.add('calling create contact role for org contact:l_org_contact_party_id: '||l_org_contact_party_id,1, 'N');
597: aso_debug_pub.add('calling create contact role for org contact:l_header_rec.sold_to_org_id: '||l_header_rec.sold_to_org_id,1, 'N');
598: END IF;
599: ASO_PARTY_INT.Create_Contact_Role (
592:
593: IF l_header_rec.sold_to_contact_id is NULL OR
594: l_header_rec.sold_to_contact_id = FND_API.G_MISS_NUM THEN
595: IF aso_debug_pub.g_debug_flag = 'Y' THEN
596: aso_debug_pub.add('calling create contact role for org contact:l_org_contact_party_id: '||l_org_contact_party_id,1, 'N');
597: aso_debug_pub.add('calling create contact role for org contact:l_header_rec.sold_to_org_id: '||l_header_rec.sold_to_org_id,1, 'N');
598: END IF;
599: ASO_PARTY_INT.Create_Contact_Role (
600: p_api_version => 1.0
593: IF l_header_rec.sold_to_contact_id is NULL OR
594: l_header_rec.sold_to_contact_id = FND_API.G_MISS_NUM THEN
595: IF aso_debug_pub.g_debug_flag = 'Y' THEN
596: aso_debug_pub.add('calling create contact role for org contact:l_org_contact_party_id: '||l_org_contact_party_id,1, 'N');
597: aso_debug_pub.add('calling create contact role for org contact:l_header_rec.sold_to_org_id: '||l_header_rec.sold_to_org_id,1, 'N');
598: END IF;
599: ASO_PARTY_INT.Create_Contact_Role (
600: p_api_version => 1.0
601: ,p_party_id =>l_org_contact_party_id
604: ,x_msg_count => l_msg_count
605: ,x_msg_data => l_msg_data
606: ,x_cust_account_role_id => l_header_rec.sold_to_contact_id
607: );
608: IF aso_debug_pub.g_debug_flag = 'Y' THEN
609: aso_debug_pub.add('after create contact role. sold_to_contact_id = ' || l_header_rec.sold_to_contact_id ,1, 'Y');
610: END IF;
611: IF L_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
612: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
605: ,x_msg_data => l_msg_data
606: ,x_cust_account_role_id => l_header_rec.sold_to_contact_id
607: );
608: IF aso_debug_pub.g_debug_flag = 'Y' THEN
609: aso_debug_pub.add('after create contact role. sold_to_contact_id = ' || l_header_rec.sold_to_contact_id ,1, 'Y');
610: END IF;
611: IF L_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
612: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
613: THEN
620: END IF;
621: END IF;
622: END IF;
623:
624: IF aso_debug_pub.g_debug_flag = 'Y' THEN
625: aso_debug_pub.add('invoice_to_cust_account = ' || p_qte_rec.invoice_to_cust_account_id,1,'N');
626: END IF;
627: IF p_qte_rec.invoice_to_cust_account_id is not NULL AND
628: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
621: END IF;
622: END IF;
623:
624: IF aso_debug_pub.g_debug_flag = 'Y' THEN
625: aso_debug_pub.add('invoice_to_cust_account = ' || p_qte_rec.invoice_to_cust_account_id,1,'N');
626: END IF;
627: IF p_qte_rec.invoice_to_cust_account_id is not NULL AND
628: p_qte_rec.invoice_to_cust_account_id <> FND_API.G_MISS_NUM THEN
629: l_invoice_cust_account_id := p_qte_rec.invoice_to_cust_account_id;
630: ELSE
631: l_invoice_cust_account_id := l_header_rec.sold_to_org_id;
632: END IF;
633:
634: IF aso_debug_pub.g_debug_flag = 'Y' THEN
635: aso_debug_pub.add('l_invoice_cust_acccount_id = ' || l_invoice_cust_account_id,1,'N' );
636: aso_debug_pub.add('before invoice to party site id '|| p_qte_rec.invoice_to_party_site_id, 1, 'Y');
637: END IF;
638: IF p_qte_rec.invoice_to_party_site_id is not NULL
631: l_invoice_cust_account_id := l_header_rec.sold_to_org_id;
632: END IF;
633:
634: IF aso_debug_pub.g_debug_flag = 'Y' THEN
635: aso_debug_pub.add('l_invoice_cust_acccount_id = ' || l_invoice_cust_account_id,1,'N' );
636: aso_debug_pub.add('before invoice to party site id '|| p_qte_rec.invoice_to_party_site_id, 1, 'Y');
637: END IF;
638: IF p_qte_rec.invoice_to_party_site_id is not NULL
639: AND p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
632: END IF;
633:
634: IF aso_debug_pub.g_debug_flag = 'Y' THEN
635: aso_debug_pub.add('l_invoice_cust_acccount_id = ' || l_invoice_cust_account_id,1,'N' );
636: aso_debug_pub.add('before invoice to party site id '|| p_qte_rec.invoice_to_party_site_id, 1, 'Y');
637: END IF;
638: IF p_qte_rec.invoice_to_party_site_id is not NULL
639: AND p_qte_rec.invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
640:
653:
654: IF l_header_rec.invoice_to_org_id IS NULL THEN
655: l_header_rec.invoice_to_org_id := FND_API.G_MISS_NUM;
656: END IF;
657: IF aso_debug_pub.g_debug_flag = 'Y' THEN
658: aso_debug_pub.add('site_use_id after deriving invoice = ' || l_header_rec.invoice_to_org_id,1,'Y');
659: aso_debug_pub.add('inv_acct_site after deriving invoice = ' || l_hd_inv_cust_acct_site,1,'Y');
660: END IF;
661: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
654: IF l_header_rec.invoice_to_org_id IS NULL THEN
655: l_header_rec.invoice_to_org_id := FND_API.G_MISS_NUM;
656: END IF;
657: IF aso_debug_pub.g_debug_flag = 'Y' THEN
658: aso_debug_pub.add('site_use_id after deriving invoice = ' || l_header_rec.invoice_to_org_id,1,'Y');
659: aso_debug_pub.add('inv_acct_site after deriving invoice = ' || l_hd_inv_cust_acct_site,1,'Y');
660: END IF;
661: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
662: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
655: l_header_rec.invoice_to_org_id := FND_API.G_MISS_NUM;
656: END IF;
657: IF aso_debug_pub.g_debug_flag = 'Y' THEN
658: aso_debug_pub.add('site_use_id after deriving invoice = ' || l_header_rec.invoice_to_org_id,1,'Y');
659: aso_debug_pub.add('inv_acct_site after deriving invoice = ' || l_hd_inv_cust_acct_site,1,'Y');
660: END IF;
661: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
662: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
663: THEN
668: END IF;
669:
670: END IF;
671:
672: IF aso_debug_pub.g_debug_flag = 'Y' THEN
673: aso_debug_pub.add(' invoice_to_party = ' || p_qte_rec.invoice_to_party_id,1, 'N' );
674: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.invoice_to_party_site_id,1, 'N' );
675: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_invoice_cust_acccount = ' ||l_invoice_cust_account_id ,1,'Y');
676: END IF;
669:
670: END IF;
671:
672: IF aso_debug_pub.g_debug_flag = 'Y' THEN
673: aso_debug_pub.add(' invoice_to_party = ' || p_qte_rec.invoice_to_party_id,1, 'N' );
674: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.invoice_to_party_site_id,1, 'N' );
675: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_invoice_cust_acccount = ' ||l_invoice_cust_account_id ,1,'Y');
676: END IF;
677:
670: END IF;
671:
672: IF aso_debug_pub.g_debug_flag = 'Y' THEN
673: aso_debug_pub.add(' invoice_to_party = ' || p_qte_rec.invoice_to_party_id,1, 'N' );
674: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.invoice_to_party_site_id,1, 'N' );
675: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_invoice_cust_acccount = ' ||l_invoice_cust_account_id ,1,'Y');
676: END IF;
677:
678: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
671:
672: IF aso_debug_pub.g_debug_flag = 'Y' THEN
673: aso_debug_pub.add(' invoice_to_party = ' || p_qte_rec.invoice_to_party_id,1, 'N' );
674: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.invoice_to_party_site_id,1, 'N' );
675: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_invoice_cust_acccount = ' ||l_invoice_cust_account_id ,1,'Y');
676: END IF;
677:
678: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
679: p_api_version => 1.0,
690: IF l_header_rec.invoice_to_contact_id IS NULL THEN
691: l_header_rec.invoice_to_contact_id := FND_API.G_MISS_NUM;
692: END IF;
693:
694: IF aso_debug_pub.g_debug_flag = 'Y' THEN
695: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.invoice_to_contact_id: '||l_header_rec.invoice_to_contact_id,1,'N');
696: END IF;
697:
698: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
691: l_header_rec.invoice_to_contact_id := FND_API.G_MISS_NUM;
692: END IF;
693:
694: IF aso_debug_pub.g_debug_flag = 'Y' THEN
695: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.invoice_to_contact_id: '||l_header_rec.invoice_to_contact_id,1,'N');
696: END IF;
697:
698: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
699: raise FND_API.G_EXC_ERROR;
699: raise FND_API.G_EXC_ERROR;
700: END IF;
701:
702: -- end_cust
703: IF aso_debug_pub.g_debug_flag = 'Y' THEN
704: aso_debug_pub.add('End_Customer_cust_account = ' || p_qte_rec.End_Customer_cust_account_id,1,'N');
705: END IF;
706: IF p_qte_rec.End_Customer_cust_account_id is not NULL AND
707: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
700: END IF;
701:
702: -- end_cust
703: IF aso_debug_pub.g_debug_flag = 'Y' THEN
704: aso_debug_pub.add('End_Customer_cust_account = ' || p_qte_rec.End_Customer_cust_account_id,1,'N');
705: END IF;
706: IF p_qte_rec.End_Customer_cust_account_id is not NULL AND
707: p_qte_rec.End_Customer_cust_account_id <> FND_API.G_MISS_NUM THEN
708: l_End_cust_account_id := p_qte_rec.End_Customer_cust_account_id;
709: ELSE
710: l_End_cust_account_id := l_header_rec.sold_to_org_id;
711: END IF;
712:
713: IF aso_debug_pub.g_debug_flag = 'Y' THEN
714: aso_debug_pub.add('l_End_cust_acccount_id = ' || l_End_cust_account_id,1,'N' );
715: aso_debug_pub.add('before End_Customer party site id '|| p_qte_rec.End_Customer_party_site_id, 1, 'Y');
716: END IF;
717: IF p_qte_rec.End_Customer_party_site_id is not NULL
710: l_End_cust_account_id := l_header_rec.sold_to_org_id;
711: END IF;
712:
713: IF aso_debug_pub.g_debug_flag = 'Y' THEN
714: aso_debug_pub.add('l_End_cust_acccount_id = ' || l_End_cust_account_id,1,'N' );
715: aso_debug_pub.add('before End_Customer party site id '|| p_qte_rec.End_Customer_party_site_id, 1, 'Y');
716: END IF;
717: IF p_qte_rec.End_Customer_party_site_id is not NULL
718: AND p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
711: END IF;
712:
713: IF aso_debug_pub.g_debug_flag = 'Y' THEN
714: aso_debug_pub.add('l_End_cust_acccount_id = ' || l_End_cust_account_id,1,'N' );
715: aso_debug_pub.add('before End_Customer party site id '|| p_qte_rec.End_Customer_party_site_id, 1, 'Y');
716: END IF;
717: IF p_qte_rec.End_Customer_party_site_id is not NULL
718: AND p_qte_rec.End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
719:
732:
733: IF l_header_rec.End_Customer_Site_Use_Id IS NULL THEN
734: l_header_rec.End_Customer_Site_Use_Id := FND_API.G_MISS_NUM;
735: END IF;
736: IF aso_debug_pub.g_debug_flag = 'Y' THEN
737: aso_debug_pub.add('site_use_id after deriving End_Customer = ' || l_header_rec.End_Customer_Site_Use_Id,1,'Y');
738: aso_debug_pub.add('inv_acct_site after deriving End_Customer = ' || l_hd_end_cust_acct_site,1,'Y');
739: END IF;
740: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
733: IF l_header_rec.End_Customer_Site_Use_Id IS NULL THEN
734: l_header_rec.End_Customer_Site_Use_Id := FND_API.G_MISS_NUM;
735: END IF;
736: IF aso_debug_pub.g_debug_flag = 'Y' THEN
737: aso_debug_pub.add('site_use_id after deriving End_Customer = ' || l_header_rec.End_Customer_Site_Use_Id,1,'Y');
738: aso_debug_pub.add('inv_acct_site after deriving End_Customer = ' || l_hd_end_cust_acct_site,1,'Y');
739: END IF;
740: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
734: l_header_rec.End_Customer_Site_Use_Id := FND_API.G_MISS_NUM;
735: END IF;
736: IF aso_debug_pub.g_debug_flag = 'Y' THEN
737: aso_debug_pub.add('site_use_id after deriving End_Customer = ' || l_header_rec.End_Customer_Site_Use_Id,1,'Y');
738: aso_debug_pub.add('inv_acct_site after deriving End_Customer = ' || l_hd_end_cust_acct_site,1,'Y');
739: END IF;
740: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
742: THEN
749: l_header_rec.End_Customer_id := l_End_cust_account_id;
750:
751: END IF;
752:
753: IF aso_debug_pub.g_debug_flag = 'Y' THEN
754: aso_debug_pub.add(' End_Customer_party = ' || p_qte_rec.End_Customer_party_id,1, 'N' );
755: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.End_Customer_party_site_id,1, 'N' );
756: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_End_cust_acccount = ' ||l_End_cust_account_id ,1,'Y');
757: END IF;
750:
751: END IF;
752:
753: IF aso_debug_pub.g_debug_flag = 'Y' THEN
754: aso_debug_pub.add(' End_Customer_party = ' || p_qte_rec.End_Customer_party_id,1, 'N' );
755: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.End_Customer_party_site_id,1, 'N' );
756: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_End_cust_acccount = ' ||l_End_cust_account_id ,1,'Y');
757: END IF;
758:
751: END IF;
752:
753: IF aso_debug_pub.g_debug_flag = 'Y' THEN
754: aso_debug_pub.add(' End_Customer_party = ' || p_qte_rec.End_Customer_party_id,1, 'N' );
755: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.End_Customer_party_site_id,1, 'N' );
756: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_End_cust_acccount = ' ||l_End_cust_account_id ,1,'Y');
757: END IF;
758:
759: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
752:
753: IF aso_debug_pub.g_debug_flag = 'Y' THEN
754: aso_debug_pub.add(' End_Customer_party = ' || p_qte_rec.End_Customer_party_id,1, 'N' );
755: aso_debug_pub.add(' invoice_to_party_Site = ' || p_qte_rec.End_Customer_party_site_id,1, 'N' );
756: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_End_cust_acccount = ' ||l_End_cust_account_id ,1,'Y');
757: END IF;
758:
759: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
760: p_api_version => 1.0,
771: IF l_header_rec.End_Customer_contact_id IS NULL THEN
772: l_header_rec.End_Customer_contact_id := FND_API.G_MISS_NUM;
773: END IF;
774:
775: IF aso_debug_pub.g_debug_flag = 'Y' THEN
776: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_contact_id: '||l_header_rec.End_Customer_contact_id,1,'N');
777: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_id: '||l_header_rec.End_Customer_id,1,'N');
778: END IF;
779:
772: l_header_rec.End_Customer_contact_id := FND_API.G_MISS_NUM;
773: END IF;
774:
775: IF aso_debug_pub.g_debug_flag = 'Y' THEN
776: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_contact_id: '||l_header_rec.End_Customer_contact_id,1,'N');
777: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_id: '||l_header_rec.End_Customer_id,1,'N');
778: END IF;
779:
780: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
773: END IF;
774:
775: IF aso_debug_pub.g_debug_flag = 'Y' THEN
776: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_contact_id: '||l_header_rec.End_Customer_contact_id,1,'N');
777: aso_debug_pub.add('mapq hd: after Cust_Acct_Contact_Addr:l_header_rec.End_Customer_id: '||l_header_rec.End_Customer_id,1,'N');
778: END IF;
779:
780: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
781: raise FND_API.G_EXC_ERROR;
782: END IF;
783:
784: -- end_cust
785:
786: IF aso_debug_pub.g_debug_flag = 'Y' THEN
787: aso_debug_pub.add('beginning of mapping for header shipping ', 1, 'N' );
788: END IF;
789:
790: IF p_header_shipment_tbl.count > 0 THEN
783:
784: -- end_cust
785:
786: IF aso_debug_pub.g_debug_flag = 'Y' THEN
787: aso_debug_pub.add('beginning of mapping for header shipping ', 1, 'N' );
788: END IF;
789:
790: IF p_header_shipment_tbl.count > 0 THEN
791: -- OM takes in only one shipment at the header level
792:
793: IF p_header_shipment_tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM AND
794: p_header_shipment_tbl(1).ship_to_cust_account_id IS NOT NULL AND
795: p_header_shipment_tbl(1).ship_to_cust_account_id <> l_cust_account_id THEN
796: IF aso_debug_pub.g_debug_flag = 'Y' THEN
797: aso_debug_pub.add('before cust_acct_relationship ', 1, 'N' );
798: END IF;
799: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
800: p_api_version => 1.0,
793: IF p_header_shipment_tbl(1).ship_to_cust_account_id <> FND_API.G_MISS_NUM AND
794: p_header_shipment_tbl(1).ship_to_cust_account_id IS NOT NULL AND
795: p_header_shipment_tbl(1).ship_to_cust_account_id <> l_cust_account_id THEN
796: IF aso_debug_pub.g_debug_flag = 'Y' THEN
797: aso_debug_pub.add('before cust_acct_relationship ', 1, 'N' );
798: END IF;
799: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
800: p_api_version => 1.0,
801: p_sold_to_cust_account => l_cust_account_id,
818: ELSE
819: l_ship_cust_account_id := l_header_rec.sold_to_org_id;
820: END IF;
821:
822: IF aso_debug_pub.g_debug_flag = 'Y' THEN
823: aso_debug_pub.add('ship cust acccount = ' || l_ship_cust_account_id ,1, 'N');
824: aso_debug_pub.add('ship to party site = ' || p_header_shipment_tbl(1).ship_to_party_site_id, 1, 'N');
825: END IF;
826: IF p_header_shipment_tbl(1).ship_to_party_site_id is not NULL
819: l_ship_cust_account_id := l_header_rec.sold_to_org_id;
820: END IF;
821:
822: IF aso_debug_pub.g_debug_flag = 'Y' THEN
823: aso_debug_pub.add('ship cust acccount = ' || l_ship_cust_account_id ,1, 'N');
824: aso_debug_pub.add('ship to party site = ' || p_header_shipment_tbl(1).ship_to_party_site_id, 1, 'N');
825: END IF;
826: IF p_header_shipment_tbl(1).ship_to_party_site_id is not NULL
827: AND p_header_shipment_tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM
820: END IF;
821:
822: IF aso_debug_pub.g_debug_flag = 'Y' THEN
823: aso_debug_pub.add('ship cust acccount = ' || l_ship_cust_account_id ,1, 'N');
824: aso_debug_pub.add('ship to party site = ' || p_header_shipment_tbl(1).ship_to_party_site_id, 1, 'N');
825: END IF;
826: IF p_header_shipment_tbl(1).ship_to_party_site_id is not NULL
827: AND p_header_shipment_tbl(1).ship_to_party_site_id <> FND_API.G_MISS_NUM
828: THEN
843: IF l_header_rec.ship_to_org_id IS NULL THEN
844: l_header_rec.ship_to_org_id := FND_API.G_MISS_NUM;
845: END IF;
846:
847: IF aso_debug_pub.g_debug_flag = 'Y' THEN
848: aso_debug_pub.add('ship to org after deriving = ' || l_header_rec.ship_to_org_id, 1, 'N');
849: aso_debug_pub.add('ship acct site after deriving = ' || l_hd_shp_cust_acct_site, 1, 'N');
850: END IF;
851: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
844: l_header_rec.ship_to_org_id := FND_API.G_MISS_NUM;
845: END IF;
846:
847: IF aso_debug_pub.g_debug_flag = 'Y' THEN
848: aso_debug_pub.add('ship to org after deriving = ' || l_header_rec.ship_to_org_id, 1, 'N');
849: aso_debug_pub.add('ship acct site after deriving = ' || l_hd_shp_cust_acct_site, 1, 'N');
850: END IF;
851: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
852: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
845: END IF;
846:
847: IF aso_debug_pub.g_debug_flag = 'Y' THEN
848: aso_debug_pub.add('ship to org after deriving = ' || l_header_rec.ship_to_org_id, 1, 'N');
849: aso_debug_pub.add('ship acct site after deriving = ' || l_hd_shp_cust_acct_site, 1, 'N');
850: END IF;
851: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
852: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
853: THEN
858: END IF;
859:
860: END IF;
861:
862: IF aso_debug_pub.g_debug_flag = 'Y' THEN
863: aso_debug_pub.add('beginning of map 2:ship_party_id: ' || p_header_shipment_tbl(1).ship_to_party_id,1,'N');
864: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
865: aso_debug_pub.add('before Cust_Acct_Contact_Addr:p_header_shipment_tbl(1).ship_to_party_site_id: '||p_header_shipment_tbl(1).ship_to_party_site_id,1,'N');
866: END IF;
859:
860: END IF;
861:
862: IF aso_debug_pub.g_debug_flag = 'Y' THEN
863: aso_debug_pub.add('beginning of map 2:ship_party_id: ' || p_header_shipment_tbl(1).ship_to_party_id,1,'N');
864: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
865: aso_debug_pub.add('before Cust_Acct_Contact_Addr:p_header_shipment_tbl(1).ship_to_party_site_id: '||p_header_shipment_tbl(1).ship_to_party_site_id,1,'N');
866: END IF;
867:
860: END IF;
861:
862: IF aso_debug_pub.g_debug_flag = 'Y' THEN
863: aso_debug_pub.add('beginning of map 2:ship_party_id: ' || p_header_shipment_tbl(1).ship_to_party_id,1,'N');
864: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
865: aso_debug_pub.add('before Cust_Acct_Contact_Addr:p_header_shipment_tbl(1).ship_to_party_site_id: '||p_header_shipment_tbl(1).ship_to_party_site_id,1,'N');
866: END IF;
867:
868: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
861:
862: IF aso_debug_pub.g_debug_flag = 'Y' THEN
863: aso_debug_pub.add('beginning of map 2:ship_party_id: ' || p_header_shipment_tbl(1).ship_to_party_id,1,'N');
864: aso_debug_pub.add('before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
865: aso_debug_pub.add('before Cust_Acct_Contact_Addr:p_header_shipment_tbl(1).ship_to_party_site_id: '||p_header_shipment_tbl(1).ship_to_party_site_id,1,'N');
866: END IF;
867:
868: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
869: p_api_version => 1.0,
880: IF l_header_rec.ship_to_contact_id IS NULL THEN
881: l_header_rec.ship_to_contact_id := FND_API.G_MISS_NUM;
882: END IF;
883:
884: IF aso_debug_pub.g_debug_flag = 'Y' THEN
885: aso_debug_pub.add('mapq hdr: after Cust_Acct_Contact_Addr:l_header_rec.ship_to_contact_id: '||l_header_rec.ship_to_contact_id,1,'N');
886: END IF;
887:
888: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
881: l_header_rec.ship_to_contact_id := FND_API.G_MISS_NUM;
882: END IF;
883:
884: IF aso_debug_pub.g_debug_flag = 'Y' THEN
885: aso_debug_pub.add('mapq hdr: after Cust_Acct_Contact_Addr:l_header_rec.ship_to_contact_id: '||l_header_rec.ship_to_contact_id,1,'N');
886: END IF;
887:
888: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
889: raise FND_API.G_EXC_ERROR;
889: raise FND_API.G_EXC_ERROR;
890: END IF;
891:
892: END IF; -- shipment tbl count
893: IF aso_debug_pub.g_debug_flag = 'Y' THEN
894: aso_debug_pub.add('after map 2 for header',1,'N');
895: END IF;
896:
897:
890: END IF;
891:
892: END IF; -- shipment tbl count
893: IF aso_debug_pub.g_debug_flag = 'Y' THEN
894: aso_debug_pub.add('after map 2 for header',1,'N');
895: END IF;
896:
897:
898: IF p_operation = 'CREATE' THEN
915:
916: -- if an employee person id is passed then it needs to be converted to a
917: -- salesrep id. no error is raised if the conversion is not possible
918:
919: IF aso_debug_pub.g_debug_flag = 'Y' THEN
920: aso_debug_pub.add('l_validate_salesrep_prof =' ||l_validate_salesrep_prof,1,'N');
921: aso_debug_pub.add('l_om_defaulting_prof =' ||l_om_defaulting_prof,1,'N');
922: aso_debug_pub.add('p_qte_rec.employee_person_id = '|| p_qte_rec.employee_person_id,1,'N');
923: aso_debug_pub.add('p_qte_rec.resource_id = ' || p_qte_rec.resource_id,1,'N');
916: -- if an employee person id is passed then it needs to be converted to a
917: -- salesrep id. no error is raised if the conversion is not possible
918:
919: IF aso_debug_pub.g_debug_flag = 'Y' THEN
920: aso_debug_pub.add('l_validate_salesrep_prof =' ||l_validate_salesrep_prof,1,'N');
921: aso_debug_pub.add('l_om_defaulting_prof =' ||l_om_defaulting_prof,1,'N');
922: aso_debug_pub.add('p_qte_rec.employee_person_id = '|| p_qte_rec.employee_person_id,1,'N');
923: aso_debug_pub.add('p_qte_rec.resource_id = ' || p_qte_rec.resource_id,1,'N');
924: END IF;
917: -- salesrep id. no error is raised if the conversion is not possible
918:
919: IF aso_debug_pub.g_debug_flag = 'Y' THEN
920: aso_debug_pub.add('l_validate_salesrep_prof =' ||l_validate_salesrep_prof,1,'N');
921: aso_debug_pub.add('l_om_defaulting_prof =' ||l_om_defaulting_prof,1,'N');
922: aso_debug_pub.add('p_qte_rec.employee_person_id = '|| p_qte_rec.employee_person_id,1,'N');
923: aso_debug_pub.add('p_qte_rec.resource_id = ' || p_qte_rec.resource_id,1,'N');
924: END IF;
925:
918:
919: IF aso_debug_pub.g_debug_flag = 'Y' THEN
920: aso_debug_pub.add('l_validate_salesrep_prof =' ||l_validate_salesrep_prof,1,'N');
921: aso_debug_pub.add('l_om_defaulting_prof =' ||l_om_defaulting_prof,1,'N');
922: aso_debug_pub.add('p_qte_rec.employee_person_id = '|| p_qte_rec.employee_person_id,1,'N');
923: aso_debug_pub.add('p_qte_rec.resource_id = ' || p_qte_rec.resource_id,1,'N');
924: END IF;
925:
926: IF (p_qte_rec.employee_person_id IS NOT NULL AND
919: IF aso_debug_pub.g_debug_flag = 'Y' THEN
920: aso_debug_pub.add('l_validate_salesrep_prof =' ||l_validate_salesrep_prof,1,'N');
921: aso_debug_pub.add('l_om_defaulting_prof =' ||l_om_defaulting_prof,1,'N');
922: aso_debug_pub.add('p_qte_rec.employee_person_id = '|| p_qte_rec.employee_person_id,1,'N');
923: aso_debug_pub.add('p_qte_rec.resource_id = ' || p_qte_rec.resource_id,1,'N');
924: END IF;
925:
926: IF (p_qte_rec.employee_person_id IS NOT NULL AND
927: p_qte_rec.employee_person_id <> FND_API.G_MISS_NUM) AND
941:
942: -- if the salesrep id is null and the validate flag is set to 'N' then
943: -- the sales rep id is defaulted. No warning is given if the salesrep is not
944: -- the same as the salesrep id
945: IF aso_debug_pub.g_debug_flag = 'Y' THEN
946: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
947: aso_debug_pub.add('default salesrep = '|| l_default_person_id_prof,1,'N');
948: aso_debug_pub.add('p_operation = '|| p_operation,1,'N');
949: END IF;
942: -- if the salesrep id is null and the validate flag is set to 'N' then
943: -- the sales rep id is defaulted. No warning is given if the salesrep is not
944: -- the same as the salesrep id
945: IF aso_debug_pub.g_debug_flag = 'Y' THEN
946: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
947: aso_debug_pub.add('default salesrep = '|| l_default_person_id_prof,1,'N');
948: aso_debug_pub.add('p_operation = '|| p_operation,1,'N');
949: END IF;
950:
943: -- the sales rep id is defaulted. No warning is given if the salesrep is not
944: -- the same as the salesrep id
945: IF aso_debug_pub.g_debug_flag = 'Y' THEN
946: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
947: aso_debug_pub.add('default salesrep = '|| l_default_person_id_prof,1,'N');
948: aso_debug_pub.add('p_operation = '|| p_operation,1,'N');
949: END IF;
950:
951: IF (l_header_rec.salesrep_id IS NULL OR
944: -- the same as the salesrep id
945: IF aso_debug_pub.g_debug_flag = 'Y' THEN
946: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
947: aso_debug_pub.add('default salesrep = '|| l_default_person_id_prof,1,'N');
948: aso_debug_pub.add('p_operation = '|| p_operation,1,'N');
949: END IF;
950:
951: IF (l_header_rec.salesrep_id IS NULL OR
952: l_header_rec.salesrep_id = FND_API.G_MISS_NUM) AND
977: END IF;
978: END IF;
979: END IF;
980:
981: IF aso_debug_pub.g_debug_flag = 'Y' THEN
982: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
983: END IF;
984:
985: -- if the salesrep is still null then an error is raised.
978: END IF;
979: END IF;
980:
981: IF aso_debug_pub.g_debug_flag = 'Y' THEN
982: aso_debug_pub.add('salesrep id =' ||l_header_rec.salesrep_id,1,'N');
983: END IF;
984:
985: -- if the salesrep is still null then an error is raised.
986:
1039: l_header_rec.orig_sys_document_ref := to_char(l_quote_number);
1040:
1041: END IF;
1042:
1043: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1044: aso_debug_pub.add('l_header_rec.orig_sys_document_ref: '||l_header_rec.orig_sys_document_ref,1,'N');
1045: END IF;
1046:
1047: END IF;
1040:
1041: END IF;
1042:
1043: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1044: aso_debug_pub.add('l_header_rec.orig_sys_document_ref: '||l_header_rec.orig_sys_document_ref,1,'N');
1045: END IF;
1046:
1047: END IF;
1048:
1050:
1051: END IF; -- p_qte_rec.original_system_reference
1052: ELSIF p_operation = 'UPDATE' THEN
1053: l_header_rec.orig_sys_document_ref := p_qte_rec.original_system_reference;
1054: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1055: aso_debug_pub.add('p_operation = UPDATE ** l_header_rec.orig_sys_document_ref: '||l_header_rec.orig_sys_document_ref,1,'N');
1056: END IF;
1057:
1058: END IF; -- CREATE
1051: END IF; -- p_qte_rec.original_system_reference
1052: ELSIF p_operation = 'UPDATE' THEN
1053: l_header_rec.orig_sys_document_ref := p_qte_rec.original_system_reference;
1054: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1055: aso_debug_pub.add('p_operation = UPDATE ** l_header_rec.orig_sys_document_ref: '||l_header_rec.orig_sys_document_ref,1,'N');
1056: END IF;
1057:
1058: END IF; -- CREATE
1059: -- default value if null
1084: END IF;
1085:
1086:
1087: -- source document type id will determine the source of the document
1088: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1089: aso_debug_pub.add('in here for quote source',1,'N');
1090: END IF;
1091: IF l_quote_source is not NULL AND
1092: l_quote_source <> FND_API.G_MISS_CHAR THEN
1085:
1086:
1087: -- source document type id will determine the source of the document
1088: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1089: aso_debug_pub.add('in here for quote source',1,'N');
1090: END IF;
1091: IF l_quote_source is not NULL AND
1092: l_quote_source <> FND_API.G_MISS_CHAR THEN
1093:
1097: null;
1098: END IF;
1099: CLOSE C_order_source;
1100: END IF;
1101: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1102: aso_debug_pub.add('in here after source code',1,'N');
1103: END IF;
1104: For i in 1..p_header_payment_tbl.count LOOP
1105:
1098: END IF;
1099: CLOSE C_order_source;
1100: END IF;
1101: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1102: aso_debug_pub.add('in here after source code',1,'N');
1103: END IF;
1104: For i in 1..p_header_payment_tbl.count LOOP
1105:
1106: IF (NVL(l_om_defaulting_prof, 'N') = 'Y') THEN
1116: -- Bug 7253077
1117:
1118: /* Commented for bug 11783589
1119: IF p_header_payment_tbl(i).payment_type_code <> 'PO' THEN
1120: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1121: aso_debug_pub.add('p_header_payment_tbl(i).payment_type_code: '||p_header_payment_tbl(i).payment_type_code,1,'N');
1122: END IF;
1123: l_header_rec.payment_type_code := p_header_payment_tbl(i).payment_type_code;
1124: END IF;*/
1117:
1118: /* Commented for bug 11783589
1119: IF p_header_payment_tbl(i).payment_type_code <> 'PO' THEN
1120: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1121: aso_debug_pub.add('p_header_payment_tbl(i).payment_type_code: '||p_header_payment_tbl(i).payment_type_code,1,'N');
1122: END IF;
1123: l_header_rec.payment_type_code := p_header_payment_tbl(i).payment_type_code;
1124: END IF;*/
1125: -- end bug 7253077
1123: l_header_rec.payment_type_code := p_header_payment_tbl(i).payment_type_code;
1124: END IF;*/
1125: -- end bug 7253077
1126:
1127: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1128: aso_debug_pub.add('p_header_payment_tbl(i).cust_po_number: '||p_header_payment_tbl(i).cust_po_number,1,'N');
1129: END IF;
1130:
1131: l_header_rec.cust_po_number := p_header_payment_tbl(i).cust_po_number;
1124: END IF;*/
1125: -- end bug 7253077
1126:
1127: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1128: aso_debug_pub.add('p_header_payment_tbl(i).cust_po_number: '||p_header_payment_tbl(i).cust_po_number,1,'N');
1129: END IF;
1130:
1131: l_header_rec.cust_po_number := p_header_payment_tbl(i).cust_po_number;
1132:
1129: END IF;
1130:
1131: l_header_rec.cust_po_number := p_header_payment_tbl(i).cust_po_number;
1132:
1133: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1134: aso_debug_pub.add('p_header_payment_tbl(i).payment_type_code: '||p_header_payment_tbl(i).payment_type_code,1,'N');
1135: END IF;
1136: IF p_header_payment_tbl(i).payment_type_code IS NOT NULL THEN
1137: l_header_payment_tbl(pay_count).payment_type_code := p_header_payment_tbl(i).payment_type_code;
1130:
1131: l_header_rec.cust_po_number := p_header_payment_tbl(i).cust_po_number;
1132:
1133: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1134: aso_debug_pub.add('p_header_payment_tbl(i).payment_type_code: '||p_header_payment_tbl(i).payment_type_code,1,'N');
1135: END IF;
1136: IF p_header_payment_tbl(i).payment_type_code IS NOT NULL THEN
1137: l_header_payment_tbl(pay_count).payment_type_code := p_header_payment_tbl(i).payment_type_code;
1138:
1147: l_header_payment_tbl(pay_count).trxn_extension_id := p_header_payment_tbl(i).trxn_extension_id;
1148: l_header_payment_tbl(pay_count).payment_collection_event := 'INVOICE';
1149: l_header_payment_tbl(pay_count).payment_level_code := 'ORDER';
1150:
1151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1152: aso_debug_pub.add('l_header_payment_tbl(pay_count).operation: '||l_header_payment_tbl(pay_count).operation,1,'N');
1153: aso_debug_pub.add('l_header_payment_tbl(pay_count).trxn_extension_id: '||l_header_payment_tbl(pay_count).trxn_extension_id,1,'N');
1154: END IF;
1155:
1148: l_header_payment_tbl(pay_count).payment_collection_event := 'INVOICE';
1149: l_header_payment_tbl(pay_count).payment_level_code := 'ORDER';
1150:
1151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1152: aso_debug_pub.add('l_header_payment_tbl(pay_count).operation: '||l_header_payment_tbl(pay_count).operation,1,'N');
1153: aso_debug_pub.add('l_header_payment_tbl(pay_count).trxn_extension_id: '||l_header_payment_tbl(pay_count).trxn_extension_id,1,'N');
1154: END IF;
1155:
1156: /* Start : code change done for Bug 9401669 */
1149: l_header_payment_tbl(pay_count).payment_level_code := 'ORDER';
1150:
1151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1152: aso_debug_pub.add('l_header_payment_tbl(pay_count).operation: '||l_header_payment_tbl(pay_count).operation,1,'N');
1153: aso_debug_pub.add('l_header_payment_tbl(pay_count).trxn_extension_id: '||l_header_payment_tbl(pay_count).trxn_extension_id,1,'N');
1154: END IF;
1155:
1156: /* Start : code change done for Bug 9401669 */
1157: If (l_header_payment_tbl(pay_count).trxn_extension_id Is Null Or
1159:
1160: l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID := p_header_payment_tbl(i).INSTR_ASSIGNMENT_ID;
1161: l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID := p_header_payment_tbl(i).INSTRUMENT_ID;
1162:
1163: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1164: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
1165: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
1166: End If;
1167: End If;
1160: l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID := p_header_payment_tbl(i).INSTR_ASSIGNMENT_ID;
1161: l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID := p_header_payment_tbl(i).INSTRUMENT_ID;
1162:
1163: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1164: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
1165: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
1166: End If;
1167: End If;
1168: /* End : code change done for Bug 9401669 */
1161: l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID := p_header_payment_tbl(i).INSTRUMENT_ID;
1162:
1163: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1164: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
1165: aso_debug_pub.add('Map_Quote_to_order : l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_header_payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
1166: End If;
1167: End If;
1168: /* End : code change done for Bug 9401669 */
1169:
1175:
1176: -- bug 5613870
1177: -- IF p_header_payment_tbl(i).payment_type_code = 'CREDIT_CARD' THEN -- Code Change done for Bug 14180257
1178: l_header_payment_tbl(pay_count).receipt_method_id := fnd_api.g_miss_num;
1179: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1180: aso_debug_pub.add('Passing receipt method id as g miss num' ,1,'N');
1181: END IF;
1182: -- END IF;
1183:
1176: -- bug 5613870
1177: -- IF p_header_payment_tbl(i).payment_type_code = 'CREDIT_CARD' THEN -- Code Change done for Bug 14180257
1178: l_header_payment_tbl(pay_count).receipt_method_id := fnd_api.g_miss_num;
1179: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1180: aso_debug_pub.add('Passing receipt method id as g miss num' ,1,'N');
1181: END IF;
1182: -- END IF;
1183:
1184: pay_count := pay_count + 1;
1184: pay_count := pay_count + 1;
1185:
1186: END LOOP;
1187:
1188: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1189: aso_debug_pub.add('mapped header payment tbl',1,'N');
1190: END IF;
1191:
1192:
1185:
1186: END LOOP;
1187:
1188: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1189: aso_debug_pub.add('mapped header payment tbl',1,'N');
1190: END IF;
1191:
1192:
1193: For i in 1..p_header_shipment_tbl.count LOOP
1190: END IF;
1191:
1192:
1193: For i in 1..p_header_shipment_tbl.count LOOP
1194: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1195: aso_debug_pub.add('mapped header shipment tbl:shipping_instructions: '|| p_header_shipment_tbl(i).shipping_instructions||'trimmed',1,'N');
1196: END IF;
1197: --bug 1921958
1198: IF (p_header_shipment_tbl(i).shipping_instructions IS NULL) AND
1191:
1192:
1193: For i in 1..p_header_shipment_tbl.count LOOP
1194: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1195: aso_debug_pub.add('mapped header shipment tbl:shipping_instructions: '|| p_header_shipment_tbl(i).shipping_instructions||'trimmed',1,'N');
1196: END IF;
1197: --bug 1921958
1198: IF (p_header_shipment_tbl(i).shipping_instructions IS NULL) AND
1199: (l_om_defaulting_prof = 'Y') THEN
1212: l_header_rec.packing_instructions
1213: :=rtrim(p_header_shipment_tbl(i).packing_instructions);
1214: END IF;
1215: --bug 1921958
1216: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1217: aso_debug_pub.add('mapped header shipment tbl:shipping_instructions: '|| l_header_rec.shipping_instructions||'trimmed',1,'N');
1218: aso_debug_pub.add('mapped header shipment tbl:packing_instructions: '|| l_header_rec.packing_instructions||'trimmed',1,'N');
1219: END IF;
1220:
1213: :=rtrim(p_header_shipment_tbl(i).packing_instructions);
1214: END IF;
1215: --bug 1921958
1216: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1217: aso_debug_pub.add('mapped header shipment tbl:shipping_instructions: '|| l_header_rec.shipping_instructions||'trimmed',1,'N');
1218: aso_debug_pub.add('mapped header shipment tbl:packing_instructions: '|| l_header_rec.packing_instructions||'trimmed',1,'N');
1219: END IF;
1220:
1221: IF (NVL(l_om_defaulting_prof, 'N') = 'Y') THEN
1214: END IF;
1215: --bug 1921958
1216: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1217: aso_debug_pub.add('mapped header shipment tbl:shipping_instructions: '|| l_header_rec.shipping_instructions||'trimmed',1,'N');
1218: aso_debug_pub.add('mapped header shipment tbl:packing_instructions: '|| l_header_rec.packing_instructions||'trimmed',1,'N');
1219: END IF;
1220:
1221: IF (NVL(l_om_defaulting_prof, 'N') = 'Y') THEN
1222: IF p_header_shipment_tbl(i).FOB_CODE is null then
1259:
1260: l_header_rec.partial_shipments_allowed
1261: :=p_header_shipment_tbl(i).ship_partial_flag;
1262:
1263: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1264: aso_debug_pub.add('request date= ' ||l_header_rec.request_date,1,'N');
1265: aso_debug_pub.add('Map_Qte_To_Ord: p_header_shipment_tbl(i).Ship_From_Org_Id: '||p_header_shipment_tbl(i).Ship_From_Org_Id,1,'Y');
1266: END IF;
1267: IF p_header_shipment_tbl(i).Ship_From_Org_Id IS NOT NULL AND
1260: l_header_rec.partial_shipments_allowed
1261: :=p_header_shipment_tbl(i).ship_partial_flag;
1262:
1263: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1264: aso_debug_pub.add('request date= ' ||l_header_rec.request_date,1,'N');
1265: aso_debug_pub.add('Map_Qte_To_Ord: p_header_shipment_tbl(i).Ship_From_Org_Id: '||p_header_shipment_tbl(i).Ship_From_Org_Id,1,'Y');
1266: END IF;
1267: IF p_header_shipment_tbl(i).Ship_From_Org_Id IS NOT NULL AND
1268: p_header_shipment_tbl(i).Ship_From_Org_Id <> FND_API.G_MISS_NUM THEN
1261: :=p_header_shipment_tbl(i).ship_partial_flag;
1262:
1263: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1264: aso_debug_pub.add('request date= ' ||l_header_rec.request_date,1,'N');
1265: aso_debug_pub.add('Map_Qte_To_Ord: p_header_shipment_tbl(i).Ship_From_Org_Id: '||p_header_shipment_tbl(i).Ship_From_Org_Id,1,'Y');
1266: END IF;
1267: IF p_header_shipment_tbl(i).Ship_From_Org_Id IS NOT NULL AND
1268: p_header_shipment_tbl(i).Ship_From_Org_Id <> FND_API.G_MISS_NUM THEN
1269:
1291:
1292: END LOOP;
1293:
1294: -- reserve quantity
1295: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1296: aso_debug_pub.add('MapQ: l_reservation_lvl_prof: '||l_reservation_lvl_prof,1,'N');
1297: END IF;
1298:
1299: IF (l_header_rec.order_type_id is not null AND
1292: END LOOP;
1293:
1294: -- reserve quantity
1295: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1296: aso_debug_pub.add('MapQ: l_reservation_lvl_prof: '||l_reservation_lvl_prof,1,'N');
1297: END IF;
1298:
1299: IF (l_header_rec.order_type_id is not null AND
1300: l_header_rec.order_type_id <> FND_API.G_MISS_NUM) AND
1301: l_reservation_lvl_prof = 'AUTO_ORDER' THEN
1302: OPEN scheduling_level_cur(l_header_rec.order_type_id);
1303: FETCH scheduling_level_cur INTO l_order_scheduling_level;
1304: CLOSE scheduling_level_cur;
1305: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1306: aso_debug_pub.add('l_header_rec.order_type_id = ' ||
1307: l_header_rec.order_type_id, 1,'N');
1308: END IF;
1309: END IF;
1302: OPEN scheduling_level_cur(l_header_rec.order_type_id);
1303: FETCH scheduling_level_cur INTO l_order_scheduling_level;
1304: CLOSE scheduling_level_cur;
1305: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1306: aso_debug_pub.add('l_header_rec.order_type_id = ' ||
1307: l_header_rec.order_type_id, 1,'N');
1308: END IF;
1309: END IF;
1310:
1307: l_header_rec.order_type_id, 1,'N');
1308: END IF;
1309: END IF;
1310:
1311: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1312: aso_debug_pub.add('after mapping header tax detail ',1,'Y');
1313: END IF;
1314:
1315: map_header_price_attr(
1308: END IF;
1309: END IF;
1310:
1311: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1312: aso_debug_pub.add('after mapping header tax detail ',1,'Y');
1313: END IF;
1314:
1315: map_header_price_attr(
1316: p_header_price_attributes_tbl => p_header_price_attributes_tbl,
1317: p_qte_rec => p_qte_rec,
1318: p_operation => l_header_rec.operation,
1319: x_Header_price_Att_tbl => l_header_price_att_tbl
1320: );
1321: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1322: aso_debug_pub.add('after mapping header price attr:l_header_price_att_tbl.count: '||l_header_price_att_tbl.count,1,'N');
1323: END IF;
1324:
1325: map_header_price_adj(
1318: p_operation => l_header_rec.operation,
1319: x_Header_price_Att_tbl => l_header_price_att_tbl
1320: );
1321: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1322: aso_debug_pub.add('after mapping header price attr:l_header_price_att_tbl.count: '||l_header_price_att_tbl.count,1,'N');
1323: END IF;
1324:
1325: map_header_price_adj(
1326: p_header_price_adj_tbl => p_header_price_adj_tbl,
1328: p_operation => l_header_rec.operation,
1329: x_Header_adj_tbl => l_header_adj_tbl
1330: );
1331:
1332: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1333: aso_debug_pub.add('after header price adjustments:l_header_adj_tbl.count: '||l_header_adj_tbl.count,1,'N');
1334: END IF;
1335:
1336: map_header_price_adj_attr(
1329: x_Header_adj_tbl => l_header_adj_tbl
1330: );
1331:
1332: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1333: aso_debug_pub.add('after header price adjustments:l_header_adj_tbl.count: '||l_header_adj_tbl.count,1,'N');
1334: END IF;
1335:
1336: map_header_price_adj_attr(
1337: p_header_price_adj_attr_tbl => p_header_price_adj_attr_tbl,
1338: p_operation => l_header_rec.operation,
1339: x_header_adj_att_tbl => l_header_adj_att_tbl
1340: );
1341:
1342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1343: aso_debug_pub.add('after header price adj attribute:l_header_adj_att_tbl.count: '||l_header_adj_att_tbl.count,1,'N');
1344: END IF;
1345:
1346: map_header_price_adj_rltn(
1339: x_header_adj_att_tbl => l_header_adj_att_tbl
1340: );
1341:
1342: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1343: aso_debug_pub.add('after header price adj attribute:l_header_adj_att_tbl.count: '||l_header_adj_att_tbl.count,1,'N');
1344: END IF;
1345:
1346: map_header_price_adj_rltn(
1347: P_Header_Price_Adj_rltship_Tbl => P_Header_Price_Adj_rltship_Tbl,
1348: P_operation => l_header_rec.operation,
1349: x_Header_Adj_Assoc_tbl => l_Header_Adj_Assoc_tbl
1350: );
1351:
1352: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1353: aso_debug_pub.add('before header sales credit:l_Header_Adj_Assoc_tbl.count: '||l_Header_Adj_Assoc_tbl.count,1,'N');
1354: END IF;
1355:
1356: map_header_sales_credits(
1349: x_Header_Adj_Assoc_tbl => l_Header_Adj_Assoc_tbl
1350: );
1351:
1352: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1353: aso_debug_pub.add('before header sales credit:l_Header_Adj_Assoc_tbl.count: '||l_Header_Adj_Assoc_tbl.count,1,'N');
1354: END IF;
1355:
1356: map_header_sales_credits(
1357: P_header_sales_credit_Tbl => P_header_sales_credit_Tbl,
1359: p_qte_rec => p_qte_rec,
1360: p_header_operation => l_header_rec.operation,
1361: x_Header_Scredit_tbl => l_Header_Scredit_tbl
1362: );
1363: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1364: aso_debug_pub.add('after header sales credit:l_Header_Scredit_tbl.count: '||l_Header_Scredit_tbl.count,1,'N');
1365: END IF;
1366:
1367: -- mapping quote lines to order lines
1360: p_header_operation => l_header_rec.operation,
1361: x_Header_Scredit_tbl => l_Header_Scredit_tbl
1362: );
1363: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1364: aso_debug_pub.add('after header sales credit:l_Header_Scredit_tbl.count: '||l_Header_Scredit_tbl.count,1,'N');
1365: END IF;
1366:
1367: -- mapping quote lines to order lines
1368: -- mapping is done based on the index and not on the line id for quotes
1370:
1371: -- initializing all counts for lines
1372: i := 1;
1373: j := 1;
1374: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1375: aso_debug_pub.add('mapping quote lines',1,'N');
1376: END IF;
1377: FOR j in 1..P_line_Shipment_Tbl.count LOOP
1378: found := FND_API.G_FALSE;
1371: -- initializing all counts for lines
1372: i := 1;
1373: j := 1;
1374: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1375: aso_debug_pub.add('mapping quote lines',1,'N');
1376: END IF;
1377: FOR j in 1..P_line_Shipment_Tbl.count LOOP
1378: found := FND_API.G_FALSE;
1379: FOR k in 1..p_qte_line_tbl.count LOOP
1384:
1385: -- check if the line is satisfied by fulfillment (not required any more 02/09
1386:
1387: -- EDU
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Commitment_Id: '||p_qte_line_tbl(k).Commitment_Id, 1, 'N');
1390: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Agreement_Id: '||p_qte_line_tbl(k).Agreement_Id,1, 'N');
1391: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).minisite_id: '||p_qte_line_tbl(k).minisite_id,1, 'N');
1392: aso_debug_pub.add('map_quote_to_order- p_qte_rec.minisite_id: '||p_qte_rec.minisite_id,1, 'N');
1385: -- check if the line is satisfied by fulfillment (not required any more 02/09
1386:
1387: -- EDU
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Commitment_Id: '||p_qte_line_tbl(k).Commitment_Id, 1, 'N');
1390: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Agreement_Id: '||p_qte_line_tbl(k).Agreement_Id,1, 'N');
1391: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).minisite_id: '||p_qte_line_tbl(k).minisite_id,1, 'N');
1392: aso_debug_pub.add('map_quote_to_order- p_qte_rec.minisite_id: '||p_qte_rec.minisite_id,1, 'N');
1393: END IF;
1386:
1387: -- EDU
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Commitment_Id: '||p_qte_line_tbl(k).Commitment_Id, 1, 'N');
1390: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Agreement_Id: '||p_qte_line_tbl(k).Agreement_Id,1, 'N');
1391: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).minisite_id: '||p_qte_line_tbl(k).minisite_id,1, 'N');
1392: aso_debug_pub.add('map_quote_to_order- p_qte_rec.minisite_id: '||p_qte_rec.minisite_id,1, 'N');
1393: END IF;
1394: IF p_qte_line_tbl(k).Commitment_Id IS NOT NULL AND
1387: -- EDU
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Commitment_Id: '||p_qte_line_tbl(k).Commitment_Id, 1, 'N');
1390: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Agreement_Id: '||p_qte_line_tbl(k).Agreement_Id,1, 'N');
1391: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).minisite_id: '||p_qte_line_tbl(k).minisite_id,1, 'N');
1392: aso_debug_pub.add('map_quote_to_order- p_qte_rec.minisite_id: '||p_qte_rec.minisite_id,1, 'N');
1393: END IF;
1394: IF p_qte_line_tbl(k).Commitment_Id IS NOT NULL AND
1395: p_qte_line_tbl(k).Commitment_Id <> FND_API.G_MISS_NUM THEN
1388: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1389: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Commitment_Id: '||p_qte_line_tbl(k).Commitment_Id, 1, 'N');
1390: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).Agreement_Id: '||p_qte_line_tbl(k).Agreement_Id,1, 'N');
1391: aso_debug_pub.add('map_quote_to_order- p_qte_line_tbl(k).minisite_id: '||p_qte_line_tbl(k).minisite_id,1, 'N');
1392: aso_debug_pub.add('map_quote_to_order- p_qte_rec.minisite_id: '||p_qte_rec.minisite_id,1, 'N');
1393: END IF;
1394: IF p_qte_line_tbl(k).Commitment_Id IS NOT NULL AND
1395: p_qte_line_tbl(k).Commitment_Id <> FND_API.G_MISS_NUM THEN
1396: l_line_tbl(i).Commitment_Id := p_qte_line_tbl(k).Commitment_Id;
1464:
1465: l_line_tbl(i).task_id := p_qte_line_tbl(k).task_id;
1466: END IF;
1467:
1468: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1469: aso_debug_pub.add('mapq line: l_line_tbl(i).project_id :'||p_qte_line_tbl(k).project_id,1,'N');
1470: aso_debug_pub.add('mapq line: l_line_tbl(i).task_id :'||p_qte_line_tbl(k).task_id,1,'N');
1471: END IF;
1472:
1465: l_line_tbl(i).task_id := p_qte_line_tbl(k).task_id;
1466: END IF;
1467:
1468: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1469: aso_debug_pub.add('mapq line: l_line_tbl(i).project_id :'||p_qte_line_tbl(k).project_id,1,'N');
1470: aso_debug_pub.add('mapq line: l_line_tbl(i).task_id :'||p_qte_line_tbl(k).task_id,1,'N');
1471: END IF;
1472:
1473: IF p_qte_line_tbl(k).invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
1466: END IF;
1467:
1468: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1469: aso_debug_pub.add('mapq line: l_line_tbl(i).project_id :'||p_qte_line_tbl(k).project_id,1,'N');
1470: aso_debug_pub.add('mapq line: l_line_tbl(i).task_id :'||p_qte_line_tbl(k).task_id,1,'N');
1471: END IF;
1472:
1473: IF p_qte_line_tbl(k).invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
1474: p_qte_line_tbl(k).invoice_to_cust_account_id IS NOT NULL AND
1472:
1473: IF p_qte_line_tbl(k).invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
1474: p_qte_line_tbl(k).invoice_to_cust_account_id IS NOT NULL AND
1475: p_qte_line_tbl(k).invoice_to_cust_account_id <> l_cust_account_id THEN
1476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1477: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
1478: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_related_cust_account: '||p_qte_line_tbl(k).invoice_to_cust_account_id,1,'N');
1479: END IF;
1480: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
1473: IF p_qte_line_tbl(k).invoice_to_cust_account_id <> FND_API.G_MISS_NUM AND
1474: p_qte_line_tbl(k).invoice_to_cust_account_id IS NOT NULL AND
1475: p_qte_line_tbl(k).invoice_to_cust_account_id <> l_cust_account_id THEN
1476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1477: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
1478: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_related_cust_account: '||p_qte_line_tbl(k).invoice_to_cust_account_id,1,'N');
1479: END IF;
1480: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
1481: p_api_version => 1.0,
1474: p_qte_line_tbl(k).invoice_to_cust_account_id IS NOT NULL AND
1475: p_qte_line_tbl(k).invoice_to_cust_account_id <> l_cust_account_id THEN
1476: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1477: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
1478: aso_debug_pub.add('mapq line: before cust_acct_reltn:p_related_cust_account: '||p_qte_line_tbl(k).invoice_to_cust_account_id,1,'N');
1479: END IF;
1480: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
1481: p_api_version => 1.0,
1482: p_sold_to_cust_account => l_cust_account_id,
1486: x_msg_count => l_msg_count,
1487: x_msg_data => l_msg_data
1488: );
1489:
1490: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1491: aso_debug_pub.add('mapq line: after cust_acct_reltn:l_return_status: '||l_return_status,1,'N');
1492: END IF;
1493: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1494: RAISE FND_API.G_EXC_ERROR;
1487: x_msg_data => l_msg_data
1488: );
1489:
1490: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1491: aso_debug_pub.add('mapq line: after cust_acct_reltn:l_return_status: '||l_return_status,1,'N');
1492: END IF;
1493: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1494: RAISE FND_API.G_EXC_ERROR;
1495: END IF;
1502: ELSE
1503: l_invoice_cust_account_id := l_header_rec.sold_to_org_id;
1504: END IF;
1505:
1506: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1507: aso_debug_pub.add('mapq line: before cust_acct_site:l_invoice_cust_account_id: '||l_invoice_cust_account_id,1,'N');
1508: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).invoice_to_party_site_id: '||p_qte_line_tbl(k).invoice_to_party_site_id,1,'N');
1509: END IF;
1510: IF p_qte_line_tbl(k).invoice_to_party_site_id is not NULL
1503: l_invoice_cust_account_id := l_header_rec.sold_to_org_id;
1504: END IF;
1505:
1506: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1507: aso_debug_pub.add('mapq line: before cust_acct_site:l_invoice_cust_account_id: '||l_invoice_cust_account_id,1,'N');
1508: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).invoice_to_party_site_id: '||p_qte_line_tbl(k).invoice_to_party_site_id,1,'N');
1509: END IF;
1510: IF p_qte_line_tbl(k).invoice_to_party_site_id is not NULL
1511: AND p_qte_line_tbl(k).invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1504: END IF;
1505:
1506: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1507: aso_debug_pub.add('mapq line: before cust_acct_site:l_invoice_cust_account_id: '||l_invoice_cust_account_id,1,'N');
1508: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).invoice_to_party_site_id: '||p_qte_line_tbl(k).invoice_to_party_site_id,1,'N');
1509: END IF;
1510: IF p_qte_line_tbl(k).invoice_to_party_site_id is not NULL
1511: AND p_qte_line_tbl(k).invoice_to_party_site_id <> FND_API.G_MISS_NUM THEN
1512:
1526: IF l_line_tbl(i).invoice_to_org_id IS NULL THEN
1527: l_line_tbl(i).invoice_to_org_id := FND_API.G_MISS_NUM;
1528: END IF;
1529:
1530: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1531: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).invoice_to_org_id: '||l_line_tbl(i).invoice_to_org_id,1,'N');
1532: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_inv_cust_acct_site: '||l_ln_inv_cust_acct_site,1,'N');
1533: END IF;
1534: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1527: l_line_tbl(i).invoice_to_org_id := FND_API.G_MISS_NUM;
1528: END IF;
1529:
1530: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1531: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).invoice_to_org_id: '||l_line_tbl(i).invoice_to_org_id,1,'N');
1532: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_inv_cust_acct_site: '||l_ln_inv_cust_acct_site,1,'N');
1533: END IF;
1534: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1535: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1528: END IF;
1529:
1530: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1531: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).invoice_to_org_id: '||l_line_tbl(i).invoice_to_org_id,1,'N');
1532: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_inv_cust_acct_site: '||l_ln_inv_cust_acct_site,1,'N');
1533: END IF;
1534: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1535: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1536: THEN
1541: END IF;
1542:
1543: END IF;
1544:
1545: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1546: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_invoice_cust_account_id: '||l_invoice_cust_account_id,1,'N');
1547: END IF;
1548:
1549: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
1542:
1543: END IF;
1544:
1545: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1546: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_invoice_cust_account_id: '||l_invoice_cust_account_id,1,'N');
1547: END IF;
1548:
1549: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
1550: p_api_version => 1.0,
1561: IF l_line_tbl(i).invoice_to_contact_id IS NULL THEN
1562: l_line_tbl(i).invoice_to_contact_id := FND_API.G_MISS_NUM;
1563: END IF;
1564:
1565: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1566: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).invoice_to_contact_id: '||l_line_tbl(i).invoice_to_contact_id,1,'N');
1567: END IF;
1568:
1569: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1562: l_line_tbl(i).invoice_to_contact_id := FND_API.G_MISS_NUM;
1563: END IF;
1564:
1565: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1566: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).invoice_to_contact_id: '||l_line_tbl(i).invoice_to_contact_id,1,'N');
1567: END IF;
1568:
1569: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1570: raise FND_API.G_EXC_ERROR;
1577: ELSE
1578: l_End_cust_account_id := l_header_rec.sold_to_org_id;
1579: END IF;
1580:
1581: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1582: aso_debug_pub.add('mapq line: before cust_acct_site:l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1583: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).End_Customer_party_site_id: '||p_qte_line_tbl(k).End_Customer_party_site_id,1,'N');
1584: END IF;
1585: IF p_qte_line_tbl(k).End_Customer_party_site_id is not NULL
1578: l_End_cust_account_id := l_header_rec.sold_to_org_id;
1579: END IF;
1580:
1581: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1582: aso_debug_pub.add('mapq line: before cust_acct_site:l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1583: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).End_Customer_party_site_id: '||p_qte_line_tbl(k).End_Customer_party_site_id,1,'N');
1584: END IF;
1585: IF p_qte_line_tbl(k).End_Customer_party_site_id is not NULL
1586: AND p_qte_line_tbl(k).End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1579: END IF;
1580:
1581: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1582: aso_debug_pub.add('mapq line: before cust_acct_site:l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1583: aso_debug_pub.add('mapq line: before cust_acct_site:p_qte_line_tbl(k).End_Customer_party_site_id: '||p_qte_line_tbl(k).End_Customer_party_site_id,1,'N');
1584: END IF;
1585: IF p_qte_line_tbl(k).End_Customer_party_site_id is not NULL
1586: AND p_qte_line_tbl(k).End_Customer_party_site_id <> FND_API.G_MISS_NUM THEN
1587:
1601: IF l_line_tbl(i).End_Customer_site_use_id IS NULL THEN
1602: l_line_tbl(i).End_Customer_site_use_id := FND_API.G_MISS_NUM;
1603: END IF;
1604:
1605: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1606: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).End_Customer_site_use_id: '||l_line_tbl(i).End_Customer_site_use_id,1,'N');
1607: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_end_cust_acct_site: '||l_ln_end_cust_acct_site,1,'N');
1608: END IF;
1609: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1602: l_line_tbl(i).End_Customer_site_use_id := FND_API.G_MISS_NUM;
1603: END IF;
1604:
1605: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1606: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).End_Customer_site_use_id: '||l_line_tbl(i).End_Customer_site_use_id,1,'N');
1607: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_end_cust_acct_site: '||l_ln_end_cust_acct_site,1,'N');
1608: END IF;
1609: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1610: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1603: END IF;
1604:
1605: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1606: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).End_Customer_site_use_id: '||l_line_tbl(i).End_Customer_site_use_id,1,'N');
1607: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_end_cust_acct_site: '||l_ln_end_cust_acct_site,1,'N');
1608: END IF;
1609: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1610: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1611: THEN
1618: l_line_tbl(i).End_Customer_Id := l_End_cust_account_id;
1619:
1620: END IF;
1621:
1622: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1623: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1624: END IF;
1625:
1626: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
1619:
1620: END IF;
1621:
1622: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1623: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_End_cust_account_id: '||l_End_cust_account_id,1,'N');
1624: END IF;
1625:
1626: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
1627: p_api_version => 1.0,
1638: IF l_line_tbl(i).End_Customer_contact_id IS NULL THEN
1639: l_line_tbl(i).End_Customer_contact_id := FND_API.G_MISS_NUM;
1640: END IF;
1641:
1642: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1643: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_contact_id: '||l_line_tbl(i).End_Customer_contact_id,1,'N');
1644: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_id: '||l_line_tbl(i).End_Customer_id,1,'N');
1645: END IF;
1646:
1639: l_line_tbl(i).End_Customer_contact_id := FND_API.G_MISS_NUM;
1640: END IF;
1641:
1642: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1643: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_contact_id: '||l_line_tbl(i).End_Customer_contact_id,1,'N');
1644: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_id: '||l_line_tbl(i).End_Customer_id,1,'N');
1645: END IF;
1646:
1647: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1640: END IF;
1641:
1642: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1643: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_contact_id: '||l_line_tbl(i).End_Customer_contact_id,1,'N');
1644: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).End_Customer_id: '||l_line_tbl(i).End_Customer_id,1,'N');
1645: END IF;
1646:
1647: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1648: raise FND_API.G_EXC_ERROR;
1717:
1718:
1719: IF (p_qte_line_dtl_tbl(l).qte_line_index = k) THEN
1720:
1721: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1722: aso_debug_pub.add('in quote line details',1,'N');
1723: END IF;
1724: l_line_tbl(i).service_duration:=p_qte_line_dtl_tbl(l).service_duration;
1725: l_line_tbl(i).service_period := p_qte_line_dtl_tbl(l).service_period;
1718:
1719: IF (p_qte_line_dtl_tbl(l).qte_line_index = k) THEN
1720:
1721: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1722: aso_debug_pub.add('in quote line details',1,'N');
1723: END IF;
1724: l_line_tbl(i).service_duration:=p_qte_line_dtl_tbl(l).service_duration;
1725: l_line_tbl(i).service_period := p_qte_line_dtl_tbl(l).service_period;
1726: l_line_tbl(i).service_start_date:= p_qte_line_tbl(k).start_date_active;
1843: l_line_tbl(i).return_context
1844: := p_qte_line_dtl_tbl(l).return_attribute_category;
1845: END IF;
1846:
1847: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1848: aso_debug_pub.add('l_ret_reason_code_prof: '||l_ret_reason_code_prof,1,'N');
1849: END IF;
1850:
1851: IF p_qte_line_tbl(k).line_category_code = 'RETURN' THEN
1844: := p_qte_line_dtl_tbl(l).return_attribute_category;
1845: END IF;
1846:
1847: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1848: aso_debug_pub.add('l_ret_reason_code_prof: '||l_ret_reason_code_prof,1,'N');
1849: END IF;
1850:
1851: IF p_qte_line_tbl(k).line_category_code = 'RETURN' THEN
1852:
1936:
1937: option_item := k;
1938: parent := option_item;
1939:
1940: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1941: aso_debug_pub.add('p_Line_Rltship_TBL.count is '||p_Line_Rltship_TBL.count,1 ,'N');
1942: END IF;
1943:
1944: FOR count_2 in 1..p_Line_Rltship_TBL.count LOOP
1937: option_item := k;
1938: parent := option_item;
1939:
1940: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1941: aso_debug_pub.add('p_Line_Rltship_TBL.count is '||p_Line_Rltship_TBL.count,1 ,'N');
1942: END IF;
1943:
1944: FOR count_2 in 1..p_Line_Rltship_TBL.count LOOP
1945: if ( p_Line_Rltship_TBL(count_2).related_qte_line_index
1948: EXIT;
1949: end if;
1950: END LOOP;
1951:
1952: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1953: aso_debug_pub.add('parent item is '||parent,1,'N');
1954: END IF;
1955:
1956: IF (parent <> option_item) THEN
1949: end if;
1950: END LOOP;
1951:
1952: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1953: aso_debug_pub.add('parent item is '||parent,1,'N');
1954: END IF;
1955:
1956: IF (parent <> option_item) THEN
1957: -- figure OUT NOCOPY /* file.sql.39 change */ the shipment line index for the corresponding qte line index.
1968:
1969: END IF;
1970: END LOOP; -- line details
1971:
1972: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1973: aso_debug_pub.add('l_ret_reason_code_prof: '||l_ret_reason_code_prof,1,'N');
1974: END IF;
1975:
1976: IF p_qte_line_tbl(k).line_category_code = 'RETURN' THEN
1969: END IF;
1970: END LOOP; -- line details
1971:
1972: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1973: aso_debug_pub.add('l_ret_reason_code_prof: '||l_ret_reason_code_prof,1,'N');
1974: END IF;
1975:
1976: IF p_qte_line_tbl(k).line_category_code = 'RETURN' THEN
1977: -- Default return reason code from profile
2066: IF (p_line_shipment_tbl(j).demand_class_code is not null and p_line_shipment_tbl(j).demand_class_code <> fnd_api.g_miss_char) then
2067: l_line_tbl(i).demand_class_code := p_line_shipment_tbl(j).demand_class_code;
2068: end if;
2069:
2070: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2071: aso_debug_pub.add('p_line_shipment_tbl(j).Ship_From_Org_Id: '||p_line_shipment_tbl(j).Ship_From_Org_Id,1,'N');
2072: END IF;
2073:
2074: IF p_line_shipment_tbl(j).Ship_From_Org_Id IS NOT NULL AND
2067: l_line_tbl(i).demand_class_code := p_line_shipment_tbl(j).demand_class_code;
2068: end if;
2069:
2070: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2071: aso_debug_pub.add('p_line_shipment_tbl(j).Ship_From_Org_Id: '||p_line_shipment_tbl(j).Ship_From_Org_Id,1,'N');
2072: END IF;
2073:
2074: IF p_line_shipment_tbl(j).Ship_From_Org_Id IS NOT NULL AND
2075: p_line_shipment_tbl(j).Ship_From_Org_Id <> FND_API.G_MISS_NUM THEN
2078:
2079: IF p_line_shipment_tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM AND
2080: p_line_shipment_tbl(j).ship_to_cust_account_id IS NOT NULL AND
2081: p_line_shipment_tbl(j).ship_to_cust_account_id <> l_cust_account_id THEN
2082: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2083: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
2084: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_line_shipment_tbl(j).ship_to_cust_account_id,1,'N');
2085: END IF;
2086: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
2079: IF p_line_shipment_tbl(j).ship_to_cust_account_id <> FND_API.G_MISS_NUM AND
2080: p_line_shipment_tbl(j).ship_to_cust_account_id IS NOT NULL AND
2081: p_line_shipment_tbl(j).ship_to_cust_account_id <> l_cust_account_id THEN
2082: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2083: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
2084: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_line_shipment_tbl(j).ship_to_cust_account_id,1,'N');
2085: END IF;
2086: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
2087: p_api_version => 1.0,
2080: p_line_shipment_tbl(j).ship_to_cust_account_id IS NOT NULL AND
2081: p_line_shipment_tbl(j).ship_to_cust_account_id <> l_cust_account_id THEN
2082: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2083: aso_debug_pub.add('before cust_acct_reltn:p_sold_to_cust_account: '||l_cust_account_id,1,'N');
2084: aso_debug_pub.add('before cust_acct_reltn:p_related_cust_account: '||p_line_shipment_tbl(j).ship_to_cust_account_id,1,'N');
2085: END IF;
2086: ASO_CHECK_TCA_PVT.Cust_acct_Relationship (
2087: p_api_version => 1.0,
2088: p_sold_to_cust_account => l_cust_account_id,
2091: x_return_status => l_return_status,
2092: x_msg_count => l_msg_count,
2093: x_msg_data => l_msg_data
2094: );
2095: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2096: aso_debug_pub.add('after cust_acct_reltn:l_return_status: '||l_return_status,1,'N');
2097: END IF;
2098:
2099: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2092: x_msg_count => l_msg_count,
2093: x_msg_data => l_msg_data
2094: );
2095: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2096: aso_debug_pub.add('after cust_acct_reltn:l_return_status: '||l_return_status,1,'N');
2097: END IF;
2098:
2099: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2100: RAISE FND_API.G_EXC_ERROR;
2108: ELSE
2109: l_ship_cust_account_id := l_header_rec.sold_to_org_id;
2110: END IF;
2111:
2112: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2113: aso_debug_pub.add('mapq line: before cust_acct_site:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2114: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2115: END IF;
2116: IF p_line_shipment_tbl(j).ship_to_party_site_id is not NULL AND
2109: l_ship_cust_account_id := l_header_rec.sold_to_org_id;
2110: END IF;
2111:
2112: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2113: aso_debug_pub.add('mapq line: before cust_acct_site:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2114: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2115: END IF;
2116: IF p_line_shipment_tbl(j).ship_to_party_site_id is not NULL AND
2117: p_line_shipment_tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
2110: END IF;
2111:
2112: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2113: aso_debug_pub.add('mapq line: before cust_acct_site:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2114: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2115: END IF;
2116: IF p_line_shipment_tbl(j).ship_to_party_site_id is not NULL AND
2117: p_line_shipment_tbl(j).ship_to_party_site_id <> FND_API.G_MISS_NUM THEN
2118:
2132: IF l_line_tbl(i).ship_to_org_id IS NULL THEN
2133: l_line_tbl(i).ship_to_org_id := FND_API.G_MISS_NUM;
2134: END IF;
2135:
2136: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2137: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).ship_to_org_id: '||l_line_tbl(i).ship_to_org_id,1,'N');
2138: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_shp_cust_acct_site: '||l_ln_shp_cust_acct_site,1,'N');
2139: END IF;
2140: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2133: l_line_tbl(i).ship_to_org_id := FND_API.G_MISS_NUM;
2134: END IF;
2135:
2136: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2137: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).ship_to_org_id: '||l_line_tbl(i).ship_to_org_id,1,'N');
2138: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_shp_cust_acct_site: '||l_ln_shp_cust_acct_site,1,'N');
2139: END IF;
2140: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2134: END IF;
2135:
2136: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2137: aso_debug_pub.add('mapq line: after cust_acct_site:l_line_tbl(i).ship_to_org_id: '||l_line_tbl(i).ship_to_org_id,1,'N');
2138: aso_debug_pub.add('mapq line: after cust_acct_site:l_ln_shp_cust_acct_site: '||l_ln_shp_cust_acct_site,1,'N');
2139: END IF;
2140: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2141: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2142: THEN
2147: END IF;
2148:
2149: END IF;
2150:
2151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2152: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_id: '||p_line_shipment_tbl(j).ship_to_party_id,1,'N');
2153: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2154: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2155: END IF;
2148:
2149: END IF;
2150:
2151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2152: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_id: '||p_line_shipment_tbl(j).ship_to_party_id,1,'N');
2153: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2154: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2155: END IF;
2156:
2149: END IF;
2150:
2151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2152: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_id: '||p_line_shipment_tbl(j).ship_to_party_id,1,'N');
2153: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2154: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2155: END IF;
2156:
2157: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
2150:
2151: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2152: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_id: '||p_line_shipment_tbl(j).ship_to_party_id,1,'N');
2153: aso_debug_pub.add('p_line_shipment_tbl(j).ship_to_party_site_id: '||p_line_shipment_tbl(j).ship_to_party_site_id,1,'N');
2154: aso_debug_pub.add('mapq line: before Cust_Acct_Contact_Addr:l_ship_cust_account_id: '||l_ship_cust_account_id,1,'N');
2155: END IF;
2156:
2157: ASO_CHECK_TCA_PVT.Cust_Acct_Contact_Addr(
2158: p_api_version => 1.0,
2169: IF l_line_tbl(i).ship_to_contact_id IS NULL THEN
2170: l_line_tbl(i).ship_to_contact_id := FND_API.G_MISS_NUM;
2171: END IF;
2172:
2173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2174: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).ship_to_contact_id: '||l_line_tbl(i).ship_to_contact_id,1,'N');
2175: END IF;
2176:
2177: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2170: l_line_tbl(i).ship_to_contact_id := FND_API.G_MISS_NUM;
2171: END IF;
2172:
2173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2174: aso_debug_pub.add('mapq line: after Cust_Acct_Contact_Addr:l_line_tbl(i).ship_to_contact_id: '||l_line_tbl(i).ship_to_contact_id,1,'N');
2175: END IF;
2176:
2177: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2178: raise FND_API.G_EXC_ERROR;
2184: l_line_tbl(i).source_document_type_id
2185: := l_header_rec.source_document_type_id;
2186: l_line_tbl(i).orig_sys_document_ref := l_header_rec.orig_sys_document_ref;
2187:
2188: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2189: aso_debug_pub.add('l_line_tbl(i).orig_sys_document_ref: '||l_line_tbl(i).orig_sys_document_ref,1,'N');
2190: END IF;
2191:
2192: IF p_qte_line_tbl(k).ui_line_number IS NOT NULL AND
2185: := l_header_rec.source_document_type_id;
2186: l_line_tbl(i).orig_sys_document_ref := l_header_rec.orig_sys_document_ref;
2187:
2188: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2189: aso_debug_pub.add('l_line_tbl(i).orig_sys_document_ref: '||l_line_tbl(i).orig_sys_document_ref,1,'N');
2190: END IF;
2191:
2192: IF p_qte_line_tbl(k).ui_line_number IS NOT NULL AND
2193: p_qte_line_tbl(k).ui_line_number <> FND_API.G_MISS_CHAR THEN
2195:
2196: ELSIF p_qte_line_tbl(k).line_number IS NOT NULL
2197: AND p_qte_line_tbl(k).line_number <> FND_API.G_MISS_NUM THEN
2198:
2199: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2200: aso_debug_pub.add('p_qte_line_tbl(k).line_number: '||p_qte_line_tbl(k).line_number,1,'N');
2201: END IF;
2202:
2203: l_line_tbl(i).orig_sys_line_ref := to_char(p_qte_line_tbl(k).line_number);
2196: ELSIF p_qte_line_tbl(k).line_number IS NOT NULL
2197: AND p_qte_line_tbl(k).line_number <> FND_API.G_MISS_NUM THEN
2198:
2199: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2200: aso_debug_pub.add('p_qte_line_tbl(k).line_number: '||p_qte_line_tbl(k).line_number,1,'N');
2201: END IF;
2202:
2203: l_line_tbl(i).orig_sys_line_ref := to_char(p_qte_line_tbl(k).line_number);
2204:
2203: l_line_tbl(i).orig_sys_line_ref := to_char(p_qte_line_tbl(k).line_number);
2204:
2205: END IF;
2206:
2207: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2208: aso_debug_pub.add('l_line_tbl(i).orig_sys_line_ref: '||l_line_tbl(i).orig_sys_line_ref,1,'N');
2209: END IF;
2210:
2211: -- must have both the index values for create
2204:
2205: END IF;
2206:
2207: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2208: aso_debug_pub.add('l_line_tbl(i).orig_sys_line_ref: '||l_line_tbl(i).orig_sys_line_ref,1,'N');
2209: END IF;
2210:
2211: -- must have both the index values for create
2212:
2257: l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code := 'TAX';
2258: l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator := 'AMT';
2259: l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation := OE_GLOBALS.g_opr_create;
2260:
2261: if aso_debug_pub.g_debug_flag = 'Y' then
2262:
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2259: l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation := OE_GLOBALS.g_opr_create;
2260:
2261: if aso_debug_pub.g_debug_flag = 'Y' then
2262:
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2260:
2261: if aso_debug_pub.g_debug_flag = 'Y' then
2262:
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2268: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2261: if aso_debug_pub.g_debug_flag = 'Y' then
2262:
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2268: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2269:
2262:
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2268: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2269:
2270: end if;
2263: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2268: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2269:
2270: end if;
2271:
2264: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2265: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2266: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2267: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2268: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2269:
2270: end if;
2271:
2272: /*
2269:
2270: end if;
2271:
2272: /*
2273: if aso_debug_pub.g_debug_flag = 'Y' then
2274:
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2271:
2272: /*
2273: if aso_debug_pub.g_debug_flag = 'Y' then
2274:
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2272: /*
2273: if aso_debug_pub.g_debug_flag = 'Y' then
2274:
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2273: if aso_debug_pub.g_debug_flag = 'Y' then
2274:
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2274:
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2275: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').price_adjustment_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).price_adjustment_id,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2283: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operation: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation,1,'N');
2276: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').line_index: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).line_index,1,'N');
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2283: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operation: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation,1,'N');
2284:
2277: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').tax_rate_id: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).tax_rate_id,1,'N');
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2283: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operation: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation,1,'N');
2284:
2285: end if;
2278: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operand: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operand,1,'N');
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2283: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operation: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation,1,'N');
2284:
2285: end if;
2286:
2279: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').adjusted_amount: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).adjusted_amount,1,'N');
2280: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').automatic_flag: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).automatic_flag,1,'N');
2281: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').list_line_type_code: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).list_line_type_code,1,'N');
2282: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').arithmetic_operator: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).arithmetic_operator,1,'N');
2283: aso_debug_pub.add('l_Line_Adj_tbl('||l_line_adj_tbl_count + 1||').operation: '||l_Line_Adj_tbl(l_line_adj_tbl_count + 1).operation,1,'N');
2284:
2285: end if;
2286:
2287: */
2290: END LOOP;
2291:
2292: l_line_tbl(i).tax_value := l_ln_total_tax_amount;
2293:
2294: if aso_debug_pub.g_debug_flag = 'Y' then
2295:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2292: l_line_tbl(i).tax_value := l_ln_total_tax_amount;
2293:
2294: if aso_debug_pub.g_debug_flag = 'Y' then
2295:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2293:
2294: if aso_debug_pub.g_debug_flag = 'Y' then
2295:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2301: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2294: if aso_debug_pub.g_debug_flag = 'Y' then
2295:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2301: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2302:
2295:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2301: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2302:
2303:
2296: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_flag: '||l_line_tbl(i).tax_exempt_flag,1,'N');
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2301: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2302:
2303:
2304: for p in 1..l_Line_Adj_tbl.count loop
2297: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_number: '||l_line_tbl(i).tax_exempt_number,1,'N');
2298: aso_debug_pub.add('l_line_tbl('||i||').tax_exempt_reason_code: '||l_line_tbl(i).tax_exempt_reason_code,1,'N');
2299: aso_debug_pub.add('l_line_tbl('||i||').tax_date: ' ||l_line_tbl(i).tax_date,1,'N');
2300: aso_debug_pub.add('l_line_tbl('||i||').tax_rate: ' ||l_line_tbl(i).tax_rate,1,'N');
2301: aso_debug_pub.add('l_line_tbl('||i||').tax_value: ' ||l_line_tbl(i).tax_value,1,'N');
2302:
2303:
2304: for p in 1..l_Line_Adj_tbl.count loop
2305:
2302:
2303:
2304: for p in 1..l_Line_Adj_tbl.count loop
2305:
2306: aso_debug_pub.add('l_Line_Adj_tbl('||p||').price_adjustment_id: '||l_Line_Adj_tbl(p).price_adjustment_id,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2303:
2304: for p in 1..l_Line_Adj_tbl.count loop
2305:
2306: aso_debug_pub.add('l_Line_Adj_tbl('||p||').price_adjustment_id: '||l_Line_Adj_tbl(p).price_adjustment_id,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2304: for p in 1..l_Line_Adj_tbl.count loop
2305:
2306: aso_debug_pub.add('l_Line_Adj_tbl('||p||').price_adjustment_id: '||l_Line_Adj_tbl(p).price_adjustment_id,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2305:
2306: aso_debug_pub.add('l_Line_Adj_tbl('||p||').price_adjustment_id: '||l_Line_Adj_tbl(p).price_adjustment_id,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2306: aso_debug_pub.add('l_Line_Adj_tbl('||p||').price_adjustment_id: '||l_Line_Adj_tbl(p).price_adjustment_id,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2314: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operation: '||l_Line_Adj_tbl(p).operation,1,'N');
2307: aso_debug_pub.add('l_Line_Adj_tbl('||p||').line_index: '||l_Line_Adj_tbl(p).line_index,1,'N');
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2314: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operation: '||l_Line_Adj_tbl(p).operation,1,'N');
2315:
2308: aso_debug_pub.add('l_Line_Adj_tbl('||p||').tax_rate_id: '||l_Line_Adj_tbl(p).tax_rate_id,1,'N');
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2314: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operation: '||l_Line_Adj_tbl(p).operation,1,'N');
2315:
2316: end loop;
2309: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operand: '||l_Line_Adj_tbl(p).operand,1,'N');
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2314: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operation: '||l_Line_Adj_tbl(p).operation,1,'N');
2315:
2316: end loop;
2317:
2310: aso_debug_pub.add('l_Line_Adj_tbl('||p||').adjusted_amount: '||l_Line_Adj_tbl(p).adjusted_amount,1,'N');
2311: aso_debug_pub.add('l_Line_Adj_tbl('||p||').automatic_flag: '||l_Line_Adj_tbl(p).automatic_flag,1,'N');
2312: aso_debug_pub.add('l_Line_Adj_tbl('||p||').list_line_type_code: '||l_Line_Adj_tbl(p).list_line_type_code,1,'N');
2313: aso_debug_pub.add('l_Line_Adj_tbl('||p||').arithmetic_operator: '||l_Line_Adj_tbl(p).arithmetic_operator,1,'N');
2314: aso_debug_pub.add('l_Line_Adj_tbl('||p||').operation: '||l_Line_Adj_tbl(p).operation,1,'N');
2315:
2316: end loop;
2317:
2318: end if;
2329: OPEN scheduling_level_cur(l_line_tbl(i).line_type_id);
2330: FETCH scheduling_level_cur INTO l_line_scheduling_level;
2331: CLOSE scheduling_level_cur;
2332: END IF;
2333: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2334: aso_debug_pub.add('l_line_tbl(i).line_type_id = ' ||
2335: l_line_tbl(i).line_type_id,1,'N');
2336:
2337: aso_debug_pub.add('l_order_scheduling_level = ' ||
2330: FETCH scheduling_level_cur INTO l_line_scheduling_level;
2331: CLOSE scheduling_level_cur;
2332: END IF;
2333: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2334: aso_debug_pub.add('l_line_tbl(i).line_type_id = ' ||
2335: l_line_tbl(i).line_type_id,1,'N');
2336:
2337: aso_debug_pub.add('l_order_scheduling_level = ' ||
2338: l_order_scheduling_level,1,'N');
2333: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2334: aso_debug_pub.add('l_line_tbl(i).line_type_id = ' ||
2335: l_line_tbl(i).line_type_id,1,'N');
2336:
2337: aso_debug_pub.add('l_order_scheduling_level = ' ||
2338: l_order_scheduling_level,1,'N');
2339: aso_debug_pub.add('l_line_scheduling_level = ' ||
2340: l_line_scheduling_level,1,'N');
2341: END IF;
2335: l_line_tbl(i).line_type_id,1,'N');
2336:
2337: aso_debug_pub.add('l_order_scheduling_level = ' ||
2338: l_order_scheduling_level,1,'N');
2339: aso_debug_pub.add('l_line_scheduling_level = ' ||
2340: l_line_scheduling_level,1,'N');
2341: END IF;
2342:
2343: -- a value of 'TWO' for scheduling level means that the transaction type
2343: -- a value of 'TWO' for scheduling level means that the transaction type
2344: -- doesn't allow reservations.
2345: IF l_order_scheduling_level <> 'TWO' AND
2346: l_line_scheduling_level <> 'TWO' then
2347: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2348: aso_debug_pub.add('setting schedule action to reserve',1,'N');
2349: END IF;
2350: l_line_tbl(i).schedule_action_code
2351: := OE_ORDER_SCH_UTIL.OESCH_ACT_RESERVE;
2344: -- doesn't allow reservations.
2345: IF l_order_scheduling_level <> 'TWO' AND
2346: l_line_scheduling_level <> 'TWO' then
2347: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2348: aso_debug_pub.add('setting schedule action to reserve',1,'N');
2349: END IF;
2350: l_line_tbl(i).schedule_action_code
2351: := OE_ORDER_SCH_UTIL.OESCH_ACT_RESERVE;
2352: END IF;
2355: IF p_calculate_price_flag = FND_API.G_FALSE THEN
2356: l_line_tbl(i).calculate_price_flag := 'N';
2357: l_line_tbl(i).pricing_quantity_uom := l_line_tbl(i).order_quantity_uom;
2358: l_line_tbl(i).pricing_quantity := l_line_tbl(i).ordered_quantity;
2359: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2360: aso_debug_pub.add('l_line_tbl(i).pricing_quantity_uom: '||l_line_tbl(i).pricing_quantity_uom,1,'N');
2361: aso_debug_pub.add('l_line_tbl(i).pricing_quantity: '||l_line_tbl(i).pricing_quantity,1,'N');
2362: END IF;
2363: ELSE
2356: l_line_tbl(i).calculate_price_flag := 'N';
2357: l_line_tbl(i).pricing_quantity_uom := l_line_tbl(i).order_quantity_uom;
2358: l_line_tbl(i).pricing_quantity := l_line_tbl(i).ordered_quantity;
2359: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2360: aso_debug_pub.add('l_line_tbl(i).pricing_quantity_uom: '||l_line_tbl(i).pricing_quantity_uom,1,'N');
2361: aso_debug_pub.add('l_line_tbl(i).pricing_quantity: '||l_line_tbl(i).pricing_quantity,1,'N');
2362: END IF;
2363: ELSE
2364: l_line_tbl(i).calculate_price_flag := 'Y';
2357: l_line_tbl(i).pricing_quantity_uom := l_line_tbl(i).order_quantity_uom;
2358: l_line_tbl(i).pricing_quantity := l_line_tbl(i).ordered_quantity;
2359: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2360: aso_debug_pub.add('l_line_tbl(i).pricing_quantity_uom: '||l_line_tbl(i).pricing_quantity_uom,1,'N');
2361: aso_debug_pub.add('l_line_tbl(i).pricing_quantity: '||l_line_tbl(i).pricing_quantity,1,'N');
2362: END IF;
2363: ELSE
2364: l_line_tbl(i).calculate_price_flag := 'Y';
2365: END IF; -- pricing
2363: ELSE
2364: l_line_tbl(i).calculate_price_flag := 'Y';
2365: END IF; -- pricing
2366:
2367: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2368: aso_debug_pub.add('before line price att',1,'Y');
2369: END IF;
2370:
2371: -- pricing attributes
2364: l_line_tbl(i).calculate_price_flag := 'Y';
2365: END IF; -- pricing
2366:
2367: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2368: aso_debug_pub.add('before line price att',1,'Y');
2369: END IF;
2370:
2371: -- pricing attributes
2372:
2379: );
2380:
2381: l_line_price_adj_rltship_tbl := P_Line_Price_Adj_rltship_Tbl;
2382:
2383: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2384: aso_debug_pub.add('after line price att:l_line_price_att_tbl.count: '||l_line_price_att_tbl.count,1,'N');
2385: aso_debug_pub.add('before map_ln_adj:l_Line_Price_Adj_rltship_Tbl.count: '||l_Line_Price_Adj_rltship_Tbl.count,1,'N');
2386: END IF;
2387:
2380:
2381: l_line_price_adj_rltship_tbl := P_Line_Price_Adj_rltship_Tbl;
2382:
2383: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2384: aso_debug_pub.add('after line price att:l_line_price_att_tbl.count: '||l_line_price_att_tbl.count,1,'N');
2385: aso_debug_pub.add('before map_ln_adj:l_Line_Price_Adj_rltship_Tbl.count: '||l_Line_Price_Adj_rltship_Tbl.count,1,'N');
2386: END IF;
2387:
2388: map_line_price_adj(
2381: l_line_price_adj_rltship_tbl := P_Line_Price_Adj_rltship_Tbl;
2382:
2383: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2384: aso_debug_pub.add('after line price att:l_line_price_att_tbl.count: '||l_line_price_att_tbl.count,1,'N');
2385: aso_debug_pub.add('before map_ln_adj:l_Line_Price_Adj_rltship_Tbl.count: '||l_Line_Price_Adj_rltship_Tbl.count,1,'N');
2386: END IF;
2387:
2388: map_line_price_adj(
2389: p_line_price_adj_tbl => p_line_price_adj_tbl,
2395: x_line_adj_att_tbl => l_line_adj_att_tbl,
2396: lx_Line_Price_Adj_rltship_Tbl => l_line_price_adj_rltship_tbl
2397: );
2398:
2399: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2400: aso_debug_pub.add('after line price adjustments:l_line_adj_att_tbl.count: '||l_line_adj_att_tbl.count,1,'N');
2401: aso_debug_pub.add('after line price adjustments:l_line_price_adj_rltship_tbl.count: '||l_line_price_adj_rltship_tbl.count,1,'N');
2402: END IF;
2403:
2396: lx_Line_Price_Adj_rltship_Tbl => l_line_price_adj_rltship_tbl
2397: );
2398:
2399: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2400: aso_debug_pub.add('after line price adjustments:l_line_adj_att_tbl.count: '||l_line_adj_att_tbl.count,1,'N');
2401: aso_debug_pub.add('after line price adjustments:l_line_price_adj_rltship_tbl.count: '||l_line_price_adj_rltship_tbl.count,1,'N');
2402: END IF;
2403:
2404: map_line_price_adj_rltn(
2397: );
2398:
2399: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2400: aso_debug_pub.add('after line price adjustments:l_line_adj_att_tbl.count: '||l_line_adj_att_tbl.count,1,'N');
2401: aso_debug_pub.add('after line price adjustments:l_line_price_adj_rltship_tbl.count: '||l_line_price_adj_rltship_tbl.count,1,'N');
2402: END IF;
2403:
2404: map_line_price_adj_rltn(
2405: P_Line_Price_Adj_rltship_Tbl => l_Line_Price_Adj_rltship_Tbl,
2408: p_operation => l_line_tbl(i).operation,
2409: x_Line_Adj_Assoc_tbl => l_Line_Adj_Assoc_tbl
2410: );
2411:
2412: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2413: aso_debug_pub.add('before line sales credit:l_Line_Adj_Assoc_tbl.count: '||l_Line_Adj_Assoc_tbl.count,1,'Y');
2414: END IF;
2415:
2416: map_line_sales_credit(
2409: x_Line_Adj_Assoc_tbl => l_Line_Adj_Assoc_tbl
2410: );
2411:
2412: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2413: aso_debug_pub.add('before line sales credit:l_Line_Adj_Assoc_tbl.count: '||l_Line_Adj_Assoc_tbl.count,1,'Y');
2414: END IF;
2415:
2416: map_line_sales_credit(
2417: P_line_sales_credit_Tbl => P_line_sales_credit_Tbl,
2420: p_line_operation => l_line_tbl(i).operation,
2421: p_operation => p_operation,
2422: x_Line_Scredit_tbl => l_Line_Scredit_tbl
2423: );
2424: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2425: aso_debug_pub.add('after line sales credit:l_Line_Scredit_tbl.count: '||l_Line_Scredit_tbl.count,1,'Y');
2426: END IF;
2427:
2428: --Line Payments change
2421: p_operation => p_operation,
2422: x_Line_Scredit_tbl => l_Line_Scredit_tbl
2423: );
2424: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2425: aso_debug_pub.add('after line sales credit:l_Line_Scredit_tbl.count: '||l_Line_Scredit_tbl.count,1,'Y');
2426: END IF;
2427:
2428: --Line Payments change
2429:
2439: IF l_line_payment_tbl.count > 0 THEN
2440: l_final_payment_tbl(l_final_payment_tbl.count + 1) := l_line_payment_tbl(1);
2441: END IF;
2442:
2443: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2444: aso_debug_pub.add('after line payments:l_line_payment_tbl.count: '||l_line_payment_tbl.count,1,'Y');
2445: aso_debug_pub.add('after line payments:l_final_payment_tbl.count: '||l_final_payment_tbl.count,1,'Y');
2446: END IF;
2447:
2440: l_final_payment_tbl(l_final_payment_tbl.count + 1) := l_line_payment_tbl(1);
2441: END IF;
2442:
2443: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2444: aso_debug_pub.add('after line payments:l_line_payment_tbl.count: '||l_line_payment_tbl.count,1,'Y');
2445: aso_debug_pub.add('after line payments:l_final_payment_tbl.count: '||l_final_payment_tbl.count,1,'Y');
2446: END IF;
2447:
2448: map_lot_serial(
2441: END IF;
2442:
2443: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2444: aso_debug_pub.add('after line payments:l_line_payment_tbl.count: '||l_line_payment_tbl.count,1,'Y');
2445: aso_debug_pub.add('after line payments:l_final_payment_tbl.count: '||l_final_payment_tbl.count,1,'Y');
2446: END IF;
2447:
2448: map_lot_serial(
2449: P_lot_serial_tbl => P_lot_serial_tbl,
2451: p_line_index => i,
2452: p_qte_line_index => k,
2453: x_lot_serial_tbl => l_lot_serial_tbl
2454: );
2455: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2456: aso_debug_pub.add('after lot serial:l_lot_serial_tbl.count: '||l_lot_serial_tbl.count,1,'Y');
2457: END IF;
2458:
2459: found := FND_API.G_TRUE;
2452: p_qte_line_index => k,
2453: x_lot_serial_tbl => l_lot_serial_tbl
2454: );
2455: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2456: aso_debug_pub.add('after lot serial:l_lot_serial_tbl.count: '||l_lot_serial_tbl.count,1,'Y');
2457: END IF;
2458:
2459: found := FND_API.G_TRUE;
2460: END IF;
2462:
2463: i:= i+1;
2464: END LOOP; -- for shipment
2465:
2466: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2467: aso_debug_pub.add('l_final_payment_tbl.count: '|| l_final_payment_tbl.count,1,'Y');
2468: END IF;
2469: IF l_final_payment_tbl.count > 0 THEN
2470: l_line_payment_tbl := l_final_payment_tbl;
2463: i:= i+1;
2464: END LOOP; -- for shipment
2465:
2466: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2467: aso_debug_pub.add('l_final_payment_tbl.count: '|| l_final_payment_tbl.count,1,'Y');
2468: END IF;
2469: IF l_final_payment_tbl.count > 0 THEN
2470: l_line_payment_tbl := l_final_payment_tbl;
2471: END IF;
2496: x_Lot_Serial_tbl := l_lot_serial_tbl;
2497: x_Lot_Serial_val_tbl := l_lot_serial_val_tbl;
2498: x_Line_Payment_tbl := l_line_payment_tbl;
2499:
2500: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2501: aso_debug_pub.add('end of map quote to order ',1,'Y');
2502: END IF;
2503:
2504: END Map_quote_to_order;
2497: x_Lot_Serial_val_tbl := l_lot_serial_val_tbl;
2498: x_Line_Payment_tbl := l_line_payment_tbl;
2499:
2500: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2501: aso_debug_pub.add('end of map quote to order ',1,'Y');
2502: END IF;
2503:
2504: END Map_quote_to_order;
2505:
2525: --and a.status = 'A'; /* status column in hz_org_contacts is obseleted */
2526: l_party_type varchar2(30);
2527: begin
2528:
2529: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2530: aso_debug_pub.add('entering get_org_contact ',1,'N');
2531: aso_debug_pub.add('party_id = ' || p_party_id,1,'N');
2532: END IF;
2533:
2526: l_party_type varchar2(30);
2527: begin
2528:
2529: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2530: aso_debug_pub.add('entering get_org_contact ',1,'N');
2531: aso_debug_pub.add('party_id = ' || p_party_id,1,'N');
2532: END IF;
2533:
2534: OPEN party_cur;
2527: begin
2528:
2529: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2530: aso_debug_pub.add('entering get_org_contact ',1,'N');
2531: aso_debug_pub.add('party_id = ' || p_party_id,1,'N');
2532: END IF;
2533:
2534: OPEN party_cur;
2535: FETCH party_cur INTO l_party_type;
2534: OPEN party_cur;
2535: FETCH party_cur INTO l_party_type;
2536: CLOSE party_cur;
2537:
2538: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2539: aso_debug_pub.add('party_type = '|| l_party_type,1,'N');
2540: END IF;
2541:
2542: IF l_party_type = 'PARTY_RELATIONSHIP' THEN
2535: FETCH party_cur INTO l_party_type;
2536: CLOSE party_cur;
2537:
2538: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2539: aso_debug_pub.add('party_type = '|| l_party_type,1,'N');
2540: END IF;
2541:
2542: IF l_party_type = 'PARTY_RELATIONSHIP' THEN
2543: OPEN org_contact;
2544: FETCH org_contact INTO x_org_contact;
2545: CLOSE org_contact;
2546: END IF;
2547:
2548: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2549: aso_debug_pub.add('org_contact = ' || x_org_contact,1,'N');
2550: END IF;
2551:
2552: END;
2545: CLOSE org_contact;
2546: END IF;
2547:
2548: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2549: aso_debug_pub.add('org_contact = ' || x_org_contact,1,'N');
2550: END IF;
2551:
2552: END;
2553:
2606: l_party_type VARCHAR2(30);
2607: l_site_use_id number;
2608: begin
2609:
2610: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
2611:
2612: x_return_status := FND_API.G_RET_STS_SUCCESS;
2613:
2614: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2610: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
2611:
2612: x_return_status := FND_API.G_RET_STS_SUCCESS;
2613:
2614: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2615: aso_debug_pub.add('site use in get_acct_site_uses = ' || p_acct_site_type,1,'N');
2616: END IF;
2617: OPEN party_cur;
2618: FETCH party_cur INTO l_party_type, l_party_id;
2611:
2612: x_return_status := FND_API.G_RET_STS_SUCCESS;
2613:
2614: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2615: aso_debug_pub.add('site use in get_acct_site_uses = ' || p_acct_site_type,1,'N');
2616: END IF;
2617: OPEN party_cur;
2618: FETCH party_cur INTO l_party_type, l_party_id;
2619: IF (party_cur%NOTFOUND) THEN
2619: IF (party_cur%NOTFOUND) THEN
2620: l_party_type := NULL;
2621: x_return_status := FND_API.G_RET_STS_ERROR;
2622: END IF;
2623: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2624: aso_debug_pub.add('party_type in get_acct_site_uses = ' || l_party_type,1,'N');
2625: END IF;
2626: CLOSE party_cur;
2627:
2620: l_party_type := NULL;
2621: x_return_status := FND_API.G_RET_STS_ERROR;
2622: END IF;
2623: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2624: aso_debug_pub.add('party_type in get_acct_site_uses = ' || l_party_type,1,'N');
2625: END IF;
2626: CLOSE party_cur;
2627:
2628: IF l_party_type = 'PARTY_RELATIONSHIP' THEN
2635: CLOSE relationship_cur;
2636: ELSE
2637: cur_party_id := l_party_id;
2638: END IF;
2639: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2640: aso_debug_pub.add('cur_party_id = ' || cur_party_id,1,'N');
2641: END IF;
2642:
2643: OPEN site_use_cur;
2636: ELSE
2637: cur_party_id := l_party_id;
2638: END IF;
2639: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2640: aso_debug_pub.add('cur_party_id = ' || cur_party_id,1,'N');
2641: END IF;
2642:
2643: OPEN site_use_cur;
2644: FETCH site_use_cur
2642:
2643: OPEN site_use_cur;
2644: FETCH site_use_cur
2645: INTO l_site_use_id, cust_acct_site_status, cust_site_use_status;
2646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2647: aso_debug_pub.add('site use id = ' || l_site_use_id, 1, 'N');
2648: aso_debug_pub.add('account site status = ' || cust_acct_site_status, 1,'N');
2649: aso_debug_pub.add('account site use status = ' || cust_site_use_status, 1,'N');
2650: END IF;
2643: OPEN site_use_cur;
2644: FETCH site_use_cur
2645: INTO l_site_use_id, cust_acct_site_status, cust_site_use_status;
2646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2647: aso_debug_pub.add('site use id = ' || l_site_use_id, 1, 'N');
2648: aso_debug_pub.add('account site status = ' || cust_acct_site_status, 1,'N');
2649: aso_debug_pub.add('account site use status = ' || cust_site_use_status, 1,'N');
2650: END IF;
2651: IF (site_use_cur%NOTFOUND) THEN
2644: FETCH site_use_cur
2645: INTO l_site_use_id, cust_acct_site_status, cust_site_use_status;
2646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2647: aso_debug_pub.add('site use id = ' || l_site_use_id, 1, 'N');
2648: aso_debug_pub.add('account site status = ' || cust_acct_site_status, 1,'N');
2649: aso_debug_pub.add('account site use status = ' || cust_site_use_status, 1,'N');
2650: END IF;
2651: IF (site_use_cur%NOTFOUND) THEN
2652: l_site_use_id := NULL;
2645: INTO l_site_use_id, cust_acct_site_status, cust_site_use_status;
2646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2647: aso_debug_pub.add('site use id = ' || l_site_use_id, 1, 'N');
2648: aso_debug_pub.add('account site status = ' || cust_acct_site_status, 1,'N');
2649: aso_debug_pub.add('account site use status = ' || cust_site_use_status, 1,'N');
2650: END IF;
2651: IF (site_use_cur%NOTFOUND) THEN
2652: l_site_use_id := NULL;
2653: -- x_return_status := FND_API.G_RET_STS_ERROR;
2662: END IF;
2663: FND_MSG_PUB.ADD;
2664: END IF;
2665: END IF;
2666: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2667: aso_debug_pub.add('site_use_id in get_acct_site_uses = ' || l_site_use_id,1,'N');
2668: END IF;
2669: CLOSE site_use_cur;
2670: x_site_use_id := l_site_use_id;
2663: FND_MSG_PUB.ADD;
2664: END IF;
2665: END IF;
2666: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2667: aso_debug_pub.add('site_use_id in get_acct_site_uses = ' || l_site_use_id,1,'N');
2668: END IF;
2669: CLOSE site_use_cur;
2670: x_site_use_id := l_site_use_id;
2671: END get_acct_site_uses;
2764: l_acct_site_type VARCHAR2(50);
2765: begin
2766:
2767: x_return_status := FND_API.G_RET_STS_SUCCESS;
2768: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2769: aso_debug_pub.add('site use in get_cust_account_roles = ' || p_acct_site_type,1,'N');
2770: aso_debug_pub.add('p_party_id = ' || p_party_id,1,'N');
2771: END IF;
2772:
2765: begin
2766:
2767: x_return_status := FND_API.G_RET_STS_SUCCESS;
2768: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2769: aso_debug_pub.add('site use in get_cust_account_roles = ' || p_acct_site_type,1,'N');
2770: aso_debug_pub.add('p_party_id = ' || p_party_id,1,'N');
2771: END IF;
2772:
2773: IF p_acct_site_type = 'END_USER' THEN
2766:
2767: x_return_status := FND_API.G_RET_STS_SUCCESS;
2768: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2769: aso_debug_pub.add('site use in get_cust_account_roles = ' || p_acct_site_type,1,'N');
2770: aso_debug_pub.add('p_party_id = ' || p_party_id,1,'N');
2771: END IF;
2772:
2773: IF p_acct_site_type = 'END_USER' THEN
2774: l_acct_site_type := 'SHIP_TO';
2779: IF (party_cur%NOTFOUND) THEN
2780: l_party_type := NULL;
2781: x_return_status := FND_API.G_RET_STS_ERROR;
2782: END IF;
2783: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2784: aso_debug_pub.add('party_type in get_cust_account_roles = ' || l_party_type,1,'N');
2785: END IF;
2786: CLOSE party_cur;
2787:
2780: l_party_type := NULL;
2781: x_return_status := FND_API.G_RET_STS_ERROR;
2782: END IF;
2783: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2784: aso_debug_pub.add('party_type in get_cust_account_roles = ' || l_party_type,1,'N');
2785: END IF;
2786: CLOSE party_cur;
2787:
2788: IF l_party_type = 'PERSON' THEN
2793: x_return_status := FND_API.G_RET_STS_ERROR;
2794: END IF;
2795: CLOSE cust_cur;
2796:
2797: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2798: aso_debug_pub.add('l_party_id = ' || l_party_id, 1,'N');
2799: END IF;
2800: IF l_party_id IS NOT NULL AND l_party_id = p_party_id THEN
2801: -- p_party_id is owner of account, hence not a contact
2794: END IF;
2795: CLOSE cust_cur;
2796:
2797: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2798: aso_debug_pub.add('l_party_id = ' || l_party_id, 1,'N');
2799: END IF;
2800: IF l_party_id IS NOT NULL AND l_party_id = p_party_id THEN
2801: -- p_party_id is owner of account, hence not a contact
2802: x_party_id := FND_API.G_MISS_NUM;
2809: FETCH person_relationship_cur INTO l_relationship_party_id;
2810: EXIT WHEN person_relationship_cur%NOTFOUND OR x_return_status = FND_API.G_RET_STS_ERROR;
2811: l_count_relationship := l_count_relationship + 1;
2812:
2813: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2814: aso_debug_pub.add('relationship_party_id = ' || l_relationship_party_id,1,'N');
2815: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
2816: aso_debug_pub.add('opening cust_role cursor',1,'N');
2817: END IF;
2810: EXIT WHEN person_relationship_cur%NOTFOUND OR x_return_status = FND_API.G_RET_STS_ERROR;
2811: l_count_relationship := l_count_relationship + 1;
2812:
2813: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2814: aso_debug_pub.add('relationship_party_id = ' || l_relationship_party_id,1,'N');
2815: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
2816: aso_debug_pub.add('opening cust_role cursor',1,'N');
2817: END IF;
2818:
2811: l_count_relationship := l_count_relationship + 1;
2812:
2813: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2814: aso_debug_pub.add('relationship_party_id = ' || l_relationship_party_id,1,'N');
2815: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
2816: aso_debug_pub.add('opening cust_role cursor',1,'N');
2817: END IF;
2818:
2819: OPEN cust_role(l_relationship_party_id);
2812:
2813: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2814: aso_debug_pub.add('relationship_party_id = ' || l_relationship_party_id,1,'N');
2815: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
2816: aso_debug_pub.add('opening cust_role cursor',1,'N');
2817: END IF;
2818:
2819: OPEN cust_role(l_relationship_party_id);
2820: LOOP
2817: END IF;
2818:
2819: OPEN cust_role(l_relationship_party_id);
2820: LOOP
2821: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2822: aso_debug_pub.add('looping in cust_role',1,'N');
2823: END IF;
2824: FETCH cust_role INTO l_cust_account_role_id, cust_account_role_status;
2825: EXIT WHEN cust_role%NOTFOUND OR x_return_status = FND_API.G_RET_STS_ERROR;
2818:
2819: OPEN cust_role(l_relationship_party_id);
2820: LOOP
2821: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2822: aso_debug_pub.add('looping in cust_role',1,'N');
2823: END IF;
2824: FETCH cust_role INTO l_cust_account_role_id, cust_account_role_status;
2825: EXIT WHEN cust_role%NOTFOUND OR x_return_status = FND_API.G_RET_STS_ERROR;
2826: IF (cust_role%ROWCOUNT) > 1 THEN
2828: END IF;
2829: END LOOP;
2830: CLOSE cust_role;
2831:
2832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2833: aso_debug_pub.add(' l_cust_account_role_id = '|| l_cust_account_role_id,1,'N' );
2834: aso_debug_pub.add('rowcount = ' || person_relationship_cur%ROWCOUNT,1,'N');
2835: aso_debug_pub.add('l_multiple_flag = ' || l_multiple_flag,1,'N');
2836: END IF;
2829: END LOOP;
2830: CLOSE cust_role;
2831:
2832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2833: aso_debug_pub.add(' l_cust_account_role_id = '|| l_cust_account_role_id,1,'N' );
2834: aso_debug_pub.add('rowcount = ' || person_relationship_cur%ROWCOUNT,1,'N');
2835: aso_debug_pub.add('l_multiple_flag = ' || l_multiple_flag,1,'N');
2836: END IF;
2837:
2830: CLOSE cust_role;
2831:
2832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2833: aso_debug_pub.add(' l_cust_account_role_id = '|| l_cust_account_role_id,1,'N' );
2834: aso_debug_pub.add('rowcount = ' || person_relationship_cur%ROWCOUNT,1,'N');
2835: aso_debug_pub.add('l_multiple_flag = ' || l_multiple_flag,1,'N');
2836: END IF;
2837:
2838: IF person_relationship_cur%ROWCOUNT > 1 AND l_multiple_flag = FND_API.G_TRUE
2831:
2832: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2833: aso_debug_pub.add(' l_cust_account_role_id = '|| l_cust_account_role_id,1,'N' );
2834: aso_debug_pub.add('rowcount = ' || person_relationship_cur%ROWCOUNT,1,'N');
2835: aso_debug_pub.add('l_multiple_flag = ' || l_multiple_flag,1,'N');
2836: END IF;
2837:
2838: IF person_relationship_cur%ROWCOUNT > 1 AND l_multiple_flag = FND_API.G_TRUE
2839: THEN
2855: IF (org_contact%NOTFOUND) THEN
2856: l_org_contact_id := NULL;
2857: x_return_status := FND_API.G_RET_STS_ERROR;
2858: END IF;
2859: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2860: aso_debug_pub.add('org_contact_id in get_cust_acct_roles = '|| l_org_contact_id,1,'N');
2861: END IF;
2862: CLOSE org_contact;
2863:
2856: l_org_contact_id := NULL;
2857: x_return_status := FND_API.G_RET_STS_ERROR;
2858: END IF;
2859: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2860: aso_debug_pub.add('org_contact_id in get_cust_acct_roles = '|| l_org_contact_id,1,'N');
2861: END IF;
2862: CLOSE org_contact;
2863:
2864: OPEN cust_role_exists(p_party_id);
2871: ELSE
2872: OPEN cust_role(p_party_id);
2873: FETCH cust_role INTO l_cust_account_role_id, cust_account_role_status;
2874:
2875: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2876: aso_debug_pub.add('cust account role id = ' || l_cust_account_role_id, 1, 'N');
2877: aso_debug_pub.add('cust account role status = ' || cust_account_role_status, 1 , 'N');
2878: END IF;
2879:
2872: OPEN cust_role(p_party_id);
2873: FETCH cust_role INTO l_cust_account_role_id, cust_account_role_status;
2874:
2875: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2876: aso_debug_pub.add('cust account role id = ' || l_cust_account_role_id, 1, 'N');
2877: aso_debug_pub.add('cust account role status = ' || cust_account_role_status, 1 , 'N');
2878: END IF;
2879:
2880: IF (cust_role%NOTFOUND) THEN
2873: FETCH cust_role INTO l_cust_account_role_id, cust_account_role_status;
2874:
2875: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2876: aso_debug_pub.add('cust account role id = ' || l_cust_account_role_id, 1, 'N');
2877: aso_debug_pub.add('cust account role status = ' || cust_account_role_status, 1 , 'N');
2878: END IF;
2879:
2880: IF (cust_role%NOTFOUND) THEN
2881: l_cust_account_role_id := NULL;
2890: FND_MSG_PUB.ADD;
2891: END IF;
2892: CLOSE cust_role;
2893: END IF;
2894: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2895: aso_debug_pub.add('l_cust_account_role_id in get_cust_acct_roles = '|| l_cust_account_role_id,1,'N');
2896: END IF;
2897: x_party_id := p_party_id;
2898:
2891: END IF;
2892: CLOSE cust_role;
2893: END IF;
2894: IF aso_debug_pub.g_debug_flag = 'Y' THEN
2895: aso_debug_pub.add('l_cust_account_role_id in get_cust_acct_roles = '|| l_cust_account_role_id,1,'N');
2896: END IF;
2897: x_party_id := p_party_id;
2898:
2899: END IF; -- end party relationship
3083: x_return_status := FND_API.G_RET_STS_ERROR;
3084: END IF;
3085: CLOSE C_party;
3086:
3087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3088: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
3089: aso_debug_pub.add('l_party_id is = ' || l_party_id,1,'N');
3090: END IF;
3091:
3084: END IF;
3085: CLOSE C_party;
3086:
3087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3088: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
3089: aso_debug_pub.add('l_party_id is = ' || l_party_id,1,'N');
3090: END IF;
3091:
3092: OPEN C_active_contact (l_party_id);
3085: CLOSE C_party;
3086:
3087: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3088: aso_debug_pub.add('x_return_status = ' || x_return_status,1,'N');
3089: aso_debug_pub.add('l_party_id is = ' || l_party_id,1,'N');
3090: END IF;
3091:
3092: OPEN C_active_contact (l_party_id);
3093: FETCH C_active_contact INTO x_cust_account_role_id, cust_account_role_status;
3090: END IF;
3091:
3092: OPEN C_active_contact (l_party_id);
3093: FETCH C_active_contact INTO x_cust_account_role_id, cust_account_role_status;
3094: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3095: aso_debug_pub.add('cust account role id = ' || x_cust_account_role_id, 1, 'N');
3096: aso_debug_pub.add('cust_account_role_status = '|| cust_account_role_status, 1, 'N');
3097: END IF;
3098: IF (C_active_contact%NOTFOUND) THEN
3091:
3092: OPEN C_active_contact (l_party_id);
3093: FETCH C_active_contact INTO x_cust_account_role_id, cust_account_role_status;
3094: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3095: aso_debug_pub.add('cust account role id = ' || x_cust_account_role_id, 1, 'N');
3096: aso_debug_pub.add('cust_account_role_status = '|| cust_account_role_status, 1, 'N');
3097: END IF;
3098: IF (C_active_contact%NOTFOUND) THEN
3099: -- this means there are no active contacts
3092: OPEN C_active_contact (l_party_id);
3093: FETCH C_active_contact INTO x_cust_account_role_id, cust_account_role_status;
3094: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3095: aso_debug_pub.add('cust account role id = ' || x_cust_account_role_id, 1, 'N');
3096: aso_debug_pub.add('cust_account_role_status = '|| cust_account_role_status, 1, 'N');
3097: END IF;
3098: IF (C_active_contact%NOTFOUND) THEN
3099: -- this means there are no active contacts
3100: OPEN C_inactive_contact(l_party_id);
3113: END IF;
3114: CLOSE C_active_contact;
3115:
3116: x_party_id := l_party_id;
3117: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3118: aso_debug_pub.add('cust acct role '||x_cust_account_role_id,1,'N');
3119: END IF;
3120: END get_org_contact_role;
3121:
3114: CLOSE C_active_contact;
3115:
3116: x_party_id := l_party_id;
3117: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3118: aso_debug_pub.add('cust acct role '||x_cust_account_role_id,1,'N');
3119: END IF;
3120: END get_org_contact_role;
3121:
3122:
3724: := P_header_sales_credit_Tbl(j).resource_group_id;
3725:
3726: l_Header_Scredit_tbl(sc_count).sales_group_updated_flag := 'Y';
3727:
3728: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3729: aso_debug_pub.add('map_header_sales_credits : l_Header_Scredit_tbl(sc_count).sales_group_id : '||l_Header_Scredit_tbl(sc_count).sales_group_id, 1, 'N');
3730: END IF;
3731: /* Code added for Bug 9865459 End */
3732:
3725:
3726: l_Header_Scredit_tbl(sc_count).sales_group_updated_flag := 'Y';
3727:
3728: IF aso_debug_pub.g_debug_flag = 'Y' THEN
3729: aso_debug_pub.add('map_header_sales_credits : l_Header_Scredit_tbl(sc_count).sales_group_id : '||l_Header_Scredit_tbl(sc_count).sales_group_id, 1, 'N');
3730: END IF;
3731: /* Code added for Bug 9865459 End */
3732:
3733: l_Header_Scredit_tbl(sc_count).SALES_CREDIT_TYPE_ID
4187: END IF;
4188:
4189: -- pbh/prg
4190: FOR j in 1..lx_Line_Price_Adj_rltship_Tbl.count LOOP
4191: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4192: aso_debug_pub.add('map_ln_rlt: p_line_price_adj_tbl(pad_count).price_adjustment_id: '||p_line_price_adj_tbl(pad_count).price_adjustment_id,1,'N');
4193: END IF;
4194:
4195: IF lx_Line_Price_Adj_rltship_Tbl(j).price_adjustment_id
4188:
4189: -- pbh/prg
4190: FOR j in 1..lx_Line_Price_Adj_rltship_Tbl.count LOOP
4191: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4192: aso_debug_pub.add('map_ln_rlt: p_line_price_adj_tbl(pad_count).price_adjustment_id: '||p_line_price_adj_tbl(pad_count).price_adjustment_id,1,'N');
4193: END IF;
4194:
4195: IF lx_Line_Price_Adj_rltship_Tbl(j).price_adjustment_id
4196: = p_line_price_adj_tbl(pad_count).price_adjustment_id THEN
4204:
4205: END LOOP;
4206: -- pbh/prg
4207:
4208: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4209: aso_debug_pub.add('map_ln_rlt: lx_Line_Price_Adj_rltship_Tbl.count: '||lx_Line_Price_Adj_rltship_Tbl.count,1,'N');
4210: END IF;
4211:
4212: END LOOP; --- price adjustments
4205: END LOOP;
4206: -- pbh/prg
4207:
4208: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4209: aso_debug_pub.add('map_ln_rlt: lx_Line_Price_Adj_rltship_Tbl.count: '||lx_Line_Price_Adj_rltship_Tbl.count,1,'N');
4210: END IF;
4211:
4212: END LOOP; --- price adjustments
4213:
4356: := P_line_sales_credit_Tbl(l).resource_group_id;
4357:
4358: l_Line_Scredit_tbl(sc_count).sales_group_updated_flag := 'Y';
4359:
4360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4361: aso_debug_pub.add('map_line_sales_credit : l_line_Scredit_tbl(sc_count).sales_group_id : '||l_line_Scredit_tbl(sc_count).sales_group_id, 1, 'N');
4362: END IF;
4363: /* Code added for Bug 9865459 End */
4364:
4357:
4358: l_Line_Scredit_tbl(sc_count).sales_group_updated_flag := 'Y';
4359:
4360: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4361: aso_debug_pub.add('map_line_sales_credit : l_line_Scredit_tbl(sc_count).sales_group_id : '||l_line_Scredit_tbl(sc_count).sales_group_id, 1, 'N');
4362: END IF;
4363: /* Code added for Bug 9865459 End */
4364:
4365: l_Line_Scredit_tbl(sc_count).SALES_CREDIT_TYPE_ID
4420: ELSE
4421: x_Line_tbl(p_line_index).payment_term_id := P_Line_Payment_Tbl(i).payment_term_id;
4422: END IF;
4423:
4424: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4425: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_number: '||P_Line_Payment_Tbl(i).cust_po_number,1,'N');
4426: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_line_number: '||P_Line_Payment_Tbl(i).cust_po_line_number,1,'N');
4427: END IF;
4428:
4421: x_Line_tbl(p_line_index).payment_term_id := P_Line_Payment_Tbl(i).payment_term_id;
4422: END IF;
4423:
4424: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4425: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_number: '||P_Line_Payment_Tbl(i).cust_po_number,1,'N');
4426: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_line_number: '||P_Line_Payment_Tbl(i).cust_po_line_number,1,'N');
4427: END IF;
4428:
4429: x_Line_tbl(p_line_index).cust_po_number := P_Line_Payment_Tbl(i).cust_po_number;
4422: END IF;
4423:
4424: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4425: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_number: '||P_Line_Payment_Tbl(i).cust_po_number,1,'N');
4426: aso_debug_pub.add('P_Line_Payment_Tbl(i).cust_po_line_number: '||P_Line_Payment_Tbl(i).cust_po_line_number,1,'N');
4427: END IF;
4428:
4429: x_Line_tbl(p_line_index).cust_po_number := P_Line_Payment_Tbl(i).cust_po_number;
4430: x_Line_tbl(p_line_index).customer_line_number := P_Line_Payment_Tbl(i).cust_po_line_number;
4428:
4429: x_Line_tbl(p_line_index).cust_po_number := P_Line_Payment_Tbl(i).cust_po_number;
4430: x_Line_tbl(p_line_index).customer_line_number := P_Line_Payment_Tbl(i).cust_po_line_number;
4431:
4432: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4433: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_type_code: '||P_Line_Payment_Tbl(i).payment_type_code,1,'N');
4434: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_amount: '||P_Line_Payment_Tbl(i).payment_amount,1,'N');
4435: END IF;
4436: IF P_Line_Payment_Tbl(i).payment_type_code IS NOT NULL THEN
4429: x_Line_tbl(p_line_index).cust_po_number := P_Line_Payment_Tbl(i).cust_po_number;
4430: x_Line_tbl(p_line_index).customer_line_number := P_Line_Payment_Tbl(i).cust_po_line_number;
4431:
4432: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4433: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_type_code: '||P_Line_Payment_Tbl(i).payment_type_code,1,'N');
4434: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_amount: '||P_Line_Payment_Tbl(i).payment_amount,1,'N');
4435: END IF;
4436: IF P_Line_Payment_Tbl(i).payment_type_code IS NOT NULL THEN
4437:
4430: x_Line_tbl(p_line_index).customer_line_number := P_Line_Payment_Tbl(i).cust_po_line_number;
4431:
4432: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4433: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_type_code: '||P_Line_Payment_Tbl(i).payment_type_code,1,'N');
4434: aso_debug_pub.add('P_Line_Payment_Tbl(i).payment_amount: '||P_Line_Payment_Tbl(i).payment_amount,1,'N');
4435: END IF;
4436: IF P_Line_Payment_Tbl(i).payment_type_code IS NOT NULL THEN
4437:
4438: l_Line_Payment_tbl(pay_count).payment_type_code := P_Line_Payment_Tbl(i).payment_type_code;
4444: l_Line_Payment_tbl(pay_count).trxn_extension_id := P_Line_Payment_Tbl(i).trxn_extension_id;
4445: l_Line_Payment_tbl(pay_count).payment_collection_event := 'INVOICE';
4446: l_Line_Payment_tbl(pay_count).payment_level_code := 'LINE';
4447:
4448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4445: l_Line_Payment_tbl(pay_count).payment_collection_event := 'INVOICE';
4446: l_Line_Payment_tbl(pay_count).payment_level_code := 'LINE';
4447:
4448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4446: l_Line_Payment_tbl(pay_count).payment_level_code := 'LINE';
4447:
4448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4454: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_level_code: '||l_Line_Payment_tbl(pay_count).payment_level_code,1,'N');
4447:
4448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4454: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_level_code: '||l_Line_Payment_tbl(pay_count).payment_level_code,1,'N');
4455: END IF;
4448: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4454: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_level_code: '||l_Line_Payment_tbl(pay_count).payment_level_code,1,'N');
4455: END IF;
4456:
4449: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_type_code: '||l_Line_Payment_tbl(pay_count).payment_type_code,1,'N');
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4454: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_level_code: '||l_Line_Payment_tbl(pay_count).payment_level_code,1,'N');
4455: END IF;
4456:
4457: /* Start : code change done for Bug 9401669 */
4450: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_amount: '||l_Line_Payment_tbl(pay_count).payment_amount,1,'N');
4451: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).operation: '||l_Line_Payment_tbl(pay_count).operation,1,'N');
4452: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).trxn_extension_id: '||l_Line_Payment_tbl(pay_count).trxn_extension_id,1,'N');
4453: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_collection_event: '||l_Line_Payment_tbl(pay_count).payment_collection_event,1,'N');
4454: aso_debug_pub.add('l_Line_Payment_tbl(pay_count).payment_level_code: '||l_Line_Payment_tbl(pay_count).payment_level_code,1,'N');
4455: END IF;
4456:
4457: /* Start : code change done for Bug 9401669 */
4458: If (l_Line_Payment_tbl(pay_count).trxn_extension_id Is Null Or
4460:
4461: l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID := P_Line_Payment_Tbl(i).INSTR_ASSIGNMENT_ID;
4462: l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID := P_Line_Payment_Tbl(i).INSTRUMENT_ID;
4463:
4464: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4465: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
4466: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
4467: END IF;
4468: End If;
4461: l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID := P_Line_Payment_Tbl(i).INSTR_ASSIGNMENT_ID;
4462: l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID := P_Line_Payment_Tbl(i).INSTRUMENT_ID;
4463:
4464: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4465: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
4466: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
4467: END IF;
4468: End If;
4469: /* End : code change done for Bug 9401669 */
4462: l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID := P_Line_Payment_Tbl(i).INSTRUMENT_ID;
4463:
4464: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4465: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ASSIGNMENT_ID, 1, 'N');
4466: aso_debug_pub.add('Map_Quote_to_order : l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID : '||l_Line_Payment_tbl(pay_count).CC_INSTRUMENT_ID, 1, 'N');
4467: END IF;
4468: End If;
4469: /* End : code change done for Bug 9401669 */
4470:
4475: END IF; -- payment_type_code is not null
4476:
4477: -- Code Change done for Bug 14180257
4478: l_Line_Payment_tbl(pay_count).receipt_method_id := fnd_api.g_miss_num;
4479: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4480: aso_debug_pub.add('Map_Quote_to_order : Passing line receipt method id as g miss num' ,1,'N');
4481: END IF;
4482:
4483: pay_count := pay_count +1;
4476:
4477: -- Code Change done for Bug 14180257
4478: l_Line_Payment_tbl(pay_count).receipt_method_id := fnd_api.g_miss_num;
4479: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4480: aso_debug_pub.add('Map_Quote_to_order : Passing line receipt method id as g miss num' ,1,'N');
4481: END IF;
4482:
4483: pay_count := pay_count +1;
4484:
4487: END LOOP;
4488:
4489: x_Line_Payment_tbl := l_Line_Payment_tbl;
4490: --x_Line_tbl := l_Line_tbl;
4491: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4492: aso_debug_pub.add('mapped line payment tblx_Line_Payment_tbl.count'||x_Line_Payment_tbl.count,1,'N');
4493: aso_debug_pub.add('mapped line payment tbl',1,'N');
4494: aso_debug_pub.add('mapped line payment tblx_Line_tbl.count'||x_Line_tbl.count,1,'N');
4495: END IF;
4488:
4489: x_Line_Payment_tbl := l_Line_Payment_tbl;
4490: --x_Line_tbl := l_Line_tbl;
4491: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4492: aso_debug_pub.add('mapped line payment tblx_Line_Payment_tbl.count'||x_Line_Payment_tbl.count,1,'N');
4493: aso_debug_pub.add('mapped line payment tbl',1,'N');
4494: aso_debug_pub.add('mapped line payment tblx_Line_tbl.count'||x_Line_tbl.count,1,'N');
4495: END IF;
4496:
4489: x_Line_Payment_tbl := l_Line_Payment_tbl;
4490: --x_Line_tbl := l_Line_tbl;
4491: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4492: aso_debug_pub.add('mapped line payment tblx_Line_Payment_tbl.count'||x_Line_Payment_tbl.count,1,'N');
4493: aso_debug_pub.add('mapped line payment tbl',1,'N');
4494: aso_debug_pub.add('mapped line payment tblx_Line_tbl.count'||x_Line_tbl.count,1,'N');
4495: END IF;
4496:
4497:
4490: --x_Line_tbl := l_Line_tbl;
4491: IF aso_debug_pub.g_debug_flag = 'Y' THEN
4492: aso_debug_pub.add('mapped line payment tblx_Line_Payment_tbl.count'||x_Line_Payment_tbl.count,1,'N');
4493: aso_debug_pub.add('mapped line payment tbl',1,'N');
4494: aso_debug_pub.add('mapped line payment tblx_Line_tbl.count'||x_Line_tbl.count,1,'N');
4495: END IF;
4496:
4497:
4498: end map_line_payments;