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 47: x_return_status := fnd_api.g_ret_sts_success;

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

Line 67: WHEN Fnd_Api.G_EXC_ERROR THEN

63: IF DPP_DEBUG_HIGH_ON THEN
64: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
65: END IF;
66: EXCEPTION
67: WHEN Fnd_Api.G_EXC_ERROR THEN
68: x_return_status := Fnd_Api.g_ret_sts_error ;
69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
71: WHEN OTHERS THEN

Line 68: x_return_status := Fnd_Api.g_ret_sts_error ;

64: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
65: END IF;
66: EXCEPTION
67: WHEN Fnd_Api.G_EXC_ERROR THEN
68: x_return_status := Fnd_Api.g_ret_sts_error ;
69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
71: WHEN OTHERS THEN
72: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

65: END IF;
66: EXCEPTION
67: WHEN Fnd_Api.G_EXC_ERROR THEN
68: x_return_status := Fnd_Api.g_ret_sts_error ;
69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
71: WHEN OTHERS THEN
72: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
73: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

66: EXCEPTION
67: WHEN Fnd_Api.G_EXC_ERROR THEN
68: x_return_status := Fnd_Api.g_ret_sts_error ;
69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
71: WHEN OTHERS THEN
72: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
73: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
74: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 72: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

68: x_return_status := Fnd_Api.g_ret_sts_error ;
69: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
70: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
71: WHEN OTHERS THEN
72: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
73: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
74: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
75: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
76: fnd_message.set_token('ERRNO', SQLCODE);

Line 98: x_return_status := fnd_api.g_ret_sts_success;

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

Line 106: x_return_status := fnd_api.g_ret_sts_error;

102: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
103: fnd_message.set_name( 'DPP', 'DPP_TXN_OPERATING_UNIT_NULL');
104: x_msg_data := fnd_message.get();
105: END IF;
106: x_return_status := fnd_api.g_ret_sts_error;
107: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_NULL';
108: RAISE Fnd_Api.G_EXC_ERROR;
109: END IF;
110:

Line 108: RAISE Fnd_Api.G_EXC_ERROR;

104: x_msg_data := fnd_message.get();
105: END IF;
106: x_return_status := fnd_api.g_ret_sts_error;
107: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_NULL';
108: RAISE Fnd_Api.G_EXC_ERROR;
109: END IF;
110:
111: SELECT fnd_profile.value('XLA_MO_SECURITY_PROFILE_LEVEL') into l_value from dual;
112:

Line 132: x_return_status := fnd_api.g_ret_sts_error;

128: END IF;
129:
130: EXCEPTION
131: WHEN NO_DATA_FOUND THEN
132: x_return_status := fnd_api.g_ret_sts_error;
133: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
134: fnd_message.set_name( 'DPP', 'DPP_TXN_OPERATING_UNIT_ERR');
135: fnd_message.set_token('OPERATING_UNIT', p_txn_header_rec_type.operating_unit_name);
136: fnd_message.set_token('ORG_ID', p_txn_header_rec_type.org_id);

Line 140: WHEN Fnd_Api.G_EXC_ERROR THEN

136: fnd_message.set_token('ORG_ID', p_txn_header_rec_type.org_id);
137: x_msg_data := fnd_message.get();
138: END IF;
139: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
140: WHEN Fnd_Api.G_EXC_ERROR THEN
141: x_return_status := Fnd_Api.g_ret_sts_error ;
142: WHEN OTHERS THEN
143: x_return_status := fnd_api.g_ret_sts_unexp_error;
144: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 141: x_return_status := Fnd_Api.g_ret_sts_error ;

137: x_msg_data := fnd_message.get();
138: END IF;
139: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
140: WHEN Fnd_Api.G_EXC_ERROR THEN
141: x_return_status := Fnd_Api.g_ret_sts_error ;
142: WHEN OTHERS THEN
143: x_return_status := fnd_api.g_ret_sts_unexp_error;
144: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
145: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 143: x_return_status := fnd_api.g_ret_sts_unexp_error;

139: p_txn_header_rec_type.error_code := 'DPP_TXN_OPERATING_UNIT_ERR';
140: WHEN Fnd_Api.G_EXC_ERROR THEN
141: x_return_status := Fnd_Api.g_ret_sts_error ;
142: WHEN OTHERS THEN
143: x_return_status := fnd_api.g_ret_sts_unexp_error;
144: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
145: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
146: fnd_message.set_token('ROUTINE', l_full_name);
147: fnd_message.set_token('ERRNO', SQLCODE);

Line 187: x_return_status := fnd_api.g_ret_sts_success;

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

Line 194: RAISE Fnd_Api.G_EXC_ERROR;

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

Line 202: x_return_status := fnd_api.g_ret_sts_error;

198: p_docnum => p_txn_header_rec_type.ref_document_number
199: );
200:
201: IF l_valid_doc = 'N' OR length(p_txn_header_rec_type.ref_document_number) > 40 THEN
202: x_return_status := fnd_api.g_ret_sts_error;
203: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
204: fnd_message.set_name('DPP', 'DPP_DOC_REF_NUM_ERR');
205: fnd_message.set_token('DOC_REF_NO', p_txn_header_rec_type.ref_document_number);
206: END IF;

Line 214: WHEN Fnd_Api.G_EXC_ERROR THEN

210: IF DPP_DEBUG_HIGH_ON THEN
211: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');
212: END IF;
213: EXCEPTION
214: WHEN Fnd_Api.G_EXC_ERROR THEN
215: x_return_status := Fnd_Api.g_ret_sts_error ;
216: WHEN OTHERS THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 215: x_return_status := Fnd_Api.g_ret_sts_error ;

211: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Document Reference Number');
212: END IF;
213: EXCEPTION
214: WHEN Fnd_Api.G_EXC_ERROR THEN
215: x_return_status := Fnd_Api.g_ret_sts_error ;
216: WHEN OTHERS THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
219: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 217: x_return_status := fnd_api.g_ret_sts_unexp_error;

213: EXCEPTION
214: WHEN Fnd_Api.G_EXC_ERROR THEN
215: x_return_status := Fnd_Api.g_ret_sts_error ;
216: WHEN OTHERS THEN
217: x_return_status := fnd_api.g_ret_sts_unexp_error;
218: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
219: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
220: fnd_message.set_token('ROUTINE', l_full_name);
221: fnd_message.set_token('ERRNO', SQLCODE);

Line 242: x_return_status := fnd_api.g_ret_sts_success;

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

Line 251: RAISE Fnd_Api.G_EXC_ERROR;

247: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_INFO_NULL');
248: x_msg_data :=fnd_message.get();
249: END IF;
250: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_INFO_NULL';
251: RAISE Fnd_Api.G_EXC_ERROR;
252: END IF;
253: --Validate Supplier Name
254: BEGIN
255: SELECT ap.vendor_id

Line 268: x_return_status := fnd_api.g_ret_sts_error;

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

Line 276: RAISE Fnd_Api.G_EXC_ERROR;

272: fnd_message.set_token('SUPPLIER_ID', p_txn_header_rec_type.vendor_id);
273: x_msg_data :=fnd_message.get();
274: END IF;
275: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_INFO_ERR';
276: RAISE Fnd_Api.G_EXC_ERROR;
277: END;
278: --Validate Supplier Site
279: IF (p_txn_header_rec_type.vendor_site_code IS NULL
280: AND p_txn_header_rec_type.vendor_site_id IS NULL) THEN

Line 286: RAISE Fnd_Api.G_EXC_ERROR;

282: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_SITE_NULL');
283: x_msg_data :=fnd_message.get();
284: END IF;
285: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_SITE_NULL';
286: RAISE Fnd_Api.G_EXC_ERROR;
287: END IF;
288: BEGIN
289: SELECT apssa.vendor_site_id
290: ,apssa.vendor_site_code

Line 306: x_return_status := fnd_api.g_ret_sts_error;

302: AND apssa.vendor_site_id = nvl(to_number(p_txn_header_rec_type.vendor_site_id), apssa.vendor_site_id))
303: AND apssa.org_id = to_number(p_txn_header_rec_type.org_id);
304: EXCEPTION
305: WHEN NO_DATA_FOUND THEN
306: x_return_status := fnd_api.g_ret_sts_error;
307: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
308: fnd_message.set_name('DPP', 'DPP_TXN_SUPP_SITE_ERR');
309: fnd_message.set_token('SUPPLIER_SITE', p_txn_header_rec_type.vendor_site_code);
310: fnd_message.set_token('SITE_ID', p_txn_header_rec_type.vendor_site_id);

Line 314: RAISE Fnd_Api.G_EXC_ERROR;

310: fnd_message.set_token('SITE_ID', p_txn_header_rec_type.vendor_site_id);
311: x_msg_data :=fnd_message.get();
312: END IF;
313: p_txn_header_rec_type.error_code := 'DPP_TXN_SUPP_SITE_ERR';
314: RAISE Fnd_Api.G_EXC_ERROR;
315: END;
316: IF DPP_DEBUG_HIGH_ON THEN
317: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Details Vendor Id: '||p_txn_header_rec_type.vendor_id);
318: END IF;

Line 320: WHEN Fnd_Api.G_EXC_ERROR THEN

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

Line 321: x_return_status := Fnd_Api.g_ret_sts_error ;

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

Line 323: x_return_status := fnd_api.g_ret_sts_unexp_error;

319: EXCEPTION
320: WHEN Fnd_Api.G_EXC_ERROR THEN
321: x_return_status := Fnd_Api.g_ret_sts_error ;
322: WHEN others THEN
323: x_return_status := fnd_api.g_ret_sts_unexp_error;
324: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
325: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
326: fnd_message.set_token('ROUTINE', l_full_name);
327: fnd_message.set_token('ERRNO', SQLCODE);

Line 359: x_return_status := fnd_api.g_ret_sts_success;

355: IF DPP_DEBUG_HIGH_ON THEN
356: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Trade Profile');
357: END IF;
358: -- Initialize API return status to sucess
359: x_return_status := fnd_api.g_ret_sts_success;
360:
361: BEGIN
362: OPEN get_supp_trd_prfl_csr(p_txn_header_rec_type.vendor_id, p_txn_header_rec_type.vendor_site_id, p_txn_header_rec_type.org_id);
363: FETCH get_supp_trd_prfl_csr INTO l_supp_trade_profile_id;

Line 367: x_return_status := fnd_api.g_ret_sts_error;

363: FETCH get_supp_trd_prfl_csr INTO l_supp_trade_profile_id;
364: CLOSE get_supp_trd_prfl_csr;
365: EXCEPTION
366: WHEN NO_DATA_FOUND THEN
367: x_return_status := fnd_api.g_ret_sts_error;
368: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
369: fnd_message.set_name('DPP','DPP_SUPP_TRDPRFLS_MISSING_ERR');
370: x_msg_data :=fnd_message.get();
371: END IF;

Line 375: RAISE FND_API.G_EXC_ERROR;

371: END IF;
372: p_txn_header_rec_type.error_code := 'DPP_SUPP_TRDPRFLS_MISSING_ERR';
373: FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier trade profile setup not available');
374: FND_FILE.NEW_LINE(FND_FILE.LOG);
375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
378: FND_FILE.NEW_LINE(FND_FILE.LOG);
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

375: RAISE FND_API.G_EXC_ERROR;
376: WHEN OTHERS THEN
377: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
378: FND_FILE.NEW_LINE(FND_FILE.LOG);
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END;
381:
382: x_supp_trade_profile_id := l_supp_trade_profile_id;
383:

Line 388: WHEN Fnd_Api.G_EXC_ERROR THEN

384: IF DPP_DEBUG_HIGH_ON THEN
385: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Trade Profile for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
386: END IF;
387: EXCEPTION
388: WHEN Fnd_Api.G_EXC_ERROR THEN
389: x_return_status := Fnd_Api.g_ret_sts_error ;
390: WHEN others THEN
391: x_return_status := fnd_api.g_ret_sts_unexp_error;
392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 389: x_return_status := Fnd_Api.g_ret_sts_error ;

385: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Trade Profile for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
386: END IF;
387: EXCEPTION
388: WHEN Fnd_Api.G_EXC_ERROR THEN
389: x_return_status := Fnd_Api.g_ret_sts_error ;
390: WHEN others THEN
391: x_return_status := fnd_api.g_ret_sts_unexp_error;
392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
393: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 391: x_return_status := fnd_api.g_ret_sts_unexp_error;

387: EXCEPTION
388: WHEN Fnd_Api.G_EXC_ERROR THEN
389: x_return_status := Fnd_Api.g_ret_sts_error ;
390: WHEN others THEN
391: x_return_status := fnd_api.g_ret_sts_unexp_error;
392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
393: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
394: fnd_message.set_token('ROUTINE', l_full_name);
395: fnd_message.set_token('ERRNO', SQLCODE);

Line 427: x_return_status := fnd_api.g_ret_sts_success;

423: IF DPP_DEBUG_HIGH_ON THEN
424: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Execution Process Setup');
425: END IF;
426: -- Initialize API return status to sucess
427: x_return_status := fnd_api.g_ret_sts_success;
428:
429: --Check if the Process Setup is done for the Supplier, Supplier site and Operating Unit
430: BEGIN
431: OPEN get_process_setup_cnt_csr(p_supp_trade_profile_id, p_txn_header_rec_type.org_id);

Line 445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

441: EXCEPTION
442: WHEN OTHERS THEN
443: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching from OZF_PROCESS_SETUP_ALL: '||SQLERRM);
444: FND_FILE.NEW_LINE(FND_FILE.LOG);
445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END;
447:
448: IF l_count = 0 THEN --Process Setup does not exist
449: x_return_status := fnd_api.g_ret_sts_error;

Line 449: x_return_status := fnd_api.g_ret_sts_error;

445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END;
447:
448: IF l_count = 0 THEN --Process Setup does not exist
449: x_return_status := fnd_api.g_ret_sts_error;
450: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
451: fnd_message.set_name( 'DPP','DPP_PROCESS_SETUP_MISSING_ERR');
452: x_msg_data :=fnd_message.get();
453: END IF;

Line 457: RAISE Fnd_Api.G_EXC_ERROR;

453: END IF;
454: p_txn_header_rec_type.error_code := 'DPP_PROCESS_SETUP_MISSING_ERR';
455: FND_FILE.PUT_LINE(FND_FILE.LOG,'No Execution processes setup available for this transaction.');
456: FND_FILE.NEW_LINE(FND_FILE.LOG);
457: RAISE Fnd_Api.G_EXC_ERROR;
458: END IF;
459:
460: IF DPP_DEBUG_HIGH_ON THEN
461: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Execution Process Setup for Vendor Id: ' || p_txn_header_rec_type.vendor_id);

Line 464: WHEN Fnd_Api.G_EXC_ERROR THEN

460: IF DPP_DEBUG_HIGH_ON THEN
461: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Execution Process Setup for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
462: END IF;
463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: x_return_status := Fnd_Api.g_ret_sts_error ;
466: WHEN others THEN
467: x_return_status := fnd_api.g_ret_sts_unexp_error;
468: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 465: x_return_status := Fnd_Api.g_ret_sts_error ;

461: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Execution Process Setup for Vendor Id: ' || p_txn_header_rec_type.vendor_id);
462: END IF;
463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: x_return_status := Fnd_Api.g_ret_sts_error ;
466: WHEN others THEN
467: x_return_status := fnd_api.g_ret_sts_unexp_error;
468: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
469: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 467: x_return_status := fnd_api.g_ret_sts_unexp_error;

463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: x_return_status := Fnd_Api.g_ret_sts_error ;
466: WHEN others THEN
467: x_return_status := fnd_api.g_ret_sts_unexp_error;
468: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
469: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
470: fnd_message.set_token('ROUTINE', l_full_name);
471: fnd_message.set_token('ERRNO', SQLCODE);

Line 495: x_return_status := fnd_api.g_ret_sts_success;

491: IF DPP_DEBUG_HIGH_ON THEN
492: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Lines Details');
493: END IF;
494: -- Initialize API return status to sucess
495: x_return_status := fnd_api.g_ret_sts_success;
496:
497:
498: --Check for Duplicate Lines in Interface Table
499: BEGIN

Line 557: x_return_status := Fnd_Api.g_ret_sts_error ;

553: IF l_duplicate_lines > 1 THEN
554: fnd_message.set_name('DPP', 'DPP_DUPLICATE_TXN_LINES');
555: x_msg_data := fnd_message.get();
556: p_txn_header_rec_type.error_code := 'DPP_DUPLICATE_TXN_LINES';
557: x_return_status := Fnd_Api.g_ret_sts_error ;
558: --RAISE Fnd_Api.G_EXC_ERROR;
559: l_error_message := l_error_message ||x_msg_data;
560: END IF;
561: END;

Line 558: --RAISE Fnd_Api.G_EXC_ERROR;

554: fnd_message.set_name('DPP', 'DPP_DUPLICATE_TXN_LINES');
555: x_msg_data := fnd_message.get();
556: p_txn_header_rec_type.error_code := 'DPP_DUPLICATE_TXN_LINES';
557: x_return_status := Fnd_Api.g_ret_sts_error ;
558: --RAISE Fnd_Api.G_EXC_ERROR;
559: l_error_message := l_error_message ||x_msg_data;
560: END IF;
561: END;
562:

Line 580: x_return_status := Fnd_Api.g_ret_sts_error ;

576: EXCEPTION WHEN OTHERS THEN
577: fnd_message.set_name('DPP', 'DPP_TXN_FUNC_CURR_ERR');
578: x_msg_data := fnd_message.get();
579: p_txn_header_rec_type.error_code := 'DPP_TXN_FUNC_CURR_ERR';
580: x_return_status := Fnd_Api.g_ret_sts_error ;
581: --RAISE Fnd_Api.G_EXC_ERROR;
582: l_error_message := l_error_message ||x_msg_data;
583: Update_InterfaceErrSts(
584: p_txn_header_rec_type => p_txn_header_rec_type

Line 581: --RAISE Fnd_Api.G_EXC_ERROR;

577: fnd_message.set_name('DPP', 'DPP_TXN_FUNC_CURR_ERR');
578: x_msg_data := fnd_message.get();
579: p_txn_header_rec_type.error_code := 'DPP_TXN_FUNC_CURR_ERR';
580: x_return_status := Fnd_Api.g_ret_sts_error ;
581: --RAISE Fnd_Api.G_EXC_ERROR;
582: l_error_message := l_error_message ||x_msg_data;
583: Update_InterfaceErrSts(
584: p_txn_header_rec_type => p_txn_header_rec_type
585: ,x_return_status =>x_return_status

Line 598: x_return_status := Fnd_Api.g_ret_sts_error ;

594: fnd_message.set_name('DPP', 'DPP_TXN_NO_LINES');
595: x_msg_data :=fnd_message.get();
596: p_txn_header_rec_type.error_code := 'DPP_TXN_NO_LINES';
597: l_error_message := l_error_message ||x_msg_data;
598: x_return_status := Fnd_Api.g_ret_sts_error ;
599: WHEN TOO_MANY_ROWS THEN
600: null;
601: END;
602: EXCEPTION

Line 603: WHEN Fnd_Api.G_EXC_ERROR THEN

599: WHEN TOO_MANY_ROWS THEN
600: null;
601: END;
602: EXCEPTION
603: WHEN Fnd_Api.G_EXC_ERROR THEN
604: x_return_status := Fnd_Api.g_ret_sts_error ;
605: WHEN others THEN
606: x_return_status := fnd_api.g_ret_sts_unexp_error;
607: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 604: x_return_status := Fnd_Api.g_ret_sts_error ;

600: null;
601: END;
602: EXCEPTION
603: WHEN Fnd_Api.G_EXC_ERROR THEN
604: x_return_status := Fnd_Api.g_ret_sts_error ;
605: WHEN others THEN
606: x_return_status := fnd_api.g_ret_sts_unexp_error;
607: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
608: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 606: x_return_status := fnd_api.g_ret_sts_unexp_error;

602: EXCEPTION
603: WHEN Fnd_Api.G_EXC_ERROR THEN
604: x_return_status := Fnd_Api.g_ret_sts_error ;
605: WHEN others THEN
606: x_return_status := fnd_api.g_ret_sts_unexp_error;
607: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
608: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
609: fnd_message.set_token('ROUTINE', l_full_name);
610: fnd_message.set_token('ERRNO', SQLCODE);

Line 628: x_return_status := fnd_api.g_ret_sts_success;

624: IF DPP_DEBUG_HIGH_ON THEN
625: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Get Days Covered');
626: END IF;
627: -- Initialize API return status to sucess
628: x_return_status := fnd_api.g_ret_sts_success;
629: SELECT default_days_covered
630: INTO p_txn_header_rec_type.days_covered
631: FROM ozf_supp_trd_prfls_all ostpa
632: WHERE ostpa.supplier_id =to_number(p_txn_header_rec_type.vendor_id)

Line 640: x_return_status := fnd_api.g_ret_sts_error;

636: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Get Days Covered');
637: END IF;
638: EXCEPTION
639: WHEN NO_DATA_FOUND THEN
640: x_return_status := fnd_api.g_ret_sts_error;
641: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
642: fnd_message.set_name('DPP', 'DPP_DAYS_COVRD_ERR');
643: fnd_message.set_token('SUPPLIER_NAME', p_txn_header_rec_type.vendor_name);
644: x_msg_data :=fnd_message.get();

Line 649: x_return_status := fnd_api.g_ret_sts_unexp_error;

645: END IF;
646: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
647: p_txn_header_rec_type.error_code := 'DPP_DAYS_COVRD_ERR';
648: WHEN others THEN
649: x_return_status := fnd_api.g_ret_sts_unexp_error;
650: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
651: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
652: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
653: fnd_message.set_token('ERRNO', SQLCODE);

Line 682: x_return_status := fnd_api.g_ret_sts_success;

678: FROM DUAL;
679:
680: BEGIN
681: -- Initialize API return status to sucess
682: x_return_status := fnd_api.g_ret_sts_success;
683: IF DPP_DEBUG_HIGH_ON THEN
684: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Currency');
685: END IF;
686: IF p_txn_header_rec_type.trx_currency IS NULL THEN

Line 691: --RAISE Fnd_Api.G_EXC_ERROR ;

687: fnd_message.set_name('DPP', 'DPP_TXN_CURR_NULL');
688: x_msg_data :=fnd_message.get();
689: p_txn_header_rec_type.error_code := 'DPP_TXN_CURR_NULL';
690: l_error_message := l_error_message || x_msg_data;
691: --RAISE Fnd_Api.G_EXC_ERROR ;
692: END IF;
693: BEGIN
694: SELECT currency_code
695: INTO p_txn_header_rec_type.trx_currency

Line 704: x_return_status := fnd_api.g_ret_sts_error;

700: IF DPP_DEBUG_HIGH_ON THEN
701: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Currency');
702: END IF;
703: EXCEPTION WHEN no_data_found THEN
704: x_return_status := fnd_api.g_ret_sts_error;
705: fnd_message.set_name('DPP', 'DPP_TXN_CURR_ERR');
706: fnd_message.set_token('CURRENCY_CODE', p_txn_header_rec_type.trx_currency);
707: x_msg_data :=fnd_message.get();
708: l_error_message := l_error_message || x_msg_data;

Line 721: x_return_status := fnd_api.g_ret_sts_error;

717: INTO p_txn_header_rec_type.transaction_header_id
718: FROM dual;
719: EXCEPTION
720: WHEN no_data_found THEN
721: x_return_status := fnd_api.g_ret_sts_error;
722: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
723: fnd_message.set_token('SEQ_NUM', 'Transaction Header Id');
724: x_msg_data := fnd_message.get();
725: l_error_message := l_error_message || x_msg_data;

Line 729: --RAISE Fnd_Api.G_EXC_ERROR;

725: l_error_message := l_error_message || x_msg_data;
726: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
727: l_error_message :=l_error_message|| x_msg_data;
728: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
729: --RAISE Fnd_Api.G_EXC_ERROR;
730: END;
731:
732: LOOP
733: --Get transaction Number from sequence

Line 741: x_return_status := fnd_api.g_ret_sts_error;

737: FROM dual;
738:
739: EXCEPTION
740: WHEN no_data_found THEN
741: x_return_status := fnd_api.g_ret_sts_error;
742: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
743: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
744: fnd_message.set_token('SEQ_NUM', 'Transaction Number');
745: END IF;

Line 750: --RAISE Fnd_Api.G_EXC_ERROR;

746: x_msg_data := fnd_message.get();
747: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
748: p_txn_header_rec_type.error_code := 'DPP_TXN_SEQ_NO_ERR';
749: l_error_message :=l_error_message|| x_msg_data;
750: --RAISE Fnd_Api.G_EXC_ERROR;
751: END;
752: --Check the transaction number generated is present in the table
753: BEGIN
754: --Check Transaction Number

Line 774: x_return_status := fnd_api.g_ret_sts_error;

770: FETCH get_trunc_dates INTO l_trunc_eff_start_date, l_trunc_sys_date;
771: CLOSE get_trunc_dates;
772: EXCEPTION
773: WHEN OTHERS THEN
774: x_return_status := fnd_api.g_ret_sts_error;
775: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
776: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
777: END IF;
778: x_msg_data := fnd_message.get();

Line 800: x_return_status := fnd_api.g_ret_sts_error;

796: WHERE lookup_type = 'DPP_TRANSACTION_STATUSES'
797: AND lookup_code = l_txn_status_lookup_code; --ANBBALAS for 12_1_2
798: EXCEPTION
799: WHEN no_data_found THEN
800: x_return_status := fnd_api.g_ret_sts_error;
801: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
802: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
803: END IF;
804: x_msg_data := fnd_message.get();

Line 808: --RAISE Fnd_Api.G_EXC_ERROR;

804: x_msg_data := fnd_message.get();
805: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
806: p_txn_header_rec_type.error_code := 'DPP_TXN_STS_ERR';
807: l_error_message :=l_error_message|| x_msg_data;
808: --RAISE Fnd_Api.G_EXC_ERROR;
809: END;
810:
811:
812: --Get days covered if it is null

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

816: ,x_msg_data => x_msg_data
817: ,x_return_status => x_return_status
818: );
819: END IF;
820: IF x_return_status = Fnd_Api.g_ret_sts_error OR x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
821: l_error_message :=l_error_message|| x_msg_data;
822: END IF;
823: IF DPP_DEBUG_HIGH_ON THEN
824: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating Days Covered');

Line 831: x_return_status := fnd_api.g_ret_sts_error;

827: IF p_txn_header_rec_type.days_covered <= 0
828: OR p_txn_header_rec_type.days_covered > 9999
829: OR p_txn_header_rec_type.days_covered <> ROUND(p_txn_header_rec_type.days_covered)
830: THEN
831: x_return_status := fnd_api.g_ret_sts_error;
832: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
833: fnd_message.set_name('DPP', 'DPP_TXN_DAYS_COV_ERR');
834: END IF;
835: x_msg_data := fnd_message.get();

Line 839: --RAISE Fnd_Api.g_exc_error;

835: x_msg_data := fnd_message.get();
836: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
837: p_txn_header_rec_type.error_code := 'DPP_TXN_DAYS_COV_ERR';
838: l_error_message :=l_error_message|| x_msg_data;
839: --RAISE Fnd_Api.g_exc_error;
840: END IF;
841: IF p_txn_header_rec_type.effective_start_date IS NULL THEN
842: x_return_status := fnd_api.g_ret_sts_error;
843: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 842: x_return_status := fnd_api.g_ret_sts_error;

838: l_error_message :=l_error_message|| x_msg_data;
839: --RAISE Fnd_Api.g_exc_error;
840: END IF;
841: IF p_txn_header_rec_type.effective_start_date IS NULL THEN
842: x_return_status := fnd_api.g_ret_sts_error;
843: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
844: fnd_message.set_name('DPP', 'DPP_EFF_START_DATE_ERR');
845: END IF;
846: x_msg_data := fnd_message.get();

Line 850: --RAISE Fnd_Api.g_exc_error;

846: x_msg_data := fnd_message.get();
847: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
848: p_txn_header_rec_type.error_code := 'DPP_EFF_START_DATE_ERR';
849: l_error_message :=l_error_message|| x_msg_data;
850: --RAISE Fnd_Api.g_exc_error;
851: END IF;
852: END IF; -- end if only for inbound
853: IF l_error_message IS NOT NULL THEN
854: x_msg_data := l_error_message;

Line 855: RAISE Fnd_Api.g_exc_error;

851: END IF;
852: END IF; -- end if only for inbound
853: IF l_error_message IS NOT NULL THEN
854: x_msg_data := l_error_message;
855: RAISE Fnd_Api.g_exc_error;
856: END IF;
857: EXCEPTION
858: WHEN Fnd_Api.G_EXC_ERROR THEN
859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);

Line 858: WHEN Fnd_Api.G_EXC_ERROR THEN

854: x_msg_data := l_error_message;
855: RAISE Fnd_Api.g_exc_error;
856: END IF;
857: EXCEPTION
858: WHEN Fnd_Api.G_EXC_ERROR THEN
859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
860: x_return_status := Fnd_Api.g_ret_sts_error ;
861: WHEN others THEN
862: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 860: x_return_status := Fnd_Api.g_ret_sts_error ;

856: END IF;
857: EXCEPTION
858: WHEN Fnd_Api.G_EXC_ERROR THEN
859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
860: x_return_status := Fnd_Api.g_ret_sts_error ;
861: WHEN others THEN
862: x_return_status := fnd_api.g_ret_sts_unexp_error;
863: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
864: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 862: x_return_status := fnd_api.g_ret_sts_unexp_error;

858: WHEN Fnd_Api.G_EXC_ERROR THEN
859: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
860: x_return_status := Fnd_Api.g_ret_sts_error ;
861: WHEN others THEN
862: x_return_status := fnd_api.g_ret_sts_unexp_error;
863: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
864: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
865: fnd_message.set_token('ROUTINE', l_full_name);
866: fnd_message.set_token('ERRNO', SQLCODE);

Line 891: x_return_status := fnd_api.g_ret_sts_success;

887: IF DPP_DEBUG_HIGH_ON THEN
888: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Header');
889: END IF;
890: -- Initialize API return status to sucess
891: x_return_status := fnd_api.g_ret_sts_success;
892: --Get Transaction Header Id from sequence
893:
894: IF DPP_DEBUG_HIGH_ON THEN
895: FND_FILE.PUT_LINE(FND_FILE.LOG,' Inserting Transaction Header');

Line 1022: WHEN Fnd_Api.G_EXC_ERROR THEN

1018: IF DPP_DEBUG_HIGH_ON THEN
1019: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Header');
1020: END IF;
1021: EXCEPTION
1022: WHEN Fnd_Api.G_EXC_ERROR THEN
1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1024: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_ERROR '||x_msg_data);
1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 1025: x_return_status := Fnd_Api.g_ret_sts_error ;

1021: EXCEPTION
1022: WHEN Fnd_Api.G_EXC_ERROR THEN
1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1024: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_ERROR '||x_msg_data);
1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1022: WHEN Fnd_Api.G_EXC_ERROR THEN
1023: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1024: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_ERROR '||x_msg_data);
1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1030: WHEN OTHERS THEN

Line 1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1025: x_return_status := Fnd_Api.g_ret_sts_error ;
1026: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1027: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1030: WHEN OTHERS THEN
1031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header OTHERS'||sqlerrm);
1032: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1033: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )

Line 1032: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;

1028: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header G_EXC_UNEXPECTED_ERROR' ||x_msg_data||sqlerrm);
1029: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1030: WHEN OTHERS THEN
1031: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create Header OTHERS'||sqlerrm);
1032: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1033: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1034: THEN
1035: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1036: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');

Line 1062: x_return_status := fnd_api.g_ret_sts_success;

1058: l_msg_exceeded VARCHAR2(10) := 'N';
1059:
1060: BEGIN
1061: -- Initialize API return status to sucess
1062: x_return_status := fnd_api.g_ret_sts_success;
1063: IF DPP_DEBUG_HIGH_ON THEN
1064: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Validate Supplier Part Number');
1065: END IF;
1066: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 1076: x_return_status := fnd_api.g_ret_sts_error;

1072: FROM dual;
1073:
1074: EXCEPTION
1075: WHEN no_data_found THEN
1076: x_return_status := fnd_api.g_ret_sts_error;
1077: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1078: fnd_message.set_name('DPP', 'DPP_TXN_SEQ_NO_ERR');
1079: fnd_message.set_token('SEQ_NUM', 'Transaction Line Id');
1080: END IF;

Line 1101: x_return_status := fnd_api.g_ret_sts_error;

1097: WHERE lookup_code = 'ACTIVE'
1098: AND lookup_type = 'DPP_TRANSACTION_STATUSES';
1099: EXCEPTION
1100: WHEN no_data_found THEN
1101: x_return_status := fnd_api.g_ret_sts_error;
1102: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1103: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
1104: END IF;
1105: x_msg_data := fnd_message.get();

Line 1114: --RAISE Fnd_Api.G_EXC_ERROR;

1110: ELSE
1111: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1112: END IF;
1113: l_error_message :=l_error_message|| x_msg_data;
1114: --RAISE Fnd_Api.G_EXC_ERROR;
1115: END;
1116: --BUG 6806974
1117: IF (p_txn_lines_tbl_type(i).supplier_part_num IS NULL AND p_txn_lines_tbl_type(i).item_number IS NULL
1118: AND p_txn_lines_tbl_type(i).inventory_item_id IS NULL) THEN

Line 1127: RAISE Fnd_Api.g_exc_error;

1123: l_error_message :=l_error_message|| x_msg_data;
1124: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1125: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_SUP_PART_NO_NULL';
1126:
1127: RAISE Fnd_Api.g_exc_error;
1128: END IF;
1129:
1130:
1131: /*If both the supplier part number and item number is not null then both the values

Line 1192: x_return_status := fnd_api.g_ret_sts_error;

1188: AND msi.primary_uom_code = nvl(p_txn_lines_tbl_type(i).uom,msi.primary_uom_code);
1189: END IF;
1190: EXCEPTION
1191: WHEN no_data_found THEN
1192: x_return_status := fnd_api.g_ret_sts_error;
1193: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1194: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1195: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1196: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1233: x_return_status := fnd_api.g_ret_sts_error;

1229: AND (trunc(sysdate) between occ.start_date_active and occ.end_date_active OR occ.end_date_active is null)
1230: AND occ.external_code =p_txn_lines_tbl_type(i).supplier_part_num;
1231: EXCEPTION
1232: WHEN no_data_found THEN
1233: x_return_status := fnd_api.g_ret_sts_error;
1234: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1235: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1236: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1237: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1332: x_return_status := fnd_api.g_ret_sts_error;

1328: AND ostpa.supplier_site_id = to_number(p_txn_header_rec_type.vendor_site_id)
1329: AND (trunc(sysdate) between occ.start_date_active and occ.end_date_active OR occ.end_date_active is null)
1330: AND occ.external_code =p_txn_lines_tbl_type(i).supplier_part_num;
1331: EXCEPTION WHEN NO_DATA_FOUND THEN
1332: x_return_status := fnd_api.g_ret_sts_error;
1333: fnd_message.set_name('DPP', 'DPP_TXN_SUP_PART_NO_ERR');
1334: fnd_message.set_token('SUPPLIER_PART_NUM', p_txn_lines_tbl_type(i).supplier_part_num);
1335: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1336: fnd_message.set_token('INVENTORY_ITEM_ID', p_txn_lines_tbl_type(i).inventory_item_id);

Line 1403: ,p_conv_type => FND_API.G_MISS_CHAR

1399: --call procedure to get prior price in transaction currency
1400: DPP_UTILITY_PVT.convert_currency(
1401: p_from_currency => p_txn_header_rec_type.functional_currency
1402: ,p_to_currency => p_txn_header_rec_type.trx_currency
1403: ,p_conv_type => FND_API.G_MISS_CHAR
1404: ,p_conv_rate => FND_API.G_MISS_NUM
1405: ,p_conv_date => SYSDATE
1406: ,p_from_amount => p_txn_lines_tbl_type(i).list_price
1407: ,x_return_status => x_return_status

Line 1404: ,p_conv_rate => FND_API.G_MISS_NUM

1400: DPP_UTILITY_PVT.convert_currency(
1401: p_from_currency => p_txn_header_rec_type.functional_currency
1402: ,p_to_currency => p_txn_header_rec_type.trx_currency
1403: ,p_conv_type => FND_API.G_MISS_CHAR
1404: ,p_conv_rate => FND_API.G_MISS_NUM
1405: ,p_conv_date => SYSDATE
1406: ,p_from_amount => p_txn_lines_tbl_type(i).list_price
1407: ,x_return_status => x_return_status
1408: ,x_to_amount => p_txn_lines_tbl_type(i).prior_price

Line 1411: IF x_return_status <>fnd_api.g_ret_sts_success THEN

1407: ,x_return_status => x_return_status
1408: ,x_to_amount => p_txn_lines_tbl_type(i).prior_price
1409: ,x_rate => l_exchange_rate);
1410:
1411: IF x_return_status <>fnd_api.g_ret_sts_success THEN
1412: fnd_message.set_name('DPP', 'DPP_TXN_CONV_PRICE_ER');
1413: fnd_message.set_token('ITEM_NUMBER', p_txn_lines_tbl_type(i).item_number);
1414: x_msg_data := fnd_message.get();
1415: p_txn_lines_tbl_type(i).error_code := 'DPP_TXN_CONV_PRICE_ER';

Line 1421: x_return_status := fnd_api.g_ret_sts_error;

1417: p_txn_header_rec_type.error_code := 'DPP_TXN_CONV_PRICE_ER';
1418: ELSE
1419: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1420: END IF;
1421: x_return_status := fnd_api.g_ret_sts_error;
1422: l_error_message :=l_error_message|| x_msg_data;
1423: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1424: END IF;
1425: END IF;

Line 1437: x_return_status := fnd_api.g_ret_sts_error;

1433: p_txn_header_rec_type.error_code := 'DPP_TXN_SUP_PART_LIST_PRICE_ER';
1434: ELSE
1435: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1436: END IF;
1437: x_return_status := fnd_api.g_ret_sts_error;
1438: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1439: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1440: l_error_message :=l_error_message|| x_msg_data;
1441: ELSE

Line 1461: x_return_status := fnd_api.g_ret_sts_error;

1457: p_txn_header_rec_type.error_code := 'DPP_TXN_SUP_PART_LIST_PRICE_ER';
1458: ELSE
1459: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
1460: END IF;
1461: x_return_status := fnd_api.g_ret_sts_error;
1462: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
1463: IF (l_error_message is null or length(l_error_message) < 2000) and l_msg_exceeded = 'N' THEN
1464: l_error_message :=l_error_message|| x_msg_data;
1465: ELSE

Line 1676: --RAISE Fnd_Api.G_EXC_ERROR;

1672: fnd_message.set_name('DPP', 'DPP_ERROR_MSG_STD');
1673: x_msg_data := fnd_message.get();
1674: l_error_message := x_msg_data;
1675: END IF;
1676: --RAISE Fnd_Api.G_EXC_ERROR;
1677: END IF;
1678:
1679: --Price change field
1680: 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 1690: RAISE Fnd_Api.G_EXC_ERROR;

1686: END IF;
1687: END LOOP;
1688: IF l_error_message IS NOT NULL THEN
1689: x_msg_data := substr(l_error_message,1,2000);
1690: RAISE Fnd_Api.G_EXC_ERROR;
1691: END IF;
1692:
1693: IF DPP_DEBUG_HIGH_ON THEN
1694: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');

Line 1697: WHEN Fnd_Api.G_EXC_ERROR THEN

1693: IF DPP_DEBUG_HIGH_ON THEN
1694: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');
1695: END IF;
1696: EXCEPTION
1697: WHEN Fnd_Api.G_EXC_ERROR THEN
1698: x_return_status := Fnd_Api.g_ret_sts_error ;
1699: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier part number Error: ' || sqlerrm);
1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1698: x_return_status := Fnd_Api.g_ret_sts_error ;

1694: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Validate Supplier Part Number');
1695: END IF;
1696: EXCEPTION
1697: WHEN Fnd_Api.G_EXC_ERROR THEN
1698: x_return_status := Fnd_Api.g_ret_sts_error ;
1699: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier part number Error: ' || sqlerrm);
1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1702: WHEN OTHERS THEN

Line 1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1696: EXCEPTION
1697: WHEN Fnd_Api.G_EXC_ERROR THEN
1698: x_return_status := Fnd_Api.g_ret_sts_error ;
1699: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier part number Error: ' || sqlerrm);
1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1702: WHEN OTHERS THEN
1703: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1704: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1697: WHEN Fnd_Api.G_EXC_ERROR THEN
1698: x_return_status := Fnd_Api.g_ret_sts_error ;
1699: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier part number Error: ' || sqlerrm);
1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1702: WHEN OTHERS THEN
1703: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1704: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1705: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 1703: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1699: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier part number Error: ' || sqlerrm);
1700: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1701: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1702: WHEN OTHERS THEN
1703: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1704: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1705: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1706: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT VALIDATE SUPPLIER PART NUMBER');
1707: fnd_message.set_token('ERRNO', SQLCODE);

Line 1730: x_return_status := fnd_api.g_ret_sts_success;

1726: l_error_message VARCHAR2(4000);
1727: l_rounding NUMBER;
1728: BEGIN
1729: -- Initialize API return status to sucess
1730: x_return_status := fnd_api.g_ret_sts_success;
1731: IF DPP_DEBUG_HIGH_ON THEN
1732: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Create Lines');
1733: END IF;
1734:

Line 1904: WHEN Fnd_Api.G_EXC_ERROR THEN

1900: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Create Lines');
1901: END IF;
1902: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'End Create Lines'|| sqlerrm);
1903: EXCEPTION
1904: WHEN Fnd_Api.G_EXC_ERROR THEN
1905: x_return_status := Fnd_Api.g_ret_sts_error ;
1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1908: WHEN OTHERS THEN

Line 1905: x_return_status := Fnd_Api.g_ret_sts_error ;

1901: END IF;
1902: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'End Create Lines'|| sqlerrm);
1903: EXCEPTION
1904: WHEN Fnd_Api.G_EXC_ERROR THEN
1905: x_return_status := Fnd_Api.g_ret_sts_error ;
1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1908: WHEN OTHERS THEN
1909: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception Create Lines'||sqlerrm);

Line 1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1902: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'End Create Lines'|| sqlerrm);
1903: EXCEPTION
1904: WHEN Fnd_Api.G_EXC_ERROR THEN
1905: x_return_status := Fnd_Api.g_ret_sts_error ;
1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1908: WHEN OTHERS THEN
1909: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception Create Lines'||sqlerrm);
1910: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1903: EXCEPTION
1904: WHEN Fnd_Api.G_EXC_ERROR THEN
1905: x_return_status := Fnd_Api.g_ret_sts_error ;
1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1908: WHEN OTHERS THEN
1909: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception Create Lines'||sqlerrm);
1910: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1911: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 1910: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1906: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1907: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1908: WHEN OTHERS THEN
1909: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception Create Lines'||sqlerrm);
1910: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1911: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1912: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1913: fnd_message.set_token('ROUTINE', l_full_name);
1914: fnd_message.set_token('ERRNO', SQLCODE);

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

1928: AS
1929: l_api_name constant VARCHAR2(30) := 'Update_CoveredInv';
1930: l_api_version constant NUMBER := 1.0;
1931: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1932: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1933: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1934: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1935: --Declaration for Covered Inventory Calculation
1936: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;

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

1929: l_api_name constant VARCHAR2(30) := 'Update_CoveredInv';
1930: l_api_version constant NUMBER := 1.0;
1931: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1932: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1933: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1934: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1935: --Declaration for Covered Inventory Calculation
1936: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;
1937: l_line_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_tbl_type;

Line 1934: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

1930: l_api_version constant NUMBER := 1.0;
1931: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
1932: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
1933: l_commit VARCHAR2(30) := FND_API.G_FALSE;
1934: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
1935: --Declaration for Covered Inventory Calculation
1936: l_header_rec_type dpp_coveredinventory_pvt.dpp_inv_hdr_rec_type;
1937: l_line_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_tbl_type;
1938: l_inv_cov_wh_tbl_type dpp_coveredinventory_pvt.dpp_inv_cov_wh_tbl_type;

Line 1947: x_return_status := fnd_api.g_ret_sts_success;

1943: BEGIN
1944: SAVEPOINT DPP_Update_CoveredInv;
1945:
1946: -- Initialize API return status to sucess
1947: x_return_status := fnd_api.g_ret_sts_success;
1948: IF DPP_DEBUG_HIGH_ON THEN
1949: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Covered Inventory');
1950: END IF;
1951: --Form Header rec to call covered inventory procedure

Line 1998: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

1994: );
1995:
1996: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
1997:
1998: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1999: RAISE Fnd_Api.g_exc_error;
2000: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2001: RAISE Fnd_Api.g_exc_unexpected_error;
2002: END IF;

Line 1999: RAISE Fnd_Api.g_exc_error;

1995:
1996: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
1997:
1998: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1999: RAISE Fnd_Api.g_exc_error;
2000: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2001: RAISE Fnd_Api.g_exc_unexpected_error;
2002: END IF;
2003: --Call Populate Covered Inventory

Line 2000: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1996: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
1997:
1998: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1999: RAISE Fnd_Api.g_exc_error;
2000: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2001: RAISE Fnd_Api.g_exc_unexpected_error;
2002: END IF;
2003: --Call Populate Covered Inventory
2004: dpp_coveredinventory_pvt.Update_CoveredInventory(

Line 2001: RAISE Fnd_Api.g_exc_unexpected_error;

1997:
1998: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
1999: RAISE Fnd_Api.g_exc_error;
2000: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2001: RAISE Fnd_Api.g_exc_unexpected_error;
2002: END IF;
2003: --Call Populate Covered Inventory
2004: dpp_coveredinventory_pvt.Update_CoveredInventory(
2005: p_api_version => l_api_version

Line 2018: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2014: );
2015:
2016: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
2017:
2018: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2019: RAISE Fnd_Api.g_exc_error;
2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2021: RAISE Fnd_Api.g_exc_unexpected_error;
2022: END IF;

Line 2019: RAISE Fnd_Api.g_exc_error;

2015:
2016: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
2017:
2018: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2019: RAISE Fnd_Api.g_exc_error;
2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2021: RAISE Fnd_Api.g_exc_unexpected_error;
2022: END IF;
2023: IF DPP_DEBUG_HIGH_ON THEN

Line 2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2016: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
2017:
2018: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2019: RAISE Fnd_Api.g_exc_error;
2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2021: RAISE Fnd_Api.g_exc_unexpected_error;
2022: END IF;
2023: IF DPP_DEBUG_HIGH_ON THEN
2024: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');

Line 2021: RAISE Fnd_Api.g_exc_unexpected_error;

2017:
2018: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2019: RAISE Fnd_Api.g_exc_error;
2020: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2021: RAISE Fnd_Api.g_exc_unexpected_error;
2022: END IF;
2023: IF DPP_DEBUG_HIGH_ON THEN
2024: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Covered Inventory');
2025: END IF;

Line 2071: RAISE FND_API.g_exc_error;

2067: FND_MSG_PUB.add;
2068: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2069: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2070: END IF;
2071: RAISE FND_API.g_exc_error;
2072: WHEN OTHERS THEN
2073: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2074: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
2075: fnd_message.set_token('ERRNO', sqlcode);

Line 2083: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2079: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
2080: FND_MSG_PUB.add;
2081: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2082: END IF;
2083: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2084: END;
2085:
2086: IF (l_price_change_flag = 'N') THEN -- Only Price Decrease
2087: UPDATE dpp_transaction_lines_all dtla

Line 2109: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2105: AND dtla.price_change <> 0;
2106: END IF;
2107:
2108: END LOOP;
2109: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2110: RAISE Fnd_Api.g_exc_error;
2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;

Line 2110: RAISE Fnd_Api.g_exc_error;

2106: END IF;
2107:
2108: END LOOP;
2109: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2110: RAISE Fnd_Api.g_exc_error;
2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;
2114: EXCEPTION

Line 2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2107:
2108: END LOOP;
2109: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2110: RAISE Fnd_Api.g_exc_error;
2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;
2114: EXCEPTION
2115: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2112: RAISE Fnd_Api.g_exc_unexpected_error;

2108: END LOOP;
2109: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2110: RAISE Fnd_Api.g_exc_error;
2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;
2114: EXCEPTION
2115: WHEN Fnd_Api.G_EXC_ERROR THEN
2116: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2115: WHEN Fnd_Api.G_EXC_ERROR THEN

2111: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;
2114: EXCEPTION
2115: WHEN Fnd_Api.G_EXC_ERROR THEN
2116: x_return_status := Fnd_Api.g_ret_sts_error ;
2117: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2118: ROLLBACK TO DPP_Update_CoveredInv;
2119: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 2116: x_return_status := Fnd_Api.g_ret_sts_error ;

2112: RAISE Fnd_Api.g_exc_unexpected_error;
2113: END IF;
2114: EXCEPTION
2115: WHEN Fnd_Api.G_EXC_ERROR THEN
2116: x_return_status := Fnd_Api.g_ret_sts_error ;
2117: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2118: ROLLBACK TO DPP_Update_CoveredInv;
2119: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2120: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2119: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2115: WHEN Fnd_Api.G_EXC_ERROR THEN
2116: x_return_status := Fnd_Api.g_ret_sts_error ;
2117: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2118: ROLLBACK TO DPP_Update_CoveredInv;
2119: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2120: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2121: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2122: ROLLBACK TO DPP_Update_CoveredInv;
2123: WHEN OTHERS THEN

Line 2120: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2116: x_return_status := Fnd_Api.g_ret_sts_error ;
2117: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2118: ROLLBACK TO DPP_Update_CoveredInv;
2119: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2120: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2121: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2122: ROLLBACK TO DPP_Update_CoveredInv;
2123: WHEN OTHERS THEN
2124: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2124: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2120: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2121: p_txn_header_rec_type.error_code := 'DPP_UPDATE_COVEREDINV';
2122: ROLLBACK TO DPP_Update_CoveredInv;
2123: WHEN OTHERS THEN
2124: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2125: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2126: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2127: fnd_message.set_token('ROUTINE', l_full_name);
2128: fnd_message.set_token('ERRNO', SQLCODE);

Line 2152: x_return_status := fnd_api.g_ret_sts_success;

2148: l_claim_id VARCHAR2(240);
2149: l_error_message VARCHAR2(4000) := NULL;
2150: BEGIN
2151: -- Initialize API return status to sucess
2152: x_return_status := fnd_api.g_ret_sts_success;
2153: IF DPP_DEBUG_HIGH_ON THEN
2154: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Approval');
2155: FND_FILE.PUT_LINE(FND_FILE.LOG,' Values Transaction header id '
2156: ||p_txn_header_rec_type.transaction_header_id

Line 2162: x_return_status := fnd_api.g_ret_sts_error;

2158: END IF;
2159: --Check whether the claim lines belong to the transaction
2160: IF (p_txn_header_rec_type.supp_dist_claim_number IS NULL AND
2161: p_txn_header_rec_type.supp_dist_claim_id IS NULL ) THEN
2162: x_return_status := fnd_api.g_ret_sts_error;
2163: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2164: fnd_message.set_name('DPP', 'DPP_CLAIM_NUMBER_NULL');
2165: x_msg_data := fnd_message.get();
2166: p_txn_header_rec_type.error_code := 'DPP_CLAIM_NUMBER_NULL';

Line 2172: x_return_status := fnd_api.g_ret_sts_error;

2168: IF DPP_DEBUG_HIGH_ON THEN
2169: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2170: END IF;
2171: END IF;
2172: x_return_status := fnd_api.g_ret_sts_error;
2173: --RAISE Fnd_Api.G_EXC_ERROR;
2174: END IF;
2175:
2176: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 2173: --RAISE Fnd_Api.G_EXC_ERROR;

2169: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2170: END IF;
2171: END IF;
2172: x_return_status := fnd_api.g_ret_sts_error;
2173: --RAISE Fnd_Api.G_EXC_ERROR;
2174: END IF;
2175:
2176: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST
2177: LOOP

Line 2194: x_return_status := fnd_api.g_ret_sts_error;

2190: AND dtla.supplier_approved_by IS NULL;
2191: END IF;
2192: EXCEPTION
2193: WHEN no_data_found THEN
2194: x_return_status := fnd_api.g_ret_sts_error;
2195: fnd_message.set_name('DPP', 'DPP_APPROVED_CLAIM_LINES_ERR');
2196: fnd_message.set_token('CLAIM_NUMBER', p_txn_header_rec_type.supp_dist_claim_number);
2197: fnd_message.set_token('CLAIM_ID', p_txn_header_rec_type.supp_dist_claim_id);
2198: x_msg_data := fnd_message.get();

Line 2207: RAISE Fnd_Api.G_EXC_ERROR;

2203: p_txn_header_rec_type.error_code := 'MULTIPLE_ERRORS';
2204: END IF;
2205: l_error_message := l_error_message || x_msg_data;
2206: FND_FILE.PUT_LINE(FND_FILE.LOG,' '||x_msg_data);
2207: RAISE Fnd_Api.G_EXC_ERROR;
2208:
2209: END;
2210:
2211: UPDATE dpp_transaction_headers_all dtha

Line 2255: WHEN Fnd_Api.G_EXC_ERROR THEN

2251: IF DPP_DEBUG_HIGH_ON THEN
2252: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');
2253: END IF;
2254: EXCEPTION
2255: WHEN Fnd_Api.G_EXC_ERROR THEN
2256: x_return_status := Fnd_Api.g_ret_sts_error ;
2257: WHEN others THEN
2258: x_return_status := fnd_api.g_ret_sts_unexp_error;
2259: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2256: x_return_status := Fnd_Api.g_ret_sts_error ;

2252: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Approval');
2253: END IF;
2254: EXCEPTION
2255: WHEN Fnd_Api.G_EXC_ERROR THEN
2256: x_return_status := Fnd_Api.g_ret_sts_error ;
2257: WHEN others THEN
2258: x_return_status := fnd_api.g_ret_sts_unexp_error;
2259: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2260: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2258: x_return_status := fnd_api.g_ret_sts_unexp_error;

2254: EXCEPTION
2255: WHEN Fnd_Api.G_EXC_ERROR THEN
2256: x_return_status := Fnd_Api.g_ret_sts_error ;
2257: WHEN others THEN
2258: x_return_status := fnd_api.g_ret_sts_unexp_error;
2259: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2260: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2261: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2262: fnd_message.set_token('ERRNO', SQLCODE);

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

2275: AS
2276: l_api_name constant VARCHAR2(30) := 'Update_ClaimsApproval';
2277: l_api_version constant NUMBER := 1.0;
2278: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2279: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2280: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2281: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2282: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2283: l_count_lines NUMBER;

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

2276: l_api_name constant VARCHAR2(30) := 'Update_ClaimsApproval';
2277: l_api_version constant NUMBER := 1.0;
2278: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2279: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2280: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2281: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2282: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2283: l_count_lines NUMBER;
2284: l_count_approved_lines NUMBER;

Line 2281: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2277: l_api_version constant NUMBER := 1.0;
2278: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2279: l_init_msg_list VARCHAR2(30) := FND_API.G_TRUE;
2280: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2281: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2282: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2283: l_count_lines NUMBER;
2284: l_count_approved_lines NUMBER;
2285: l_claim_txn_hdr_rec_type dpp_businessevents_pvt.dpp_txn_hdr_rec_type;

Line 2290: x_return_status := fnd_api.g_ret_sts_success;

2286: l_claim_txn_line_tbl_type dpp_businessevents_pvt.dpp_txn_line_tbl_type;
2287:
2288: BEGIN
2289: -- Initialize API return status to sucess
2290: x_return_status := fnd_api.g_ret_sts_success;
2291:
2292: IF DPP_DEBUG_HIGH_ON THEN
2293: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update Claims Approval');
2294: END IF;

Line 2304: x_return_status := fnd_api.g_ret_sts_error;

2300: WHERE fl.lookup_type = 'DPP_EXECUTION_PROCESSES'
2301: AND fl.lookup_code = 'UPDCLM';
2302: EXCEPTION
2303: WHEN no_data_found THEN
2304: x_return_status := fnd_api.g_ret_sts_error;
2305: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2306: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2307: fnd_message.set_token('ROUTINE', l_full_name);
2308: fnd_message.set_token('ERRNO', SQLCODE);

Line 2371: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2367: ,x_msg_data => x_msg_data
2368: ,p_txn_hdr_rec => l_claim_txn_hdr_rec_type
2369: ,p_txn_line_id => l_claim_txn_line_tbl_type
2370: );
2371: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2372: RAISE Fnd_Api.g_exc_error;
2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2374: RAISE Fnd_Api.g_exc_unexpected_error;
2375: END IF;

Line 2372: RAISE Fnd_Api.g_exc_error;

2368: ,p_txn_hdr_rec => l_claim_txn_hdr_rec_type
2369: ,p_txn_line_id => l_claim_txn_line_tbl_type
2370: );
2371: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2372: RAISE Fnd_Api.g_exc_error;
2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2374: RAISE Fnd_Api.g_exc_unexpected_error;
2375: END IF;
2376: IF DPP_DEBUG_HIGH_ON THEN

Line 2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2369: ,p_txn_line_id => l_claim_txn_line_tbl_type
2370: );
2371: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2372: RAISE Fnd_Api.g_exc_error;
2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2374: RAISE Fnd_Api.g_exc_unexpected_error;
2375: END IF;
2376: IF DPP_DEBUG_HIGH_ON THEN
2377: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'

Line 2374: RAISE Fnd_Api.g_exc_unexpected_error;

2370: );
2371: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2372: RAISE Fnd_Api.g_exc_error;
2373: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2374: RAISE Fnd_Api.g_exc_unexpected_error;
2375: END IF;
2376: IF DPP_DEBUG_HIGH_ON THEN
2377: FND_FILE.PUT_LINE(FND_FILE.LOG,' Procedure called to raise business event to'
2378: ||' update the claim status.');

Line 2386: WHEN Fnd_Api.G_EXC_ERROR THEN

2382: IF DPP_DEBUG_HIGH_ON THEN
2383: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');
2384: END IF;
2385: EXCEPTION
2386: WHEN Fnd_Api.G_EXC_ERROR THEN
2387: x_return_status := Fnd_Api.g_ret_sts_error ;
2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2390: WHEN OTHERS THEN

Line 2387: x_return_status := Fnd_Api.g_ret_sts_error ;

2383: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update Claims Approval');
2384: END IF;
2385: EXCEPTION
2386: WHEN Fnd_Api.G_EXC_ERROR THEN
2387: x_return_status := Fnd_Api.g_ret_sts_error ;
2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2390: WHEN OTHERS THEN
2391: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2384: END IF;
2385: EXCEPTION
2386: WHEN Fnd_Api.G_EXC_ERROR THEN
2387: x_return_status := Fnd_Api.g_ret_sts_error ;
2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2390: WHEN OTHERS THEN
2391: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2385: EXCEPTION
2386: WHEN Fnd_Api.G_EXC_ERROR THEN
2387: x_return_status := Fnd_Api.g_ret_sts_error ;
2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2390: WHEN OTHERS THEN
2391: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2393: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2391: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2387: x_return_status := Fnd_Api.g_ret_sts_error ;
2388: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2389: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2390: WHEN OTHERS THEN
2391: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2392: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2393: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2394: fnd_message.set_token('ROUTINE', l_full_name);
2395: fnd_message.set_token('ERRNO', SQLCODE);

Line 2429: x_return_status := fnd_api.g_ret_sts_success;

2425: order by transaction_int_line_id;
2426:
2427: BEGIN
2428: -- Initialize API return status to sucess
2429: x_return_status := fnd_api.g_ret_sts_success;
2430: IF DPP_DEBUG_HIGH_ON THEN
2431: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin form line tbl');
2432: END IF;
2433:

Line 2440: x_return_status := fnd_api.g_ret_sts_error;

2436: --fetch records from dpp_txn_lines_int_all table for the selected header.
2437: FOR fetch_lines_rec IN fetch_lines_cur(p_txn_header_rec_type.transaction_int_header_id)
2438: LOOP
2439: IF p_txn_header_rec_type.org_id <> nvl(fetch_lines_rec.org_id,p_txn_header_rec_type.org_id) THEN
2440: x_return_status := fnd_api.g_ret_sts_error;
2441: fnd_message.set_name('DPP', 'DPP_TXN_ORG_MISMATCH');
2442: fnd_message.set_token('HEADER_ORG_ID', p_txn_header_rec_type.org_id);
2443: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2444: x_msg_data :=fnd_message.get();

Line 2445: --RAISE Fnd_Api.G_EXC_ERROR;

2441: fnd_message.set_name('DPP', 'DPP_TXN_ORG_MISMATCH');
2442: fnd_message.set_token('HEADER_ORG_ID', p_txn_header_rec_type.org_id);
2443: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2444: x_msg_data :=fnd_message.get();
2445: --RAISE Fnd_Api.G_EXC_ERROR;
2446: l_txn_lines_rec_type.error_code := 'DPP_TXN_ORG_MISMATCH';
2447: x_return_status := Fnd_Api.g_ret_sts_error ;
2448: l_error_message := l_error_message || x_msg_data;
2449: END IF;

Line 2447: x_return_status := Fnd_Api.g_ret_sts_error ;

2443: fnd_message.set_token('LINE_ORG_ID', fetch_lines_rec.org_id);
2444: x_msg_data :=fnd_message.get();
2445: --RAISE Fnd_Api.G_EXC_ERROR;
2446: l_txn_lines_rec_type.error_code := 'DPP_TXN_ORG_MISMATCH';
2447: x_return_status := Fnd_Api.g_ret_sts_error ;
2448: l_error_message := l_error_message || x_msg_data;
2449: END IF;
2450: l_txn_lines_rec_type.line_number := l_line_number + 1;
2451: l_txn_lines_rec_type.transaction_header_id := p_txn_header_rec_type.transaction_header_id;

Line 2516: RAISE Fnd_Api.G_EXC_ERROR;

2512: END LOOP; --FOR fetch_lines_rec IN fetch_lines_cur(p_txn_header_rec_type.transaction_int_header_id)
2513: --CLOSE fetch_lines_cur;
2514: IF l_error_message IS NOT NULL THEN
2515: x_msg_data := l_error_message;
2516: RAISE Fnd_Api.G_EXC_ERROR;
2517: END IF;
2518: IF DPP_DEBUG_HIGH_ON THEN
2519: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2520: END IF;

Line 2522: WHEN Fnd_Api.G_EXC_ERROR THEN

2518: IF DPP_DEBUG_HIGH_ON THEN
2519: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2520: END IF;
2521: EXCEPTION
2522: WHEN Fnd_Api.G_EXC_ERROR THEN
2523: x_return_status := Fnd_Api.g_ret_sts_error ;
2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2526: WHEN OTHERS THEN

Line 2523: x_return_status := Fnd_Api.g_ret_sts_error ;

2519: FND_FILE.PUT_LINE(FND_FILE.LOG,' End form line tbl');
2520: END IF;
2521: EXCEPTION
2522: WHEN Fnd_Api.G_EXC_ERROR THEN
2523: x_return_status := Fnd_Api.g_ret_sts_error ;
2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2526: WHEN OTHERS THEN
2527: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2520: END IF;
2521: EXCEPTION
2522: WHEN Fnd_Api.G_EXC_ERROR THEN
2523: x_return_status := Fnd_Api.g_ret_sts_error ;
2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2526: WHEN OTHERS THEN
2527: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2528: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2521: EXCEPTION
2522: WHEN Fnd_Api.G_EXC_ERROR THEN
2523: x_return_status := Fnd_Api.g_ret_sts_error ;
2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2526: WHEN OTHERS THEN
2527: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2528: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2529: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2527: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2523: x_return_status := Fnd_Api.g_ret_sts_error ;
2524: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2525: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2526: WHEN OTHERS THEN
2527: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2528: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2529: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2530: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2531: fnd_message.set_token('ERRNO', SQLCODE);

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

2544: l_api_name constant VARCHAR2(30) := 'Update_HeaderLog';
2545: l_api_version constant NUMBER := 1.0;
2546: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2547: l_return_status VARCHAR2(30);
2548: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2549: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2550: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2551: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2552:

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

2545: l_api_version constant NUMBER := 1.0;
2546: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2547: l_return_status VARCHAR2(30);
2548: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2549: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2550: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2551: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2552:
2553: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;

Line 2550: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2546: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2547: l_return_status VARCHAR2(30);
2548: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2549: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2550: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2551: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2552:
2553: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2554: l_txn_hdr_rec dpp_log_pvt.dpp_cst_hdr_rec_type;

Line 2557: x_return_status := fnd_api.g_ret_sts_success;

2553: l_txn_hdr_hist_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2554: l_txn_hdr_rec dpp_log_pvt.dpp_cst_hdr_rec_type;
2555: BEGIN
2556: -- Initialize API return status to sucess
2557: x_return_status := fnd_api.g_ret_sts_success;
2558:
2559: IF DPP_DEBUG_HIGH_ON THEN
2560: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update HeaderLog');
2561: END IF;

Line 2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

2627: );
2628: IF DPP_DEBUG_HIGH_ON THEN
2629: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2630: END IF;
2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2632: RAISE Fnd_Api.g_exc_error;
2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;

Line 2632: RAISE Fnd_Api.g_exc_error;

2628: IF DPP_DEBUG_HIGH_ON THEN
2629: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2630: END IF;
2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2632: RAISE Fnd_Api.g_exc_error;
2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;
2636: EXCEPTION

Line 2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2629: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2630: END IF;
2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2632: RAISE Fnd_Api.g_exc_error;
2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;
2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2634: RAISE Fnd_Api.g_exc_unexpected_error;

2630: END IF;
2631: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2632: RAISE Fnd_Api.g_exc_error;
2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;
2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN
2638: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2637: WHEN Fnd_Api.G_EXC_ERROR THEN

2633: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;
2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN
2638: x_return_status := Fnd_Api.g_ret_sts_error ;
2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2641: WHEN OTHERS THEN

Line 2638: x_return_status := Fnd_Api.g_ret_sts_error ;

2634: RAISE Fnd_Api.g_exc_unexpected_error;
2635: END IF;
2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN
2638: x_return_status := Fnd_Api.g_ret_sts_error ;
2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2641: WHEN OTHERS THEN
2642: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2635: END IF;
2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN
2638: x_return_status := Fnd_Api.g_ret_sts_error ;
2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2641: WHEN OTHERS THEN
2642: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2643: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2636: EXCEPTION
2637: WHEN Fnd_Api.G_EXC_ERROR THEN
2638: x_return_status := Fnd_Api.g_ret_sts_error ;
2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2641: WHEN OTHERS THEN
2642: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2643: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2644: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2642: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2638: x_return_status := Fnd_Api.g_ret_sts_error ;
2639: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2640: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2641: WHEN OTHERS THEN
2642: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2643: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2644: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2645: fnd_message.set_token('ROUTINE', l_full_name);
2646: fnd_message.set_token('ERRNO', SQLCODE);

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

2659:
2660: l_api_name constant VARCHAR2(30) := 'Update_LinesLog';
2661: l_api_version constant NUMBER := 1.0;
2662: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2663: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2664: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2665: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2666:
2667: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;

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

2660: l_api_name constant VARCHAR2(30) := 'Update_LinesLog';
2661: l_api_version constant NUMBER := 1.0;
2662: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2663: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2664: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2665: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2666:
2667: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2668: BEGIN

Line 2665: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2661: l_api_version constant NUMBER := 1.0;
2662: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
2663: l_init_msg_list VARCHAR2(30) := FND_API.G_FALSE;
2664: l_commit VARCHAR2(30) := FND_API.G_FALSE;
2665: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2666:
2667: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2668: BEGIN
2669: --SAVEPOINT DPP_Update_LinesLog;

Line 2671: x_return_status := fnd_api.g_ret_sts_success;

2667: l_txn_line_hist_tbl dpp_log_pvt.dpp_txn_line_tbl_type;
2668: BEGIN
2669: --SAVEPOINT DPP_Update_LinesLog;
2670: -- Initialize API return status to sucess
2671: x_return_status := fnd_api.g_ret_sts_success;
2672: IF DPP_DEBUG_HIGH_ON THEN
2673: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update LinesLog');
2674: END IF;
2675: FOR i in p_txn_lines_tbl_type.FIRST..p_txn_lines_tbl_type.LAST

Line 2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

2762:
2763: IF DPP_DEBUG_HIGH_ON THEN
2764: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2765: END IF;
2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2767: RAISE Fnd_Api.g_exc_error;
2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;

Line 2767: RAISE Fnd_Api.g_exc_error;

2763: IF DPP_DEBUG_HIGH_ON THEN
2764: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2765: END IF;
2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2767: RAISE Fnd_Api.g_exc_error;
2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;
2771: EXCEPTION

Line 2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2764: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update LinesLog');
2765: END IF;
2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2767: RAISE Fnd_Api.g_exc_error;
2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;
2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 2769: RAISE Fnd_Api.g_exc_unexpected_error;

2765: END IF;
2766: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
2767: RAISE Fnd_Api.g_exc_error;
2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;
2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN
2773: x_return_status := Fnd_Api.g_ret_sts_error ;

Line 2772: WHEN Fnd_Api.G_EXC_ERROR THEN

2768: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;
2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN
2773: x_return_status := Fnd_Api.g_ret_sts_error ;
2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2776: WHEN OTHERS THEN

Line 2773: x_return_status := Fnd_Api.g_ret_sts_error ;

2769: RAISE Fnd_Api.g_exc_unexpected_error;
2770: END IF;
2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN
2773: x_return_status := Fnd_Api.g_ret_sts_error ;
2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2776: WHEN OTHERS THEN
2777: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2770: END IF;
2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN
2773: x_return_status := Fnd_Api.g_ret_sts_error ;
2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2776: WHEN OTHERS THEN
2777: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2778: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2771: EXCEPTION
2772: WHEN Fnd_Api.G_EXC_ERROR THEN
2773: x_return_status := Fnd_Api.g_ret_sts_error ;
2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2776: WHEN OTHERS THEN
2777: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2778: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2779: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2777: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2773: x_return_status := Fnd_Api.g_ret_sts_error ;
2774: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2775: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2776: WHEN OTHERS THEN
2777: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2778: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2779: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2780: fnd_message.set_token('ROUTINE', l_full_name);
2781: fnd_message.set_token('ERRNO', SQLCODE);

Line 2800: x_return_status := fnd_api.g_ret_sts_success;

2796: l_api_name constant VARCHAR2(30) := 'Update_InterfaceTbl';
2797: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2798: BEGIN
2799: -- Initialize API return status to sucess
2800: x_return_status := fnd_api.g_ret_sts_success;
2801:
2802: IF DPP_DEBUG_HIGH_ON THEN
2803: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceTbl');
2804: END IF;

Line 2837: WHEN Fnd_Api.G_EXC_ERROR THEN

2833: IF DPP_DEBUG_HIGH_ON THEN
2834: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');
2835: END IF;
2836: EXCEPTION
2837: WHEN Fnd_Api.G_EXC_ERROR THEN
2838: x_return_status := Fnd_Api.g_ret_sts_error ;
2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2841:

Line 2838: x_return_status := Fnd_Api.g_ret_sts_error ;

2834: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceTbl');
2835: END IF;
2836: EXCEPTION
2837: WHEN Fnd_Api.G_EXC_ERROR THEN
2838: x_return_status := Fnd_Api.g_ret_sts_error ;
2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2841:
2842: WHEN OTHERS THEN

Line 2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2835: END IF;
2836: EXCEPTION
2837: WHEN Fnd_Api.G_EXC_ERROR THEN
2838: x_return_status := Fnd_Api.g_ret_sts_error ;
2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2841:
2842: WHEN OTHERS THEN
2843: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2836: EXCEPTION
2837: WHEN Fnd_Api.G_EXC_ERROR THEN
2838: x_return_status := Fnd_Api.g_ret_sts_error ;
2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2841:
2842: WHEN OTHERS THEN
2843: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2844: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2843: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2839: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2840: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2841:
2842: WHEN OTHERS THEN
2843: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2844: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2845: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2846: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2847: fnd_message.set_token('ERRNO', SQLCODE);

Line 2867: x_return_status := fnd_api.g_ret_sts_success;

2863: l_api_name constant VARCHAR2(30) := 'Update_InterfaceErrSts';
2864: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
2865: BEGIN
2866: -- Initialize API return status to sucess
2867: x_return_status := fnd_api.g_ret_sts_success;
2868: IF DPP_DEBUG_HIGH_ON THEN
2869: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update InterfaceErrSts');
2870: END IF;
2871:

Line 2901: WHEN Fnd_Api.G_EXC_ERROR THEN

2897: IF DPP_DEBUG_HIGH_ON THEN
2898: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
2899: END IF;
2900: EXCEPTION
2901: WHEN Fnd_Api.G_EXC_ERROR THEN
2902: x_return_status := Fnd_Api.g_ret_sts_error ;
2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2905: WHEN OTHERS THEN

Line 2902: x_return_status := Fnd_Api.g_ret_sts_error ;

2898: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update InterfaceErrSts');
2899: END IF;
2900: EXCEPTION
2901: WHEN Fnd_Api.G_EXC_ERROR THEN
2902: x_return_status := Fnd_Api.g_ret_sts_error ;
2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2905: WHEN OTHERS THEN
2906: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2899: END IF;
2900: EXCEPTION
2901: WHEN Fnd_Api.G_EXC_ERROR THEN
2902: x_return_status := Fnd_Api.g_ret_sts_error ;
2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2905: WHEN OTHERS THEN
2906: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2907: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2900: EXCEPTION
2901: WHEN Fnd_Api.G_EXC_ERROR THEN
2902: x_return_status := Fnd_Api.g_ret_sts_error ;
2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2905: WHEN OTHERS THEN
2906: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2907: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2908: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2906: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2902: x_return_status := Fnd_Api.g_ret_sts_error ;
2903: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2905: WHEN OTHERS THEN
2906: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2907: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2908: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2909: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
2910: fnd_message.set_token('ERRNO', SQLCODE);

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

2925: -- NOTES
2926: -- 1. Transaction_int_header id
2927: ----------------------------------------------------------------------
2928: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2929: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2930: , p_commit IN VARCHAR2 := fnd_api.g_false
2931: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2932: , p_transaction_int_header_id IN NUMBER
2933: , p_operating_unit IN VARCHAR2 DEFAULT NULL

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

2926: -- 1. Transaction_int_header id
2927: ----------------------------------------------------------------------
2928: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2929: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2930: , p_commit IN VARCHAR2 := fnd_api.g_false
2931: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2932: , p_transaction_int_header_id IN NUMBER
2933: , p_operating_unit IN VARCHAR2 DEFAULT NULL
2934: , x_return_status OUT nocopy VARCHAR2

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

2927: ----------------------------------------------------------------------
2928: PROCEDURE Insert_Transaction(p_api_version IN NUMBER
2929: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
2930: , p_commit IN VARCHAR2 := fnd_api.g_false
2931: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
2932: , p_transaction_int_header_id IN NUMBER
2933: , p_operating_unit IN VARCHAR2 DEFAULT NULL
2934: , x_return_status OUT nocopy VARCHAR2
2935: , x_msg_count OUT nocopy NUMBER

Line 2971: IF Fnd_Api.to_boolean(p_init_msg_list) THEN

2967:
2968: BEGIN
2969: -- Standard begin of API savepoint
2970: SAVEPOINT DPP_Insert_Transaction;
2971: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
2972: Fnd_Msg_Pub.initialize;
2973: END IF;
2974: IF NOT Fnd_Api.compatible_api_call
2975: (

Line 2974: IF NOT Fnd_Api.compatible_api_call

2970: SAVEPOINT DPP_Insert_Transaction;
2971: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
2972: Fnd_Msg_Pub.initialize;
2973: END IF;
2974: IF NOT Fnd_Api.compatible_api_call
2975: (
2976: l_api_version,
2977: p_api_version,
2978: l_api_name,

Line 2982: RAISE Fnd_Api.g_exc_unexpected_error;

2978: l_api_name,
2979: g_pkg_name
2980: )
2981: THEN
2982: RAISE Fnd_Api.g_exc_unexpected_error;
2983: END IF;
2984:
2985: -- Initialize API return status to sucess
2986: x_return_status := fnd_api.g_ret_sts_success;

Line 2986: x_return_status := fnd_api.g_ret_sts_success;

2982: RAISE Fnd_Api.g_exc_unexpected_error;
2983: END IF;
2984:
2985: -- Initialize API return status to sucess
2986: x_return_status := fnd_api.g_ret_sts_success;
2987:
2988:
2989: IF DPP_DEBUG_HIGH_ON THEN
2990: fnd_file.put_line(fnd_file.log, 'Begin Insert Transaction ' );

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

3085: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Ref Doc Num Status :'||l_return_status);
3086: IF DPP_DEBUG_HIGH_ON THEN
3087: fnd_file.put_line(fnd_file.log, 'Validate Ref Document Number Return Status: '||l_return_status ||'Error Msg: '||x_msg_data);
3088: END IF;
3089: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3090: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3091: Update_InterfaceErrSts(
3092: p_txn_header_rec_type => l_txn_header_rec_type
3093: ,x_return_status =>l_return_status

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

3105: IF DPP_DEBUG_HIGH_ON THEN
3106: 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);
3107: END IF;
3108:
3109: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3110: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3111: ROLLBACK TO DPP_Insert_Transaction;
3112: Update_InterfaceErrSts(
3113: p_txn_header_rec_type => l_txn_header_rec_type

Line 3116: RAISE Fnd_Api.g_exc_error;

3112: Update_InterfaceErrSts(
3113: p_txn_header_rec_type => l_txn_header_rec_type
3114: ,x_return_status =>l_return_status
3115: );
3116: RAISE Fnd_Api.g_exc_error;
3117: END IF;
3118: --End Validate the Operating Unit
3119:
3120: --Validate the vendor Details

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

3128:
3129: IF DPP_DEBUG_HIGH_ON THEN
3130: fnd_file.put_line(fnd_file.log, 'Validate Supplier Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3131: END IF;
3132: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3133: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3134: ROLLBACK TO DPP_Insert_Transaction;
3135: Update_InterfaceErrSts(
3136: p_txn_header_rec_type => l_txn_header_rec_type

Line 3139: RAISE Fnd_Api.g_exc_error;

3135: Update_InterfaceErrSts(
3136: p_txn_header_rec_type => l_txn_header_rec_type
3137: ,x_return_status =>l_return_status
3138: );
3139: RAISE Fnd_Api.g_exc_error;
3140: END IF;
3141: --End Validate the vendor Details
3142:
3143: --ANBBALAS for 12_1_2

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

3152: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Supplier Trade Profile Status :' || l_return_status);
3153: IF DPP_DEBUG_HIGH_ON THEN
3154: fnd_file.put_line(fnd_file.log, 'Validate Supplier Trade Profile Return Status:' || l_return_status || 'Error Msg ' || x_msg_data);
3155: END IF;
3156: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3157: l_concatenated_error_message := l_concatenated_error_message || x_msg_data;
3158: ROLLBACK TO DPP_Insert_Transaction;
3159: Update_InterfaceErrSts(
3160: p_txn_header_rec_type => l_txn_header_rec_type

Line 3163: RAISE Fnd_Api.g_exc_error;

3159: Update_InterfaceErrSts(
3160: p_txn_header_rec_type => l_txn_header_rec_type
3161: ,x_return_status =>l_return_status
3162: );
3163: RAISE Fnd_Api.g_exc_error;
3164: END IF;
3165: --End Validate the Supplier Trade Profile setup
3166:
3167: --Validate the Process Execution Setup at Supplier Trade Profile or System Parameters

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

3176:
3177: IF DPP_DEBUG_HIGH_ON THEN
3178: fnd_file.put_line(fnd_file.log, 'Validate Execution Process Setup Status : ' || l_return_status || 'Error Msg ' || x_msg_data);
3179: END IF;
3180: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3181: l_concatenated_error_message :=l_concatenated_error_message || x_msg_data;
3182: ROLLBACK TO DPP_Insert_Transaction;
3183: Update_InterfaceErrSts(
3184: p_txn_header_rec_type => l_txn_header_rec_type

Line 3187: RAISE Fnd_Api.g_exc_error;

3183: Update_InterfaceErrSts(
3184: p_txn_header_rec_type => l_txn_header_rec_type
3185: ,x_return_status =>l_return_status
3186: );
3187: RAISE Fnd_Api.g_exc_error;
3188: END IF;
3189: --End Validate the Process Execution Setup at Supplier Trade Profile or System Parameters
3190:
3191: --Validate the transaction currency

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

3199:
3200: IF DPP_DEBUG_HIGH_ON THEN
3201: fnd_file.put_line(fnd_file.log, 'Validate Currency Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3202: END IF;
3203: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3204: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3205: Update_InterfaceErrSts(
3206: p_txn_header_rec_type => l_txn_header_rec_type
3207: ,x_return_status =>l_return_status

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

3218: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Validate Lines Status :'||l_return_status);
3219: IF DPP_DEBUG_HIGH_ON THEN
3220: fnd_file.put_line(fnd_file.log, 'Validate Line Details Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3221: END IF;
3222: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3223: ROLLBACK TO DPP_Insert_Transaction;
3224: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3225: Update_InterfaceErrSts(
3226: p_txn_header_rec_type => l_txn_header_rec_type

Line 3271: x_return_status := fnd_api.g_ret_sts_error;

3267: WHERE lookup_type = 'DPP_TRANSACTION_STATUSES'
3268: AND lookup_code = 'CANCELLED';
3269: EXCEPTION
3270: WHEN no_data_found THEN
3271: x_return_status := fnd_api.g_ret_sts_error;
3272: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3273: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
3274: END IF;
3275: x_msg_data := fnd_message.get();

Line 3276: --RAISE Fnd_Api.G_EXC_ERROR;

3272: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3273: fnd_message.set_name('DPP', 'DPP_TXN_STS_ERR');
3274: END IF;
3275: x_msg_data := fnd_message.get();
3276: --RAISE Fnd_Api.G_EXC_ERROR;
3277: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3278: Update_InterfaceErrSts(
3279: p_txn_header_rec_type => l_txn_header_rec_type
3280: ,x_return_status =>l_return_status

Line 3291: RAISE Fnd_Api.g_exc_error;

3287: fnd_file.put_line(fnd_file.log, ' Inbound Price Protection Transaction ' );
3288: END IF;
3289: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'New Transaction');
3290: IF l_concatenated_error_message IS NOT NULL THEN
3291: RAISE Fnd_Api.g_exc_error;
3292: END IF;
3293: -- Create Header record in dpp_transaction_headers_all table
3294: Create_Header(p_txn_header_rec_type => l_txn_header_rec_type
3295: ,x_msg_count => x_msg_count

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

3300: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create Header Status :'||l_return_status);
3301: IF DPP_DEBUG_HIGH_ON THEN
3302: fnd_file.put_line(fnd_file.log, 'Create Header Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3303: END IF;
3304: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3305: ROLLBACK TO DPP_Insert_Transaction;
3306: Update_InterfaceErrSts(
3307: p_txn_header_rec_type => l_txn_header_rec_type
3308: ,x_return_status =>l_return_status

Line 3310: RAISE Fnd_Api.g_exc_error;

3306: Update_InterfaceErrSts(
3307: p_txn_header_rec_type => l_txn_header_rec_type
3308: ,x_return_status =>l_return_status
3309: );
3310: RAISE Fnd_Api.g_exc_error;
3311: END IF;
3312: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Header');
3313: --Update Header history log
3314: IF l_log_enabled = 'Y' THEN

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

3320: IF DPP_DEBUG_HIGH_ON THEN
3321: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3322: END IF;
3323:
3324: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3325: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3326: END IF;
3327: END IF;
3328: --Get the lines in a tbl type

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

3337: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Form Line Tbl Status :'||l_return_status);
3338: IF DPP_DEBUG_HIGH_ON THEN
3339: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3340: END IF;
3341: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3342: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3343: Update_InterfaceLineErrSts(
3344: p_txn_header_rec_type => l_txn_header_rec_type,
3345: p_txn_lines_tbl_type => l_txn_lines_tbl_type

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

3360: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3361: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||substr(x_msg_data,1,1000));
3362: END IF;
3363:
3364: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3365: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3366: ROLLBACK TO DPP_Insert_Transaction;
3367: Update_InterfaceLineErrSts(
3368: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3375: RAISE Fnd_Api.g_exc_error;

3371: );
3372: END IF;
3373: IF l_concatenated_error_message IS NOT NULL THEN
3374: x_msg_data:= l_concatenated_error_message;
3375: RAISE Fnd_Api.g_exc_error;
3376: END IF;
3377: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Validate Supplier Part Number');
3378: --Call Insert lines procedure
3379: Create_lines( p_txn_header_rec_type => l_txn_header_rec_type

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

3385: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create Lines Status :'||l_return_status);
3386: IF DPP_DEBUG_HIGH_ON THEN
3387: fnd_file.put_line(fnd_file.log, 'Create Lines Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3388: END IF;
3389: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3390: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3391: ROLLBACK TO DPP_Insert_Transaction;
3392: Update_InterfaceLineErrSts(
3393: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3397: RAISE Fnd_Api.g_exc_error;

3393: p_txn_header_rec_type => l_txn_header_rec_type,
3394: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3395: ,x_return_status =>l_return_status
3396: );
3397: RAISE Fnd_Api.g_exc_error;
3398: END IF;
3399: --Update lines log
3400: IF l_log_enabled = 'Y' THEN
3401: Update_LinesLog(

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

3406: );
3407: IF DPP_DEBUG_HIGH_ON THEN
3408: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3409: END IF;
3410: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3411: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3412: Update_InterfaceLineErrSts(
3413: p_txn_header_rec_type => l_txn_header_rec_type,
3414: p_txn_lines_tbl_type => l_txn_lines_tbl_type

Line 3421: RAISE Fnd_Api.g_exc_error;

3417: END IF;
3418: END IF;
3419: IF l_concatenated_error_message IS NOT NULL THEN
3420: x_msg_data:= l_concatenated_error_message;
3421: RAISE Fnd_Api.g_exc_error;
3422: END IF;
3423: --Update Covered Inventory
3424: Update_CoveredInv(
3425: p_txn_header_rec_type => l_txn_header_rec_type

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

3431: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Update CoveredInv Status :'||l_return_status);
3432: IF DPP_DEBUG_HIGH_ON THEN
3433: fnd_file.put_line(fnd_file.log, 'Update Covered Inventory Return Status:'||l_return_status);
3434: END IF;
3435: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3436: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3437: ROLLBACK TO DPP_Insert_Transaction;
3438: Update_InterfaceLineErrSts(
3439: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3445: RAISE Fnd_Api.g_exc_error;

3441: ,x_return_status =>l_return_status
3442: );
3443: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Status '||l_return_status|| ' Message '||x_msg_data);
3444:
3445: RAISE Fnd_Api.g_exc_error;
3446: END IF;
3447: ELSE
3448: --The transaction is in Active/.... Status
3449: fnd_message.set_name('DPP', 'DPP_TRANSACTION_EXIST');

Line 3464: RAISE Fnd_Api.g_exc_error;

3460: Update_InterfaceErrSts(
3461: p_txn_header_rec_type => l_txn_header_rec_type
3462: ,x_return_status =>l_return_status
3463: );
3464: RAISE Fnd_Api.g_exc_error;
3465: END IF; --l_transaction_status is null
3466:
3467: fnd_message.set_name('DPP', 'DPP_TRANSACTION_CREATED');
3468: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);

Line 3479: RAISE Fnd_Api.g_exc_error;

3475:
3476: IF l_concatenated_error_message IS NOT NULL THEN
3477: x_msg_data := 'The Transaction for the supplier name '||l_txn_header_rec_type.vendor_name ||
3478: ',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;
3479: RAISE Fnd_Api.g_exc_error;
3480: END IF;
3481: --ANBBALAS for 12_1_2
3482: --Populate Execution Processes based on Supplier Trade Profile or System Parameters
3483: DPP_EXECUTIONPROCESS_PVT.InsertExecProcesses(p_txn_hdr_id => l_txn_header_rec_type.transaction_header_id

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

3490: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Insert Execution Processes Status : ' || l_return_status);
3491: IF DPP_DEBUG_HIGH_ON THEN
3492: fnd_file.put_line(fnd_file.log, 'Populate Execution Processes based on Supplier Trade Profile or System Parameters Status : ' || l_return_status || 'Error Msg ' || x_msg_data);
3493: END IF;
3494: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3495: l_concatenated_error_message := l_concatenated_error_message || x_msg_data;
3496: ROLLBACK TO DPP_Insert_Transaction;
3497: Update_InterfaceErrSts(
3498: p_txn_header_rec_type => l_txn_header_rec_type

Line 3501: RAISE Fnd_Api.g_exc_error;

3497: Update_InterfaceErrSts(
3498: p_txn_header_rec_type => l_txn_header_rec_type
3499: ,x_return_status => l_return_status
3500: );
3501: RAISE Fnd_Api.g_exc_error;
3502: END IF;
3503: --End Populate Execution Processes based on Supplier Trade Profile or System Parameters
3504:
3505: --The Transaction is an Approval response

Line 3516: --RAISE Fnd_Api.g_exc_error;

3512: Update_InterfaceErrSts(
3513: p_txn_header_rec_type => l_txn_header_rec_type
3514: ,x_return_status =>l_return_status
3515: );
3516: --RAISE Fnd_Api.g_exc_error;
3517: END IF;
3518: --Validate Supplier approved date,claim Number
3519: IF l_txn_header_rec_type.supplier_approval_date IS NULL
3520: THEN

Line 3532: -- RAISE Fnd_Api.g_exc_error;

3528: Update_InterfaceErrSts(
3529: p_txn_header_rec_type => l_txn_header_rec_type
3530: ,x_return_status =>l_return_status
3531: );
3532: -- RAISE Fnd_Api.g_exc_error;
3533: END IF;
3534: IF DPP_DEBUG_HIGH_ON THEN
3535: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');
3536: END IF;

Line 3539: RAISE Fnd_Api.g_exc_error;

3535: fnd_file.put_line(fnd_file.log, 'Inbound Approval Transaction');
3536: END IF;
3537: IF l_concatenated_error_message IS NOT NULL THEN
3538: x_msg_data:= l_concatenated_error_message;
3539: RAISE Fnd_Api.g_exc_error;
3540: END IF;
3541: --Get the lines in a tbl type
3542: form_line_tbl(
3543: p_txn_header_rec_type => l_txn_header_rec_type

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

3548: );
3549: IF DPP_DEBUG_HIGH_ON THEN
3550: fnd_file.put_line(fnd_file.log, 'Form Line Tbl Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3551: END IF;
3552: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3553: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3554: ROLLBACK TO DPP_Insert_Transaction;
3555: Update_InterfaceLineErrSts(
3556: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3560: --RAISE Fnd_Api.g_exc_error;

3556: p_txn_header_rec_type => l_txn_header_rec_type,
3557: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3558: ,x_return_status =>l_return_status
3559: );
3560: --RAISE Fnd_Api.g_exc_error;
3561: END IF;
3562: Validate_SupplierPartNum(
3563: p_txn_header_rec_type =>l_txn_header_rec_type
3564: ,p_txn_lines_tbl_type => l_txn_lines_tbl_type

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

3569: IF DPP_DEBUG_HIGH_ON THEN
3570: fnd_file.put_line(fnd_file.log, 'Validate SupplierPartNum Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3571: END IF;
3572:
3573: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3574: IF DPP_DEBUG_HIGH_ON THEN
3575: 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);
3576: END IF;
3577: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;

Line 3583: RAISE Fnd_Api.g_exc_error;

3579: p_txn_header_rec_type => l_txn_header_rec_type,
3580: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3581: ,x_return_status =>l_return_status
3582: );
3583: RAISE Fnd_Api.g_exc_error;
3584: END IF;
3585:
3586: --Call procedure to update approval details
3587: Update_Approval(

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

3593: );
3594: IF DPP_DEBUG_HIGH_ON THEN
3595: fnd_file.put_line(fnd_file.log, 'Update Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3596: END IF;
3597: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3598: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3599: ROLLBACK TO DPP_Insert_Transaction;
3600: Update_InterfaceLineErrSts(
3601: p_txn_header_rec_type => l_txn_header_rec_type,

Line 3605: --RAISE Fnd_Api.g_exc_error;

3601: p_txn_header_rec_type => l_txn_header_rec_type,
3602: p_txn_lines_tbl_type => l_txn_lines_tbl_type
3603: ,x_return_status =>l_return_status
3604: );
3605: --RAISE Fnd_Api.g_exc_error;
3606: END IF;
3607:
3608: IF l_concatenated_error_message IS NOT NULL THEN
3609: Update_InterfaceErrSts(

Line 3613: RAISE Fnd_Api.g_exc_error;

3609: Update_InterfaceErrSts(
3610: p_txn_header_rec_type => l_txn_header_rec_type
3611: ,x_return_status =>l_return_status
3612: );
3613: RAISE Fnd_Api.g_exc_error;
3614: END IF;
3615:
3616: --call header history API for log
3617: IF l_log_enabled = 'Y' THEN

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

3622: );
3623: IF DPP_DEBUG_HIGH_ON THEN
3624: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3625: END IF;
3626: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3627: --RAISE Fnd_Api.g_exc_error;
3628: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3629: END IF;
3630: --Call history log for lines

Line 3627: --RAISE Fnd_Api.g_exc_error;

3623: IF DPP_DEBUG_HIGH_ON THEN
3624: fnd_file.put_line(fnd_file.log, 'Update Header Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3625: END IF;
3626: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3627: --RAISE Fnd_Api.g_exc_error;
3628: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3629: END IF;
3630: --Call history log for lines
3631: Update_LinesLog(

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

3636: );
3637: IF DPP_DEBUG_HIGH_ON THEN
3638: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3639: END IF;
3640: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3641: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3642: --RAISE Fnd_Api.g_exc_error;
3643: END IF;
3644:

Line 3642: --RAISE Fnd_Api.g_exc_error;

3638: fnd_file.put_line(fnd_file.log, 'Update Lines Log Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3639: END IF;
3640: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3641: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3642: --RAISE Fnd_Api.g_exc_error;
3643: END IF;
3644:
3645: END IF;
3646: IF l_concatenated_error_message IS NOT NULL THEN

Line 3651: RAISE Fnd_Api.g_exc_error;

3647: Update_InterfaceErrSts(
3648: p_txn_header_rec_type => l_txn_header_rec_type
3649: ,x_return_status =>l_return_status
3650: );
3651: RAISE Fnd_Api.g_exc_error;
3652: END IF;
3653: --Call procedure to update the supplier approved by flag in claims table
3654:
3655: Update_ClaimsApproval (

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

3661: );
3662: IF DPP_DEBUG_HIGH_ON THEN
3663: fnd_file.put_line(fnd_file.log, 'Update Claims Approval Return Status:'||l_return_status ||'Error Msg'||x_msg_data);
3664: END IF;
3665: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3666: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3667: ROLLBACK TO DPP_Insert_Transaction;
3668: Update_InterfaceErrSts(
3669: p_txn_header_rec_type => l_txn_header_rec_type

Line 3672: --RAISE Fnd_Api.g_exc_error;

3668: Update_InterfaceErrSts(
3669: p_txn_header_rec_type => l_txn_header_rec_type
3670: ,x_return_status =>l_return_status
3671: );
3672: --RAISE Fnd_Api.g_exc_error;
3673: END IF;
3674: fnd_message.set_name('DPP', 'DPP_TRANSACTION_APPROVED');
3675: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3676: fnd_message.set_token('SUPPLIER_SITE', l_txn_header_rec_type.vendor_site_code);

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

3689: );
3690: IF DPP_DEBUG_HIGH_ON THEN
3691: fnd_file.put_line(fnd_file.log, 'Update Interface Table Return Status: '||l_return_status ||'Error Msg '||x_msg_data);
3692: END IF;
3693: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3694: l_concatenated_error_message :=l_concatenated_error_message|| x_msg_data;
3695: ROLLBACK TO DPP_Insert_Transaction;
3696: Update_InterfaceErrSts(
3697: p_txn_header_rec_type => l_txn_header_rec_type

Line 3700: --RAISE Fnd_Api.g_exc_error;

3696: Update_InterfaceErrSts(
3697: p_txn_header_rec_type => l_txn_header_rec_type
3698: ,x_return_status =>l_return_status
3699: );
3700: --RAISE Fnd_Api.g_exc_error;
3701: END IF;
3702: IF l_concatenated_error_message IS NOT NULL THEN
3703: Update_InterfaceErrSts(
3704: p_txn_header_rec_type => l_txn_header_rec_type

Line 3707: RAISE Fnd_Api.g_exc_error;

3703: Update_InterfaceErrSts(
3704: p_txn_header_rec_type => l_txn_header_rec_type
3705: ,x_return_status =>l_return_status
3706: );
3707: RAISE Fnd_Api.g_exc_error;
3708: END IF;
3709: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3710: EXCEPTION
3711: WHEN Fnd_Api.G_EXC_ERROR THEN

Line 3711: WHEN Fnd_Api.G_EXC_ERROR THEN

3707: RAISE Fnd_Api.g_exc_error;
3708: END IF;
3709: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3710: EXCEPTION
3711: WHEN Fnd_Api.G_EXC_ERROR THEN
3712: x_return_status := Fnd_Api.g_ret_sts_error ;
3713: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3714: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3715: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);

Line 3712: x_return_status := Fnd_Api.g_ret_sts_error ;

3708: END IF;
3709: END LOOP; --End of loop FOR fetch_header_rec IN fetch_header_cur
3710: EXCEPTION
3711: WHEN Fnd_Api.G_EXC_ERROR THEN
3712: x_return_status := Fnd_Api.g_ret_sts_error ;
3713: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3714: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3715: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3716: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);

Line 3723: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

3719: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP G_EXC_ERROR x_msg_data');
3720: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Status '||x_return_status|| ' Message '||x_msg_data);
3721:
3722:
3723: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3724: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');
3725: fnd_message.set_token('SUPPLIER_NAME', l_txn_header_rec_type.vendor_name);
3726: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3727: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);

Line 3730: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

3726: fnd_message.set_token('SUPPLIER_ID', l_txn_header_rec_type.vendor_id);
3727: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3728: x_msg_data := fnd_message.get();
3729: x_msg_data:= x_msg_data ||l_concatenated_error_message;
3730: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
3731: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP G_EXC_UNEXPECTED_ERROR Transaction Int header id '||l_txn_header_rec_type.transaction_int_header_id);
3732:
3733: WHEN OTHERS THEN
3734: fnd_message.set_name('DPP', 'DPP_TRANSACTION_ERROR');

Line 3741: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

3737: fnd_message.set_token('DOC_REF_NO', l_txn_header_rec_type.ref_document_number);
3738: x_msg_data := fnd_message.get();
3739: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error:' ||x_msg_data);
3740: x_msg_data := x_msg_data || l_concatenated_error_message;
3741: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
3742: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error after assignment:' ||x_msg_data);
3743: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
3744: THEN
3745: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);

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

3759: l_return_status VARCHAR2(30);
3760: l_msg_count NUMBER;
3761: l_msg_data VARCHAR2(4000);
3762:
3763: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3764: l_commit VARCHAR2(30) := fnd_api.g_false;
3765: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3766: l_transaction_int_header_id NUMBER;
3767:

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

3760: l_msg_count NUMBER;
3761: l_msg_data VARCHAR2(4000);
3762:
3763: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3764: l_commit VARCHAR2(30) := fnd_api.g_false;
3765: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3766: l_transaction_int_header_id NUMBER;
3767:
3768: BEGIN

Line 3765: l_validation_level NUMBER := fnd_api.g_valid_level_full;

3761: l_msg_data VARCHAR2(4000);
3762:
3763: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
3764: l_commit VARCHAR2(30) := fnd_api.g_false;
3765: l_validation_level NUMBER := fnd_api.g_valid_level_full;
3766: l_transaction_int_header_id NUMBER;
3767:
3768: BEGIN
3769: p_txn_header_rec_type.transaction_source := 'WEBADI';

Line 3967: x_return_status := fnd_api.g_ret_sts_unexp_error;

3963:
3964:
3965: EXCEPTION
3966: WHEN others THEN
3967: x_return_status := fnd_api.g_ret_sts_unexp_error;
3968: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3969: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
3970: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
3971: fnd_message.set_token('ERRNO', SQLCODE);

Line 4110: x_return_status := fnd_api.g_ret_sts_error;

4106:
4107:
4108: EXCEPTION
4109: WHEN create_IntLines_exception THEN
4110: x_return_status := fnd_api.g_ret_sts_error;
4111: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create IntLines l_error_message:'||l_error_message || 'sqlerrm'||sqlerrm);
4112: WHEN others THEN
4113: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create IntLines : SQLERRM:'||SQLERRM);
4114: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 4114: x_return_status := fnd_api.g_ret_sts_unexp_error;

4110: x_return_status := fnd_api.g_ret_sts_error;
4111: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create IntLines l_error_message:'||l_error_message || 'sqlerrm'||sqlerrm);
4112: WHEN others THEN
4113: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Create IntLines : SQLERRM:'||SQLERRM);
4114: x_return_status := fnd_api.g_ret_sts_unexp_error;
4115: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4116: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
4117: fnd_message.set_token('ROUTINE', 'DPP_TRANSACTION_PVT');
4118: fnd_message.set_token('ERRNO', SQLCODE);

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

4206: l_api_name constant VARCHAR2(30) := 'DPP_TRANSACTION_PVT';
4207: l_api_version constant NUMBER := 1.0;
4208: l_full_name constant VARCHAR2(60) := g_pkg_name || '.' || l_api_name;
4209:
4210: --l_commit VARCHAR2(30) := fnd_api.g_true;
4211: l_return_status VARCHAR2(30);
4212: l_msg_count NUMBER;
4213: l_msg_data VARCHAR2(4000);
4214:

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

4228:
4229: SAVEPOINT inbound_transaction;
4230:
4231:
4232: --l_return_status := fnd_api.g_ret_sts_success;
4233:
4234:
4235: IF p_distributor_operating_unit IS NULL THEN
4236: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP Entered OU in webadi api');

Line 4418: IF l_return_status = fnd_api.g_ret_sts_error THEN

4414: p_txn_header_rec_type => l_transaction_header_rec,
4415: x_rec_count => l_msg_count,
4416: x_return_status => l_return_status);
4417:
4418: IF l_return_status = fnd_api.g_ret_sts_error THEN
4419: RAISE fnd_api.g_exc_error;
4420: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4421: RAISE fnd_api.g_exc_unexpected_error;
4422: END IF;

Line 4419: RAISE fnd_api.g_exc_error;

4415: x_rec_count => l_msg_count,
4416: x_return_status => l_return_status);
4417:
4418: IF l_return_status = fnd_api.g_ret_sts_error THEN
4419: RAISE fnd_api.g_exc_error;
4420: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4421: RAISE fnd_api.g_exc_unexpected_error;
4422: END IF;
4423:

Line 4420: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4416: x_return_status => l_return_status);
4417:
4418: IF l_return_status = fnd_api.g_ret_sts_error THEN
4419: RAISE fnd_api.g_exc_error;
4420: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4421: RAISE fnd_api.g_exc_unexpected_error;
4422: END IF;
4423:
4424: --lines

Line 4421: RAISE fnd_api.g_exc_unexpected_error;

4417:
4418: IF l_return_status = fnd_api.g_ret_sts_error THEN
4419: RAISE fnd_api.g_exc_error;
4420: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4421: RAISE fnd_api.g_exc_unexpected_error;
4422: END IF;
4423:
4424: --lines
4425: --Validate the vendor part number

Line 4434: IF l_return_status = fnd_api.g_ret_sts_error THEN

4430: x_msg_count => l_msg_count,
4431: x_return_status => l_return_status);
4432:
4433:
4434: IF l_return_status = fnd_api.g_ret_sts_error THEN
4435: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP SYSTEM ERROR');
4436: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4437: l_error_message := fnd_message.get();
4438: RAISE dpp_webadi_error;

Line 4439: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4435: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP SYSTEM ERROR');
4436: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4437: l_error_message := fnd_message.get();
4438: RAISE dpp_webadi_error;
4439: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4440: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP UNEXPECTED ERROR');
4441: RAISE fnd_api.g_exc_unexpected_error;
4442: END IF;
4443:

Line 4441: RAISE fnd_api.g_exc_unexpected_error;

4437: l_error_message := fnd_message.get();
4438: RAISE dpp_webadi_error;
4439: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4440: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP UNEXPECTED ERROR');
4441: RAISE fnd_api.g_exc_unexpected_error;
4442: END IF;
4443:
4444: EXCEPTION
4445: WHEN dpp_webadi_error THEN

Line 4452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4448: l_message := fnd_message.get();
4449: end if;
4450: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP in DPP_webadi_error:'||l_error_message);
4451: raise_application_error( -20000, l_message);
4452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4453: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4454: ROLLBACK TO inbound_transaction;
4455: IF length( SQLERRM) > 30 THEN
4456: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(SQLERRM,12,30));

Line 4453: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');

4449: end if;
4450: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP in DPP_webadi_error:'||l_error_message);
4451: raise_application_error( -20000, l_message);
4452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4453: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4454: ROLLBACK TO inbound_transaction;
4455: IF length( SQLERRM) > 30 THEN
4456: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(SQLERRM,12,30));
4457: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));

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

4489: l_msg_count NUMBER;
4490: l_msg_data VARCHAR2(2000);
4491: l_user_name VARCHAR2(30);
4492: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4493: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4494: l_commit VARCHAR2(30) := fnd_api.g_false;
4495: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4496: l_transaction_int_header_id NUMBER;
4497: l_ref_document_number VARCHAR2(40);

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

4490: l_msg_data VARCHAR2(2000);
4491: l_user_name VARCHAR2(30);
4492: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4493: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4494: l_commit VARCHAR2(30) := fnd_api.g_false;
4495: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4496: l_transaction_int_header_id NUMBER;
4497: l_ref_document_number VARCHAR2(40);
4498: dpp_webadi_importer_error EXCEPTION;

Line 4495: l_validation_level NUMBER := fnd_api.g_valid_level_full;

4491: l_user_name VARCHAR2(30);
4492: l_user_id NUMBER :=FND_PROFILE.VALUE('USER_ID');
4493: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
4494: l_commit VARCHAR2(30) := fnd_api.g_false;
4495: l_validation_level NUMBER := fnd_api.g_valid_level_full;
4496: l_transaction_int_header_id NUMBER;
4497: l_ref_document_number VARCHAR2(40);
4498: dpp_webadi_importer_error EXCEPTION;
4499: l_error_message VARCHAR2(4000);

Line 4520: x_return_status := fnd_api.g_ret_sts_success;

4516: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP_INBOUND_PVT_BODY site:'||p_supplier_site);
4517: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP_INBOUND_PVT_BODY ref:'||p_document_reference_number);
4518: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'DPP_INBOUND_PVT_BODY unit: '||p_operating_unit);
4519: -- Initialize API return status to sucess
4520: x_return_status := fnd_api.g_ret_sts_success;
4521: --open cursor
4522: OPEN transaction_cur(p_document_reference_number,p_supplier_name,p_supplier_site,p_operating_unit);
4523: FETCH transaction_cur INTO l_transaction_int_header_id;
4524: CLOSE transaction_cur;

Line 4543: IF x_return_status = Fnd_Api.g_ret_sts_error THEN

4539: , x_msg_data =>x_msg_data
4540: ) ;
4541:
4542:
4543: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4544: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4545: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4546: fnd_message.set_token('MESSAGE', x_msg_data);
4547: RAISE FND_API.G_EXC_ERROR;

Line 4544: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_error');

4540: ) ;
4541:
4542:
4543: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4544: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4545: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4546: fnd_message.set_token('MESSAGE', x_msg_data);
4547: RAISE FND_API.G_EXC_ERROR;
4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 4547: RAISE FND_API.G_EXC_ERROR;

4543: IF x_return_status = Fnd_Api.g_ret_sts_error THEN
4544: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4545: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4546: fnd_message.set_token('MESSAGE', x_msg_data);
4547: RAISE FND_API.G_EXC_ERROR;
4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4549: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4550: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4551: fnd_message.set_token('MESSAGE', x_msg_data);

Line 4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

4544: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_error');
4545: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4546: fnd_message.set_token('MESSAGE', x_msg_data);
4547: RAISE FND_API.G_EXC_ERROR;
4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4549: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4550: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4551: fnd_message.set_token('MESSAGE', x_msg_data);
4552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 4549: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');

4545: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4546: fnd_message.set_token('MESSAGE', x_msg_data);
4547: RAISE FND_API.G_EXC_ERROR;
4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4549: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4550: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4551: fnd_message.set_token('MESSAGE', x_msg_data);
4552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4553: END IF;

Line 4552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4548: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4549: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create WebADI Transaction Fnd_Api.g_ret_sts_unexp_error');
4550: fnd_message.set_name('DPP', 'DPP_WEBADI_IMPORT_ERROR');
4551: fnd_message.set_token('MESSAGE', x_msg_data);
4552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4553: END IF;
4554: EXCEPTION
4555: WHEN Fnd_Api.G_EXC_ERROR THEN
4556: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ***----*** EXCEPTION G_EXC_ERROR:');

Line 4555: WHEN Fnd_Api.G_EXC_ERROR THEN

4551: fnd_message.set_token('MESSAGE', x_msg_data);
4552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4553: END IF;
4554: EXCEPTION
4555: WHEN Fnd_Api.G_EXC_ERROR THEN
4556: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ***----*** EXCEPTION G_EXC_ERROR:');
4557: x_return_status := Fnd_Api.g_ret_sts_error;
4558: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4559: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);

Line 4557: x_return_status := Fnd_Api.g_ret_sts_error;

4553: END IF;
4554: EXCEPTION
4555: WHEN Fnd_Api.G_EXC_ERROR THEN
4556: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ***----*** EXCEPTION G_EXC_ERROR:');
4557: x_return_status := Fnd_Api.g_ret_sts_error;
4558: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4559: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4560: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4561: WHEN OTHERS THEN

Line 4558: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4554: EXCEPTION
4555: WHEN Fnd_Api.G_EXC_ERROR THEN
4556: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ***----*** EXCEPTION G_EXC_ERROR:');
4557: x_return_status := Fnd_Api.g_ret_sts_error;
4558: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4559: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4560: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4561: WHEN OTHERS THEN
4562: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION OTHERS'||SQLERRM);

Line 4560: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4556: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ***----*** EXCEPTION G_EXC_ERROR:');
4557: x_return_status := Fnd_Api.g_ret_sts_error;
4558: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4559: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4560: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4561: WHEN OTHERS THEN
4562: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION OTHERS'||SQLERRM);
4563: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4564: --ROLLBACK TO dpp_create_webadi_transaction;

Line 4563: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4559: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP ************EXCEPTION G_EXC_UNEXPECTED_ERROR'||x_msg_data);
4560: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4561: WHEN OTHERS THEN
4562: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION OTHERS'||SQLERRM);
4563: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4564: --ROLLBACK TO dpp_create_webadi_transaction;
4565: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4566: THEN
4567: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);

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

4569: END create_webadi_transaction;
4570:
4571: PROCEDURE Raise_OutBoundEvent(
4572: p_api_version IN NUMBER
4573: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4574: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4575: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4576: ,p_party_id IN VARCHAR2
4577: ,p_party_site_id IN VARCHAR2

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

4570:
4571: PROCEDURE Raise_OutBoundEvent(
4572: p_api_version IN NUMBER
4573: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4574: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4575: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4576: ,p_party_id IN VARCHAR2
4577: ,p_party_site_id IN VARCHAR2
4578: ,p_claim_id IN VARCHAR2

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

4571: PROCEDURE Raise_OutBoundEvent(
4572: p_api_version IN NUMBER
4573: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4574: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4575: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
4576: ,p_party_id IN VARCHAR2
4577: ,p_party_site_id IN VARCHAR2
4578: ,p_claim_id IN VARCHAR2
4579: ,p_party_type IN VARCHAR2

Line 4607: x_return_status := fnd_api.g_ret_sts_success;

4603: count_def NUMBER;
4604: BEGIN
4605: SAVEPOINT DPP_Raise_OutBoundEvent;
4606: -- Initialize API return status to sucess
4607: x_return_status := fnd_api.g_ret_sts_success;
4608: evtkey := dbms_utility.get_time();
4609: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Event Key = ' || evtkey);
4610: l_event_test := wf_event.test(l_event_name);
4611: IF l_event_test = 'NONE' THEN

Line 4616: RAISE FND_API.g_exc_error;

4612: fnd_message.set_name('DPP', 'DPP_EVENT_SUBS_ERR');
4613: fnd_message.set_token('CLAIM_NUMBER', p_claim_id);
4614: x_msg_data := fnd_message.get();
4615: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'No enabled local subscriptions reference the event, or the event does not exist.');
4616: RAISE FND_API.g_exc_error;
4617: END IF;
4618: -- DEFINE IN WF ATTRIBUTES
4619: wf_event.addparametertolist(p_name => 'ECX_MAP_CODE', p_value => l_map_code, p_parameterlist => l_parameter_list);
4620: wf_event.addparametertolist(p_name => 'ECX_TRANSACTION_TYPE', p_value => l_transaction_type, p_parameterlist => l_parameter_list);

Line 4631: WHEN Fnd_Api.G_EXC_ERROR THEN

4627: wf_event.RAISE(l_event_name, evtkey, NULL, l_parameter_list, sysdate);
4628:
4629: COMMIT;
4630: EXCEPTION
4631: WHEN Fnd_Api.G_EXC_ERROR THEN
4632: x_return_status := Fnd_Api.g_ret_sts_error ;
4633: ROLLBACK TO DPP_Raise_OutBoundEvent;
4634: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4635: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 4632: x_return_status := Fnd_Api.g_ret_sts_error ;

4628:
4629: COMMIT;
4630: EXCEPTION
4631: WHEN Fnd_Api.G_EXC_ERROR THEN
4632: x_return_status := Fnd_Api.g_ret_sts_error ;
4633: ROLLBACK TO DPP_Raise_OutBoundEvent;
4634: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4635: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4636: ROLLBACK TO DPP_Raise_OutBoundEvent;

Line 4634: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

4630: EXCEPTION
4631: WHEN Fnd_Api.G_EXC_ERROR THEN
4632: x_return_status := Fnd_Api.g_ret_sts_error ;
4633: ROLLBACK TO DPP_Raise_OutBoundEvent;
4634: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4635: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4636: ROLLBACK TO DPP_Raise_OutBoundEvent;
4637: Fnd_Msg_Pub.Count_AND_Get
4638: ( p_count => x_msg_count,

Line 4635: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

4631: WHEN Fnd_Api.G_EXC_ERROR THEN
4632: x_return_status := Fnd_Api.g_ret_sts_error ;
4633: ROLLBACK TO DPP_Raise_OutBoundEvent;
4634: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4635: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4636: ROLLBACK TO DPP_Raise_OutBoundEvent;
4637: Fnd_Msg_Pub.Count_AND_Get
4638: ( p_count => x_msg_count,
4639: p_data => x_msg_data,

Line 4640: p_encoded => Fnd_Api.G_FALSE

4636: ROLLBACK TO DPP_Raise_OutBoundEvent;
4637: Fnd_Msg_Pub.Count_AND_Get
4638: ( p_count => x_msg_count,
4639: p_data => x_msg_data,
4640: p_encoded => Fnd_Api.G_FALSE
4641: );
4642: WHEN OTHERS THEN
4643: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4644: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 4643: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

4639: p_data => x_msg_data,
4640: p_encoded => Fnd_Api.G_FALSE
4641: );
4642: WHEN OTHERS THEN
4643: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
4644: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
4645: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
4646: fnd_message.set_token('ROUTINE', l_full_name);
4647: fnd_message.set_token('ERRNO', SQLCODE);

Line 4658: p_encoded => Fnd_Api.G_FALSE

4654: END IF;
4655: Fnd_Msg_Pub.Count_AND_Get
4656: ( p_count => x_msg_count,
4657: p_data => x_msg_data,
4658: p_encoded => Fnd_Api.G_FALSE
4659: );
4660: END Raise_OutBoundEvent;
4661:
4662: PROCEDURE inbound_approval(

Line 4764: x_return_status := fnd_api.g_ret_sts_success;

4760: l_message VARCHAR2(4000) := NULL;
4761:
4762: BEGIN
4763: SAVEPOINT inbound_approval;
4764: x_return_status := fnd_api.g_ret_sts_success;
4765:
4766: IF p_distributor_operating_unit IS NULL THEN
4767: fnd_message.set_name('DPP', 'DPP_OPERATING_UNIT_NULL');
4768: l_error_message := fnd_message.get();

Line 4937: IF l_return_status = fnd_api.g_ret_sts_error THEN

4933: p_txn_header_rec_type => l_transaction_header_rec,
4934: x_rec_count => l_msg_count,
4935: x_return_status => l_return_status);
4936:
4937: IF l_return_status = fnd_api.g_ret_sts_error THEN
4938: RAISE fnd_api.g_exc_error;
4939: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4940: RAISE fnd_api.g_exc_unexpected_error;
4941: END IF;

Line 4938: RAISE fnd_api.g_exc_error;

4934: x_rec_count => l_msg_count,
4935: x_return_status => l_return_status);
4936:
4937: IF l_return_status = fnd_api.g_ret_sts_error THEN
4938: RAISE fnd_api.g_exc_error;
4939: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4940: RAISE fnd_api.g_exc_unexpected_error;
4941: END IF;
4942: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;

Line 4939: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4935: x_return_status => l_return_status);
4936:
4937: IF l_return_status = fnd_api.g_ret_sts_error THEN
4938: RAISE fnd_api.g_exc_error;
4939: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4940: RAISE fnd_api.g_exc_unexpected_error;
4941: END IF;
4942: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;
4943: l_transaction_lines_rec.org_id :=l_transaction_header_rec.org_id;

Line 4940: RAISE fnd_api.g_exc_unexpected_error;

4936:
4937: IF l_return_status = fnd_api.g_ret_sts_error THEN
4938: RAISE fnd_api.g_exc_error;
4939: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4940: RAISE fnd_api.g_exc_unexpected_error;
4941: END IF;
4942: l_transaction_lines_rec.transaction_int_header_id :=l_transaction_header_rec.transaction_int_header_id;
4943: l_transaction_lines_rec.org_id :=l_transaction_header_rec.org_id;
4944:

Line 4951: IF l_return_status = fnd_api.g_ret_sts_error THEN

4947: x_msg_count => l_msg_count,
4948: x_return_status => l_return_status);
4949:
4950:
4951: IF l_return_status = fnd_api.g_ret_sts_error THEN
4952: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4953: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4954: l_error_message := fnd_message.get();
4955: RAISE dpp_webadi_error;

Line 4952: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);

4948: x_return_status => l_return_status);
4949:
4950:
4951: IF l_return_status = fnd_api.g_ret_sts_error THEN
4952: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4953: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4954: l_error_message := fnd_message.get();
4955: RAISE dpp_webadi_error;
4956: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

Line 4956: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4952: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error'||sqlerrm);
4953: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4954: l_error_message := fnd_message.get();
4955: RAISE dpp_webadi_error;
4956: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4957: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error');
4958: RAISE fnd_api.g_exc_unexpected_error;
4959: END IF;
4960:

Line 4957: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error');

4953: fnd_message.set_name('DPP', 'DPP_DUPLICATE_RECORDS');
4954: l_error_message := fnd_message.get();
4955: RAISE dpp_webadi_error;
4956: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4957: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error');
4958: RAISE fnd_api.g_exc_unexpected_error;
4959: END IF;
4960:
4961: EXCEPTION

Line 4958: RAISE fnd_api.g_exc_unexpected_error;

4954: l_error_message := fnd_message.get();
4955: RAISE dpp_webadi_error;
4956: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4957: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Create_Intlines fnd_api.g_ret_sts_error');
4958: RAISE fnd_api.g_exc_unexpected_error;
4959: END IF;
4960:
4961: EXCEPTION
4962:

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

4960:
4961: EXCEPTION
4962:
4963: WHEN dpp_webadi_error THEN
4964: --x_return_status := FND_API.G_RET_STS_ERROR;
4965: ROLLBACK TO inbound_approval;
4966: if l_error_message is NULL then
4967: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP in DPP_webadi_error l_error_message is null');
4968: l_error_message := fnd_message.get();

Line 4972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4968: l_error_message := fnd_message.get();
4969: end if;
4970: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP in DPP_webadi_error:'||l_error_message);
4971: raise_application_error( -20000, l_error_message);
4972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4973: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4974: ROLLBACK TO inbound_approval;
4975: IF length( SQLERRM) > 30 THEN
4976: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(SQLERRM,12,30));

Line 4973: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');

4969: end if;
4970: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP in DPP_webadi_error:'||l_error_message);
4971: raise_application_error( -20000, l_error_message);
4972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4973: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP IN FND_API.G_EXC_UNEXPECTED_ERROR BLOCK');
4974: ROLLBACK TO inbound_approval;
4975: IF length( SQLERRM) > 30 THEN
4976: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(SQLERRM,12,30));
4977: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));

Line 4992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4988: fnd_message.set_name ('DPP', substr(SQLERRM,12,30));
4989: ELSE
4990: fnd_message.set_name ('DPP', SQLERRM);
4991: END IF;
4992: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4993: l_error_message := fnd_message.get();
4994: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP l_error_message:'||l_error_message);
4995: raise_application_error( -20000, l_error_message);
4996: END inbound_approval;

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

5016: l_request_id NUMBER :=FND_GLOBAL.conc_request_id;
5017: l_program_id NUMBER :=FND_GLOBAL.conc_program_id;
5018: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
5019:
5020: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
5021: l_commit VARCHAR2(30) := fnd_api.g_false;
5022: l_validation_level NUMBER := fnd_api.g_valid_level_full;
5023:
5024: l_transaction_int_header_id NUMBER;

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

5017: l_program_id NUMBER :=FND_GLOBAL.conc_program_id;
5018: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
5019:
5020: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
5021: l_commit VARCHAR2(30) := fnd_api.g_false;
5022: l_validation_level NUMBER := fnd_api.g_valid_level_full;
5023:
5024: l_transaction_int_header_id NUMBER;
5025: l_line_count NUMBER := 0;

Line 5022: l_validation_level NUMBER := fnd_api.g_valid_level_full;

5018: l_prog_app_id NUMBER :=FND_GLOBAL.prog_appl_id;
5019:
5020: l_init_msg_list VARCHAR2(30) := fnd_api.g_false;
5021: l_commit VARCHAR2(30) := fnd_api.g_false;
5022: l_validation_level NUMBER := fnd_api.g_valid_level_full;
5023:
5024: l_transaction_int_header_id NUMBER;
5025: l_line_count NUMBER := 0;
5026: l_message VARCHAR2(250);

Line 5115: RAISE Fnd_Api.G_EXC_ERROR;

5111: END IF;
5112:
5113: EXCEPTION WHEN NO_DATA_FOUND THEN
5114: fnd_file.put_line(fnd_file.log, 'Error in deriving ID for the parameters');
5115: RAISE Fnd_Api.G_EXC_ERROR;
5116: END;
5117:
5118: FOR transaction_rec IN transaction_cur(p_document_reference_number,p_supplier_name,l_supplier_id,
5119: p_supplier_site,l_supplier_site_id,p_operating_unit,l_org_id)

Line 5140: RAISE Fnd_Api.G_EXC_ERROR;

5136: dtla.program_update_date = sysdate
5137: WHERE dtla.transaction_int_header_id = transaction_rec.transaction_int_header_id;
5138: EXCEPTION WHEN OTHERS THEN
5139: fnd_file.put_line(fnd_file.log, 'Error in updating request id into the table.');
5140: RAISE Fnd_Api.G_EXC_ERROR;
5141: END;
5142: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Call Insert Transaction p_transaction_int_header_id:'||transaction_rec.transaction_int_header_id);
5143: DPP_TRANSACTION_PVT.Insert_Transaction(
5144: p_api_version =>l_api_version

Line 5194: WHEN Fnd_Api.G_EXC_ERROR THEN

5190: FND_FILE.PUT_LINE(FND_FILE.LOG,'End Create Transaction');
5191: END IF;
5192:
5193: EXCEPTION
5194: WHEN Fnd_Api.G_EXC_ERROR THEN
5195: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION G_EXC_ERROR');
5196: ROLLBACK TO dpp_create_txn;
5197: Fnd_Msg_Pub.Count_AND_Get
5198: ( p_count => l_msg_count,

Line 5200: p_encoded => Fnd_Api.G_FALSE

5196: ROLLBACK TO dpp_create_txn;
5197: Fnd_Msg_Pub.Count_AND_Get
5198: ( p_count => l_msg_count,
5199: p_data => l_msg_data,
5200: p_encoded => Fnd_Api.G_FALSE
5201: );
5202: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5203: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION G_EXC_UNEXPECTED_ERROR');
5204: ROLLBACK TO dpp_create_txn;

Line 5202: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

5198: ( p_count => l_msg_count,
5199: p_data => l_msg_data,
5200: p_encoded => Fnd_Api.G_FALSE
5201: );
5202: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5203: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION G_EXC_UNEXPECTED_ERROR');
5204: ROLLBACK TO dpp_create_txn;
5205: Fnd_Msg_Pub.Count_AND_Get
5206: ( p_count => l_msg_count,

Line 5208: p_encoded => Fnd_Api.G_FALSE

5204: ROLLBACK TO dpp_create_txn;
5205: Fnd_Msg_Pub.Count_AND_Get
5206: ( p_count => l_msg_count,
5207: p_data => l_msg_data,
5208: p_encoded => Fnd_Api.G_FALSE
5209: );
5210: WHEN OTHERS THEN
5211: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'DPP EXCEPTION OTHERS'||SQLERRM);
5212: ROLLBACK TO dpp_create_txn;

Line 5220: p_encoded => Fnd_Api.G_FALSE

5216: END IF;
5217: Fnd_Msg_Pub.Count_AND_Get
5218: ( p_count => l_msg_count,
5219: p_data => l_msg_data,
5220: p_encoded => Fnd_Api.G_FALSE
5221: );
5222:
5223: END Create_Transaction;
5224: END DPP_TRANSACTION_PVT;