eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.DPP_TRANSACTION_PVT dependencies on FND_API

Line 42: x_return_status := fnd_api.g_ret_sts_success;

38: l_api_name constant VARCHAR2(30) := 'Update_InterfaceErrSts';
39: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
40: BEGIN
41: -- Initialize API return status to sucess
42: x_return_status := fnd_api.g_ret_sts_success;
43: IF DPP_DEBUG_HIGH_ON THEN
44: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');
45: END IF;
46:

Line 62: WHEN Fnd_Api.G_EXC_ERROR THEN

58: IF DPP_DEBUG_HIGH_ON THEN
59: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
60: END IF;
61: EXCEPTION
62: WHEN Fnd_Api.G_EXC_ERROR THEN
63: x_return_status := Fnd_Api.g_ret_sts_error ;
64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
66: WHEN OTHERS THEN

Line 63: x_return_status := Fnd_Api.g_ret_sts_error ;

59: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
60: END IF;
61: EXCEPTION
62: WHEN Fnd_Api.G_EXC_ERROR THEN
63: x_return_status := Fnd_Api.g_ret_sts_error ;
64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

60: END IF;
61: EXCEPTION
62: WHEN Fnd_Api.G_EXC_ERROR THEN
63: x_return_status := Fnd_Api.g_ret_sts_error ;
64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
68: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

61: EXCEPTION
62: WHEN Fnd_Api.G_EXC_ERROR THEN
63: x_return_status := Fnd_Api.g_ret_sts_error ;
64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
68: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
69: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 67: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

63: x_return_status := Fnd_Api.g_ret_sts_error ;
64: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
65: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
68: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
69: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
70: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
71: fnd_message.set_token('ERRNO', SQLCODE);

Line 93: x_return_status := fnd_api.g_ret_sts_success;

89: IF DPP_DEBUG_HIGH_ON THEN
90: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Operating Unit');
91: END IF;
92: -- Initialize API return status to sucess
93: x_return_status := fnd_api.g_ret_sts_success;
94: --BUG 6806974
95: IF p_txn_header_rec_type.operating_unit_name IS NULL
96: AND p_txn_header_rec_type.org_id IS NULL THEN
97: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 101: x_return_status := fnd_api.g_ret_sts_error;

97: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
98: fnd_message.set_name( 'DPP', 'DPP_TXN_OPERATING_UNIT_NULL');
99: x_msg_data := fnd_message.get();
100: END IF;
101: x_return_status := fnd_api.g_ret_sts_error;
102: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_NULL';
103: RAISE Fnd_Api.G_EXC_ERROR;
104: END IF;
105:

Line 103: RAISE Fnd_Api.G_EXC_ERROR;

99: x_msg_data := fnd_message.get();
100: END IF;
101: x_return_status := fnd_api.g_ret_sts_error;
102: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_NULL';
103: RAISE Fnd_Api.G_EXC_ERROR;
104: END IF;
105:
106: SELECT fnd_profile.value('XLA_MO_SECURITY_PROFILE_LEVEL') into l_value from dual;
107:

Line 127: x_return_status := fnd_api.g_ret_sts_error;

123: END IF;
124:
125: EXCEPTION
126: WHEN NO_DATA_FOUND THEN
127: x_return_status := fnd_api.g_ret_sts_error;
128: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
129: fnd_message.set_name( 'DPP', 'DPP_TXN_OPERATING_UNIT_ERR');
130: fnd_message.set_token('OPERATING_UNIT', p_txn_header_rec_type.operating_unit_name);
131: fnd_message.set_token('ORG_ID', p_txn_header_rec_type.org_id);

Line 135: WHEN Fnd_Api.G_EXC_ERROR THEN

131: fnd_message.set_token('ORG_ID', p_txn_header_rec_type.org_id);
132: x_msg_data := fnd_message.get();
133: END IF;
134: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
135: WHEN Fnd_Api.G_EXC_ERROR THEN
136: x_return_status := Fnd_Api.g_ret_sts_error ;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_unexp_error;
139: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 136: x_return_status := Fnd_Api.g_ret_sts_error ;

132: x_msg_data := fnd_message.get();
133: END IF;
134: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
135: WHEN Fnd_Api.G_EXC_ERROR THEN
136: x_return_status := Fnd_Api.g_ret_sts_error ;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_unexp_error;
139: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
140: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 138: x_return_status := fnd_api.g_ret_sts_unexp_error;

134: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
135: WHEN Fnd_Api.G_EXC_ERROR THEN
136: x_return_status := Fnd_Api.g_ret_sts_error ;
137: WHEN OTHERS THEN
138: x_return_status := fnd_api.g_ret_sts_unexp_error;
139: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
140: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
141: fnd_message.set_token('ROUTINE', l_full_name);
142: fnd_message.set_token('ERRNO', SQLCODE);

Line 182: x_return_status := fnd_api.g_ret_sts_success;

178: IF DPP_DEBUG_HIGH_ON THEN
179: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Document Reference Number');
180: END IF;
181: -- Initialize API return status to sucess
182: x_return_status := fnd_api.g_ret_sts_success;
183: IF p_txn_header_rec_type.ref_document_number IS NULL THEN
184: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
185: fnd_message.set_name('DPP', 'DPP_DOC_REF_NUM_NULL');
186: END IF;

Line 189: RAISE Fnd_Api.G_EXC_ERROR;

185: fnd_message.set_name('DPP', 'DPP_DOC_REF_NUM_NULL');
186: END IF;
187: x_msg_data := fnd_message.get();
188: p_txn_header_rec_type.error_code := 'DPP_DOC_REF_NUM_NULL';
189: RAISE Fnd_Api.G_EXC_ERROR;
190: END IF;
191: --Call function to validate the document ref number for special characters other than _ and -.
192: l_valid_doc := dpp_transaction_pvt.has_docnum_chars(
193: p_docnum => p_txn_header_rec_type.ref_document_number

Line 197: x_return_status := fnd_api.g_ret_sts_error;

193: p_docnum => p_txn_header_rec_type.ref_document_number
194: );
195:
196: IF l_valid_doc = 'N' OR length(p_txn_header_rec_type.ref_document_number) > 40 THEN
197: x_return_status := fnd_api.g_ret_sts_error;
198: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
199: fnd_message.set_name('DPP', 'DPP_DOC_REF_NUM_ERR');
200: fnd_message.set_token('DOC_REF_NO', p_txn_header_rec_type.ref_document_number);
201: END IF;

Line 209: WHEN Fnd_Api.G_EXC_ERROR THEN

205: IF DPP_DEBUG_HIGH_ON THEN
206: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');
207: END IF;
208: EXCEPTION
209: WHEN Fnd_Api.G_EXC_ERROR THEN
210: x_return_status := Fnd_Api.g_ret_sts_error ;
211: WHEN OTHERS THEN
212: x_return_status := fnd_api.g_ret_sts_unexp_error;
213: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 210: x_return_status := Fnd_Api.g_ret_sts_error ;

206: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');
207: END IF;
208: EXCEPTION
209: WHEN Fnd_Api.G_EXC_ERROR THEN
210: x_return_status := Fnd_Api.g_ret_sts_error ;
211: WHEN OTHERS THEN
212: x_return_status := fnd_api.g_ret_sts_unexp_error;
213: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
214: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 212: x_return_status := fnd_api.g_ret_sts_unexp_error;

208: EXCEPTION
209: WHEN Fnd_Api.G_EXC_ERROR THEN
210: x_return_status := Fnd_Api.g_ret_sts_error ;
211: WHEN OTHERS THEN
212: x_return_status := fnd_api.g_ret_sts_unexp_error;
213: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
214: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
215: fnd_message.set_token('ROUTINE', l_full_name);
216: fnd_message.set_token('ERRNO', SQLCODE);

Line 237: x_return_status := fnd_api.g_ret_sts_success;

233: IF DPP_DEBUG_HIGH_ON THEN
234: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Details');
235: END IF;
236: -- Initialize API return status to sucess
237: x_return_status := fnd_api.g_ret_sts_success;
238: --BUG 6806974
239: IF (p_txn_header_rec_type.vendor_name IS NULL
240: AND p_txn_header_rec_type.vendor_id IS NULL) THEN
241: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 246: RAISE Fnd_Api.G_EXC_ERROR;

242: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_INFO_NULL');
243: x_msg_data :=fnd_message.get();
244: END IF;
245: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_INFO_NULL';
246: RAISE Fnd_Api.G_EXC_ERROR;
247: END IF;
248: --Validate Supplier Name
249: BEGIN
250: SELECT ap.vendor_id

Line 263: x_return_status := fnd_api.g_ret_sts_error;

259: AND TRUNC(sysdate) >= nvl(TRUNC(start_date_active), TRUNC(sysdate))
260: AND TRUNC(sysdate) < nvl(TRUNC(end_date_active), TRUNC(sysdate) + 1);
261: EXCEPTION
262: WHEN NO_DATA_FOUND THEN
263: x_return_status := fnd_api.g_ret_sts_error;
264: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
265: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_INFO_ERR');
266: fnd_message.set_token('SUPPLIER_NAME', p_txn_header_rec_type.vendor_name);
267: fnd_message.set_token('SUPPLIER_ID', p_txn_header_rec_type.vendor_id);

Line 271: RAISE Fnd_Api.G_EXC_ERROR;

267: fnd_message.set_token('SUPPLIER_ID', p_txn_header_rec_type.vendor_id);
268: x_msg_data :=fnd_message.get();
269: END IF;
270: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_INFO_ERR';
271: RAISE Fnd_Api.G_EXC_ERROR;
272: END;
273: --Validate Supplier Site
274: IF (p_txn_header_rec_type.vendor_site_code IS NULL
275: AND p_txn_header_rec_type.vendor_site_id IS NULL) THEN

Line 281: RAISE Fnd_Api.G_EXC_ERROR;

277: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_SITE_NULL');
278: x_msg_data :=fnd_message.get();
279: END IF;
280: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_SITE_NULL';
281: RAISE Fnd_Api.G_EXC_ERROR;
282: END IF;
283: BEGIN
284: SELECT apssa.vendor_site_id
285: ,apssa.vendor_site_code

Line 301: x_return_status := fnd_api.g_ret_sts_error;

297: AND apssa.vendor_site_id = nvl(to_number(p_txn_header_rec_type.vendor_site_id), apssa.vendor_site_id))
298: AND apssa.org_id = to_number(p_txn_header_rec_type.org_id);
299: EXCEPTION
300: WHEN NO_DATA_FOUND THEN
301: x_return_status := fnd_api.g_ret_sts_error;
302: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
303: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_SITE_ERR');
304: fnd_message.set_token('SUPPLIER_SITE', p_txn_header_rec_type.vendor_site_code);
305: fnd_message.set_token('SITE_ID', p_txn_header_rec_type.vendor_site_id);

Line 309: RAISE Fnd_Api.G_EXC_ERROR;

305: fnd_message.set_token('SITE_ID', p_txn_header_rec_type.vendor_site_id);
306: x_msg_data :=fnd_message.get();
307: END IF;
308: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_SITE_ERR';
309: RAISE Fnd_Api.G_EXC_ERROR;
310: END;
311: IF DPP_DEBUG_HIGH_ON THEN
312: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);
313: END IF;

Line 315: WHEN Fnd_Api.G_EXC_ERROR THEN

311: IF DPP_DEBUG_HIGH_ON THEN
312: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);
313: END IF;
314: EXCEPTION
315: WHEN Fnd_Api.G_EXC_ERROR THEN
316: x_return_status := Fnd_Api.g_ret_sts_error ;
317: WHEN others THEN
318: x_return_status := fnd_api.g_ret_sts_unexp_error;
319: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 316: x_return_status := Fnd_Api.g_ret_sts_error ;

312: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);
313: END IF;
314: EXCEPTION
315: WHEN Fnd_Api.G_EXC_ERROR THEN
316: x_return_status := Fnd_Api.g_ret_sts_error ;
317: WHEN others THEN
318: x_return_status := fnd_api.g_ret_sts_unexp_error;
319: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
320: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 318: x_return_status := fnd_api.g_ret_sts_unexp_error;

314: EXCEPTION
315: WHEN Fnd_Api.G_EXC_ERROR THEN
316: x_return_status := Fnd_Api.g_ret_sts_error ;
317: WHEN others THEN
318: x_return_status := fnd_api.g_ret_sts_unexp_error;
319: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
320: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
321: fnd_message.set_token('ROUTINE', l_full_name);
322: fnd_message.set_token('ERRNO', SQLCODE);

Line 346: x_return_status := fnd_api.g_ret_sts_success;

342: IF DPP_DEBUG_HIGH_ON THEN
343: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Lines Details');
344: END IF;
345: -- Initialize API return status to sucess
346: x_return_status := fnd_api.g_ret_sts_success;
347:
348:
349: --Check for Duplicate Lines in Interface Table
350: BEGIN

Line 408: x_return_status := Fnd_Api.g_ret_sts_error ;

404: IF l_duplicate_lines > 1 THEN
405: fnd_message.set_name('DPP', 'DPP_DUPLICATE_TXN_LINES');
406: x_msg_data := fnd_message.get();
407: p_txn_header_rec_type.error_code := 'DPP_DUPLICATE_TXN_LINES';
408: x_return_status := Fnd_Api.g_ret_sts_error ;
409: --RAISE Fnd_Api.G_EXC_ERROR;
410: l_error_message := l_error_message ||x_msg_data;
411: END IF;
412: END;

Line 409: --RAISE Fnd_Api.G_EXC_ERROR;

405: fnd_message.set_name('DPP', 'DPP_DUPLICATE_TXN_LINES');
406: x_msg_data := fnd_message.get();
407: p_txn_header_rec_type.error_code := 'DPP_DUPLICATE_TXN_LINES';
408: x_return_status := Fnd_Api.g_ret_sts_error ;
409: --RAISE Fnd_Api.G_EXC_ERROR;
410: l_error_message := l_error_message ||x_msg_data;
411: END IF;
412: END;
413:

Line 431: x_return_status := Fnd_Api.g_ret_sts_error ;

427: EXCEPTION WHEN OTHERS THEN
428: fnd_message.set_name('DPP', 'DPP_TXN_FUNC_CURR_ERR');
429: x_msg_data := fnd_message.get();
430: p_txn_header_rec_type.error_code := 'DPP_TXN_FUNC_CURR_ERR';
431: x_return_status := Fnd_Api.g_ret_sts_error ;
432: --RAISE Fnd_Api.G_EXC_ERROR;
433: l_error_message := l_error_message ||x_msg_data;
434: Update_InterfaceErrSts(
435: p_txn_header_rec_type => p_txn_header_rec_type

Line 432: --RAISE Fnd_Api.G_EXC_ERROR;

428: fnd_message.set_name('DPP', 'DPP_TXN_FUNC_CURR_ERR');
429: x_msg_data := fnd_message.get();
430: p_txn_header_rec_type.error_code := 'DPP_TXN_FUNC_CURR_ERR';
431: x_return_status := Fnd_Api.g_ret_sts_error ;
432: --RAISE Fnd_Api.G_EXC_ERROR;
433: l_error_message := l_error_message ||x_msg_data;
434: Update_InterfaceErrSts(
435: p_txn_header_rec_type => p_txn_header_rec_type
436: ,x_return_status =>x_return_status

Line 449: x_return_status := Fnd_Api.g_ret_sts_error ;

445: fnd_message.set_name('DPP', 'DPP_TXN_NO_LINES');
446: x_msg_data :=fnd_message.get();
447: p_txn_header_rec_type.error_code := 'DPP_TXN_NO_LINES';
448: l_error_message := l_error_message ||x_msg_data;
449: x_return_status := Fnd_Api.g_ret_sts_error ;
450: WHEN TOO_MANY_ROWS THEN
451: null;
452: END;
453: EXCEPTION

Line 454: WHEN Fnd_Api.G_EXC_ERROR THEN

450: WHEN TOO_MANY_ROWS THEN
451: null;
452: END;
453: EXCEPTION
454: WHEN Fnd_Api.G_EXC_ERROR THEN
455: x_return_status := Fnd_Api.g_ret_sts_error ;
456: WHEN others THEN
457: x_return_status := fnd_api.g_ret_sts_unexp_error;
458: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 455: x_return_status := Fnd_Api.g_ret_sts_error ;

451: null;
452: END;
453: EXCEPTION
454: WHEN Fnd_Api.G_EXC_ERROR THEN
455: x_return_status := Fnd_Api.g_ret_sts_error ;
456: WHEN others THEN
457: x_return_status := fnd_api.g_ret_sts_unexp_error;
458: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
459: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 457: x_return_status := fnd_api.g_ret_sts_unexp_error;

453: EXCEPTION
454: WHEN Fnd_Api.G_EXC_ERROR THEN
455: x_return_status := Fnd_Api.g_ret_sts_error ;
456: WHEN others THEN
457: x_return_status := fnd_api.g_ret_sts_unexp_error;
458: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
459: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
460: fnd_message.set_token('ROUTINE', l_full_name);
461: fnd_message.set_token('ERRNO', SQLCODE);

Line 479: x_return_status := fnd_api.g_ret_sts_success;

475: IF DPP_DEBUG_HIGH_ON THEN
476: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Get Days Covered');
477: END IF;
478: -- Initialize API return status to sucess
479: x_return_status := fnd_api.g_ret_sts_success;
480: SELECT default_days_covered
481: INTO p_txn_header_rec_type.days_covered
482: FROM ozf_supp_trd_prfls_all ostpa
483: WHERE ostpa.supplier_id =to_number(p_txn_header_rec_type.vendor_id)

Line 491: x_return_status := fnd_api.g_ret_sts_error;

487: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Get Days Covered');
488: END IF;
489: EXCEPTION
490: WHEN NO_DATA_FOUND THEN
491: x_return_status := fnd_api.g_ret_sts_error;
492: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
493: fnd_message.set_name('DPP', 'DPP_DAYS_COVRD_ERR');
494: fnd_message.set_token('SUPPLIER_NAME', p_txn_header_rec_type.vendor_name);
495: x_msg_data :=fnd_message.get();

Line 500: x_return_status := fnd_api.g_ret_sts_unexp_error;

496: END IF;
497: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
498: p_txn_header_rec_type.error_code := 'DPP_DAYS_COVRD_ERR';
499: WHEN others THEN
500: x_return_status := fnd_api.g_ret_sts_unexp_error;
501: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
502: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
503: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
504: fnd_message.set_token('ERRNO', SQLCODE);

Line 523: x_return_status := fnd_api.g_ret_sts_success;

519:
520:
521: BEGIN
522: -- Initialize API return status to sucess
523: x_return_status := fnd_api.g_ret_sts_success;
524: IF DPP_DEBUG_HIGH_ON THEN
525: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Currency');
526: END IF;
527: IF p_txn_header_rec_type.trx_currency IS NULL THEN

Line 532: --RAISE Fnd_Api.G_EXC_ERROR ;

528: fnd_message.set_name('DPP', 'DPP_TXN_CURR_NULL');
529: x_msg_data :=fnd_message.get();
530: p_txn_header_rec_type.error_code := 'DPP_TXN_CURR_NULL';
531: l_error_message := l_error_message || x_msg_data;
532: --RAISE Fnd_Api.G_EXC_ERROR ;
533: END IF;
534: BEGIN
535: SELECT currency_code
536: INTO p_txn_header_rec_type.trx_currency

Line 545: x_return_status := fnd_api.g_ret_sts_error;

541: IF DPP_DEBUG_HIGH_ON THEN
542: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Currency');
543: END IF;
544: EXCEPTION WHEN no_data_found THEN
545: x_return_status := fnd_api.g_ret_sts_error;
546: fnd_message.set_name('DPP', 'DPP_TXN_CURR_ERR');
547: fnd_message.set_token('CURRENCY_CODE', p_txn_header_rec_type.trx_currency);
548: x_msg_data :=fnd_message.get();
549: l_error_message := l_error_message || x_msg_data;

Line 562: x_return_status := fnd_api.g_ret_sts_error;

558: INTO p_txn_header_rec_type.transaction_header_id
559: FROM dual;
560: EXCEPTION
561: WHEN no_data_found THEN
562: x_return_status := fnd_api.g_ret_sts_error;
563: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
564: fnd_message.set_token('SEQ_NUM', 'Transaction Header Id');
565: x_msg_data := fnd_message.get();
566: l_error_message := l_error_message || x_msg_data;

Line 570: --RAISE Fnd_Api.G_EXC_ERROR;

566: l_error_message := l_error_message || x_msg_data;
567: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
568: l_error_message :=l_error_message|| x_msg_data;
569: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
570: --RAISE Fnd_Api.G_EXC_ERROR;
571: END;
572:
573: LOOP
574: --Get transaction Number from sequence

Line 582: x_return_status := fnd_api.g_ret_sts_error;

578: FROM dual;
579:
580: EXCEPTION
581: WHEN no_data_found THEN
582: x_return_status := fnd_api.g_ret_sts_error;
583: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
584: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
585: fnd_message.set_token('SEQ_NUM', 'Transaction Number');
586: END IF;

Line 591: --RAISE Fnd_Api.G_EXC_ERROR;

587: x_msg_data := fnd_message.get();
588: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
589: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
590: l_error_message :=l_error_message|| x_msg_data;
591: --RAISE Fnd_Api.G_EXC_ERROR;
592: END;
593: --Check the transaction number generated is present in the table
594: BEGIN
595: --Check Transaction Number

Line 617: x_return_status := fnd_api.g_ret_sts_error;

613: WHERE lookup_type = 'DPP_TRANSACTION_STATUSES'
614: AND lookup_code = 'NEW';
615: EXCEPTION
616: WHEN no_data_found THEN
617: x_return_status := fnd_api.g_ret_sts_error;
618: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
619: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
620: END IF;
621: x_msg_data := fnd_message.get();

Line 625: --RAISE Fnd_Api.G_EXC_ERROR;

621: x_msg_data := fnd_message.get();
622: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
623: p_txn_header_rec_type.error_code := 'DPP_TXN_STS_ERR';
624: l_error_message :=l_error_message|| x_msg_data;
625: --RAISE Fnd_Api.G_EXC_ERROR;
626: END;
627:
628:
629: --Get days covered if it is null

Line 637: IF x_return_status = Fnd_Api.g_ret_sts_error OR x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

633: ,x_msg_data => x_msg_data
634: ,x_return_status => x_return_status
635: );
636: END IF;
637: IF x_return_status = Fnd_Api.g_ret_sts_error OR x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
638: l_error_message :=l_error_message|| x_msg_data;
639: END IF;
640: IF DPP_DEBUG_HIGH_ON THEN
641: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating Days Covered');

Line 648: x_return_status := fnd_api.g_ret_sts_error;

644: IF p_txn_header_rec_type.days_covered <= 0
645: OR p_txn_header_rec_type.days_covered > 9999
646: OR p_txn_header_rec_type.days_covered <> ROUND(p_txn_header_rec_type.days_covered)
647: THEN
648: x_return_status := fnd_api.g_ret_sts_error;
649: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
650: fnd_message.set_name('DPP', 'DPP_TXN_DAYS_COV_ERR');
651: END IF;
652: x_msg_data := fnd_message.get();

Line 656: --RAISE Fnd_Api.g_exc_error;

652: x_msg_data := fnd_message.get();
653: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
654: p_txn_header_rec_type.error_code := 'DPP_TXN_DAYS_COV_ERR';
655: l_error_message :=l_error_message|| x_msg_data;
656: --RAISE Fnd_Api.g_exc_error;
657: END IF;
658: IF p_txn_header_rec_type.effective_start_date IS NULL THEN
659: x_return_status := fnd_api.g_ret_sts_error;
660: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 659: x_return_status := fnd_api.g_ret_sts_error;

655: l_error_message :=l_error_message|| x_msg_data;
656: --RAISE Fnd_Api.g_exc_error;
657: END IF;
658: IF p_txn_header_rec_type.effective_start_date IS NULL THEN
659: x_return_status := fnd_api.g_ret_sts_error;
660: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
661: fnd_message.set_name('DPP', 'DPP_EFF_START_DATE_ERR');
662: END IF;
663: x_msg_data := fnd_message.get();

Line 667: --RAISE Fnd_Api.g_exc_error;

663: x_msg_data := fnd_message.get();
664: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
665: p_txn_header_rec_type.error_code := 'DPP_EFF_START_DATE_ERR';
666: l_error_message :=l_error_message|| x_msg_data;
667: --RAISE Fnd_Api.g_exc_error;
668: END IF;
669: END IF; -- end if only for inbound
670: IF l_error_message IS NOT NULL THEN
671: x_msg_data := l_error_message;

Line 672: RAISE Fnd_Api.g_exc_error;

668: END IF;
669: END IF; -- end if only for inbound
670: IF l_error_message IS NOT NULL THEN
671: x_msg_data := l_error_message;
672: RAISE Fnd_Api.g_exc_error;
673: END IF;
674: EXCEPTION
675: WHEN Fnd_Api.G_EXC_ERROR THEN
676: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

Line 675: WHEN Fnd_Api.G_EXC_ERROR THEN

671: x_msg_data := l_error_message;
672: RAISE Fnd_Api.g_exc_error;
673: END IF;
674: EXCEPTION
675: WHEN Fnd_Api.G_EXC_ERROR THEN
676: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
677: x_return_status := Fnd_Api.g_ret_sts_error ;
678: WHEN others THEN
679: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 677: x_return_status := Fnd_Api.g_ret_sts_error ;

673: END IF;
674: EXCEPTION
675: WHEN Fnd_Api.G_EXC_ERROR THEN
676: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
677: x_return_status := Fnd_Api.g_ret_sts_error ;
678: WHEN others THEN
679: x_return_status := fnd_api.g_ret_sts_unexp_error;
680: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 679: x_return_status := fnd_api.g_ret_sts_unexp_error;

675: WHEN Fnd_Api.G_EXC_ERROR THEN
676: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
677: x_return_status := Fnd_Api.g_ret_sts_error ;
678: WHEN others THEN
679: x_return_status := fnd_api.g_ret_sts_unexp_error;
680: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', l_full_name);
683: fnd_message.set_token('ERRNO', SQLCODE);

Line 708: x_return_status := fnd_api.g_ret_sts_success;

704: IF DPP_DEBUG_HIGH_ON THEN
705: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Header');
706: END IF;
707: -- Initialize API return status to sucess
708: x_return_status := fnd_api.g_ret_sts_success;
709: --Get Transaction Header Id from sequence
710:
711: IF DPP_DEBUG_HIGH_ON THEN
712: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inserting Transaction Header');

Line 839: WHEN Fnd_Api.G_EXC_ERROR THEN

835: IF DPP_DEBUG_HIGH_ON THEN
836: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Header');
837: END IF;
838: EXCEPTION
839: WHEN Fnd_Api.G_EXC_ERROR THEN
840: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
841: dpp_utility_pvt.debug_message('Create Header G_EXC_ERROR '||x_msg_data);
842: x_return_status := Fnd_Api.g_ret_sts_error ;
843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 842: x_return_status := Fnd_Api.g_ret_sts_error ;

838: EXCEPTION
839: WHEN Fnd_Api.G_EXC_ERROR THEN
840: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
841: dpp_utility_pvt.debug_message('Create Header G_EXC_ERROR '||x_msg_data);
842: x_return_status := Fnd_Api.g_ret_sts_error ;
843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
844: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
845: dpp_utility_pvt.debug_message('Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
846: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

839: WHEN Fnd_Api.G_EXC_ERROR THEN
840: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
841: dpp_utility_pvt.debug_message('Create Header G_EXC_ERROR '||x_msg_data);
842: x_return_status := Fnd_Api.g_ret_sts_error ;
843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
844: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
845: dpp_utility_pvt.debug_message('Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
846: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
847: WHEN OTHERS THEN

Line 846: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

842: x_return_status := Fnd_Api.g_ret_sts_error ;
843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
844: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
845: dpp_utility_pvt.debug_message('Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
846: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
847: WHEN OTHERS THEN
848: dpp_utility_pvt.debug_message('Create Header OTHERS'||sqlerrm);
849: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
850: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )

Line 849: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;

845: dpp_utility_pvt.debug_message('Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
846: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
847: WHEN OTHERS THEN
848: dpp_utility_pvt.debug_message('Create Header OTHERS'||sqlerrm);
849: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
850: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
851: THEN
852: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
853: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');

Line 879: x_return_status := fnd_api.g_ret_sts_success;

875: l_msg_exceeded VARCHAR2(10) := 'N';
876:
877: BEGIN
878: -- Initialize API return status to sucess
879: x_return_status := fnd_api.g_ret_sts_success;
880: IF DPP_DEBUG_HIGH_ON THEN
881: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Part Number');
882: END IF;
883: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 893: x_return_status := fnd_api.g_ret_sts_error;

889: FROM dual;
890:
891: EXCEPTION
892: WHEN no_data_found THEN
893: x_return_status := fnd_api.g_ret_sts_error;
894: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
895: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
896: fnd_message.set_token('SEQ_NUM', 'Transaction Line Id');
897: END IF;

Line 918: x_return_status := fnd_api.g_ret_sts_error;

914: WHERE lookup_code = 'NEW'
915: AND lookup_type = 'DPP_TRANSACTION_STATUSES';
916: EXCEPTION
917: WHEN no_data_found THEN
918: x_return_status := fnd_api.g_ret_sts_error;
919: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
920: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
921: END IF;
922: x_msg_data := fnd_message.get();

Line 931: --RAISE Fnd_Api.G_EXC_ERROR;

927: ELSE
928: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
929: END IF;
930: l_error_message :=l_error_message|| x_msg_data;
931: --RAISE Fnd_Api.G_EXC_ERROR;
932: END;
933: --BUG 6806974
934: IF (p_txn_lines_tbl_type(i).supplier_part_num IS NULL AND p_txn_lines_tbl_type(i).item_number IS NULL
935: AND p_txn_lines_tbl_type(i).inventory_item_id IS NULL) THEN

Line 944: RAISE Fnd_Api.g_exc_error;

940: l_error_message :=l_error_message|| x_msg_data;
941: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
942: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_SUP_PART_NO_NULL';
943:
944: RAISE Fnd_Api.g_exc_error;
945: END IF;
946:
947:
948: /*If both the supplier part number and item number is not null then both the values

Line 1009: x_return_status := fnd_api.g_ret_sts_error;

1005: AND msi.primary_uom_code = nvl(p_txn_lines_tbl_type(i).uom,msi.primary_uom_code);
1006: END IF;
1007: EXCEPTION
1008: WHEN no_data_found THEN
1009: x_return_status := fnd_api.g_ret_sts_error;
1010: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1011: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1012: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1013: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1050: x_return_status := fnd_api.g_ret_sts_error;

1046: AND (trunc(sysdate) between occ.start_date_active and occ.end_date_active OR occ.end_date_active is null)
1047: AND occ.external_code =p_txn_lines_tbl_type(i).supplier_part_num;
1048: EXCEPTION
1049: WHEN no_data_found THEN
1050: x_return_status := fnd_api.g_ret_sts_error;
1051: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1052: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1053: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1054: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1149: x_return_status := fnd_api.g_ret_sts_error;

1145: AND ostpa.supplier_site_id = to_number(p_txn_header_rec_type.vendor_site_id)
1146: AND (trunc(sysdate) between occ.start_date_active and occ.end_date_active OR occ.end_date_active is null)
1147: AND occ.external_code =p_txn_lines_tbl_type(i).supplier_part_num;
1148: EXCEPTION WHEN NO_DATA_FOUND THEN
1149: x_return_status := fnd_api.g_ret_sts_error;
1150: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1151: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1152: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1153: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1220: ,p_conv_type => FND_API.G_MISS_CHAR

1216: --call procedure to get prior price in transaction currency
1217: DPP_UTILITY_PVT.convert_currency(
1218: p_from_currency => p_txn_header_rec_type.functional_currency
1219: ,p_to_currency => p_txn_header_rec_type.trx_currency
1220: ,p_conv_type => FND_API.G_MISS_CHAR
1221: ,p_conv_rate => FND_API.G_MISS_NUM
1222: ,p_conv_date => SYSDATE
1223: ,p_from_amount => p_txn_lines_tbl_type(i).list_price
1224: ,x_return_status => x_return_status

Line 1221: ,p_conv_rate => FND_API.G_MISS_NUM

1217: DPP_UTILITY_PVT.convert_currency(
1218: p_from_currency => p_txn_header_rec_type.functional_currency
1219: ,p_to_currency => p_txn_header_rec_type.trx_currency
1220: ,p_conv_type => FND_API.G_MISS_CHAR
1221: ,p_conv_rate => FND_API.G_MISS_NUM
1222: ,p_conv_date => SYSDATE
1223: ,p_from_amount => p_txn_lines_tbl_type(i).list_price
1224: ,x_return_status => x_return_status
1225: ,x_to_amount => p_txn_lines_tbl_type(i).prior_price

Line 1228: IF x_return_status <>fnd_api.g_ret_sts_success THEN

1224: ,x_return_status => x_return_status
1225: ,x_to_amount => p_txn_lines_tbl_type(i).prior_price
1226: ,x_rate => l_exchange_rate);
1227:
1228: IF x_return_status <>fnd_api.g_ret_sts_success THEN
1229: fnd_message.set_name('DPP', 'DPP_TXN_CONV_PRICE_ER');
1230: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1231: x_msg_data := fnd_message.get();
1232: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CONV_PRICE_ER';

Line 1238: x_return_status := fnd_api.g_ret_sts_error;

1234: p_txn_header_rec_type.error_code := 'DPP_TXN_CONV_PRICE_ER';
1235: ELSE
1236: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1237: END IF;
1238: x_return_status := fnd_api.g_ret_sts_error;
1239: l_error_message :=l_error_message|| x_msg_data;
1240: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1241: END IF;
1242: END IF;

Line 1254: x_return_status := fnd_api.g_ret_sts_error;

1250: p_txn_header_rec_type.error_code := 'DPP_TXN_SUP_PART_LIST_PRICE_ER';
1251: ELSE
1252: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1253: END IF;
1254: x_return_status := fnd_api.g_ret_sts_error;
1255: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1256: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1257: l_error_message :=l_error_message|| x_msg_data;
1258: ELSE

Line 1278: x_return_status := fnd_api.g_ret_sts_error;

1274: p_txn_header_rec_type.error_code := 'DPP_TXN_SUP_PART_LIST_PRICE_ER';
1275: ELSE
1276: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1277: END IF;
1278: x_return_status := fnd_api.g_ret_sts_error;
1279: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1280: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1281: l_error_message :=l_error_message|| x_msg_data;
1282: ELSE

Line 1471: --RAISE Fnd_Api.G_EXC_ERROR;

1467: fnd_message.set_name('DPP', 'DPP_ERROR_MSG_STD');
1468: x_msg_data := fnd_message.get();
1469: l_error_message := x_msg_data;
1470: END IF;
1471: --RAISE Fnd_Api.G_EXC_ERROR;
1472: END IF;
1473:
1474: --Price change field
1475: p_txn_lines_tbl_type(i).price_change := p_txn_lines_tbl_type(i).prior_price - p_txn_lines_tbl_type(i).supplier_new_price;

Line 1485: RAISE Fnd_Api.G_EXC_ERROR;

1481: END IF;
1482: END LOOP;
1483: IF l_error_message IS NOT NULL THEN
1484: x_msg_data := substr(l_error_message,1,2000);
1485: RAISE Fnd_Api.G_EXC_ERROR;
1486: END IF;
1487:
1488: IF DPP_DEBUG_HIGH_ON THEN
1489: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');

Line 1492: WHEN Fnd_Api.G_EXC_ERROR THEN

1488: IF DPP_DEBUG_HIGH_ON THEN
1489: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');
1490: END IF;
1491: EXCEPTION
1492: WHEN Fnd_Api.G_EXC_ERROR THEN
1493: x_return_status := Fnd_Api.g_ret_sts_error ;
1494: dpp_utility_pvt.debug_message('Validate Supplier part number Error: ' || sqlerrm);
1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1493: x_return_status := Fnd_Api.g_ret_sts_error ;

1489: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');
1490: END IF;
1491: EXCEPTION
1492: WHEN Fnd_Api.G_EXC_ERROR THEN
1493: x_return_status := Fnd_Api.g_ret_sts_error ;
1494: dpp_utility_pvt.debug_message('Validate Supplier part number Error: ' || sqlerrm);
1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1497: WHEN OTHERS THEN

Line 1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1491: EXCEPTION
1492: WHEN Fnd_Api.G_EXC_ERROR THEN
1493: x_return_status := Fnd_Api.g_ret_sts_error ;
1494: dpp_utility_pvt.debug_message('Validate Supplier part number Error: ' || sqlerrm);
1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1497: WHEN OTHERS THEN
1498: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1499: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1492: WHEN Fnd_Api.G_EXC_ERROR THEN
1493: x_return_status := Fnd_Api.g_ret_sts_error ;
1494: dpp_utility_pvt.debug_message('Validate Supplier part number Error: ' || sqlerrm);
1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1497: WHEN OTHERS THEN
1498: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1499: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1500: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 1498: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1494: dpp_utility_pvt.debug_message('Validate Supplier part number Error: ' || sqlerrm);
1495: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1496: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1497: WHEN OTHERS THEN
1498: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1499: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1500: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1501: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT VALIDATE SUPPLIER PART NUMBER');
1502: fnd_message.set_token('ERRNO', SQLCODE);

Line 1525: x_return_status := fnd_api.g_ret_sts_success;

1521: l_error_message VARCHAR2(4000);
1522: l_rounding NUMBER;
1523: BEGIN
1524: -- Initialize API return status to sucess
1525: x_return_status := fnd_api.g_ret_sts_success;
1526: IF DPP_DEBUG_HIGH_ON THEN
1527: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Lines');
1528: END IF;
1529:

Line 1699: WHEN Fnd_Api.G_EXC_ERROR THEN

1695: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Lines');
1696: END IF;
1697: dpp_utility_pvt.debug_message('End Create Lines'|| sqlerrm);
1698: EXCEPTION
1699: WHEN Fnd_Api.G_EXC_ERROR THEN
1700: x_return_status := Fnd_Api.g_ret_sts_error ;
1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1703: WHEN OTHERS THEN

Line 1700: x_return_status := Fnd_Api.g_ret_sts_error ;

1696: END IF;
1697: dpp_utility_pvt.debug_message('End Create Lines'|| sqlerrm);
1698: EXCEPTION
1699: WHEN Fnd_Api.G_EXC_ERROR THEN
1700: x_return_status := Fnd_Api.g_ret_sts_error ;
1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1703: WHEN OTHERS THEN
1704: dpp_utility_pvt.debug_message('Exception Create Lines'||sqlerrm);

Line 1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1697: dpp_utility_pvt.debug_message('End Create Lines'|| sqlerrm);
1698: EXCEPTION
1699: WHEN Fnd_Api.G_EXC_ERROR THEN
1700: x_return_status := Fnd_Api.g_ret_sts_error ;
1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1703: WHEN OTHERS THEN
1704: dpp_utility_pvt.debug_message('Exception Create Lines'||sqlerrm);
1705: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1698: EXCEPTION
1699: WHEN Fnd_Api.G_EXC_ERROR THEN
1700: x_return_status := Fnd_Api.g_ret_sts_error ;
1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1703: WHEN OTHERS THEN
1704: dpp_utility_pvt.debug_message('Exception Create Lines'||sqlerrm);
1705: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1706: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 1705: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1701: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1702: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1703: WHEN OTHERS THEN
1704: dpp_utility_pvt.debug_message('Exception Create Lines'||sqlerrm);
1705: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1706: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1707: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1708: fnd_message.set_token('ROUTINE', l_full_name);
1709: fnd_message.set_token('ERRNO', SQLCODE);

Line 1727: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;

1723: AS
1724: l_api_name constant VARCHAR2(30) := 'Update_CoveredInv';
1725: l_api_version constant NUMBER := 1.0;
1726: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1727: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1728: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1729: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1730: --Declaration for Covered Inventory Calculation
1731: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;

Line 1728: l_commit VARCHAR2(30) := FND_API.G_FALSE;

1724: l_api_name constant VARCHAR2(30) := 'Update_CoveredInv';
1725: l_api_version constant NUMBER := 1.0;
1726: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1727: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1728: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1729: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1730: --Declaration for Covered Inventory Calculation
1731: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;
1732: l_line_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_tbl_type;

Line 1729: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

1725: l_api_version constant NUMBER := 1.0;
1726: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1727: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1728: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1729: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1730: --Declaration for Covered Inventory Calculation
1731: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;
1732: l_line_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_tbl_type;
1733: l_inv_cov_wh_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_wh_tbl_type;

Line 1742: x_return_status := fnd_api.g_ret_sts_success;

1738: BEGIN
1739: SAVEPOINT DPP_Update_CoveredInv;
1740:
1741: -- Initialize API return status to sucess
1742: x_return_status := fnd_api.g_ret_sts_success;
1743: IF DPP_DEBUG_HIGH_ON THEN
1744: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Covered Inventory');
1745: END IF;
1746: --Form Header rec to call covered inventory procedure

Line 1791: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

1787: ,p_inv_hdr_rec => l_header_rec_type
1788: ,p_covered_inv_tbl => l_line_tbl_type
1789: );
1790: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1791: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1792: RAISE Fnd_Api.g_exc_error;
1793: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1794: RAISE Fnd_Api.g_exc_unexpected_error;
1795: END IF;

Line 1792: RAISE Fnd_Api.g_exc_error;

1788: ,p_covered_inv_tbl => l_line_tbl_type
1789: );
1790: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1791: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1792: RAISE Fnd_Api.g_exc_error;
1793: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1794: RAISE Fnd_Api.g_exc_unexpected_error;
1795: END IF;
1796: --Call Populate Covered Inventory

Line 1793: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1789: );
1790: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1791: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1792: RAISE Fnd_Api.g_exc_error;
1793: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1794: RAISE Fnd_Api.g_exc_unexpected_error;
1795: END IF;
1796: --Call Populate Covered Inventory
1797: dpp_coveredinventory_pvt.Update_CoveredInventory(

Line 1794: RAISE Fnd_Api.g_exc_unexpected_error;

1790: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1791: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1792: RAISE Fnd_Api.g_exc_error;
1793: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1794: RAISE Fnd_Api.g_exc_unexpected_error;
1795: END IF;
1796: --Call Populate Covered Inventory
1797: dpp_coveredinventory_pvt.Update_CoveredInventory(
1798: p_api_version => l_api_version

Line 1809: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

1805: ,p_inv_hdr_rec => l_header_rec_type
1806: ,p_covered_inv_tbl => l_line_tbl_type
1807: );
1808: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1809: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1810: RAISE Fnd_Api.g_exc_error;
1811: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1812: RAISE Fnd_Api.g_exc_unexpected_error;
1813: END IF;

Line 1810: RAISE Fnd_Api.g_exc_error;

1806: ,p_covered_inv_tbl => l_line_tbl_type
1807: );
1808: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1809: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1810: RAISE Fnd_Api.g_exc_error;
1811: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1812: RAISE Fnd_Api.g_exc_unexpected_error;
1813: END IF;
1814: IF DPP_DEBUG_HIGH_ON THEN

Line 1811: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1807: );
1808: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1809: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1810: RAISE Fnd_Api.g_exc_error;
1811: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1812: RAISE Fnd_Api.g_exc_unexpected_error;
1813: END IF;
1814: IF DPP_DEBUG_HIGH_ON THEN
1815: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');

Line 1812: RAISE Fnd_Api.g_exc_unexpected_error;

1808: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
1809: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1810: RAISE Fnd_Api.g_exc_error;
1811: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1812: RAISE Fnd_Api.g_exc_unexpected_error;
1813: END IF;
1814: IF DPP_DEBUG_HIGH_ON THEN
1815: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');
1816: END IF;

Line 1862: RAISE FND_API.g_exc_error;

1858: FND_MSG_PUB.add;
1859: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1860: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1861: END IF;
1862: RAISE FND_API.g_exc_error;
1863: WHEN OTHERS THEN
1864: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1865: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1866: fnd_message.set_token('ERRNO', sqlcode);

Line 1874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1870: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
1871: FND_MSG_PUB.add;
1872: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1873: END IF;
1874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1875: END;
1876:
1877: IF (l_price_change_flag = 'N') THEN -- Only Price Decrease
1878: UPDATE dpp_transaction_lines_all dtla

Line 1900: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

1896: AND dtla.price_change <> 0;
1897: END IF;
1898:
1899: END LOOP;
1900: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1901: RAISE Fnd_Api.g_exc_error;
1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;

Line 1901: RAISE Fnd_Api.g_exc_error;

1897: END IF;
1898:
1899: END LOOP;
1900: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1901: RAISE Fnd_Api.g_exc_error;
1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;
1905: EXCEPTION

Line 1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1898:
1899: END LOOP;
1900: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1901: RAISE Fnd_Api.g_exc_error;
1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;
1905: EXCEPTION
1906: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 1903: RAISE Fnd_Api.g_exc_unexpected_error;

1899: END LOOP;
1900: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1901: RAISE Fnd_Api.g_exc_error;
1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;
1905: EXCEPTION
1906: WHEN Fnd_Api.G_EXC_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 1906: WHEN Fnd_Api.G_EXC_ERROR THEN

1902: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;
1905: EXCEPTION
1906: WHEN Fnd_Api.G_EXC_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_error ;
1908: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1909: ROLLBACK TO DPP_Update_CoveredInv;
1910: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 1907: x_return_status := Fnd_Api.g_ret_sts_error ;

1903: RAISE Fnd_Api.g_exc_unexpected_error;
1904: END IF;
1905: EXCEPTION
1906: WHEN Fnd_Api.G_EXC_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_error ;
1908: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1909: ROLLBACK TO DPP_Update_CoveredInv;
1910: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1911: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1910: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1906: WHEN Fnd_Api.G_EXC_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_error ;
1908: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1909: ROLLBACK TO DPP_Update_CoveredInv;
1910: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1911: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1912: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1913: ROLLBACK TO DPP_Update_CoveredInv;
1914: WHEN OTHERS THEN

Line 1911: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1907: x_return_status := Fnd_Api.g_ret_sts_error ;
1908: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1909: ROLLBACK TO DPP_Update_CoveredInv;
1910: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1911: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1912: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1913: ROLLBACK TO DPP_Update_CoveredInv;
1914: WHEN OTHERS THEN
1915: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1915: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1911: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1912: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
1913: ROLLBACK TO DPP_Update_CoveredInv;
1914: WHEN OTHERS THEN
1915: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1916: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1917: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1918: fnd_message.set_token('ROUTINE', l_full_name);
1919: fnd_message.set_token('ERRNO', SQLCODE);

Line 1943: x_return_status := fnd_api.g_ret_sts_success;

1939: l_claim_id VARCHAR2(240);
1940: l_error_message VARCHAR2(4000) := NULL;
1941: BEGIN
1942: -- Initialize API return status to sucess
1943: x_return_status := fnd_api.g_ret_sts_success;
1944: IF DPP_DEBUG_HIGH_ON THEN
1945: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Approval');
1946: FND_FILE.PUT_LINE(FND_FILE.LOG,' Values Transaction header id '
1947: ||p_txn_header_rec_type.transaction_header_id

Line 1953: x_return_status := fnd_api.g_ret_sts_error;

1949: END IF;
1950: --Check whether the claim lines belong to the transaction
1951: IF (p_txn_header_rec_type.supp_dist_claim_number IS NULL AND
1952: p_txn_header_rec_type.supp_dist_claim_id IS NULL ) THEN
1953: x_return_status := fnd_api.g_ret_sts_error;
1954: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1955: fnd_message.set_name('DPP', 'DPP_CLAIM_NUMBER_NULL');
1956: x_msg_data := fnd_message.get();
1957: p_txn_header_rec_type.error_code := 'DPP_CLAIM_NUMBER_NULL';

Line 1963: x_return_status := fnd_api.g_ret_sts_error;

1959: IF DPP_DEBUG_HIGH_ON THEN
1960: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1961: END IF;
1962: END IF;
1963: x_return_status := fnd_api.g_ret_sts_error;
1964: --RAISE Fnd_Api.G_EXC_ERROR;
1965: END IF;
1966:
1967: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 1964: --RAISE Fnd_Api.G_EXC_ERROR;

1960: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1961: END IF;
1962: END IF;
1963: x_return_status := fnd_api.g_ret_sts_error;
1964: --RAISE Fnd_Api.G_EXC_ERROR;
1965: END IF;
1966:
1967: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
1968: LOOP

Line 1985: x_return_status := fnd_api.g_ret_sts_error;

1981: AND dtla.supplier_approved_by IS NULL;
1982: END IF;
1983: EXCEPTION
1984: WHEN no_data_found THEN
1985: x_return_status := fnd_api.g_ret_sts_error;
1986: fnd_message.set_name('DPP', 'DPP_APPROVED_CLAIM_LINES_ERR');
1987: fnd_message.set_token('CLAIM_NUMBER', p_txn_header_rec_type.supp_dist_claim_number);
1988: fnd_message.set_token('CLAIM_ID', p_txn_header_rec_type.supp_dist_claim_id);
1989: x_msg_data := fnd_message.get();

Line 1998: RAISE Fnd_Api.G_EXC_ERROR;

1994: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1995: END IF;
1996: l_error_message := l_error_message || x_msg_data;
1997: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1998: RAISE Fnd_Api.G_EXC_ERROR;
1999:
2000: END;
2001:
2002: UPDATE dpp_transaction_headers_all dtha

Line 2046: WHEN Fnd_Api.G_EXC_ERROR THEN

2042: IF DPP_DEBUG_HIGH_ON THEN
2043: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');
2044: END IF;
2045: EXCEPTION
2046: WHEN Fnd_Api.G_EXC_ERROR THEN
2047: x_return_status := Fnd_Api.g_ret_sts_error ;
2048: WHEN others THEN
2049: x_return_status := fnd_api.g_ret_sts_unexp_error;
2050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2047: x_return_status := Fnd_Api.g_ret_sts_error ;

2043: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');
2044: END IF;
2045: EXCEPTION
2046: WHEN Fnd_Api.G_EXC_ERROR THEN
2047: x_return_status := Fnd_Api.g_ret_sts_error ;
2048: WHEN others THEN
2049: x_return_status := fnd_api.g_ret_sts_unexp_error;
2050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2051: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2049: x_return_status := fnd_api.g_ret_sts_unexp_error;

2045: EXCEPTION
2046: WHEN Fnd_Api.G_EXC_ERROR THEN
2047: x_return_status := Fnd_Api.g_ret_sts_error ;
2048: WHEN others THEN
2049: x_return_status := fnd_api.g_ret_sts_unexp_error;
2050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2051: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2052: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2053: fnd_message.set_token('ERRNO', SQLCODE);

Line 2070: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;

2066: AS
2067: l_api_name constant VARCHAR2(30) := 'Update_ClaimsApproval';
2068: l_api_version constant NUMBER := 1.0;
2069: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2070: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2071: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2072: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2073: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2074: l_count_lines NUMBER;

Line 2071: l_commit VARCHAR2(30) := FND_API.G_FALSE;

2067: l_api_name constant VARCHAR2(30) := 'Update_ClaimsApproval';
2068: l_api_version constant NUMBER := 1.0;
2069: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2070: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2071: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2072: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2073: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2074: l_count_lines NUMBER;
2075: l_count_approved_lines NUMBER;

Line 2072: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2068: l_api_version constant NUMBER := 1.0;
2069: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2070: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2071: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2072: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2073: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2074: l_count_lines NUMBER;
2075: l_count_approved_lines NUMBER;
2076: l_claim_txn_hdr_rec_type dpp_businessevents_pvt.dpp_txn_hdr_rec_type;

Line 2081: x_return_status := fnd_api.g_ret_sts_success;

2077: l_claim_txn_line_tbl_type dpp_businessevents_pvt.dpp_txn_line_tbl_type;
2078:
2079: BEGIN
2080: -- Initialize API return status to sucess
2081: x_return_status := fnd_api.g_ret_sts_success;
2082:
2083: IF DPP_DEBUG_HIGH_ON THEN
2084: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval');
2085: END IF;

Line 2095: x_return_status := fnd_api.g_ret_sts_error;

2091: WHERE fl.lookup_type = 'DPP_EXECUTION_PROCESSES'
2092: AND fl.lookup_code = 'UPDCLM';
2093: EXCEPTION
2094: WHEN no_data_found THEN
2095: x_return_status := fnd_api.g_ret_sts_error;
2096: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2097: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2098: fnd_message.set_token('ROUTINE', l_full_name);
2099: fnd_message.set_token('ERRNO', SQLCODE);

Line 2162: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2158: ,x_msg_data => x_msg_data
2159: ,p_txn_hdr_rec => l_claim_txn_hdr_rec_type
2160: ,p_txn_line_id => l_claim_txn_line_tbl_type
2161: );
2162: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2163: RAISE Fnd_Api.g_exc_error;
2164: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2165: RAISE Fnd_Api.g_exc_unexpected_error;
2166: END IF;

Line 2163: RAISE Fnd_Api.g_exc_error;

2159: ,p_txn_hdr_rec => l_claim_txn_hdr_rec_type
2160: ,p_txn_line_id => l_claim_txn_line_tbl_type
2161: );
2162: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2163: RAISE Fnd_Api.g_exc_error;
2164: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2165: RAISE Fnd_Api.g_exc_unexpected_error;
2166: END IF;
2167: IF DPP_DEBUG_HIGH_ON THEN

Line 2164: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2160: ,p_txn_line_id => l_claim_txn_line_tbl_type
2161: );
2162: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2163: RAISE Fnd_Api.g_exc_error;
2164: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2165: RAISE Fnd_Api.g_exc_unexpected_error;
2166: END IF;
2167: IF DPP_DEBUG_HIGH_ON THEN
2168: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'

Line 2165: RAISE Fnd_Api.g_exc_unexpected_error;

2161: );
2162: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2163: RAISE Fnd_Api.g_exc_error;
2164: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2165: RAISE Fnd_Api.g_exc_unexpected_error;
2166: END IF;
2167: IF DPP_DEBUG_HIGH_ON THEN
2168: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'
2169: ||' update the claim status.');

Line 2177: WHEN Fnd_Api.G_EXC_ERROR THEN

2173: IF DPP_DEBUG_HIGH_ON THEN
2174: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');
2175: END IF;
2176: EXCEPTION
2177: WHEN Fnd_Api.G_EXC_ERROR THEN
2178: x_return_status := Fnd_Api.g_ret_sts_error ;
2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2181: WHEN OTHERS THEN

Line 2178: x_return_status := Fnd_Api.g_ret_sts_error ;

2174: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');
2175: END IF;
2176: EXCEPTION
2177: WHEN Fnd_Api.G_EXC_ERROR THEN
2178: x_return_status := Fnd_Api.g_ret_sts_error ;
2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2181: WHEN OTHERS THEN
2182: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2175: END IF;
2176: EXCEPTION
2177: WHEN Fnd_Api.G_EXC_ERROR THEN
2178: x_return_status := Fnd_Api.g_ret_sts_error ;
2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2181: WHEN OTHERS THEN
2182: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2183: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2176: EXCEPTION
2177: WHEN Fnd_Api.G_EXC_ERROR THEN
2178: x_return_status := Fnd_Api.g_ret_sts_error ;
2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2181: WHEN OTHERS THEN
2182: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2183: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2184: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2182: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2178: x_return_status := Fnd_Api.g_ret_sts_error ;
2179: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2180: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2181: WHEN OTHERS THEN
2182: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2183: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2184: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2185: fnd_message.set_token('ROUTINE', l_full_name);
2186: fnd_message.set_token('ERRNO', SQLCODE);

Line 2220: x_return_status := fnd_api.g_ret_sts_success;

2216: order by transaction_int_line_id;
2217:
2218: BEGIN
2219: -- Initialize API return status to sucess
2220: x_return_status := fnd_api.g_ret_sts_success;
2221: IF DPP_DEBUG_HIGH_ON THEN
2222: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin form line tbl');
2223: END IF;
2224:

Line 2231: x_return_status := fnd_api.g_ret_sts_error;

2227: --fetch records from dpp_txn_lines_int_all table for the selected header.
2228: FOR fetch_lines_rec IN fetch_lines_cur(p_txn_header_rec_type.transaction_int_header_id)
2229: LOOP
2230: IF p_txn_header_rec_type.org_id <> nvl(fetch_lines_rec.org_id,p_txn_header_rec_type.org_id) THEN
2231: x_return_status := fnd_api.g_ret_sts_error;
2232: fnd_message.set_name('DPP', 'DPP_TXN_ORG_MISMATCH');
2233: fnd_message.set_token('HEADER_ORG_ID', p_txn_header_rec_type.org_id);
2234: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2235: x_msg_data :=fnd_message.get();

Line 2236: --RAISE Fnd_Api.G_EXC_ERROR;

2232: fnd_message.set_name('DPP', 'DPP_TXN_ORG_MISMATCH');
2233: fnd_message.set_token('HEADER_ORG_ID', p_txn_header_rec_type.org_id);
2234: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2235: x_msg_data :=fnd_message.get();
2236: --RAISE Fnd_Api.G_EXC_ERROR;
2237: l_txn_lines_rec_type.error_code := 'DPP_TXN_ORG_MISMATCH';
2238: x_return_status := Fnd_Api.g_ret_sts_error ;
2239: l_error_message := l_error_message || x_msg_data;
2240: END IF;

Line 2238: x_return_status := Fnd_Api.g_ret_sts_error ;

2234: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2235: x_msg_data :=fnd_message.get();
2236: --RAISE Fnd_Api.G_EXC_ERROR;
2237: l_txn_lines_rec_type.error_code := 'DPP_TXN_ORG_MISMATCH';
2238: x_return_status := Fnd_Api.g_ret_sts_error ;
2239: l_error_message := l_error_message || x_msg_data;
2240: END IF;
2241: l_txn_lines_rec_type.line_number := l_line_number + 1;
2242: l_txn_lines_rec_type.transaction_header_id := p_txn_header_rec_type.transaction_header_id;

Line 2306: RAISE Fnd_Api.G_EXC_ERROR;

2302: END LOOP; --FOR fetch_lines_rec IN fetch_lines_cur(p_txn_header_rec_type.transaction_int_header_id)
2303: --CLOSE fetch_lines_cur;
2304: IF l_error_message IS NOT NULL THEN
2305: x_msg_data := l_error_message;
2306: RAISE Fnd_Api.G_EXC_ERROR;
2307: END IF;
2308: IF DPP_DEBUG_HIGH_ON THEN
2309: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2310: END IF;

Line 2312: WHEN Fnd_Api.G_EXC_ERROR THEN

2308: IF DPP_DEBUG_HIGH_ON THEN
2309: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2310: END IF;
2311: EXCEPTION
2312: WHEN Fnd_Api.G_EXC_ERROR THEN
2313: x_return_status := Fnd_Api.g_ret_sts_error ;
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: WHEN OTHERS THEN

Line 2313: x_return_status := Fnd_Api.g_ret_sts_error ;

2309: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2310: END IF;
2311: EXCEPTION
2312: WHEN Fnd_Api.G_EXC_ERROR THEN
2313: x_return_status := Fnd_Api.g_ret_sts_error ;
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: WHEN OTHERS THEN
2317: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2310: END IF;
2311: EXCEPTION
2312: WHEN Fnd_Api.G_EXC_ERROR THEN
2313: x_return_status := Fnd_Api.g_ret_sts_error ;
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: WHEN OTHERS THEN
2317: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2318: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2311: EXCEPTION
2312: WHEN Fnd_Api.G_EXC_ERROR THEN
2313: x_return_status := Fnd_Api.g_ret_sts_error ;
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: WHEN OTHERS THEN
2317: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2318: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2319: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2317: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2313: x_return_status := Fnd_Api.g_ret_sts_error ;
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: WHEN OTHERS THEN
2317: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2318: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2319: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2320: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2321: fnd_message.set_token('ERRNO', SQLCODE);

Line 2338: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;

2334: l_api_name constant VARCHAR2(30) := 'Update_HeaderLog';
2335: l_api_version constant NUMBER := 1.0;
2336: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2337: l_return_status VARCHAR2(30);
2338: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2339: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2340: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2341: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2342:

Line 2339: l_commit VARCHAR2(30) := FND_API.G_FALSE;

2335: l_api_version constant NUMBER := 1.0;
2336: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2337: l_return_status VARCHAR2(30);
2338: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2339: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2340: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2341: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2342:
2343: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;

Line 2340: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2336: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2337: l_return_status VARCHAR2(30);
2338: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2339: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2340: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2341: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2342:
2343: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2344: l_txn_hdr_rec dpp_log_pvt.dpp_cst_hdr_rec_type;

Line 2347: x_return_status := fnd_api.g_ret_sts_success;

2343: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2344: l_txn_hdr_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2345: BEGIN
2346: -- Initialize API return status to sucess
2347: x_return_status := fnd_api.g_ret_sts_success;
2348:
2349: IF DPP_DEBUG_HIGH_ON THEN
2350: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update HeaderLog');
2351: END IF;

Line 2421: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

2417: );
2418: IF DPP_DEBUG_HIGH_ON THEN
2419: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2420: END IF;
2421: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2422: RAISE Fnd_Api.g_exc_error;
2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;

Line 2422: RAISE Fnd_Api.g_exc_error;

2418: IF DPP_DEBUG_HIGH_ON THEN
2419: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2420: END IF;
2421: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2422: RAISE Fnd_Api.g_exc_error;
2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;
2426: EXCEPTION

Line 2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2419: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2420: END IF;
2421: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2422: RAISE Fnd_Api.g_exc_error;
2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;
2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2424: RAISE Fnd_Api.g_exc_unexpected_error;

2420: END IF;
2421: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2422: RAISE Fnd_Api.g_exc_error;
2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;
2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN
2428: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2427: WHEN Fnd_Api.G_EXC_ERROR THEN

2423: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;
2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN
2428: x_return_status := Fnd_Api.g_ret_sts_error ;
2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2431: WHEN OTHERS THEN

Line 2428: x_return_status := Fnd_Api.g_ret_sts_error ;

2424: RAISE Fnd_Api.g_exc_unexpected_error;
2425: END IF;
2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN
2428: x_return_status := Fnd_Api.g_ret_sts_error ;
2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2431: WHEN OTHERS THEN
2432: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2425: END IF;
2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN
2428: x_return_status := Fnd_Api.g_ret_sts_error ;
2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2431: WHEN OTHERS THEN
2432: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2433: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2426: EXCEPTION
2427: WHEN Fnd_Api.G_EXC_ERROR THEN
2428: x_return_status := Fnd_Api.g_ret_sts_error ;
2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2431: WHEN OTHERS THEN
2432: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2433: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2434: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2432: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2428: x_return_status := Fnd_Api.g_ret_sts_error ;
2429: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2430: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2431: WHEN OTHERS THEN
2432: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2433: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2434: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2435: fnd_message.set_token('ROUTINE', l_full_name);
2436: fnd_message.set_token('ERRNO', SQLCODE);

Line 2453: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;

2449:
2450: l_api_name constant VARCHAR2(30) := 'Update_LinesLog';
2451: l_api_version constant NUMBER := 1.0;
2452: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2453: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2454: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2455: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2456:
2457: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;

Line 2454: l_commit VARCHAR2(30) := FND_API.G_FALSE;

2450: l_api_name constant VARCHAR2(30) := 'Update_LinesLog';
2451: l_api_version constant NUMBER := 1.0;
2452: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2453: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2454: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2455: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2456:
2457: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2458: BEGIN

Line 2455: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2451: l_api_version constant NUMBER := 1.0;
2452: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2453: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2454: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2455: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2456:
2457: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2458: BEGIN
2459: --SAVEPOINT DPP_Update_LinesLog;

Line 2461: x_return_status := fnd_api.g_ret_sts_success;

2457: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2458: BEGIN
2459: --SAVEPOINT DPP_Update_LinesLog;
2460: -- Initialize API return status to sucess
2461: x_return_status := fnd_api.g_ret_sts_success;
2462: IF DPP_DEBUG_HIGH_ON THEN
2463: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update LinesLog');
2464: END IF;
2465: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 2556: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2552:
2553: IF DPP_DEBUG_HIGH_ON THEN
2554: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2555: END IF;
2556: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2557: RAISE Fnd_Api.g_exc_error;
2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;

Line 2557: RAISE Fnd_Api.g_exc_error;

2553: IF DPP_DEBUG_HIGH_ON THEN
2554: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2555: END IF;
2556: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2557: RAISE Fnd_Api.g_exc_error;
2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;
2561: EXCEPTION

Line 2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2554: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2555: END IF;
2556: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2557: RAISE Fnd_Api.g_exc_error;
2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;
2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2559: RAISE Fnd_Api.g_exc_unexpected_error;

2555: END IF;
2556: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2557: RAISE Fnd_Api.g_exc_error;
2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;
2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN
2563: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2562: WHEN Fnd_Api.G_EXC_ERROR THEN

2558: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;
2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN
2563: x_return_status := Fnd_Api.g_ret_sts_error ;
2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2566: WHEN OTHERS THEN

Line 2563: x_return_status := Fnd_Api.g_ret_sts_error ;

2559: RAISE Fnd_Api.g_exc_unexpected_error;
2560: END IF;
2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN
2563: x_return_status := Fnd_Api.g_ret_sts_error ;
2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2566: WHEN OTHERS THEN
2567: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2560: END IF;
2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN
2563: x_return_status := Fnd_Api.g_ret_sts_error ;
2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2566: WHEN OTHERS THEN
2567: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2568: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2561: EXCEPTION
2562: WHEN Fnd_Api.G_EXC_ERROR THEN
2563: x_return_status := Fnd_Api.g_ret_sts_error ;
2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2566: WHEN OTHERS THEN
2567: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2568: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2569: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2567: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2563: x_return_status := Fnd_Api.g_ret_sts_error ;
2564: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2565: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2566: WHEN OTHERS THEN
2567: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2568: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2569: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2570: fnd_message.set_token('ROUTINE', l_full_name);
2571: fnd_message.set_token('ERRNO', SQLCODE);

Line 2590: x_return_status := fnd_api.g_ret_sts_success;

2586: l_api_name constant VARCHAR2(30) := 'Update_InterfaceTbl';
2587: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2588: BEGIN
2589: -- Initialize API return status to sucess
2590: x_return_status := fnd_api.g_ret_sts_success;
2591:
2592: IF DPP_DEBUG_HIGH_ON THEN
2593: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceTbl');
2594: END IF;

Line 2627: WHEN Fnd_Api.G_EXC_ERROR THEN

2623: IF DPP_DEBUG_HIGH_ON THEN
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');
2625: END IF;
2626: EXCEPTION
2627: WHEN Fnd_Api.G_EXC_ERROR THEN
2628: x_return_status := Fnd_Api.g_ret_sts_error ;
2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2631:

Line 2628: x_return_status := Fnd_Api.g_ret_sts_error ;

2624: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');
2625: END IF;
2626: EXCEPTION
2627: WHEN Fnd_Api.G_EXC_ERROR THEN
2628: x_return_status := Fnd_Api.g_ret_sts_error ;
2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2631:
2632: WHEN OTHERS THEN

Line 2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2625: END IF;
2626: EXCEPTION
2627: WHEN Fnd_Api.G_EXC_ERROR THEN
2628: x_return_status := Fnd_Api.g_ret_sts_error ;
2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2631:
2632: WHEN OTHERS THEN
2633: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2626: EXCEPTION
2627: WHEN Fnd_Api.G_EXC_ERROR THEN
2628: x_return_status := Fnd_Api.g_ret_sts_error ;
2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2631:
2632: WHEN OTHERS THEN
2633: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2633: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2629: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2630: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2631:
2632: WHEN OTHERS THEN
2633: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2635: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2636: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2637: fnd_message.set_token('ERRNO', SQLCODE);

Line 2657: x_return_status := fnd_api.g_ret_sts_success;

2653: l_api_name constant VARCHAR2(30) := 'Update_InterfaceErrSts';
2654: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2655: BEGIN
2656: -- Initialize API return status to sucess
2657: x_return_status := fnd_api.g_ret_sts_success;
2658: IF DPP_DEBUG_HIGH_ON THEN
2659: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');
2660: END IF;
2661:

Line 2691: WHEN Fnd_Api.G_EXC_ERROR THEN

2687: IF DPP_DEBUG_HIGH_ON THEN
2688: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
2689: END IF;
2690: EXCEPTION
2691: WHEN Fnd_Api.G_EXC_ERROR THEN
2692: x_return_status := Fnd_Api.g_ret_sts_error ;
2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2695: WHEN OTHERS THEN

Line 2692: x_return_status := Fnd_Api.g_ret_sts_error ;

2688: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
2689: END IF;
2690: EXCEPTION
2691: WHEN Fnd_Api.G_EXC_ERROR THEN
2692: x_return_status := Fnd_Api.g_ret_sts_error ;
2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2689: END IF;
2690: EXCEPTION
2691: WHEN Fnd_Api.G_EXC_ERROR THEN
2692: x_return_status := Fnd_Api.g_ret_sts_error ;
2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2697: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2690: EXCEPTION
2691: WHEN Fnd_Api.G_EXC_ERROR THEN
2692: x_return_status := Fnd_Api.g_ret_sts_error ;
2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2697: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2698: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2696: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2692: x_return_status := Fnd_Api.g_ret_sts_error ;
2693: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2694: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2697: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2698: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2699: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2700: fnd_message.set_token('ERRNO', SQLCODE);

Line 2719: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false

2715: -- NOTES
2716: -- 1. Transaction_int_header id
2717: ----------------------------------------------------------------------
2718: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2719: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2720: , p_commit IN VARCHAR2 := fnd_api.g_false
2721: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2722: , p_transaction_int_header_id IN NUMBER
2723: , p_operating_unit IN VARCHAR2 DEFAULT NULL

Line 2720: , p_commit IN VARCHAR2 := fnd_api.g_false

2716: -- 1. Transaction_int_header id
2717: ----------------------------------------------------------------------
2718: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2719: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2720: , p_commit IN VARCHAR2 := fnd_api.g_false
2721: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2722: , p_transaction_int_header_id IN NUMBER
2723: , p_operating_unit IN VARCHAR2 DEFAULT NULL
2724: , x_return_status OUT nocopy VARCHAR2

Line 2721: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full

2717: ----------------------------------------------------------------------
2718: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2719: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2720: , p_commit IN VARCHAR2 := fnd_api.g_false
2721: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2722: , p_transaction_int_header_id IN NUMBER
2723: , p_operating_unit IN VARCHAR2 DEFAULT NULL
2724: , x_return_status OUT nocopy VARCHAR2
2725: , x_msg_count OUT nocopy NUMBER

Line 2760: IF Fnd_Api.to_boolean(p_init_msg_list) THEN

2756:
2757: BEGIN
2758: -- Standard begin of API savepoint
2759: SAVEPOINT DPP_Insert_Transaction;
2760: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
2761: Fnd_Msg_Pub.initialize;
2762: END IF;
2763: IF NOT Fnd_Api.compatible_api_call
2764: (

Line 2763: IF NOT Fnd_Api.compatible_api_call

2759: SAVEPOINT DPP_Insert_Transaction;
2760: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
2761: Fnd_Msg_Pub.initialize;
2762: END IF;
2763: IF NOT Fnd_Api.compatible_api_call
2764: (
2765: l_api_version,
2766: p_api_version,
2767: l_api_name,

Line 2771: RAISE Fnd_Api.g_exc_unexpected_error;

2767: l_api_name,
2768: g_pkg_name
2769: )
2770: THEN
2771: RAISE Fnd_Api.g_exc_unexpected_error;
2772: END IF;
2773:
2774: -- Initialize API return status to sucess
2775: x_return_status := fnd_api.g_ret_sts_success;

Line 2775: x_return_status := fnd_api.g_ret_sts_success;

2771: RAISE Fnd_Api.g_exc_unexpected_error;
2772: END IF;
2773:
2774: -- Initialize API return status to sucess
2775: x_return_status := fnd_api.g_ret_sts_success;
2776:
2777:
2778: IF DPP_DEBUG_HIGH_ON THEN
2779: fnd_file.put_line(fnd_file.log, 'Begin Insert Transaction ' );

Line 2879: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2875: dpp_utility_pvt.debug_message('Ref Doc Num Status :'||l_return_status);
2876: IF DPP_DEBUG_HIGH_ON THEN
2877: fnd_file.put_line(fnd_file.log, 'Validate Ref Document Number Return Status: '||l_return_status ||'Error Msg: '||x_msg_data);
2878: END IF;
2879: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2880: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
2881: Update_InterfaceErrSts(
2882: p_txn_header_rec_type => l_txn_header_rec_type
2883: ,x_return_status =>l_return_status

Line 2902: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2898: IF DPP_DEBUG_HIGH_ON THEN
2899: fnd_file.put_line(fnd_file.log, 'Validate Operating Unit Return Status: '||l_txn_header_rec_type.org_id ||l_return_status ||'Error Msg: '||x_msg_data);
2900: END IF;
2901:
2902: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2903: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
2904: ROLLBACK TO DPP_Insert_Transaction;
2905: Update_InterfaceErrSts(
2906: p_txn_header_rec_type => l_txn_header_rec_type

Line 2909: RAISE Fnd_Api.g_exc_error;

2905: Update_InterfaceErrSts(
2906: p_txn_header_rec_type => l_txn_header_rec_type
2907: ,x_return_status =>l_return_status
2908: );
2909: RAISE Fnd_Api.g_exc_error;
2910: END IF;
2911: --End Validate the Operating Unit
2912:
2913: --Validate the vendor Details

Line 2923: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2919: dpp_utility_pvt.debug_message('Supplier Details Status :'||l_return_status);
2920: IF DPP_DEBUG_HIGH_ON THEN
2921: fnd_file.put_line(fnd_file.log, 'Validate Supplier Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
2922: END IF;
2923: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2924: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
2925: ROLLBACK TO DPP_Insert_Transaction;
2926: Update_InterfaceErrSts(
2927: p_txn_header_rec_type => l_txn_header_rec_type

Line 2930: RAISE Fnd_Api.g_exc_error;

2926: Update_InterfaceErrSts(
2927: p_txn_header_rec_type => l_txn_header_rec_type
2928: ,x_return_status =>l_return_status
2929: );
2930: RAISE Fnd_Api.g_exc_error;
2931: END IF;
2932: --End Validate the vendor Details
2933: --Validate the transaction currency
2934: Validate_currency(p_txn_header_rec_type => l_txn_header_rec_type

Line 2943: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2939: dpp_utility_pvt.debug_message('Currency Status :'||l_return_status);
2940: IF DPP_DEBUG_HIGH_ON THEN
2941: fnd_file.put_line(fnd_file.log, 'Validate Currency Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
2942: END IF;
2943: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2944: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
2945: Update_InterfaceErrSts(
2946: p_txn_header_rec_type => l_txn_header_rec_type
2947: ,x_return_status =>l_return_status

Line 2960: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2956: dpp_utility_pvt.debug_message('Validate Lines Status :'||l_return_status);
2957: IF DPP_DEBUG_HIGH_ON THEN
2958: fnd_file.put_line(fnd_file.log, 'Validate Line Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
2959: END IF;
2960: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2961: ROLLBACK TO DPP_Insert_Transaction;
2962: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
2963: Update_InterfaceErrSts(
2964: p_txn_header_rec_type => l_txn_header_rec_type

Line 3009: x_return_status := fnd_api.g_ret_sts_error;

3005: WHERE lookup_type = 'DPP_TRANSACTION_STATUSES'
3006: AND lookup_code = 'CANCELLED';
3007: EXCEPTION
3008: WHEN no_data_found THEN
3009: x_return_status := fnd_api.g_ret_sts_error;
3010: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3011: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
3012: END IF;
3013: x_msg_data := fnd_message.get();

Line 3014: --RAISE Fnd_Api.G_EXC_ERROR;

3010: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3011: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
3012: END IF;
3013: x_msg_data := fnd_message.get();
3014: --RAISE Fnd_Api.G_EXC_ERROR;
3015: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3016: Update_InterfaceErrSts(
3017: p_txn_header_rec_type => l_txn_header_rec_type
3018: ,x_return_status =>l_return_status

Line 3030: RAISE Fnd_Api.g_exc_error;

3026: END IF;
3027: dpp_utility_pvt.debug_message('New Transaction');
3028:
3029: IF l_concatenated_error_message IS NOT NULL THEN
3030: RAISE Fnd_Api.g_exc_error;
3031: END IF;
3032: -- Create Header record in dpp_transaction_headers_all table
3033: Create_Header(p_txn_header_rec_type => l_txn_header_rec_type
3034: ,x_msg_count => x_msg_count

Line 3042: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3038: dpp_utility_pvt.debug_message('Create Header Status :'||l_return_status);
3039: IF DPP_DEBUG_HIGH_ON THEN
3040: fnd_file.put_line(fnd_file.log, 'Create Header Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3041: END IF;
3042: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3043: ROLLBACK TO DPP_Insert_Transaction;
3044: Update_InterfaceErrSts(
3045: p_txn_header_rec_type => l_txn_header_rec_type
3046: ,x_return_status =>l_return_status

Line 3048: RAISE Fnd_Api.g_exc_error;

3044: Update_InterfaceErrSts(
3045: p_txn_header_rec_type => l_txn_header_rec_type
3046: ,x_return_status =>l_return_status
3047: );
3048: RAISE Fnd_Api.g_exc_error;
3049: END IF;
3050:
3051: dpp_utility_pvt.debug_message('Create_Header');
3052: --Update Header history log

Line 3063: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3059: IF DPP_DEBUG_HIGH_ON THEN
3060: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3061: END IF;
3062:
3063: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3064: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3065: END IF;
3066: END IF;
3067: --Get the lines in a tbl type

Line 3079: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3075: dpp_utility_pvt.debug_message('Form Line Tbl Status :'||l_return_status);
3076: IF DPP_DEBUG_HIGH_ON THEN
3077: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3078: END IF;
3079: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3080: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3081: Update_InterfaceLineErrSts(
3082: p_txn_header_rec_type => l_txn_header_rec_type,
3083: p_txn_lines_tbl_type => l_txn_lines_tbl_type

Line 3102: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3098: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3099: dpp_utility_pvt.debug_message('Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||substr(x_msg_data,1,1000));
3100: END IF;
3101:
3102: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3103: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3104: ROLLBACK TO DPP_Insert_Transaction;
3105: Update_InterfaceLineErrSts(
3106: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3113: RAISE Fnd_Api.g_exc_error;

3109: );
3110: END IF;
3111: IF l_concatenated_error_message IS NOT NULL THEN
3112: x_msg_data:= l_concatenated_error_message;
3113: RAISE Fnd_Api.g_exc_error;
3114: END IF;
3115: dpp_utility_pvt.debug_message('Validate Supplier Part Number');
3116: --Call Insert lines procedure
3117: Create_lines( p_txn_header_rec_type => l_txn_header_rec_type

Line 3127: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3123: dpp_utility_pvt.debug_message('Create Lines Status :'||l_return_status);
3124: IF DPP_DEBUG_HIGH_ON THEN
3125: fnd_file.put_line(fnd_file.log, 'Create Lines Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3126: END IF;
3127: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3128: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3129: ROLLBACK TO DPP_Insert_Transaction;
3130: Update_InterfaceLineErrSts(
3131: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3135: RAISE Fnd_Api.g_exc_error;

3131: p_txn_header_rec_type => l_txn_header_rec_type,
3132: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3133: ,x_return_status =>l_return_status
3134: );
3135: RAISE Fnd_Api.g_exc_error;
3136: END IF;
3137: --Update lines log
3138: IF l_log_enabled = 'Y' THEN
3139: Update_LinesLog(

Line 3148: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3144: );
3145: IF DPP_DEBUG_HIGH_ON THEN
3146: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3147: END IF;
3148: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3149: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3150: Update_InterfaceLineErrSts(
3151: p_txn_header_rec_type => l_txn_header_rec_type,
3152: p_txn_lines_tbl_type => l_txn_lines_tbl_type

Line 3159: RAISE Fnd_Api.g_exc_error;

3155: END IF;
3156: END IF;
3157: IF l_concatenated_error_message IS NOT NULL THEN
3158: x_msg_data:= l_concatenated_error_message;
3159: RAISE Fnd_Api.g_exc_error;
3160: END IF;
3161: --Update Covered Inventory
3162: Update_CoveredInv(
3163: p_txn_header_rec_type => l_txn_header_rec_type

Line 3173: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3169: dpp_utility_pvt.debug_message('Update CoveredInv Status :'||l_return_status);
3170: IF DPP_DEBUG_HIGH_ON THEN
3171: fnd_file.put_line(fnd_file.log, 'Update Covered Inventory Return Status:'||l_return_status);
3172: END IF;
3173: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3174: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3175: ROLLBACK TO DPP_Insert_Transaction;
3176: Update_InterfaceLineErrSts(
3177: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3182: RAISE Fnd_Api.g_exc_error;

3178: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3179: ,x_return_status =>l_return_status
3180: );
3181: dpp_utility_pvt.debug_message('Status '||l_return_status|| ' Message '||x_msg_data);
3182: RAISE Fnd_Api.g_exc_error;
3183: END IF;
3184: ELSE
3185: --The transaction is in Active/.... Status
3186: fnd_message.set_name('DPP', 'DPP_TRANSACTION_EXIST');

Line 3201: RAISE Fnd_Api.g_exc_error;

3197: Update_InterfaceErrSts(
3198: p_txn_header_rec_type => l_txn_header_rec_type
3199: ,x_return_status =>l_return_status
3200: );
3201: RAISE Fnd_Api.g_exc_error;
3202: END IF; --l_transaction_status is null
3203:
3204: fnd_message.set_name('DPP', 'DPP_TRANSACTION_CREATED');
3205: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);

Line 3216: RAISE Fnd_Api.g_exc_error;

3212:
3213: IF l_concatenated_error_message IS NOT NULL THEN
3214: x_msg_data := 'The Transaction for the supplier name '||l_txn_header_rec_type.vendor_name ||
3215: ',Supplier site '||l_txn_header_rec_type.vendor_site_code ||' and Operating Unit Name '||l_txn_header_rec_type.operating_unit_name || ' failed.' ||l_concatenated_error_message;
3216: RAISE Fnd_Api.g_exc_error;
3217: END IF;
3218: --The Transaction is an Approval response
3219: ELSE
3220: IF l_transaction_status IS NULL OR l_transaction_status <> 'ACTIVE' THEN

Line 3229: --RAISE Fnd_Api.g_exc_error;

3225: Update_InterfaceErrSts(
3226: p_txn_header_rec_type => l_txn_header_rec_type
3227: ,x_return_status =>l_return_status
3228: );
3229: --RAISE Fnd_Api.g_exc_error;
3230: END IF;
3231: --Validate Supplier approved date,claim Number
3232: IF l_txn_header_rec_type.supplier_approval_date IS NULL
3233: THEN

Line 3245: -- RAISE Fnd_Api.g_exc_error;

3241: Update_InterfaceErrSts(
3242: p_txn_header_rec_type => l_txn_header_rec_type
3243: ,x_return_status =>l_return_status
3244: );
3245: -- RAISE Fnd_Api.g_exc_error;
3246: END IF;
3247: IF DPP_DEBUG_HIGH_ON THEN
3248: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');
3249: END IF;

Line 3252: RAISE Fnd_Api.g_exc_error;

3248: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');
3249: END IF;
3250: IF l_concatenated_error_message IS NOT NULL THEN
3251: x_msg_data:= l_concatenated_error_message;
3252: RAISE Fnd_Api.g_exc_error;
3253: END IF;
3254: --Get the lines in a tbl type
3255: form_line_tbl(
3256: p_txn_header_rec_type => l_txn_header_rec_type

Line 3265: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3261: );
3262: IF DPP_DEBUG_HIGH_ON THEN
3263: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3264: END IF;
3265: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3266: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3267: ROLLBACK TO DPP_Insert_Transaction;
3268: Update_InterfaceLineErrSts(
3269: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3273: --RAISE Fnd_Api.g_exc_error;

3269: p_txn_header_rec_type => l_txn_header_rec_type,
3270: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3271: ,x_return_status =>l_return_status
3272: );
3273: --RAISE Fnd_Api.g_exc_error;
3274: END IF;
3275: Validate_SupplierPartNum(
3276: p_txn_header_rec_type =>l_txn_header_rec_type
3277: ,p_txn_lines_tbl_type => l_txn_lines_tbl_type

Line 3286: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3282: IF DPP_DEBUG_HIGH_ON THEN
3283: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3284: END IF;
3285:
3286: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3287: IF DPP_DEBUG_HIGH_ON THEN
3288: fnd_file.put_line(fnd_file.log, 'Invalid Supplier part number/Item Number/Inventory Item Id.Status:'||l_return_status ||'Error Msg'||x_msg_data);
3289: END IF;
3290: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3296: RAISE Fnd_Api.g_exc_error;

3292: p_txn_header_rec_type => l_txn_header_rec_type,
3293: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3294: ,x_return_status =>l_return_status
3295: );
3296: RAISE Fnd_Api.g_exc_error;
3297: END IF;
3298:
3299: --Call procedure to update approval details
3300: Update_Approval(

Line 3310: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3306: );
3307: IF DPP_DEBUG_HIGH_ON THEN
3308: fnd_file.put_line(fnd_file.log, 'Update Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3309: END IF;
3310: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3311: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3312: ROLLBACK TO DPP_Insert_Transaction;
3313: Update_InterfaceLineErrSts(
3314: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3318: --RAISE Fnd_Api.g_exc_error;

3314: p_txn_header_rec_type => l_txn_header_rec_type,
3315: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3316: ,x_return_status =>l_return_status
3317: );
3318: --RAISE Fnd_Api.g_exc_error;
3319: END IF;
3320:
3321: IF l_concatenated_error_message IS NOT NULL THEN
3322: Update_InterfaceErrSts(

Line 3326: RAISE Fnd_Api.g_exc_error;

3322: Update_InterfaceErrSts(
3323: p_txn_header_rec_type => l_txn_header_rec_type
3324: ,x_return_status =>l_return_status
3325: );
3326: RAISE Fnd_Api.g_exc_error;
3327: END IF;
3328:
3329: --call header history API for log
3330: IF l_log_enabled = 'Y' THEN

Line 3339: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3335: );
3336: IF DPP_DEBUG_HIGH_ON THEN
3337: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3338: END IF;
3339: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3340: --RAISE Fnd_Api.g_exc_error;
3341: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3342: END IF;
3343: --Call history log for lines

Line 3340: --RAISE Fnd_Api.g_exc_error;

3336: IF DPP_DEBUG_HIGH_ON THEN
3337: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3338: END IF;
3339: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3340: --RAISE Fnd_Api.g_exc_error;
3341: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3342: END IF;
3343: --Call history log for lines
3344: Update_LinesLog(

Line 3353: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3349: );
3350: IF DPP_DEBUG_HIGH_ON THEN
3351: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3352: END IF;
3353: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3354: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3355: --RAISE Fnd_Api.g_exc_error;
3356: END IF;
3357:

Line 3355: --RAISE Fnd_Api.g_exc_error;

3351: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3352: END IF;
3353: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3354: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3355: --RAISE Fnd_Api.g_exc_error;
3356: END IF;
3357:
3358: END IF;
3359: IF l_concatenated_error_message IS NOT NULL THEN

Line 3364: RAISE Fnd_Api.g_exc_error;

3360: Update_InterfaceErrSts(
3361: p_txn_header_rec_type => l_txn_header_rec_type
3362: ,x_return_status =>l_return_status
3363: );
3364: RAISE Fnd_Api.g_exc_error;
3365: END IF;
3366: --Call procedure to update the supplier approved by flag in claims table
3367:
3368: Update_ClaimsApproval (

Line 3378: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3374: );
3375: IF DPP_DEBUG_HIGH_ON THEN
3376: fnd_file.put_line(fnd_file.log, 'Update Claims Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3377: END IF;
3378: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3379: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3380: ROLLBACK TO DPP_Insert_Transaction;
3381: Update_InterfaceErrSts(
3382: p_txn_header_rec_type => l_txn_header_rec_type

Line 3385: --RAISE Fnd_Api.g_exc_error;

3381: Update_InterfaceErrSts(
3382: p_txn_header_rec_type => l_txn_header_rec_type
3383: ,x_return_status =>l_return_status
3384: );
3385: --RAISE Fnd_Api.g_exc_error;
3386: END IF;
3387: fnd_message.set_name('DPP', 'DPP_TRANSACTION_APPROVED');
3388: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3389: fnd_message.set_token('SUPPLIER_SITE', l_txn_header_rec_type.vendor_site_code);

Line 3406: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

3402: );
3403: IF DPP_DEBUG_HIGH_ON THEN
3404: fnd_file.put_line(fnd_file.log, 'Update Interface Table Return Status: '||l_return_status ||'Error Msg '||x_msg_data);
3405: END IF;
3406: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3407: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3408: ROLLBACK TO DPP_Insert_Transaction;
3409: Update_InterfaceErrSts(
3410: p_txn_header_rec_type => l_txn_header_rec_type

Line 3413: --RAISE Fnd_Api.g_exc_error;

3409: Update_InterfaceErrSts(
3410: p_txn_header_rec_type => l_txn_header_rec_type
3411: ,x_return_status =>l_return_status
3412: );
3413: --RAISE Fnd_Api.g_exc_error;
3414: END IF;
3415: IF l_concatenated_error_message IS NOT NULL THEN
3416: Update_InterfaceErrSts(
3417: p_txn_header_rec_type => l_txn_header_rec_type

Line 3420: RAISE Fnd_Api.g_exc_error;

3416: Update_InterfaceErrSts(
3417: p_txn_header_rec_type => l_txn_header_rec_type
3418: ,x_return_status =>l_return_status
3419: );
3420: RAISE Fnd_Api.g_exc_error;
3421: END IF;
3422: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3423: EXCEPTION
3424: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 3424: WHEN Fnd_Api.G_EXC_ERROR THEN

3420: RAISE Fnd_Api.g_exc_error;
3421: END IF;
3422: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3423: EXCEPTION
3424: WHEN Fnd_Api.G_EXC_ERROR THEN
3425: x_return_status := Fnd_Api.g_ret_sts_error ;
3426: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3427: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3428: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);

Line 3425: x_return_status := Fnd_Api.g_ret_sts_error ;

3421: END IF;
3422: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3423: EXCEPTION
3424: WHEN Fnd_Api.G_EXC_ERROR THEN
3425: x_return_status := Fnd_Api.g_ret_sts_error ;
3426: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3427: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3428: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3429: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);

Line 3436: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

3432: dpp_utility_pvt.debug_message('DPP G_EXC_ERROR x_msg_data');
3433: dpp_utility_pvt.debug_message('Status '||x_return_status|| ' Message '||x_msg_data);
3434:
3435:
3436: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3437: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3438: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3439: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3440: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);

Line 3443: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

3439: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3440: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3441: x_msg_data := fnd_message.get();
3442: x_msg_data:= x_msg_data ||l_concatenated_error_message;
3443: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
3444: dpp_utility_pvt.debug_message('DPP G_EXC_UNEXPECTED_ERROR Transaction Int header id '||l_txn_header_rec_type.transaction_int_header_id);
3445:
3446: WHEN OTHERS THEN
3447: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');

Line 3454: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

3450: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3451: x_msg_data := fnd_message.get();
3452: dpp_utility_pvt.debug_message('Error:' ||x_msg_data);
3453: x_msg_data := x_msg_data || l_concatenated_error_message;
3454: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
3455: dpp_utility_pvt.debug_message('Error after assignment:' ||x_msg_data);
3456: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
3457: THEN
3458: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 3476: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;

3472: l_return_status VARCHAR2(30);
3473: l_msg_count NUMBER;
3474: l_msg_data VARCHAR2(4000);
3475:
3476: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3477: l_commit VARCHAR2(30) := fnd_api.g_false;
3478: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3479: l_transaction_int_header_id NUMBER;
3480:

Line 3477: l_commit VARCHAR2(30) := fnd_api.g_false;

3473: l_msg_count NUMBER;
3474: l_msg_data VARCHAR2(4000);
3475:
3476: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3477: l_commit VARCHAR2(30) := fnd_api.g_false;
3478: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3479: l_transaction_int_header_id NUMBER;
3480:
3481: BEGIN

Line 3478: l_validation_level NUMBER := fnd_api.g_valid_level_full;

3474: l_msg_data VARCHAR2(4000);
3475:
3476: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3477: l_commit VARCHAR2(30) := fnd_api.g_false;
3478: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3479: l_transaction_int_header_id NUMBER;
3480:
3481: BEGIN
3482: p_txn_header_rec_type.transaction_source := 'WEBADI';

Line 3680: x_return_status := fnd_api.g_ret_sts_unexp_error;

3676:
3677:
3678: EXCEPTION
3679: WHEN others THEN
3680: x_return_status := fnd_api.g_ret_sts_unexp_error;
3681: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3682: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
3683: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
3684: fnd_message.set_token('ERRNO', SQLCODE);

Line 3820: x_return_status := fnd_api.g_ret_sts_error;

3816:
3817:
3818: EXCEPTION
3819: WHEN create_IntLines_exception THEN
3820: x_return_status := fnd_api.g_ret_sts_error;
3821: dpp_utility_pvt.debug_message('Create IntLines l_error_message:'||l_error_message || 'sqlerrm'||sqlerrm);
3822: WHEN others THEN
3823: dpp_utility_pvt.debug_message('Create IntLines : SQLERRM:'||SQLERRM);
3824: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 3824: x_return_status := fnd_api.g_ret_sts_unexp_error;

3820: x_return_status := fnd_api.g_ret_sts_error;
3821: dpp_utility_pvt.debug_message('Create IntLines l_error_message:'||l_error_message || 'sqlerrm'||sqlerrm);
3822: WHEN others THEN
3823: dpp_utility_pvt.debug_message('Create IntLines : SQLERRM:'||SQLERRM);
3824: x_return_status := fnd_api.g_ret_sts_unexp_error;
3825: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3826: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
3827: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
3828: fnd_message.set_token('ERRNO', SQLCODE);

Line 3920: --l_commit VARCHAR2(30) := fnd_api.g_true;

3916: l_api_name constant VARCHAR2(30) := 'DPP_TRANSACTION_PVT';
3917: l_api_version constant NUMBER := 1.0;
3918: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
3919:
3920: --l_commit VARCHAR2(30) := fnd_api.g_true;
3921: l_return_status VARCHAR2(30);
3922: l_msg_count NUMBER;
3923: l_msg_data VARCHAR2(4000);
3924:

Line 3942: --l_return_status := fnd_api.g_ret_sts_success;

3938:
3939: SAVEPOINT inbound_transaction;
3940:
3941:
3942: --l_return_status := fnd_api.g_ret_sts_success;
3943:
3944:
3945: IF p_distributor_operating_unit IS NULL THEN
3946: dpp_utility_pvt.debug_message('DPP Entered OU in webadi api');

Line 4128: IF l_return_status = fnd_api.g_ret_sts_error THEN

4124: p_txn_header_rec_type => l_transaction_header_rec,
4125: x_rec_count => l_msg_count,
4126: x_return_status => l_return_status);
4127:
4128: IF l_return_status = fnd_api.g_ret_sts_error THEN
4129: RAISE fnd_api.g_exc_error;
4130: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4131: RAISE fnd_api.g_exc_unexpected_error;
4132: END IF;

Line 4129: RAISE fnd_api.g_exc_error;

4125: x_rec_count => l_msg_count,
4126: x_return_status => l_return_status);
4127:
4128: IF l_return_status = fnd_api.g_ret_sts_error THEN
4129: RAISE fnd_api.g_exc_error;
4130: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4131: RAISE fnd_api.g_exc_unexpected_error;
4132: END IF;
4133:

Line 4130: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4126: x_return_status => l_return_status);
4127:
4128: IF l_return_status = fnd_api.g_ret_sts_error THEN
4129: RAISE fnd_api.g_exc_error;
4130: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4131: RAISE fnd_api.g_exc_unexpected_error;
4132: END IF;
4133:
4134: --lines

Line 4131: RAISE fnd_api.g_exc_unexpected_error;

4127:
4128: IF l_return_status = fnd_api.g_ret_sts_error THEN
4129: RAISE fnd_api.g_exc_error;
4130: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4131: RAISE fnd_api.g_exc_unexpected_error;
4132: END IF;
4133:
4134: --lines
4135: --Validate the vendor part number

Line 4144: IF l_return_status = fnd_api.g_ret_sts_error THEN

4140: x_msg_count => l_msg_count,
4141: x_return_status => l_return_status);
4142:
4143:
4144: IF l_return_status = fnd_api.g_ret_sts_error THEN
4145: dpp_utility_pvt.debug_message('DPP SYSTEM ERROR');
4146: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4147: l_error_message := fnd_message.get();
4148: RAISE dpp_webadi_error;

Line 4149: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4145: dpp_utility_pvt.debug_message('DPP SYSTEM ERROR');
4146: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4147: l_error_message := fnd_message.get();
4148: RAISE dpp_webadi_error;
4149: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4150: dpp_utility_pvt.debug_message('DPP UNEXPECTED ERROR');
4151: RAISE fnd_api.g_exc_unexpected_error;
4152: END IF;
4153:

Line 4151: RAISE fnd_api.g_exc_unexpected_error;

4147: l_error_message := fnd_message.get();
4148: RAISE dpp_webadi_error;
4149: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4150: dpp_utility_pvt.debug_message('DPP UNEXPECTED ERROR');
4151: RAISE fnd_api.g_exc_unexpected_error;
4152: END IF;
4153:
4154: EXCEPTION
4155: WHEN dpp_webadi_error THEN

Line 4162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4158: l_message := fnd_message.get();
4159: end if;
4160: dpp_utility_pvt.debug_message('DPP in DPP_webadi_error:'||l_error_message);
4161: raise_application_error( -20000, l_message);
4162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4163: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4164: ROLLBACK TO inbound_transaction;
4165: IF length( SQLERRM) > 30 THEN
4166: dpp_utility_pvt.debug_message(substr(SQLERRM,12,30));

Line 4163: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');

4159: end if;
4160: dpp_utility_pvt.debug_message('DPP in DPP_webadi_error:'||l_error_message);
4161: raise_application_error( -20000, l_message);
4162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4163: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4164: ROLLBACK TO inbound_transaction;
4165: IF length( SQLERRM) > 30 THEN
4166: dpp_utility_pvt.debug_message(substr(SQLERRM,12,30));
4167: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));

Line 4203: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;

4199: l_msg_count NUMBER;
4200: l_msg_data VARCHAR2(2000);
4201: l_user_name VARCHAR2(30);
4202: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4203: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4204: l_commit VARCHAR2(30) := fnd_api.g_false;
4205: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4206: l_transaction_int_header_id NUMBER;
4207: l_ref_document_number VARCHAR2(40);

Line 4204: l_commit VARCHAR2(30) := fnd_api.g_false;

4200: l_msg_data VARCHAR2(2000);
4201: l_user_name VARCHAR2(30);
4202: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4203: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4204: l_commit VARCHAR2(30) := fnd_api.g_false;
4205: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4206: l_transaction_int_header_id NUMBER;
4207: l_ref_document_number VARCHAR2(40);
4208: dpp_webadi_importer_error EXCEPTION;

Line 4205: l_validation_level NUMBER := fnd_api.g_valid_level_full;

4201: l_user_name VARCHAR2(30);
4202: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4203: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4204: l_commit VARCHAR2(30) := fnd_api.g_false;
4205: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4206: l_transaction_int_header_id NUMBER;
4207: l_ref_document_number VARCHAR2(40);
4208: dpp_webadi_importer_error EXCEPTION;
4209: l_error_message VARCHAR2(4000);

Line 4231: x_return_status := fnd_api.g_ret_sts_success;

4227: dpp_utility_pvt.debug_message('DPP_INBOUND_PVT_BODY site:'||p_supplier_site);
4228: dpp_utility_pvt.debug_message('DPP_INBOUND_PVT_BODY ref:'||p_document_reference_number);
4229: dpp_utility_pvt.debug_message('DPP_INBOUND_PVT_BODY unit: '||p_operating_unit);
4230: -- Initialize API return status to sucess
4231: x_return_status := fnd_api.g_ret_sts_success;
4232: --open cursor
4233: OPEN transaction_cur(p_document_reference_number,p_supplier_name,p_supplier_site,p_operating_unit);
4234: FETCH transaction_cur INTO l_transaction_int_header_id;
4235: CLOSE transaction_cur;

Line 4254: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

4250: , x_msg_data =>x_msg_data
4251: ) ;
4252:
4253:
4254: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4255: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4256: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4257: fnd_message.set_token('MESSAGE', x_msg_data);
4258: RAISE FND_API.G_EXC_ERROR;

Line 4255: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_error');

4251: ) ;
4252:
4253:
4254: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4255: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4256: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4257: fnd_message.set_token('MESSAGE', x_msg_data);
4258: RAISE FND_API.G_EXC_ERROR;
4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 4258: RAISE FND_API.G_EXC_ERROR;

4254: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4255: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4256: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4257: fnd_message.set_token('MESSAGE', x_msg_data);
4258: RAISE FND_API.G_EXC_ERROR;
4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4260: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4261: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4262: fnd_message.set_token('MESSAGE', x_msg_data);

Line 4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

4255: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4256: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4257: fnd_message.set_token('MESSAGE', x_msg_data);
4258: RAISE FND_API.G_EXC_ERROR;
4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4260: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4261: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4262: fnd_message.set_token('MESSAGE', x_msg_data);
4263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 4260: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');

4256: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4257: fnd_message.set_token('MESSAGE', x_msg_data);
4258: RAISE FND_API.G_EXC_ERROR;
4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4260: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4261: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4262: fnd_message.set_token('MESSAGE', x_msg_data);
4263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4264: END IF;

Line 4263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4259: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4260: dpp_utility_pvt.debug_message('Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4261: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4262: fnd_message.set_token('MESSAGE', x_msg_data);
4263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4264: END IF;
4265: EXCEPTION
4266: WHEN Fnd_Api.G_EXC_ERROR THEN
4267: dpp_utility_pvt.debug_message('DPP ***----*** EXCEPTION G_EXC_ERROR:');

Line 4266: WHEN Fnd_Api.G_EXC_ERROR THEN

4262: fnd_message.set_token('MESSAGE', x_msg_data);
4263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4264: END IF;
4265: EXCEPTION
4266: WHEN Fnd_Api.G_EXC_ERROR THEN
4267: dpp_utility_pvt.debug_message('DPP ***----*** EXCEPTION G_EXC_ERROR:');
4268: x_return_status := Fnd_Api.g_ret_sts_error;
4269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4270: dpp_utility_pvt.debug_message('DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);

Line 4268: x_return_status := Fnd_Api.g_ret_sts_error;

4264: END IF;
4265: EXCEPTION
4266: WHEN Fnd_Api.G_EXC_ERROR THEN
4267: dpp_utility_pvt.debug_message('DPP ***----*** EXCEPTION G_EXC_ERROR:');
4268: x_return_status := Fnd_Api.g_ret_sts_error;
4269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4270: dpp_utility_pvt.debug_message('DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4271: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4272: WHEN OTHERS THEN

Line 4269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4265: EXCEPTION
4266: WHEN Fnd_Api.G_EXC_ERROR THEN
4267: dpp_utility_pvt.debug_message('DPP ***----*** EXCEPTION G_EXC_ERROR:');
4268: x_return_status := Fnd_Api.g_ret_sts_error;
4269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4270: dpp_utility_pvt.debug_message('DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4271: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4272: WHEN OTHERS THEN
4273: dpp_utility_pvt.debug_message('DPP EXCEPTION OTHERS'||SQLERRM);

Line 4271: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4267: dpp_utility_pvt.debug_message('DPP ***----*** EXCEPTION G_EXC_ERROR:');
4268: x_return_status := Fnd_Api.g_ret_sts_error;
4269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4270: dpp_utility_pvt.debug_message('DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4271: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4272: WHEN OTHERS THEN
4273: dpp_utility_pvt.debug_message('DPP EXCEPTION OTHERS'||SQLERRM);
4274: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4275: --ROLLBACK TO dpp_create_webadi_transaction;

Line 4274: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4270: dpp_utility_pvt.debug_message('DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4271: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4272: WHEN OTHERS THEN
4273: dpp_utility_pvt.debug_message('DPP EXCEPTION OTHERS'||SQLERRM);
4274: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4275: --ROLLBACK TO dpp_create_webadi_transaction;
4276: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4277: THEN
4278: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);

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

4280: END create_webadi_transaction;
4281:
4282: PROCEDURE Raise_OutBoundEvent(
4283: p_api_version IN NUMBER
4284: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4285: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4286: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4287: ,p_party_id IN VARCHAR2
4288: ,p_party_site_id IN VARCHAR2

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

4281:
4282: PROCEDURE Raise_OutBoundEvent(
4283: p_api_version IN NUMBER
4284: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4285: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4286: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4287: ,p_party_id IN VARCHAR2
4288: ,p_party_site_id IN VARCHAR2
4289: ,p_claim_id IN VARCHAR2

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

4282: PROCEDURE Raise_OutBoundEvent(
4283: p_api_version IN NUMBER
4284: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4285: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4286: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4287: ,p_party_id IN VARCHAR2
4288: ,p_party_site_id IN VARCHAR2
4289: ,p_claim_id IN VARCHAR2
4290: ,p_party_type IN VARCHAR2

Line 4318: x_return_status := fnd_api.g_ret_sts_success;

4314: count_def NUMBER;
4315: BEGIN
4316: SAVEPOINT DPP_Raise_OutBoundEvent;
4317: -- Initialize API return status to sucess
4318: x_return_status := fnd_api.g_ret_sts_success;
4319: evtkey := dbms_utility.get_time();
4320: IF DPP_DEBUG_HIGH_ON THEN
4321: dpp_utility_pvt.debug_message('Event Key = ' || evtkey);
4322: END IF;

Line 4329: RAISE FND_API.g_exc_error;

4325: fnd_message.set_name('DPP', 'DPP_EVENT_SUBS_ERR');
4326: fnd_message.set_token('CLAIM_NUMBER', p_claim_id);
4327: x_msg_data := fnd_message.get();
4328: DPP_UTILITY_PVT.debug_message('No enabled local subscriptions reference the event, or the event does not exist.');
4329: RAISE FND_API.g_exc_error;
4330: END IF;
4331: -- DEFINE IN WF ATTRIBUTES
4332: wf_event.addparametertolist(p_name => 'ECX_MAP_CODE', p_value => l_map_code, p_parameterlist => l_parameter_list);
4333: wf_event.addparametertolist(p_name => 'ECX_TRANSACTION_TYPE', p_value => l_transaction_type, p_parameterlist => l_parameter_list);

Line 4344: WHEN Fnd_Api.G_EXC_ERROR THEN

4340: wf_event.RAISE(l_event_name, evtkey, NULL, l_parameter_list, sysdate);
4341:
4342: COMMIT;
4343: EXCEPTION
4344: WHEN Fnd_Api.G_EXC_ERROR THEN
4345: x_return_status := Fnd_Api.g_ret_sts_error ;
4346: ROLLBACK TO DPP_Raise_OutBoundEvent;
4347: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4348: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 4345: x_return_status := Fnd_Api.g_ret_sts_error ;

4341:
4342: COMMIT;
4343: EXCEPTION
4344: WHEN Fnd_Api.G_EXC_ERROR THEN
4345: x_return_status := Fnd_Api.g_ret_sts_error ;
4346: ROLLBACK TO DPP_Raise_OutBoundEvent;
4347: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4348: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4349: ROLLBACK TO DPP_Raise_OutBoundEvent;

Line 4347: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4343: EXCEPTION
4344: WHEN Fnd_Api.G_EXC_ERROR THEN
4345: x_return_status := Fnd_Api.g_ret_sts_error ;
4346: ROLLBACK TO DPP_Raise_OutBoundEvent;
4347: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4348: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4349: ROLLBACK TO DPP_Raise_OutBoundEvent;
4350: Fnd_Msg_Pub.Count_AND_Get
4351: ( p_count => x_msg_count,

Line 4348: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

4344: WHEN Fnd_Api.G_EXC_ERROR THEN
4345: x_return_status := Fnd_Api.g_ret_sts_error ;
4346: ROLLBACK TO DPP_Raise_OutBoundEvent;
4347: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4348: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4349: ROLLBACK TO DPP_Raise_OutBoundEvent;
4350: Fnd_Msg_Pub.Count_AND_Get
4351: ( p_count => x_msg_count,
4352: p_data => x_msg_data,

Line 4353: p_encoded => Fnd_Api.G_FALSE

4349: ROLLBACK TO DPP_Raise_OutBoundEvent;
4350: Fnd_Msg_Pub.Count_AND_Get
4351: ( p_count => x_msg_count,
4352: p_data => x_msg_data,
4353: p_encoded => Fnd_Api.G_FALSE
4354: );
4355: WHEN OTHERS THEN
4356: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4357: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 4356: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4352: p_data => x_msg_data,
4353: p_encoded => Fnd_Api.G_FALSE
4354: );
4355: WHEN OTHERS THEN
4356: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4357: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4358: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
4359: fnd_message.set_token('ROUTINE', l_full_name);
4360: fnd_message.set_token('ERRNO', SQLCODE);

Line 4371: p_encoded => Fnd_Api.G_FALSE

4367: END IF;
4368: Fnd_Msg_Pub.Count_AND_Get
4369: ( p_count => x_msg_count,
4370: p_data => x_msg_data,
4371: p_encoded => Fnd_Api.G_FALSE
4372: );
4373: END Raise_OutBoundEvent;
4374:
4375: PROCEDURE inbound_approval(

Line 4477: x_return_status := fnd_api.g_ret_sts_success;

4473: l_message VARCHAR2(4000) := NULL;
4474:
4475: BEGIN
4476: SAVEPOINT inbound_approval;
4477: x_return_status := fnd_api.g_ret_sts_success;
4478:
4479: IF p_distributor_operating_unit IS NULL THEN
4480: fnd_message.set_name('DPP', 'DPP_OPERATING_UNIT_NULL');
4481: l_error_message := fnd_message.get();

Line 4650: IF l_return_status = fnd_api.g_ret_sts_error THEN

4646: p_txn_header_rec_type => l_transaction_header_rec,
4647: x_rec_count => l_msg_count,
4648: x_return_status => l_return_status);
4649:
4650: IF l_return_status = fnd_api.g_ret_sts_error THEN
4651: RAISE fnd_api.g_exc_error;
4652: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4653: RAISE fnd_api.g_exc_unexpected_error;
4654: END IF;

Line 4651: RAISE fnd_api.g_exc_error;

4647: x_rec_count => l_msg_count,
4648: x_return_status => l_return_status);
4649:
4650: IF l_return_status = fnd_api.g_ret_sts_error THEN
4651: RAISE fnd_api.g_exc_error;
4652: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4653: RAISE fnd_api.g_exc_unexpected_error;
4654: END IF;
4655: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;

Line 4652: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4648: x_return_status => l_return_status);
4649:
4650: IF l_return_status = fnd_api.g_ret_sts_error THEN
4651: RAISE fnd_api.g_exc_error;
4652: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4653: RAISE fnd_api.g_exc_unexpected_error;
4654: END IF;
4655: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;
4656: l_transaction_lines_rec.org_id :=l_transaction_header_rec.org_id;

Line 4653: RAISE fnd_api.g_exc_unexpected_error;

4649:
4650: IF l_return_status = fnd_api.g_ret_sts_error THEN
4651: RAISE fnd_api.g_exc_error;
4652: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4653: RAISE fnd_api.g_exc_unexpected_error;
4654: END IF;
4655: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;
4656: l_transaction_lines_rec.org_id :=l_transaction_header_rec.org_id;
4657:

Line 4664: IF l_return_status = fnd_api.g_ret_sts_error THEN

4660: x_msg_count => l_msg_count,
4661: x_return_status => l_return_status);
4662:
4663:
4664: IF l_return_status = fnd_api.g_ret_sts_error THEN
4665: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4666: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4667: l_error_message := fnd_message.get();
4668: RAISE dpp_webadi_error;

Line 4665: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);

4661: x_return_status => l_return_status);
4662:
4663:
4664: IF l_return_status = fnd_api.g_ret_sts_error THEN
4665: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4666: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4667: l_error_message := fnd_message.get();
4668: RAISE dpp_webadi_error;
4669: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

Line 4669: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4665: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4666: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4667: l_error_message := fnd_message.get();
4668: RAISE dpp_webadi_error;
4669: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4670: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error');
4671: RAISE fnd_api.g_exc_unexpected_error;
4672: END IF;
4673:

Line 4670: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error');

4666: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4667: l_error_message := fnd_message.get();
4668: RAISE dpp_webadi_error;
4669: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4670: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error');
4671: RAISE fnd_api.g_exc_unexpected_error;
4672: END IF;
4673:
4674: EXCEPTION

Line 4671: RAISE fnd_api.g_exc_unexpected_error;

4667: l_error_message := fnd_message.get();
4668: RAISE dpp_webadi_error;
4669: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4670: dpp_utility_pvt.debug_message('Create_Intlines fnd_api.g_ret_sts_error');
4671: RAISE fnd_api.g_exc_unexpected_error;
4672: END IF;
4673:
4674: EXCEPTION
4675:

Line 4677: --x_return_status := FND_API.G_RET_STS_ERROR;

4673:
4674: EXCEPTION
4675:
4676: WHEN dpp_webadi_error THEN
4677: --x_return_status := FND_API.G_RET_STS_ERROR;
4678: ROLLBACK TO inbound_approval;
4679: if l_error_message is NULL then
4680: dpp_utility_pvt.debug_message('DPP in DPP_webadi_error l_error_message is null');
4681: l_error_message := fnd_message.get();

Line 4685: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4681: l_error_message := fnd_message.get();
4682: end if;
4683: dpp_utility_pvt.debug_message('DPP in DPP_webadi_error:'||l_error_message);
4684: raise_application_error( -20000, l_error_message);
4685: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4686: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4687: ROLLBACK TO inbound_approval;
4688: IF length( SQLERRM) > 30 THEN
4689: dpp_utility_pvt.debug_message(substr(SQLERRM,12,30));

Line 4686: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');

4682: end if;
4683: dpp_utility_pvt.debug_message('DPP in DPP_webadi_error:'||l_error_message);
4684: raise_application_error( -20000, l_error_message);
4685: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4686: dpp_utility_pvt.debug_message('DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4687: ROLLBACK TO inbound_approval;
4688: IF length( SQLERRM) > 30 THEN
4689: dpp_utility_pvt.debug_message(substr(SQLERRM,12,30));
4690: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));

Line 4705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4701: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));
4702: ELSE
4703: fnd_message.set_name ('DPP', SQLERRM);
4704: END IF;
4705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4706: l_error_message := fnd_message.get();
4707: dpp_utility_pvt.debug_message('DPP l_error_message:'||l_error_message);
4708: raise_application_error( -20000, l_error_message);
4709: END inbound_approval;

Line 4733: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;

4729: l_request_id NUMBER :=FND_GLOBAL.conc_request_id;
4730: l_program_id NUMBER :=FND_GLOBAL.conc_program_id;
4731: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
4732:
4733: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4734: l_commit VARCHAR2(30) := fnd_api.g_false;
4735: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4736:
4737: l_transaction_int_header_id NUMBER;

Line 4734: l_commit VARCHAR2(30) := fnd_api.g_false;

4730: l_program_id NUMBER :=FND_GLOBAL.conc_program_id;
4731: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
4732:
4733: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4734: l_commit VARCHAR2(30) := fnd_api.g_false;
4735: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4736:
4737: l_transaction_int_header_id NUMBER;
4738: l_line_count NUMBER := 0;

Line 4735: l_validation_level NUMBER := fnd_api.g_valid_level_full;

4731: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
4732:
4733: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4734: l_commit VARCHAR2(30) := fnd_api.g_false;
4735: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4736:
4737: l_transaction_int_header_id NUMBER;
4738: l_line_count NUMBER := 0;
4739: l_message VARCHAR2(250);

Line 4828: RAISE Fnd_Api.G_EXC_ERROR;

4824: END IF;
4825:
4826: EXCEPTION WHEN NO_DATA_FOUND THEN
4827: fnd_file.put_line(fnd_file.log, 'Error in deriving ID for the parameters');
4828: RAISE Fnd_Api.G_EXC_ERROR;
4829: END;
4830:
4831: FOR transaction_rec IN transaction_cur(p_document_reference_number,p_supplier_name,l_supplier_id,
4832: p_supplier_site,l_supplier_site_id,p_operating_unit,l_org_id)

Line 4853: RAISE Fnd_Api.G_EXC_ERROR;

4849: dtla.program_update_date = sysdate
4850: WHERE dtla.transaction_int_header_id = transaction_rec.transaction_int_header_id;
4851: EXCEPTION WHEN OTHERS THEN
4852: fnd_file.put_line(fnd_file.log, 'Error in updating request id into the table.');
4853: RAISE Fnd_Api.G_EXC_ERROR;
4854: END;
4855: dpp_utility_pvt.debug_message('Call Insert Transaction p_transaction_int_header_id:'||transaction_rec.transaction_int_header_id);
4856: DPP_TRANSACTION_PVT.Insert_Transaction(
4857: p_api_version =>l_api_version

Line 4908: WHEN Fnd_Api.G_EXC_ERROR THEN

4904: FND_FILE.PUT_LINE(FND_FILE.LOG,'End Create Transaction');
4905: END IF;
4906:
4907: EXCEPTION
4908: WHEN Fnd_Api.G_EXC_ERROR THEN
4909: dpp_utility_pvt.debug_message('DPP EXCEPTION G_EXC_ERROR');
4910: ROLLBACK TO dpp_create_txn;
4911: Fnd_Msg_Pub.Count_AND_Get
4912: ( p_count => l_msg_count,

Line 4914: p_encoded => Fnd_Api.G_FALSE

4910: ROLLBACK TO dpp_create_txn;
4911: Fnd_Msg_Pub.Count_AND_Get
4912: ( p_count => l_msg_count,
4913: p_data => l_msg_data,
4914: p_encoded => Fnd_Api.G_FALSE
4915: );
4916: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4917: dpp_utility_pvt.debug_message('DPP EXCEPTION G_EXC_UNEXPECTED_ERROR');
4918: ROLLBACK TO dpp_create_txn;

Line 4916: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4912: ( p_count => l_msg_count,
4913: p_data => l_msg_data,
4914: p_encoded => Fnd_Api.G_FALSE
4915: );
4916: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4917: dpp_utility_pvt.debug_message('DPP EXCEPTION G_EXC_UNEXPECTED_ERROR');
4918: ROLLBACK TO dpp_create_txn;
4919: Fnd_Msg_Pub.Count_AND_Get
4920: ( p_count => l_msg_count,

Line 4922: p_encoded => Fnd_Api.G_FALSE

4918: ROLLBACK TO dpp_create_txn;
4919: Fnd_Msg_Pub.Count_AND_Get
4920: ( p_count => l_msg_count,
4921: p_data => l_msg_data,
4922: p_encoded => Fnd_Api.G_FALSE
4923: );
4924: WHEN OTHERS THEN
4925: dpp_utility_pvt.debug_message('DPP EXCEPTION OTHERS'||SQLERRM);
4926: ROLLBACK TO dpp_create_txn;

Line 4934: p_encoded => Fnd_Api.G_FALSE

4930: END IF;
4931: Fnd_Msg_Pub.Count_AND_Get
4932: ( p_count => l_msg_count,
4933: p_data => l_msg_data,
4934: p_encoded => Fnd_Api.G_FALSE
4935: );
4936:
4937: END Create_Transaction;
4938: END DPP_TRANSACTION_PVT;