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 133: IF NOT FND_API.Compatible_API_Call ( l_api_version,

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

Line 137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 140: IF FND_API.to_Boolean( p_init_msg_list )

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

Line 150: l_return_status := FND_API.G_RET_STS_SUCCESS;

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;
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('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;
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('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: 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:
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: 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,' ')

Line 617: l_return_status := FND_API.G_RET_STS_ERROR;

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;
618: -- Display the errors
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

Line 638: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

634: END LOOP;
635: ELSE --(l_result <> 1) THEN
636: l_status_Update_tbl(i).update_status := 'Y';
637: END IF;
638: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
639: x_return_status := l_return_status;
640: END IF;
641: -- Debug Message
642: IF g_debug THEN

Line 652: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

648: END IF; --po_rec.currency_code IS NOT NULL THEN
649: END IF ; -- For blanket purchase agreements
650: END LOOP; -- po cursor loop
651: END LOOP; -- all records
652: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
653: l_exe_update_rec.execution_status := 'SUCCESS';
654: ELSE
655: l_exe_update_rec.execution_status := 'WARNING';
656: END IF;

Line 664: IF x_return_status IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) 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
665: l_queryCtx := dbms_xmlquery.newContext('SELECT '||l_Transaction_Number||' TXNNUMBER,
666: CURSOR (Select Item_Number ITEMNUMBER,
667: Document_Type POTYPE,
668: Document_Number PONUMBER,

Line 682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

678: l_output_xml := dbms_xmlquery.getXml(l_queryCtx);
679: dbms_xmlquery.closeContext(l_queryCtx);
680: EXCEPTION
681: WHEN OTHERS THEN
682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
683: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
684: fnd_message.set_token('ROUTINE', 'DPP_PURCHASEPRICE_PVT.Update_PurchasePrice-XML Generation');
685: fnd_message.set_token('ERRNO', sqlcode);
686: fnd_message.set_token('REASON', sqlerrm);

Line 700: ,p_init_msg_list => FND_API.G_FALSE

696: l_exe_update_rec.Provider_Process_Instance_id := l_item_price_rec.Provider_Process_Instance_id;
697: l_exe_update_rec.Last_Updated_By := l_item_price_rec.Last_Updated_By;
698:
699: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
700: ,p_init_msg_list => FND_API.G_FALSE
701: ,p_commit => FND_API.G_FALSE
702: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
703: ,x_return_status => l_return_status
704: ,x_msg_count => l_msg_count

Line 701: ,p_commit => FND_API.G_FALSE

697: l_exe_update_rec.Last_Updated_By := l_item_price_rec.Last_Updated_By;
698:
699: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
700: ,p_init_msg_list => FND_API.G_FALSE
701: ,p_commit => FND_API.G_FALSE
702: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
703: ,x_return_status => l_return_status
704: ,x_msg_count => l_msg_count
705: ,x_msg_data => l_msg_data

Line 702: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

698:
699: DPP_ExecutionDetails_PVT.Update_ExecutionDetails(p_api_version => l_api_version
700: ,p_init_msg_list => FND_API.G_FALSE
701: ,p_commit => FND_API.G_FALSE
702: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
703: ,x_return_status => l_return_status
704: ,x_msg_count => l_msg_count
705: ,x_msg_data => l_msg_data
706: ,p_EXE_UPDATE_rec => l_exe_update_rec

Line 713: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

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;
715: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;

Line 714: RAISE FND_API.G_EXC_ERROR;

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;
715: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:

Line 715: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

711: END IF;
712:
713: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
714: RAISE FND_API.G_EXC_ERROR;
715: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719: -- Standard check for p_commit

Line 716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

712:
713: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
714: RAISE FND_API.G_EXC_ERROR;
715: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719: -- Standard check for p_commit
720: IF FND_API.to_Boolean( p_commit )

Line 720: IF FND_API.to_Boolean( p_commit )

716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
717: END IF;
718:
719: -- Standard check for p_commit
720: IF FND_API.to_Boolean( p_commit )
721: THEN
722: COMMIT WORK;
723: END IF;
724: -- Debug Message

Line 735: WHEN FND_API.G_EXC_ERROR THEN

731: p_data => x_msg_data
732: );
733: --Exception Handling
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
737: x_return_status := FND_API.G_RET_STS_ERROR;
738: -- Standard call to get message count and if count=1, get the message
739: FND_MSG_PUB.Count_And_Get (

Line 737: x_return_status := FND_API.G_RET_STS_ERROR;

733: --Exception Handling
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
737: x_return_status := FND_API.G_RET_STS_ERROR;
738: -- Standard call to get message count and if count=1, get the message
739: FND_MSG_PUB.Count_And_Get (
740: p_encoded => FND_API.G_FALSE,
741: p_count => x_msg_count,

Line 740: p_encoded => FND_API.G_FALSE,

736: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
737: x_return_status := FND_API.G_RET_STS_ERROR;
738: -- Standard call to get message count and if count=1, get the message
739: FND_MSG_PUB.Count_And_Get (
740: p_encoded => FND_API.G_FALSE,
741: p_count => x_msg_count,
742: p_data => x_msg_data
743: );
744: IF x_msg_count > 1 THEN

Line 750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

746: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
747: END LOOP;
748: END IF;
749:
750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
751: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
753: -- Standard call to get message count and if count=1, get the message
754: FND_MSG_PUB.Count_And_Get (

Line 752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

748: END IF;
749:
750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
751: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
753: -- Standard call to get message count and if count=1, get the message
754: FND_MSG_PUB.Count_And_Get (
755: p_encoded => FND_API.G_FALSE,
756: p_count => x_msg_count,

Line 755: p_encoded => FND_API.G_FALSE,

751: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
753: -- Standard call to get message count and if count=1, get the message
754: FND_MSG_PUB.Count_And_Get (
755: p_encoded => FND_API.G_FALSE,
756: p_count => x_msg_count,
757: p_data => x_msg_data
758: );
759: IF x_msg_count > 1 THEN

Line 767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

763: END IF;
764:
765: WHEN OTHERS THEN
766: ROLLBACK TO UPDATE_PURCHASEPRICE_PVT;
767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
768: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
769: fnd_message.set_token('ROUTINE', l_full_name);
770: fnd_message.set_token('ERRNO', sqlcode);
771: fnd_message.set_token('REASON', sqlerrm);

Line 775: p_encoded => FND_API.G_FALSE,

771: fnd_message.set_token('REASON', sqlerrm);
772: FND_MSG_PUB.add;
773: -- Standard call to get message count and if count=1, get the message
774: FND_MSG_PUB.Count_And_Get (
775: p_encoded => FND_API.G_FALSE,
776: p_count => x_msg_count,
777: p_data => x_msg_data
778: );
779: IF x_msg_count > 1 THEN

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

799: ----------------------------------------------------------------------
800:
801: PROCEDURE Notify_PO(
802: p_api_version IN NUMBER
803: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
804: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
805: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
806: ,x_return_status OUT NOCOPY VARCHAR2
807: ,x_msg_count OUT NOCOPY NUMBER

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

800:
801: PROCEDURE Notify_PO(
802: p_api_version IN NUMBER
803: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
804: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
805: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
806: ,x_return_status OUT NOCOPY VARCHAR2
807: ,x_msg_count OUT NOCOPY NUMBER
808: ,x_msg_data OUT NOCOPY VARCHAR2

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

801: PROCEDURE Notify_PO(
802: p_api_version IN NUMBER
803: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
804: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
805: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
806: ,x_return_status OUT NOCOPY VARCHAR2
807: ,x_msg_count OUT NOCOPY NUMBER
808: ,x_msg_data OUT NOCOPY VARCHAR2
809: ,p_po_notify_hdr_rec IN OUT NOCOPY dpp_po_notify_rec_type

Line 1053: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1049:
1050: -- report card id: 872003
1051: BEGIN
1052: -- Standard call to check for call compatibility.
1053: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1054: p_api_version,
1055: l_api_name,
1056: G_PKG_NAME) THEN
1057: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1057: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1053: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1054: p_api_version,
1055: l_api_name,
1056: G_PKG_NAME) THEN
1057: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1058: END IF;
1059: --Initialize message list if p_init_msg_list is set to TRUE.
1060: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1061: FND_MSG_PUB.initialize;

Line 1060: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1056: G_PKG_NAME) THEN
1057: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1058: END IF;
1059: --Initialize message list if p_init_msg_list is set to TRUE.
1060: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1061: FND_MSG_PUB.initialize;
1062: END IF;
1063:
1064: -- Debug Message

Line 1069: x_return_status := FND_API.G_RET_STS_SUCCESS;

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: --
1071: -- API body
1072: --
1073: l_vendor_rec.vendor_id := l_po_notify_hdr_rec.vendor_id;

Line 1115: RAISE FND_API.G_EXC_ERROR;

1111: l_po_details_tbl(1).PO_Line_NUmber := NULL;
1112: l_po_details_tbl(1).Authorization_Status := NULL;
1113: END IF;
1114: p_po_notify_item_tbl(i).po_details_tbl := l_po_details_tbl;
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSE
1117: FOR get_item_number_rec IN get_item_number_csr(l_po_notify_item_tbl(i).inventory_item_id) LOOP
1118: p_po_notify_item_tbl(i).item_number := get_item_number_rec.concatenated_segments;
1119: END LOOP;

Line 1151: WHEN FND_API.G_EXC_ERROR THEN

1147: (p_count => x_msg_count,
1148: p_data => x_msg_data
1149: );
1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: -- Standard call to get message count and if count=1, get the message
1154: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,

Line 1152: x_return_status := FND_API.G_RET_STS_ERROR;

1148: p_data => x_msg_data
1149: );
1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: -- Standard call to get message count and if count=1, get the message
1154: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,
1156: p_data => x_msg_data

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

1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: -- Standard call to get message count and if count=1, get the message
1154: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,
1156: p_data => x_msg_data
1157: );
1158: IF x_msg_count > 1 THEN

Line 1164: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1160: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1161: END LOOP;
1162: END IF;
1163:
1164: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: -- Standard call to get message count and if count=1, get the message
1167: FND_MSG_PUB.Count_And_Get (
1168: p_encoded => FND_API.G_FALSE,

Line 1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1161: END LOOP;
1162: END IF;
1163:
1164: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: -- Standard call to get message count and if count=1, get the message
1167: FND_MSG_PUB.Count_And_Get (
1168: p_encoded => FND_API.G_FALSE,
1169: p_count => x_msg_count,

Line 1168: p_encoded => FND_API.G_FALSE,

1164: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: -- Standard call to get message count and if count=1, get the message
1167: FND_MSG_PUB.Count_And_Get (
1168: p_encoded => FND_API.G_FALSE,
1169: p_count => x_msg_count,
1170: p_data => x_msg_data
1171: );
1172: IF x_msg_count > 1 THEN

Line 1179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1175: END LOOP;
1176: END IF;
1177:
1178: WHEN OTHERS THEN
1179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1180: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1181: fnd_message.set_token('ROUTINE', l_full_name);
1182: fnd_message.set_token('ERRNO', sqlcode);
1183: fnd_message.set_token('REASON', sqlerrm);

Line 1187: p_encoded => FND_API.G_FALSE,

1183: fnd_message.set_token('REASON', sqlerrm);
1184: FND_MSG_PUB.add;
1185: -- Standard call to get message count and if count=1, get the message
1186: FND_MSG_PUB.Count_And_Get (
1187: p_encoded => FND_API.G_FALSE,
1188: p_count => x_msg_count,
1189: p_data => x_msg_data
1190: );
1191: IF x_msg_count > 1 THEN