DBA Data[Home] [Help]

APPS.DPP_PURCHASEPRICE_PVT dependencies on DPP_UTILITY_PVT

Line 147: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');

143: END IF;
144:
145: -- Debug Message
146: IF g_debug THEN
147: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
148: END IF;
149: -- Initialize API return status to sucess
150: l_return_status := FND_API.G_RET_STS_SUCCESS;
151: l_cur_return_status := FND_API.G_RET_STS_SUCCESS;

Line 164: DPP_UTILITY_PVT.debug_message('Invalid User');

160: FROM fnd_user
161: WHERE user_id = l_item_price_rec.last_updated_by;
162: EXCEPTION
163: WHEN NO_DATA_FOUND THEN
164: DPP_UTILITY_PVT.debug_message('Invalid User');
165: RAISE FND_API.G_EXC_ERROR;
166: WHEN OTHERS THEN
167: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
168: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');

Line 519: DPP_UTILITY_PVT.debug_message('Price Protection responsibility not available for Last updated user'||l_user_name);

515: FND_MESSAGE.set_name('DPP', 'DPP_INVALID_RESP');
516: FND_MESSAGE.set_token('USER', l_user_name);
517: FND_MSG_PUB.add;
518: IF g_debug THEN
519: DPP_UTILITY_PVT.debug_message('Price Protection responsibility not available for Last updated user'||l_user_name);
520: END IF;
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523:

Line 543: DPP_UTILITY_PVT.debug_message('PO Line Price Update for item: ' || l_item_cost_tbl(i).item_number

539: l_po_details_tbl(i).Document_Type := po_rec.type_lookup_code;
540: l_po_details_tbl(i).Line_Number := po_rec.line_num;
541: -- Debug Message
542: IF g_debug THEN
543: DPP_UTILITY_PVT.debug_message('PO Line Price Update for item: ' || l_item_cost_tbl(i).item_number
544: || ' for PO Number ' ||po_rec.po_num|| 'start');
545: END IF;
546: IF po_rec.currency_code IS NOT NULL THEN
547: IF po_rec.currency_code = l_item_cost_tbl(i).currency THEN --currency conversion req or not

Line 550: DPP_UTILITY_PVT.convert_currency(p_from_currency => l_item_cost_tbl(i).currency

546: IF po_rec.currency_code IS NOT NULL THEN
547: IF po_rec.currency_code = l_item_cost_tbl(i).currency THEN --currency conversion req or not
548: l_new_price := l_item_cost_tbl(i).new_price;
549: ELSE --currency conversion req or not
550: DPP_UTILITY_PVT.convert_currency(p_from_currency => l_item_cost_tbl(i).currency
551: ,p_to_currency => po_rec.currency_code
552: ,p_conv_type => FND_API.G_MISS_CHAR
553: ,p_conv_rate => FND_API.G_MISS_NUM
554: ,p_conv_date => SYSDATE

Line 564: DPP_UTILITY_PVT.debug_message('Error in Currency Conversion to PO Currency: ' || po_rec.currency_code);

560: END IF; --currency conversion req or not
561: -- Handle currency conversion error
562: IF l_cur_return_status <> FND_API.G_RET_STS_SUCCESS THEN
563: IF g_debug THEN
564: DPP_UTILITY_PVT.debug_message('Error in Currency Conversion to PO Currency: ' || po_rec.currency_code);
565: END IF;
566: l_po_details_tbl(i).Reason_For_Failure := NVL(l_po_details_tbl(i).Reason_For_Failure,' ')
567: ||'Error in Currency Conversion to PO Currency: '
568: || po_rec.currency_code;

Line 585: DPP_UTILITY_PVT.debug_message('No update required since PO line price is same for '||po_rec.po_num);

581: ELSE --l_cur_return_status is success
582: --Check if the Price is Same
583: IF po_rec.unit_price = l_new_price THEN
584: IF g_debug THEN
585: DPP_UTILITY_PVT.debug_message('No update required since PO line price is same for '||po_rec.po_num);
586: END IF;
587: ELSE ---po_rec.unit_price = l_new_price THEN
588: -- Debug Message
589: IF g_debug THEN

Line 590: DPP_UTILITY_PVT.debug_message('Price to be updated for item: ' || l_item_cost_tbl(i).item_number || ' is ' ||l_new_price);

586: END IF;
587: ELSE ---po_rec.unit_price = l_new_price THEN
588: -- Debug Message
589: IF g_debug THEN
590: DPP_UTILITY_PVT.debug_message('Price to be updated for item: ' || l_item_cost_tbl(i).item_number || ' is ' ||l_new_price);
591: END IF;
592: l_result := PO_CHANGE_API1_S.update_po(x_po_number => po_rec.po_num,
593: x_release_number => po_rec.release_num,
594: x_revision_number => po_rec.revision_num,

Line 613: DPP_UTILITY_PVT.debug_message('PO API Result for item: ' || l_item_cost_tbl(i).item_number ||' and PO Number: '||po_rec.po_num ||' is ' ||l_result);

609: p_org_id => l_item_price_rec.org_id
610: );
611: -- Debug Message
612: IF g_debug THEN
613: DPP_UTILITY_PVT.debug_message('PO API Result for item: ' || l_item_cost_tbl(i).item_number ||' and PO Number: '||po_rec.po_num ||' is ' ||l_result);
614: END IF;
615: IF (l_result <> 1) THEN
616: l_status_Update_tbl(i).update_status := 'N';
617: l_return_status := FND_API.G_RET_STS_ERROR;

Line 623: DPP_UTILITY_PVT.debug_message('Error Message: ' || l_api_errors.message_text(j));

619: FOR j IN 1..l_api_errors.message_text.COUNT LOOP
620: l_po_details_tbl(i).Reason_for_failure := l_api_errors.message_text(j);
621: -- Debug Message
622: IF g_debug THEN
623: DPP_UTILITY_PVT.debug_message('Error Message: ' || l_api_errors.message_text(j));
624: END IF;
625: INSERT INTO DPP_OUTPUT_XML_GT(Item_Number,
626: Document_Type,
627: Document_Number,

Line 643: DPP_UTILITY_PVT.debug_message('PO Line Price Update for item: ' || l_item_cost_tbl(i).item_number

639: x_return_status := l_return_status;
640: END IF;
641: -- Debug Message
642: IF g_debug THEN
643: DPP_UTILITY_PVT.debug_message('PO Line Price Update for item: ' || l_item_cost_tbl(i).item_number
644: || ' for PO Number ' ||po_rec.po_num|| 'end');
645: END IF;
646: END IF; ---po_rec.unit_price = l_new_price THEN
647: END IF; --Currency status success

Line 660: DPP_UTILITY_PVT.debug_message('Status before generating output xml: ' || x_return_status);

656: END IF;
657: --OutputXML Generation
658: BEGIN
659: IF g_debug THEN
660: DPP_UTILITY_PVT.debug_message('Status before generating output xml: ' || x_return_status);
661: END IF;
662: --Get the output XML from DPP_OUTPUT_XML_GT table
663: l_Transaction_Number := ''''||l_item_price_rec.Transaction_Number||'''';
664: IF x_return_status IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 710: DPP_UTILITY_PVT.debug_message('Status after update execution details: ' || l_return_status);

706: ,p_EXE_UPDATE_rec => l_exe_update_rec
707: ,p_status_Update_tbl => l_status_Update_tbl
708: );
709: IF g_debug THEN
710: DPP_UTILITY_PVT.debug_message('Status after update execution details: ' || l_return_status);
711: END IF;
712:
713: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
714: RAISE FND_API.G_EXC_ERROR;

Line 726: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');

722: COMMIT WORK;
723: END IF;
724: -- Debug Message
725: IF g_debug THEN
726: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
727: END IF;
728: -- Standard call to get message count and if count is 1, get message info.
729: FND_MSG_PUB.Count_And_Get
730: (p_count => x_msg_count,

Line 824: l_vendor_rec DPP_UTILITY_PVT.vendor_rec_type;

820:
821: l_po_notify_hdr_rec DPP_PURCHASEPRICE_PVT.dpp_po_notify_rec_type := p_po_notify_hdr_rec;
822: l_po_notify_item_tbl DPP_PURCHASEPRICE_PVT.dpp_po_notify_item_tbl_type := p_po_notify_item_tbl;
823: l_po_details_tbl DPP_PURCHASEPRICE_PVT.dpp_po_details_tbl_type;
824: l_vendor_rec DPP_UTILITY_PVT.vendor_rec_type;
825: l_vendor_site_rec DPP_UTILITY_PVT.vendor_site_rec_type;
826:
827: CURSOR get_po_details_csr(p_vendor_id IN NUMBER, p_inventory_item_id IN NUMBER, p_org_id IN NUMBER)
828: IS

Line 825: l_vendor_site_rec DPP_UTILITY_PVT.vendor_site_rec_type;

821: l_po_notify_hdr_rec DPP_PURCHASEPRICE_PVT.dpp_po_notify_rec_type := p_po_notify_hdr_rec;
822: l_po_notify_item_tbl DPP_PURCHASEPRICE_PVT.dpp_po_notify_item_tbl_type := p_po_notify_item_tbl;
823: l_po_details_tbl DPP_PURCHASEPRICE_PVT.dpp_po_details_tbl_type;
824: l_vendor_rec DPP_UTILITY_PVT.vendor_rec_type;
825: l_vendor_site_rec DPP_UTILITY_PVT.vendor_site_rec_type;
826:
827: CURSOR get_po_details_csr(p_vendor_id IN NUMBER, p_inventory_item_id IN NUMBER, p_org_id IN NUMBER)
828: IS
829: /* Select PO Lines with Partial Receipts */

Line 1066: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');

1062: END IF;
1063:
1064: -- Debug Message
1065: IF g_debug THEN
1066: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1067: END IF;
1068: -- Initialize API return status to sucess
1069: x_return_status := FND_API.G_RET_STS_SUCCESS;
1070: --

Line 1074: DPP_UTILITY_PVT.Get_Vendor(p_vendor_rec => l_vendor_rec

1070: --
1071: -- API body
1072: --
1073: l_vendor_rec.vendor_id := l_po_notify_hdr_rec.vendor_id;
1074: DPP_UTILITY_PVT.Get_Vendor(p_vendor_rec => l_vendor_rec
1075: ,x_rec_count => l_rec_count
1076: ,x_return_status => l_return_status
1077: );
1078: l_po_notify_hdr_rec.Vendor_Number := l_vendor_rec.Vendor_Number;

Line 1083: DPP_UTILITY_PVT.Get_Vendor_Site(p_vendor_site_rec => l_vendor_site_rec

1079: l_po_notify_hdr_rec.Vendor_Name := l_vendor_rec.Vendor_Name;
1080: l_vendor_site_rec.Vendor_id := l_po_notify_hdr_rec.Vendor_id;
1081: l_vendor_site_rec.Vendor_Site_id := l_po_notify_hdr_rec.Vendor_Site_id;
1082:
1083: DPP_UTILITY_PVT.Get_Vendor_Site(p_vendor_site_rec => l_vendor_site_rec
1084: ,x_rec_count => l_rec_count
1085: ,x_return_status => l_return_status
1086: );
1087:

Line 1102: DPP_Utility_PVT.debug_message('Inventory Item ID cannot be NULL');

1098: IF l_po_notify_item_tbl.EXISTS(1) THEN
1099: FOR i IN l_po_notify_item_tbl.FIRST..l_po_notify_item_tbl.LAST LOOP
1100: IF l_po_notify_item_tbl(i).inventory_item_id IS NULL THEN
1101: IF g_debug THEN
1102: DPP_Utility_PVT.debug_message('Inventory Item ID cannot be NULL');
1103: END IF;
1104: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
1105: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
1106: FND_MSG_PUB.add;

Line 1143: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');

1139: END IF;
1140:
1141: -- Debug Message
1142: IF g_debug THEN
1143: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1144: END IF;
1145: -- Standard call to get message count and if count is 1, get message info.
1146: FND_MSG_PUB.Count_And_Get
1147: (p_count => x_msg_count,