DBA Data[Home] [Help]

APPS.DPP_PURCHASEPRICE_PVT dependencies on FND_API

Line 30: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

26: ----------------------------------------------------------------------
27:
28: PROCEDURE Update_PurchasePrice(
29: p_api_version IN NUMBER
30: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
31: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
32: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
33: ,x_return_status OUT NOCOPY VARCHAR2
34: ,x_msg_count OUT NOCOPY NUMBER

Line 31: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

27:
28: PROCEDURE Update_PurchasePrice(
29: p_api_version IN NUMBER
30: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
31: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
32: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
33: ,x_return_status OUT NOCOPY VARCHAR2
34: ,x_msg_count OUT NOCOPY NUMBER
35: ,x_msg_data OUT NOCOPY VARCHAR2

Line 32: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

28: PROCEDURE Update_PurchasePrice(
29: p_api_version IN NUMBER
30: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
31: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
32: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
33: ,x_return_status OUT NOCOPY VARCHAR2
34: ,x_msg_count OUT NOCOPY NUMBER
35: ,x_msg_data OUT NOCOPY VARCHAR2
36: ,p_item_price_rec IN dpp_txn_hdr_rec_type

Line 134: IF NOT FND_API.Compatible_API_Call ( l_api_version,

130:
131: -- Standard begin of API savepoint
132: SAVEPOINT Update_PurchasePrice_PVT;
133: -- Standard call to check for call compatibility.
134: IF NOT FND_API.Compatible_API_Call ( l_api_version,
135: p_api_version,
136: l_api_name,
137: G_PKG_NAME) THEN
138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

134: IF NOT FND_API.Compatible_API_Call ( l_api_version,
135: p_api_version,
136: l_api_name,
137: G_PKG_NAME) THEN
138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
139: END IF;
140: -- Initialize message list if p_init_msg_list is set to TRUE.
141: IF FND_API.to_Boolean( p_init_msg_list )
142: THEN

Line 141: IF FND_API.to_Boolean( p_init_msg_list )

137: G_PKG_NAME) THEN
138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
139: END IF;
140: -- Initialize message list if p_init_msg_list is set to TRUE.
141: IF FND_API.to_Boolean( p_init_msg_list )
142: THEN
143: FND_MSG_PUB.initialize;
144: END IF;
145:

Line 150: l_return_status := FND_API.G_RET_STS_SUCCESS;

146: -- Debug Message
147: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Private API: ' || l_api_name || 'start');
148:
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;
152: x_return_status := l_return_status;
153: --
154: -- API body

Line 151: l_cur_return_status := FND_API.G_RET_STS_SUCCESS;

147: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Private API: ' || l_api_name || 'start');
148:
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;
152: x_return_status := l_return_status;
153: --
154: -- API body
155: --

Line 165: RAISE FND_API.G_EXC_ERROR;

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(FND_LOG.LEVEL_EXCEPTION, l_module,'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');
169: fnd_message.set_token('ERRNO', sqlcode);

Line 172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

168: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
169: fnd_message.set_token('ERRNO', sqlcode);
170: fnd_message.set_token('REASON', sqlerrm);
171: FND_MSG_PUB.add;
172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
173: END;
174: --Getting a valid Price Protection Responsibility at the User Level Profile Options
175: BEGIN
176: SELECT frv.responsibility_id

Line 248: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

244: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
245: fnd_message.set_token('ERRNO', sqlcode);
246: fnd_message.set_token('REASON', sqlerrm);
247: FND_MSG_PUB.add;
248: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
249: END;
250: WHEN OTHERS THEN
251: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
252: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');

Line 256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

252: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
253: fnd_message.set_token('ERRNO', sqlcode);
254: fnd_message.set_token('REASON', sqlerrm);
255: FND_MSG_PUB.add;
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: END;
258: --Getting a valid Price Protection Responsibility at the Responsibility Level Profile Options
259: IF l_responsibility_id = -1 THEN
260: BEGIN

Line 332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

328: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
329: fnd_message.set_token('ERRNO', sqlcode);
330: fnd_message.set_token('REASON', sqlerrm);
331: FND_MSG_PUB.add;
332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
333: END;
334: WHEN OTHERS THEN
335: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
336: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');

Line 340: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

336: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
337: fnd_message.set_token('ERRNO', sqlcode);
338: fnd_message.set_token('REASON', sqlerrm);
339: FND_MSG_PUB.add;
340: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
341: END;
342: END IF;
343: --Getting a valid Price Protection Responsibility at the Application Level Profile Options
344: IF l_responsibility_id = -1 THEN

Line 417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

413: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
414: fnd_message.set_token('ERRNO', sqlcode);
415: fnd_message.set_token('REASON', sqlerrm);
416: FND_MSG_PUB.add;
417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
418: END;
419: WHEN OTHERS THEN
420: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
421: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');

Line 425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

421: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
422: fnd_message.set_token('ERRNO', sqlcode);
423: fnd_message.set_token('REASON', sqlerrm);
424: FND_MSG_PUB.add;
425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
426: END;
427: END IF;
428: --Getting a valid Price Protection Responsibility at the Site Level Profile Options
429: IF l_responsibility_id = -1 THEN

Line 502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

498: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
499: fnd_message.set_token('ERRNO', sqlcode);
500: fnd_message.set_token('REASON', sqlerrm);
501: FND_MSG_PUB.add;
502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
503: END;
504: WHEN OTHERS THEN
505: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
506: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');

Line 510: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

506: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT');
507: fnd_message.set_token('ERRNO', sqlcode);
508: fnd_message.set_token('REASON', sqlerrm);
509: FND_MSG_PUB.add;
510: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
511: END;
512: END IF;
513: --Check if the responsibility id s -1
514: IF l_responsibility_id = -1 THEN

Line 521: RAISE FND_API.G_EXC_ERROR;

517: FND_MSG_PUB.add;
518:
519: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Price Protection responsibility not available for Last updated user'||l_user_name);
520:
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523:
524: FND_GLOBAL.APPS_INITIALIZE(l_item_price_rec.last_updated_by,l_responsibility_id,l_dpp_application_id);
525:

Line 552: ,p_conv_type => FND_API.G_MISS_CHAR

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
555: ,p_from_amount => l_item_cost_tbl(i).new_price
556: ,x_return_status => l_cur_return_status

Line 553: ,p_conv_rate => FND_API.G_MISS_NUM

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
555: ,p_from_amount => l_item_cost_tbl(i).new_price
556: ,x_return_status => l_cur_return_status
557: ,x_to_amount => l_new_price

Line 562: IF l_cur_return_status <> FND_API.G_RET_STS_SUCCESS THEN

558: ,x_rate => l_exchange_rate
559: );
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: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Error in Currency Conversion to PO Currency: ' || po_rec.currency_code);
564:
565: l_po_details_tbl(i).Reason_For_Failure := NVL(l_po_details_tbl(i).Reason_For_Failure,' ')
566: ||'Error in Currency Conversion to PO Currency: '

Line 612: l_return_status := FND_API.G_RET_STS_ERROR;

608: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'PO API Result for item: ' || l_item_cost_tbl(i).item_number ||' and PO Number: '||po_rec.po_num ||' is ' ||l_result);
609:
610: IF (l_result <> 1) THEN
611: l_status_Update_tbl(i).update_status := 'N';
612: l_return_status := FND_API.G_RET_STS_ERROR;
613: -- Display the errors
614: FOR j IN 1..l_api_errors.message_text.COUNT LOOP
615: l_po_details_tbl(i).Reason_for_failure := l_api_errors.message_text(j);
616: -- Debug Message

Line 632: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

628: END LOOP;
629: ELSE --(l_result <> 1) THEN
630: l_status_Update_tbl(i).update_status := 'Y';
631: END IF;
632: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
633: x_return_status := l_return_status;
634: END IF;
635: -- Debug Message
636: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'PO Line Price Update for item: ' || l_item_cost_tbl(i).item_number

Line 645: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

641: END IF; --po_rec.currency_code IS NOT NULL THEN
642: END IF ; -- For blanket purchase agreements
643: END LOOP; -- po cursor loop
644: END LOOP; -- all records
645: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
646: l_exe_update_rec.execution_status := 'SUCCESS';
647: ELSE
648: l_exe_update_rec.execution_status := 'WARNING';
649: END IF;

Line 656: IF x_return_status IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) THEN

652: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Status before generating output xml: ' || x_return_status);
653:
654: --Get the output XML from DPP_OUTPUT_XML_GT table
655: l_Transaction_Number := ''''||l_item_price_rec.Transaction_Number||'''';
656: IF x_return_status IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) THEN
657: l_queryCtx := dbms_xmlquery.newContext('SELECT '||l_Transaction_Number||' TXNNUMBER,
658: CURSOR (Select Item_Number ITEMNUMBER,
659: Document_Type POTYPE,
660: Document_Number PONUMBER,

Line 674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

670: l_output_xml := dbms_xmlquery.getXml(l_queryCtx);
671: dbms_xmlquery.closeContext(l_queryCtx);
672: EXCEPTION
673: WHEN OTHERS THEN
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
675: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
676: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT.Update_PurchasePrice-XML Generation');
677: fnd_message.set_token('ERRNO', sqlcode);
678: fnd_message.set_token('REASON', sqlerrm);

Line 692: ,p_init_msg_list => FND_API.G_FALSE

688: l_exe_update_rec.Provider_Process_Instance_id := l_item_price_rec.Provider_Process_Instance_id;
689: l_exe_update_rec.Last_Updated_By := l_item_price_rec.Last_Updated_By;
690:
691: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
692: ,p_init_msg_list => FND_API.G_FALSE
693: ,p_commit => FND_API.G_FALSE
694: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
695: ,x_return_status => l_return_status
696: ,x_msg_count => l_msg_count

Line 693: ,p_commit => FND_API.G_FALSE

689: l_exe_update_rec.Last_Updated_By := l_item_price_rec.Last_Updated_By;
690:
691: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
692: ,p_init_msg_list => FND_API.G_FALSE
693: ,p_commit => FND_API.G_FALSE
694: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
695: ,x_return_status => l_return_status
696: ,x_msg_count => l_msg_count
697: ,x_msg_data => l_msg_data

Line 694: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

690:
691: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
692: ,p_init_msg_list => FND_API.G_FALSE
693: ,p_commit => FND_API.G_FALSE
694: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
695: ,x_return_status => l_return_status
696: ,x_msg_count => l_msg_count
697: ,x_msg_data => l_msg_data
698: ,p_EXE_UPDATE_rec => l_exe_update_rec

Line 704: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

700: );
701:
702: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Status after update execution details: ' || l_return_status);
703:
704: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
705: RAISE FND_API.G_EXC_ERROR;
706: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;

Line 705: RAISE FND_API.G_EXC_ERROR;

701:
702: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Status after update execution details: ' || l_return_status);
703:
704: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
705: RAISE FND_API.G_EXC_ERROR;
706: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:

Line 706: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

702: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Status after update execution details: ' || l_return_status);
703:
704: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
705: RAISE FND_API.G_EXC_ERROR;
706: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:
710: -- Standard check for p_commit

Line 707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

703:
704: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
705: RAISE FND_API.G_EXC_ERROR;
706: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:
710: -- Standard check for p_commit
711: IF FND_API.to_Boolean( p_commit )

Line 711: IF FND_API.to_Boolean( p_commit )

707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:
710: -- Standard check for p_commit
711: IF FND_API.to_Boolean( p_commit )
712: THEN
713: COMMIT WORK;
714: END IF;
715: -- Debug Message

Line 725: WHEN FND_API.G_EXC_ERROR THEN

721: p_data => x_msg_data
722: );
723: --Exception Handling
724: EXCEPTION
725: WHEN FND_API.G_EXC_ERROR THEN
726: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: -- Standard call to get message count and if count=1, get the message
729: FND_MSG_PUB.Count_And_Get (

Line 727: x_return_status := FND_API.G_RET_STS_ERROR;

723: --Exception Handling
724: EXCEPTION
725: WHEN FND_API.G_EXC_ERROR THEN
726: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: -- Standard call to get message count and if count=1, get the message
729: FND_MSG_PUB.Count_And_Get (
730: p_encoded => FND_API.G_FALSE,
731: p_count => x_msg_count,

Line 730: p_encoded => FND_API.G_FALSE,

726: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: -- Standard call to get message count and if count=1, get the message
729: FND_MSG_PUB.Count_And_Get (
730: p_encoded => FND_API.G_FALSE,
731: p_count => x_msg_count,
732: p_data => x_msg_data
733: );
734: IF x_msg_count > 1 THEN

Line 740: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

736: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
737: END LOOP;
738: END IF;
739:
740: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
741: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
743: -- Standard call to get message count and if count=1, get the message
744: FND_MSG_PUB.Count_And_Get (

Line 742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

738: END IF;
739:
740: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
741: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
743: -- Standard call to get message count and if count=1, get the message
744: FND_MSG_PUB.Count_And_Get (
745: p_encoded => FND_API.G_FALSE,
746: p_count => x_msg_count,

Line 745: p_encoded => FND_API.G_FALSE,

741: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
743: -- Standard call to get message count and if count=1, get the message
744: FND_MSG_PUB.Count_And_Get (
745: p_encoded => FND_API.G_FALSE,
746: p_count => x_msg_count,
747: p_data => x_msg_data
748: );
749: IF x_msg_count > 1 THEN

Line 757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

753: END IF;
754:
755: WHEN OTHERS THEN
756: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
758: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
759: fnd_message.set_token('ROUTINE', l_full_name);
760: fnd_message.set_token('ERRNO', sqlcode);
761: fnd_message.set_token('REASON', sqlerrm);

Line 765: p_encoded => FND_API.G_FALSE,

761: fnd_message.set_token('REASON', sqlerrm);
762: FND_MSG_PUB.add;
763: -- Standard call to get message count and if count=1, get the message
764: FND_MSG_PUB.Count_And_Get (
765: p_encoded => FND_API.G_FALSE,
766: p_count => x_msg_count,
767: p_data => x_msg_data
768: );
769: IF x_msg_count > 1 THEN

Line 793: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

789: ----------------------------------------------------------------------
790:
791: PROCEDURE Notify_PO(
792: p_api_version IN NUMBER
793: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
794: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
795: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
796: ,x_return_status OUT NOCOPY VARCHAR2
797: ,x_msg_count OUT NOCOPY NUMBER

Line 794: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

790:
791: PROCEDURE Notify_PO(
792: p_api_version IN NUMBER
793: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
794: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
795: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
796: ,x_return_status OUT NOCOPY VARCHAR2
797: ,x_msg_count OUT NOCOPY NUMBER
798: ,x_msg_data OUT NOCOPY VARCHAR2

Line 795: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

791: PROCEDURE Notify_PO(
792: p_api_version IN NUMBER
793: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
794: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
795: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
796: ,x_return_status OUT NOCOPY VARCHAR2
797: ,x_msg_count OUT NOCOPY NUMBER
798: ,x_msg_data OUT NOCOPY VARCHAR2
799: ,p_po_notify_hdr_rec IN OUT NOCOPY dpp_po_notify_rec_type

Line 1044: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1040:
1041: -- report card id: 872003
1042: BEGIN
1043: -- Standard call to check for call compatibility.
1044: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1045: p_api_version,
1046: l_api_name,
1047: G_PKG_NAME) THEN
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1044: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1045: p_api_version,
1046: l_api_name,
1047: G_PKG_NAME) THEN
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050: --Initialize message list if p_init_msg_list is set to TRUE.
1051: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1052: FND_MSG_PUB.initialize;

Line 1051: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1047: G_PKG_NAME) THEN
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050: --Initialize message list if p_init_msg_list is set to TRUE.
1051: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1052: FND_MSG_PUB.initialize;
1053: END IF;
1054:
1055: -- Debug Message

Line 1059: x_return_status := FND_API.G_RET_STS_SUCCESS;

1055: -- Debug Message
1056: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Private API: ' || l_api_name || 'start');
1057:
1058: -- Initialize API return status to sucess
1059: x_return_status := FND_API.G_RET_STS_SUCCESS;
1060: --
1061: -- API body
1062: --
1063: l_vendor_rec.vendor_id := l_po_notify_hdr_rec.vendor_id;

Line 1105: RAISE FND_API.G_EXC_ERROR;

1101: l_po_details_tbl(1).PO_Line_NUmber := NULL;
1102: l_po_details_tbl(1).Authorization_Status := NULL;
1103: END IF;
1104: p_po_notify_item_tbl(i).po_details_tbl := l_po_details_tbl;
1105: RAISE FND_API.G_EXC_ERROR;
1106: ELSE
1107: FOR get_item_number_rec IN get_item_number_csr(l_po_notify_item_tbl(i).inventory_item_id) LOOP
1108: p_po_notify_item_tbl(i).item_number := get_item_number_rec.concatenated_segments;
1109: END LOOP;

Line 1141: WHEN FND_API.G_EXC_ERROR THEN

1137: (p_count => x_msg_count,
1138: p_data => x_msg_data
1139: );
1140: EXCEPTION
1141: WHEN FND_API.G_EXC_ERROR THEN
1142: x_return_status := FND_API.G_RET_STS_ERROR;
1143: -- Standard call to get message count and if count=1, get the message
1144: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1145: p_count => x_msg_count,

Line 1142: x_return_status := FND_API.G_RET_STS_ERROR;

1138: p_data => x_msg_data
1139: );
1140: EXCEPTION
1141: WHEN FND_API.G_EXC_ERROR THEN
1142: x_return_status := FND_API.G_RET_STS_ERROR;
1143: -- Standard call to get message count and if count=1, get the message
1144: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1145: p_count => x_msg_count,
1146: p_data => x_msg_data

Line 1144: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,

1140: EXCEPTION
1141: WHEN FND_API.G_EXC_ERROR THEN
1142: x_return_status := FND_API.G_RET_STS_ERROR;
1143: -- Standard call to get message count and if count=1, get the message
1144: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1145: p_count => x_msg_count,
1146: p_data => x_msg_data
1147: );
1148: IF x_msg_count > 1 THEN

Line 1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1150: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1151: END LOOP;
1152: END IF;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (
1158: p_encoded => FND_API.G_FALSE,

Line 1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1151: END LOOP;
1152: END IF;
1153:
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (
1158: p_encoded => FND_API.G_FALSE,
1159: p_count => x_msg_count,

Line 1158: p_encoded => FND_API.G_FALSE,

1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1156: -- Standard call to get message count and if count=1, get the message
1157: FND_MSG_PUB.Count_And_Get (
1158: p_encoded => FND_API.G_FALSE,
1159: p_count => x_msg_count,
1160: p_data => x_msg_data
1161: );
1162: IF x_msg_count > 1 THEN

Line 1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1165: END LOOP;
1166: END IF;
1167:
1168: WHEN OTHERS THEN
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1170: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1171: fnd_message.set_token('ROUTINE', l_full_name);
1172: fnd_message.set_token('ERRNO', sqlcode);
1173: fnd_message.set_token('REASON', sqlerrm);

Line 1177: p_encoded => FND_API.G_FALSE,

1173: fnd_message.set_token('REASON', sqlerrm);
1174: FND_MSG_PUB.add;
1175: -- Standard call to get message count and if count=1, get the message
1176: FND_MSG_PUB.Count_And_Get (
1177: p_encoded => FND_API.G_FALSE,
1178: p_count => x_msg_count,
1179: p_data => x_msg_data
1180: );
1181: IF x_msg_count > 1 THEN