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_EXECUTIONPROCESS_PVT dependencies on FND_API

Line 28: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

24: G_NO_SETUP_MSG CONSTANT VARCHAR2(60) := 'Supplier Trade Profile or Process Setup not available';
25:
26: PROCEDURE EXECUTE_PROCESS(
27: P_API_VERSION IN NUMBER,
28: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
29: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
30: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
32: X_MSG_COUNT OUT NOCOPY NUMBER,

Line 29: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

25:
26: PROCEDURE EXECUTE_PROCESS(
27: P_API_VERSION IN NUMBER,
28: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
29: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
30: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
32: X_MSG_COUNT OUT NOCOPY NUMBER,
33: X_MSG_DATA OUT NOCOPY VARCHAR2,

Line 30: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

26: PROCEDURE EXECUTE_PROCESS(
27: P_API_VERSION IN NUMBER,
28: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
29: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
30: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
32: X_MSG_COUNT OUT NOCOPY NUMBER,
33: X_MSG_DATA OUT NOCOPY VARCHAR2,
34: P_TRANSACTION_HEADER_ID IN VARCHAR2,

Line 40: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

36: P_PROCESS_CODE IN VARCHAR2);
37:
38: PROCEDURE EXECUTE_NOTIF_PROCESSES(
39: P_API_VERSION IN NUMBER,
40: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
41: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
42: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
44: X_MSG_COUNT OUT NOCOPY NUMBER,

Line 41: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

37:
38: PROCEDURE EXECUTE_NOTIF_PROCESSES(
39: P_API_VERSION IN NUMBER,
40: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
41: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
42: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
44: X_MSG_COUNT OUT NOCOPY NUMBER,
45: X_MSG_DATA OUT NOCOPY VARCHAR2,

Line 42: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

38: PROCEDURE EXECUTE_NOTIF_PROCESSES(
39: P_API_VERSION IN NUMBER,
40: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
41: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
42: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
44: X_MSG_COUNT OUT NOCOPY NUMBER,
45: X_MSG_DATA OUT NOCOPY VARCHAR2,
46: P_SUPP_TRADE_PROFILE_ID IN VARCHAR2,

Line 161: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

157: --Initialize message list
158: FND_MSG_PUB.INITIALIZE;
159:
160: -- Initialize API return status to sucess
161: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
162:
163: --Get all the active transactions
164: FOR get_approved_txn_rec IN get_approved_txn_csr(p_in_txn_number) LOOP
165:

Line 180: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,

176: l_flag := TRUE;
177: l_setup_flag := TRUE;
178: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
179: FOR get_lines_for_updatepo_rec IN get_lines_for_updatepo_csr(get_approved_txn_rec.transaction_header_id) LOOP
180: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
181: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTPO');
182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
183: RAISE FND_API.G_EXC_ERROR;
184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

178: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
179: FOR get_lines_for_updatepo_rec IN get_lines_for_updatepo_csr(get_approved_txn_rec.transaction_header_id) LOOP
180: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
181: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTPO');
182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
183: RAISE FND_API.G_EXC_ERROR;
184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: END IF;

Line 183: RAISE FND_API.G_EXC_ERROR;

179: FOR get_lines_for_updatepo_rec IN get_lines_for_updatepo_csr(get_approved_txn_rec.transaction_header_id) LOOP
180: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
181: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTPO');
182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
183: RAISE FND_API.G_EXC_ERROR;
184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: END IF;
187: END LOOP;

Line 184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

180: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
181: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTPO');
182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
183: RAISE FND_API.G_EXC_ERROR;
184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: END IF;
187: END LOOP;
188: ELSE

Line 185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

181: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTPO');
182: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
183: RAISE FND_API.G_EXC_ERROR;
184: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: END IF;
187: END LOOP;
188: ELSE
189: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'UPDTPO');

Line 205: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,

201: l_flag := TRUE;
202: l_setup_flag := TRUE;
203: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
204: FOR get_lines_for_updateinv_rec IN get_lines_for_updateinv_csr(get_approved_txn_rec.transaction_header_id) LOOP
205: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
206: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'INVC');
207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
208: RAISE FND_API.G_EXC_ERROR;
209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

203: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
204: FOR get_lines_for_updateinv_rec IN get_lines_for_updateinv_csr(get_approved_txn_rec.transaction_header_id) LOOP
205: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
206: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'INVC');
207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
208: RAISE FND_API.G_EXC_ERROR;
209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
211: END IF;

Line 208: RAISE FND_API.G_EXC_ERROR;

204: FOR get_lines_for_updateinv_rec IN get_lines_for_updateinv_csr(get_approved_txn_rec.transaction_header_id) LOOP
205: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
206: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'INVC');
207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
208: RAISE FND_API.G_EXC_ERROR;
209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
211: END IF;
212: END LOOP;

Line 209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

205: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
206: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'INVC');
207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
208: RAISE FND_API.G_EXC_ERROR;
209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
211: END IF;
212: END LOOP;
213: ELSE

Line 210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

206: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'INVC');
207: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
208: RAISE FND_API.G_EXC_ERROR;
209: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
211: END IF;
212: END LOOP;
213: ELSE
214: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'INVC');

Line 230: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,

226: l_flag := TRUE;
227: l_setup_flag := TRUE;
228: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
229: FOR get_lines_for_updlistprice_rec IN get_lines_for_updlistprice_csr(get_approved_txn_rec.transaction_header_id) LOOP
230: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
231: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTLP');
232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
233: RAISE FND_API.G_EXC_ERROR;
234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

228: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
229: FOR get_lines_for_updlistprice_rec IN get_lines_for_updlistprice_csr(get_approved_txn_rec.transaction_header_id) LOOP
230: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
231: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTLP');
232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
233: RAISE FND_API.G_EXC_ERROR;
234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END IF;

Line 233: RAISE FND_API.G_EXC_ERROR;

229: FOR get_lines_for_updlistprice_rec IN get_lines_for_updlistprice_csr(get_approved_txn_rec.transaction_header_id) LOOP
230: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
231: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTLP');
232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
233: RAISE FND_API.G_EXC_ERROR;
234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END IF;
237: END LOOP;

Line 234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

230: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
231: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTLP');
232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
233: RAISE FND_API.G_EXC_ERROR;
234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END IF;
237: END LOOP;
238: ELSE

Line 235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

231: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'UPDTLP');
232: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
233: RAISE FND_API.G_EXC_ERROR;
234: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END IF;
237: END LOOP;
238: ELSE
239: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'UPDTLP');

Line 250: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,

246: FND_FILE.NEW_LINE(FND_FILE.LOG);
247: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*' || G_NO_REC_PROC_MSG || 'UPDTLP');
248: END IF;
249:
250: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
251: L_MSG_DATA, L_SUPP_TRADE_PROFILE_ID,P_IN_ORG_ID, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID,GET_APPROVED_TXN_REC.TRANSACTION_NUMBER);
252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
253: RAISE FND_API.G_EXC_ERROR;
254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

248: END IF;
249:
250: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
251: L_MSG_DATA, L_SUPP_TRADE_PROFILE_ID,P_IN_ORG_ID, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID,GET_APPROVED_TXN_REC.TRANSACTION_NUMBER);
252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
253: RAISE FND_API.G_EXC_ERROR;
254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: END IF;

Line 253: RAISE FND_API.G_EXC_ERROR;

249:
250: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
251: L_MSG_DATA, L_SUPP_TRADE_PROFILE_ID,P_IN_ORG_ID, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID,GET_APPROVED_TXN_REC.TRANSACTION_NUMBER);
252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
253: RAISE FND_API.G_EXC_ERROR;
254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: END IF;
257:

Line 254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

250: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
251: L_MSG_DATA, L_SUPP_TRADE_PROFILE_ID,P_IN_ORG_ID, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID,GET_APPROVED_TXN_REC.TRANSACTION_NUMBER);
252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
253: RAISE FND_API.G_EXC_ERROR;
254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: END IF;
257:
258: --Check if the customer claims tab is populated

Line 255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

251: L_MSG_DATA, L_SUPP_TRADE_PROFILE_ID,P_IN_ORG_ID, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID,GET_APPROVED_TXN_REC.TRANSACTION_NUMBER);
252: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
253: RAISE FND_API.G_EXC_ERROR;
254: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: END IF;
257:
258: --Check if the customer claims tab is populated
259: FOR get_customer_claim_rec IN get_customer_claim_csr(get_approved_txn_rec.transaction_header_id) LOOP

Line 260: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,

256: END IF;
257:
258: --Check if the customer claims tab is populated
259: FOR get_customer_claim_rec IN get_customer_claim_csr(get_approved_txn_rec.transaction_header_id) LOOP
260: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
261: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'POPCUSTCLAIM');
262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
263: RAISE FND_API.G_EXC_ERROR;
264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

258: --Check if the customer claims tab is populated
259: FOR get_customer_claim_rec IN get_customer_claim_csr(get_approved_txn_rec.transaction_header_id) LOOP
260: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
261: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'POPCUSTCLAIM');
262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
263: RAISE FND_API.G_EXC_ERROR;
264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: END IF;

Line 263: RAISE FND_API.G_EXC_ERROR;

259: FOR get_customer_claim_rec IN get_customer_claim_csr(get_approved_txn_rec.transaction_header_id) LOOP
260: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
261: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'POPCUSTCLAIM');
262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
263: RAISE FND_API.G_EXC_ERROR;
264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: END IF;
267: END LOOP;

Line 264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

260: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT,
261: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'POPCUSTCLAIM');
262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
263: RAISE FND_API.G_EXC_ERROR;
264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: END IF;
267: END LOOP;
268:

Line 265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

261: L_MSG_DATA, GET_APPROVED_TXN_REC.TRANSACTION_HEADER_ID, GET_APPROVED_TXN_REC.TRANSACTION_NUMBER, 'POPCUSTCLAIM');
262: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
263: RAISE FND_API.G_EXC_ERROR;
264: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: END IF;
267: END LOOP;
268:
269: END LOOP;

Line 275: WHEN FND_API.G_EXC_ERROR THEN

271: --Commit thechanges
272: COMMIT;
273:
274: EXCEPTION
275: WHEN FND_API.G_EXC_ERROR THEN
276: ROLLBACK TO INITIATE_EXEC;
277: retcode := 2;
278: errbuf := 'Error';
279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

Line 279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

275: WHEN FND_API.G_EXC_ERROR THEN
276: ROLLBACK TO INITIATE_EXEC;
277: retcode := 2;
278: errbuf := 'Error';
279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
280: IF l_msg_count > 1 THEN
281: FOR I IN 1..l_msg_count LOOP
282: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
283: END LOOP;

Line 288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

284: END IF;
285:
286: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));
287: FND_FILE.NEW_LINE(FND_FILE.LOG);
288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
289: ROLLBACK TO INITIATE_EXEC;
290: retcode := 2;
291: errbuf := 'Error';
292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

Line 292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
289: ROLLBACK TO INITIATE_EXEC;
290: retcode := 2;
291: errbuf := 'Error';
292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
293: IF l_msg_count > 1 THEN
294: FOR I IN 1..l_msg_count LOOP
295: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
296: END LOOP;

Line 311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

307: fnd_message.set_token('ERRNO', sqlcode);
308: fnd_message.set_token('REASON', sqlerrm);
309: FND_MSG_PUB.add;
310:
311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
312: IF l_msg_count > 1 THEN
313: FOR I IN 1..l_msg_count LOOP
314: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
315: END LOOP;

Line 336: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

332: -- org-id, transaction header id, transaction number.
333: ----------------------------------------------------------------------
334: PROCEDURE EXECUTE_NOTIF_PROCESSES(
335: P_API_VERSION IN NUMBER,
336: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
337: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
338: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
339: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
340: X_MSG_COUNT OUT NOCOPY NUMBER,

Line 337: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

333: ----------------------------------------------------------------------
334: PROCEDURE EXECUTE_NOTIF_PROCESSES(
335: P_API_VERSION IN NUMBER,
336: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
337: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
338: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
339: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
340: X_MSG_COUNT OUT NOCOPY NUMBER,
341: X_MSG_DATA OUT NOCOPY VARCHAR2,

Line 338: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

334: PROCEDURE EXECUTE_NOTIF_PROCESSES(
335: P_API_VERSION IN NUMBER,
336: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
337: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
338: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
339: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
340: X_MSG_COUNT OUT NOCOPY NUMBER,
341: X_MSG_DATA OUT NOCOPY VARCHAR2,
342: P_SUPP_TRADE_PROFILE_ID IN VARCHAR2,

Line 375: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)

371:
372: SAVEPOINT EXECUTE_NOTIF;
373:
374: -- Standard call to check for call compatibility.
375: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)
376: THEN
377: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_ERROR, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME || ' : Not a compatible API call.');
378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
379: END IF;

Line 378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

374: -- Standard call to check for call compatibility.
375: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)
376: THEN
377: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_ERROR, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME || ' : Not a compatible API call.');
378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
379: END IF;
380:
381: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
382:

Line 384: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN

380:
381: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
382:
383: --Initialize message list if p_init_msg_list is TRUE.
384: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
385: FND_MSG_PUB.INITIALIZE;
386: END IF;
387:
388: -- Initialize API return status to sucess

Line 389: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

385: FND_MSG_PUB.INITIALIZE;
386: END IF;
387:
388: -- Initialize API return status to sucess
389: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
390:
391: FOR get_lines_for_notif_rec IN get_lines_for_notif_csr(p_transaction_header_id) LOOP
392: l_flag := FALSE;
393: FOR get_auto_flag_rec IN get_auto_flag_csr(p_supp_trade_profile_id, 'NTFYPO', p_transaction_header_id) LOOP

Line 396: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,

392: l_flag := FALSE;
393: FOR get_auto_flag_rec IN get_auto_flag_csr(p_supp_trade_profile_id, 'NTFYPO', p_transaction_header_id) LOOP
394: l_flag := TRUE;
395: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
396: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
397: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'NTFYPO');
398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

394: l_flag := TRUE;
395: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
396: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
397: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'NTFYPO');
398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
401: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;

Line 399: RAISE FND_API.G_EXC_ERROR;

395: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
396: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
397: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'NTFYPO');
398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
401: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403: ELSE

Line 400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

396: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
397: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'NTFYPO');
398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
401: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403: ELSE
404: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'NTFYPO');

Line 401: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

397: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'NTFYPO');
398: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
401: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403: ELSE
404: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'NTFYPO');
405: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 419: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,

415: l_flag := FALSE;
416: FOR get_auto_flag_rec IN get_auto_flag_csr(p_supp_trade_profile_id, 'INPL', p_transaction_header_id) LOOP
417: l_flag := TRUE;
418: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
419: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
420: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'INPL');
421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
422: RAISE FND_API.G_EXC_ERROR;
423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

417: l_flag := TRUE;
418: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
419: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
420: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'INPL');
421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
422: RAISE FND_API.G_EXC_ERROR;
423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425: END IF;

Line 422: RAISE FND_API.G_EXC_ERROR;

418: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
419: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
420: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'INPL');
421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
422: RAISE FND_API.G_EXC_ERROR;
423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425: END IF;
426: ELSE

Line 423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

419: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
420: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'INPL');
421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
422: RAISE FND_API.G_EXC_ERROR;
423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425: END IF;
426: ELSE
427: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'INPL');

Line 424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

420: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'INPL');
421: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
422: RAISE FND_API.G_EXC_ERROR;
423: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425: END IF;
426: ELSE
427: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'INPL');
428: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 442: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,

438: l_flag := FALSE;
439: FOR get_auto_flag_rec IN get_auto_flag_csr(p_supp_trade_profile_id, 'OUTPL', p_transaction_header_id) LOOP
440: l_flag := TRUE;
441: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
442: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
443: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'OUTPL');
444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
445: RAISE FND_API.G_EXC_ERROR;
446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

440: l_flag := TRUE;
441: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
442: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
443: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'OUTPL');
444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
445: RAISE FND_API.G_EXC_ERROR;
446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;

Line 445: RAISE FND_API.G_EXC_ERROR;

441: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
442: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
443: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'OUTPL');
444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
445: RAISE FND_API.G_EXC_ERROR;
446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
449: ELSE

Line 446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

442: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
443: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'OUTPL');
444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
445: RAISE FND_API.G_EXC_ERROR;
446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
449: ELSE
450: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'OUTPL');

Line 447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

443: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'OUTPL');
444: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
445: RAISE FND_API.G_EXC_ERROR;
446: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
449: ELSE
450: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'OUTPL');
451: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 465: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,

461: l_flag := FALSE;
462: FOR get_auto_flag_rec IN get_auto_flag_csr(p_supp_trade_profile_id, 'PROMO', p_transaction_header_id) LOOP
463: l_flag := TRUE;
464: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
465: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
466: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'PROMO');
467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
468: RAISE FND_API.G_EXC_ERROR;
469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

Line 467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

463: l_flag := TRUE;
464: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
465: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
466: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'PROMO');
467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
468: RAISE FND_API.G_EXC_ERROR;
469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471: END IF;

Line 468: RAISE FND_API.G_EXC_ERROR;

464: IF get_auto_flag_rec.automatic_flag = 'Y' THEN
465: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
466: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'PROMO');
467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
468: RAISE FND_API.G_EXC_ERROR;
469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471: END IF;
472: ELSE

Line 469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

465: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, X_RETURN_STATUS, X_MSG_COUNT, X_MSG_DATA,
466: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'PROMO');
467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
468: RAISE FND_API.G_EXC_ERROR;
469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471: END IF;
472: ELSE
473: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'PROMO');

Line 470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

466: P_TRANSACTION_HEADER_ID,P_TRANSACTION_NUMBER, 'PROMO');
467: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
468: RAISE FND_API.G_EXC_ERROR;
469: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471: END IF;
472: ELSE
473: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_PROC_MSG || 'PROMO');
474: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 487: WHEN FND_API.G_EXC_ERROR THEN

483:
484: END LOOP;
485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO EXECUTE_NOTIF;
489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
490: IF x_msg_count > 1 THEN
491: FOR I IN 1..x_msg_count LOOP

Line 489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );

485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO EXECUTE_NOTIF;
489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
490: IF x_msg_count > 1 THEN
491: FOR I IN 1..x_msg_count LOOP
492: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
493: END LOOP;

Line 498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

494: END IF;
495: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || x_msg_data),1,4000));
496: FND_FILE.NEW_LINE(FND_FILE.LOG);
497:
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499: ROLLBACK TO EXECUTE_NOTIF;
500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
501: IF x_msg_count > 1 THEN
502: FOR I IN 1..x_msg_count LOOP

Line 500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );

496: FND_FILE.NEW_LINE(FND_FILE.LOG);
497:
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499: ROLLBACK TO EXECUTE_NOTIF;
500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
501: IF x_msg_count > 1 THEN
502: FOR I IN 1..x_msg_count LOOP
503: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
504: END LOOP;

Line 517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

513: fnd_message.set_token('ERRNO', sqlcode);
514: fnd_message.set_token('REASON', sqlerrm);
515: FND_MSG_PUB.add;
516:
517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
518: IF x_msg_count > 1 THEN
519: FOR I IN 1..x_msg_count LOOP
520: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
521: END LOOP;

Line 541: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,

537: -- PARAMETERS
538: -- transaction header id, transaction number, process code.
539: ----------------------------------------------------------------------
540: PROCEDURE EXECUTE_PROCESS(P_API_VERSION IN NUMBER,
541: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
542: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
543: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
544: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
545: X_MSG_COUNT OUT NOCOPY NUMBER,

Line 542: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,

538: -- transaction header id, transaction number, process code.
539: ----------------------------------------------------------------------
540: PROCEDURE EXECUTE_PROCESS(P_API_VERSION IN NUMBER,
541: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
542: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
543: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
544: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
545: X_MSG_COUNT OUT NOCOPY NUMBER,
546: X_MSG_DATA OUT NOCOPY VARCHAR2,

Line 543: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

539: ----------------------------------------------------------------------
540: PROCEDURE EXECUTE_PROCESS(P_API_VERSION IN NUMBER,
541: P_INIT_MSG_LIST IN VARCHAR2 := FND_API.G_FALSE,
542: P_COMMIT IN VARCHAR2 := FND_API.G_FALSE,
543: P_VALIDATION_LEVEL IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
544: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
545: X_MSG_COUNT OUT NOCOPY NUMBER,
546: X_MSG_DATA OUT NOCOPY VARCHAR2,
547: P_TRANSACTION_HEADER_ID IN VARCHAR2,

Line 567: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)

563:
564: SAVEPOINT EXEC_PROCESS;
565:
566: -- Standard call to check for call compatibility.
567: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)
568: THEN
569: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_ERROR, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME || ' : Not a compatible API call.');
570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571: END IF;

Line 570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

566: -- Standard call to check for call compatibility.
567: IF NOT FND_API.COMPATIBLE_API_CALL (L_API_VERSION, P_API_VERSION, L_API_NAME, G_PKG_NAME)
568: THEN
569: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_ERROR, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME || ' : Not a compatible API call.');
570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571: END IF;
572:
573: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
574:

Line 576: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN

572:
573: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
574:
575: --Initialize message list if p_init_msg_list is TRUE.
576: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
577: FND_MSG_PUB.INITIALIZE;
578: END IF;
579:
580: -- Initialize API return status to sucess

Line 581: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

577: FND_MSG_PUB.INITIALIZE;
578: END IF;
579:
580: -- Initialize API return status to sucess
581: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
582:
583: L_TXN_HDR_REC := NULL;
584: L_TXN_LINE_ID.DELETE();
585: L_TXN_HDR_REC.TRANSACTION_HEADER_ID := P_TRANSACTION_HEADER_ID;

Line 591: ,P_INIT_MSG_LIST => FND_API.G_FALSE

587: L_TXN_HDR_REC.PROCESS_CODE := P_PROCESS_CODE;
588:
589: --Raise business event for the process
590: DPP_BUSINESSEVENTS_PVT.RAISE_BUSINESS_EVENT( P_API_VERSION => 1.0
591: ,P_INIT_MSG_LIST => FND_API.G_FALSE
592: ,P_COMMIT => FND_API.G_FALSE
593: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
594: ,X_RETURN_STATUS => X_RETURN_STATUS
595: ,X_MSG_COUNT => X_MSG_COUNT

Line 592: ,P_COMMIT => FND_API.G_FALSE

588:
589: --Raise business event for the process
590: DPP_BUSINESSEVENTS_PVT.RAISE_BUSINESS_EVENT( P_API_VERSION => 1.0
591: ,P_INIT_MSG_LIST => FND_API.G_FALSE
592: ,P_COMMIT => FND_API.G_FALSE
593: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
594: ,X_RETURN_STATUS => X_RETURN_STATUS
595: ,X_MSG_COUNT => X_MSG_COUNT
596: ,X_MSG_DATA => X_MSG_DATA

Line 593: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

589: --Raise business event for the process
590: DPP_BUSINESSEVENTS_PVT.RAISE_BUSINESS_EVENT( P_API_VERSION => 1.0
591: ,P_INIT_MSG_LIST => FND_API.G_FALSE
592: ,P_COMMIT => FND_API.G_FALSE
593: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
594: ,X_RETURN_STATUS => X_RETURN_STATUS
595: ,X_MSG_COUNT => X_MSG_COUNT
596: ,X_MSG_DATA => X_MSG_DATA
597: ,P_TXN_HDR_REC => L_TXN_HDR_REC

Line 601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN

597: ,P_TXN_HDR_REC => L_TXN_HDR_REC
598: ,P_TXN_LINE_ID => L_TXN_LINE_ID
599: );
600:
601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
602: RAISE FND_API.G_EXC_ERROR;
603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN

Line 602: RAISE FND_API.G_EXC_ERROR;

598: ,P_TXN_LINE_ID => L_TXN_LINE_ID
599: );
600:
601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
602: RAISE FND_API.G_EXC_ERROR;
603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
606: FND_FILE.PUT_LINE(FND_FILE.LOG,'Business event raised for the process code : ' || P_PROCESS_CODE);

Line 603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN

599: );
600:
601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
602: RAISE FND_API.G_EXC_ERROR;
603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
606: FND_FILE.PUT_LINE(FND_FILE.LOG,'Business event raised for the process code : ' || P_PROCESS_CODE);
607: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

600:
601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
602: RAISE FND_API.G_EXC_ERROR;
603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
606: FND_FILE.PUT_LINE(FND_FILE.LOG,'Business event raised for the process code : ' || P_PROCESS_CODE);
607: FND_FILE.NEW_LINE(FND_FILE.LOG);
608: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*Business event raised for the process code : ' || P_PROCESS_CODE);

Line 605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN

601: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
602: RAISE FND_API.G_EXC_ERROR;
603: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
606: FND_FILE.PUT_LINE(FND_FILE.LOG,'Business event raised for the process code : ' || P_PROCESS_CODE);
607: FND_FILE.NEW_LINE(FND_FILE.LOG);
608: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*Business event raised for the process code : ' || P_PROCESS_CODE);
609: END IF;

Line 612: WHEN FND_API.G_EXC_ERROR THEN

608: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*Business event raised for the process code : ' || P_PROCESS_CODE);
609: END IF;
610:
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: ROLLBACK TO EXEC_PROCESS;
614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
615: IF x_msg_count > 1 THEN
616: FOR I IN 1..x_msg_count LOOP

Line 614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

610:
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: ROLLBACK TO EXEC_PROCESS;
614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
615: IF x_msg_count > 1 THEN
616: FOR I IN 1..x_msg_count LOOP
617: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
618: END LOOP;

Line 625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

621: FND_FILE.NEW_LINE(FND_FILE.LOG);
622: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || x_msg_data),1,4000));
623: FND_FILE.NEW_LINE(FND_FILE.LOG);
624:
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: ROLLBACK TO EXEC_PROCESS;
627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
628: IF x_msg_count > 1 THEN
629: FOR I IN 1..x_msg_count LOOP

Line 627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

623: FND_FILE.NEW_LINE(FND_FILE.LOG);
624:
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: ROLLBACK TO EXEC_PROCESS;
627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
628: IF x_msg_count > 1 THEN
629: FOR I IN 1..x_msg_count LOOP
630: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
631: END LOOP;

Line 645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

641: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
642: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
643: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
644: FND_MSG_PUB.ADD;
645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
646: IF x_msg_count > 1 THEN
647: FOR I IN 1..x_msg_count LOOP
648: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
649: END LOOP;

Line 692: RAISE FND_API.G_EXC_ERROR;

688: fnd_msg_pub.add;
689: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Supplier trade profile setup not available');
690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Supplier trade profile setup not available');
691: FND_FILE.NEW_LINE(FND_FILE.LOG);
692: RAISE FND_API.G_EXC_ERROR;
693: WHEN OTHERS THEN
694: L_RET_ID := null;
695: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
696: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);

Line 698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

694: L_RET_ID := null;
695: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
696: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching supp_trade_profile_id: ' || SQLERRM);
697: FND_FILE.NEW_LINE(FND_FILE.LOG);
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699:
700: END GET_SUPPLIER_TRADE_PROFILE_ID;
701:
702:

Line 746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

742: WHEN OTHERS THEN
743: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Exception while fetching from OZF_PROCESS_SETUP_ALL: ' || SQLERRM);
744: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while fetching from OZF_PROCESS_SETUP_ALL: ' || SQLERRM);
745: FND_FILE.NEW_LINE(FND_FILE.LOG);
746: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
747:
748: END IS_PROCESS_SETUP;
749:
750:

Line 787: RAISE FND_API.G_EXC_ERROR;

783: || P_VENDOR_ID || ' at site id ' || P_VENDOR_SITE_ID || ', org id ' || P_ORG_ID);
784: FND_FILE.NEW_LINE(FND_FILE.LOG);
785: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'No price protection setup available for vendor id : '
786: || P_VENDOR_ID || ' at site id ' || P_VENDOR_SITE_ID || ', org id ' || P_ORG_ID );
787: RAISE FND_API.G_EXC_ERROR;
788: END IF;
789: END IF;
790:
791: RETURN L_SUPP_TRADE_PROFILE_ID;

Line 851: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

847: --Initialize message list
848: FND_MSG_PUB.INITIALIZE;
849:
850: -- Initialize API return status to sucess
851: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
852:
853: BEGIN
854: SELECT AUTOMATE_NOTIFICATION_DAYS INTO L_DAYS
855: FROM OZF_SYS_PARAMETERS_ALL

Line 879: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE,FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,

875:
876: NO_TXN_FLAG := FALSE;
877:
878: L_SUPP_TRADE_PROFILE_ID := GET_PROCESS_SETUP_ID(GET_TXN_TO_NOTIFY_REC.VENDOR_ID, GET_TXN_TO_NOTIFY_REC.VENDOR_SITE_ID, P_IN_ORG_ID);
879: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE,FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,
880: l_supp_trade_profile_id,p_in_org_id, get_txn_to_notify_rec.transaction_header_id,get_txn_to_notify_rec.transaction_number);
881:
882: IF L_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
883: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_EVT_SUCCESS_MSG);

Line 882: IF L_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN

878: L_SUPP_TRADE_PROFILE_ID := GET_PROCESS_SETUP_ID(GET_TXN_TO_NOTIFY_REC.VENDOR_ID, GET_TXN_TO_NOTIFY_REC.VENDOR_SITE_ID, P_IN_ORG_ID);
879: EXECUTE_NOTIF_PROCESSES(L_API_VERSION, FND_API.G_FALSE,FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,
880: l_supp_trade_profile_id,p_in_org_id, get_txn_to_notify_rec.transaction_header_id,get_txn_to_notify_rec.transaction_number);
881:
882: IF L_RETURN_STATUS = FND_API.G_RET_STS_SUCCESS THEN
883: FND_FILE.PUT_LINE(FND_FILE.LOG, G_AUTO_EVT_SUCCESS_MSG);
884: FND_FILE.NEW_LINE(FND_FILE.LOG);
885: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*' || G_AUTO_EVT_SUCCESS_MSG );
886: ELSE

Line 889: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

885: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*' || G_AUTO_EVT_SUCCESS_MSG );
886: ELSE
887: retcode := 1;
888: errbuf := 'Warning';
889: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
890: IF l_msg_count > 1 THEN
891: FOR I IN 1..l_msg_count LOOP
892: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
893: END LOOP;

Line 915: WHEN FND_API.G_EXC_ERROR THEN

911: --Commit the changes
912: COMMIT;
913:
914: EXCEPTION
915: WHEN FND_API.G_EXC_ERROR THEN
916: ROLLBACK TO INITIATE_NOTIF;
917: retcode := 2;
918: errbuf := 'Error';
919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

Line 919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

915: WHEN FND_API.G_EXC_ERROR THEN
916: ROLLBACK TO INITIATE_NOTIF;
917: retcode := 2;
918: errbuf := 'Error';
919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
920: IF l_msg_count > 1 THEN
921: FOR I IN 1..l_msg_count LOOP
922: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
923: END LOOP;

Line 930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

926: FND_FILE.NEW_LINE(FND_FILE.LOG);
927: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));
928: FND_FILE.NEW_LINE(FND_FILE.LOG);
929:
930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
931: ROLLBACK TO INITIATE_NOTIF;
932: retcode := 2;
933: errbuf := 'Error';
934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

Line 934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
931: ROLLBACK TO INITIATE_NOTIF;
932: retcode := 2;
933: errbuf := 'Error';
934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
935: IF l_msg_count > 1 THEN
936: FOR I IN 1..l_msg_count LOOP
937: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
938: END LOOP;

Line 954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

950: fnd_message.set_token('ERRNO', sqlcode);
951: fnd_message.set_token('REASON', sqlerrm);
952: FND_MSG_PUB.add;
953:
954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
955: IF l_msg_count > 1 THEN
956: FOR I IN 1..l_msg_count LOOP
957: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
958: END LOOP;

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

978: -- 2.
979: ----------------------------------------------------------------------
980: PROCEDURE populate_ExecutionProcess(
981: p_api_version_number IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,

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

979: ----------------------------------------------------------------------
980: PROCEDURE populate_ExecutionProcess(
981: p_api_version_number IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
987: x_msg_data OUT NOCOPY VARCHAR2,

Line 984: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

980: PROCEDURE populate_ExecutionProcess(
981: p_api_version_number IN NUMBER,
982: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
983: p_commit IN VARCHAR2 := FND_API.G_FALSE,
984: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
985: x_return_status OUT NOCOPY VARCHAR2,
986: x_msg_count OUT NOCOPY NUMBER,
987: x_msg_data OUT NOCOPY VARCHAR2,
988: p_org_id IN NUMBER,

Line 1006: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1002: -- Standard Start of API savepoint
1003: SAVEPOINT POPULATE_EXECUTIONPROCESS;
1004:
1005: -- Standard call to check for call compatibility.
1006: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1007: p_api_version_number,
1008: l_api_name,
1009: G_PKG_NAME)
1010: THEN

Line 1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1007: p_api_version_number,
1008: l_api_name,
1009: G_PKG_NAME)
1010: THEN
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1012: END IF;
1013:
1014: -- Initialize message list if p_init_msg_list is set to TRUE.
1015: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1015: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1012: END IF;
1013:
1014: -- Initialize message list if p_init_msg_list is set to TRUE.
1015: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1016: FND_MSG_PUB.initialize;
1017: END IF;
1018:
1019: -- Initialize API return status to SUCCESS

Line 1020: x_return_status := FND_API.G_RET_STS_SUCCESS;

1016: FND_MSG_PUB.initialize;
1017: END IF;
1018:
1019: -- Initialize API return status to SUCCESS
1020: x_return_status := FND_API.G_RET_STS_SUCCESS;
1021:
1022: L_SUPP_TRADE_PROFILE_ID := GET_PROCESS_SETUP_ID(P_VENDOR_ID, P_VENDOR_SITE_ID, P_ORG_ID);
1023:
1024: --Process Setup exist

Line 1035: WHEN FND_API.G_EXC_ERROR THEN

1031: x_msg_data => x_msg_data,
1032: x_return_status => x_return_status );
1033:
1034: EXCEPTION
1035: WHEN FND_API.G_EXC_ERROR THEN
1036: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1037: x_return_status := FND_API.G_RET_STS_ERROR;
1038: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1039: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1037: x_return_status := FND_API.G_RET_STS_ERROR;

1033:
1034: EXCEPTION
1035: WHEN FND_API.G_EXC_ERROR THEN
1036: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1037: x_return_status := FND_API.G_RET_STS_ERROR;
1038: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1039: FND_FILE.NEW_LINE(FND_FILE.LOG);
1040: -- Standard call to get message count and if count=1, get the message
1041: FND_MSG_PUB.Count_And_Get (

Line 1042: p_encoded => FND_API.G_FALSE,

1038: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1039: FND_FILE.NEW_LINE(FND_FILE.LOG);
1040: -- Standard call to get message count and if count=1, get the message
1041: FND_MSG_PUB.Count_And_Get (
1042: p_encoded => FND_API.G_FALSE,
1043: p_count => x_msg_count,
1044: p_data => x_msg_data
1045: );
1046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1042: p_encoded => FND_API.G_FALSE,
1043: p_count => x_msg_count,
1044: p_data => x_msg_data
1045: );
1046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1047: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1049: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1050: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1044: p_data => x_msg_data
1045: );
1046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1047: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1049: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1050: FND_FILE.NEW_LINE(FND_FILE.LOG);
1051: -- Standard call to get message count and if count=1, get the message
1052: FND_MSG_PUB.Count_And_Get (

Line 1053: p_encoded => FND_API.G_FALSE,

1049: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1050: FND_FILE.NEW_LINE(FND_FILE.LOG);
1051: -- Standard call to get message count and if count=1, get the message
1052: FND_MSG_PUB.Count_And_Get (
1053: p_encoded => FND_API.G_FALSE,
1054: p_count => x_msg_count,
1055: p_data => x_msg_data
1056: );
1057: WHEN OTHERS THEN

Line 1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1055: p_data => x_msg_data
1056: );
1057: WHEN OTHERS THEN
1058: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1061: FND_FILE.NEW_LINE(FND_FILE.LOG);
1062: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 1067: p_encoded => FND_API.G_FALSE,

1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1064: END IF;
1065: -- Standard call to get message count and if count=1, get the message
1066: FND_MSG_PUB.Count_And_Get (
1067: p_encoded => FND_API.G_FALSE,
1068: p_count => x_msg_count,
1069: p_data => x_msg_data
1070: );
1071:

Line 1128: x_return_status := FND_API.G_RET_STS_SUCCESS;

1124: BEGIN
1125: SAVEPOINT InsertExecProcesses;
1126:
1127: -- Initialize API return status to SUCCESS
1128: x_return_status := FND_API.G_RET_STS_SUCCESS;
1129:
1130: BEGIN --Check if the transaction exists in DPP_EXECUTION_PROCESSES table
1131: OPEN get_exec_processes_cnt(p_txn_hdr_id);
1132: FETCH get_exec_processes_cnt INTO l_exe_process_cnt;

Line 1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1134: EXCEPTION
1135: WHEN OTHERS THEN
1136: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while checking if the transaction exists in DPP_EXECUTION_PROCESSES table: '||SQLERRM);
1137: FND_FILE.NEW_LINE(FND_FILE.LOG);
1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1139: END;
1140:
1141: IF l_exe_process_cnt > 0 THEN
1142: BEGIN

Line 1149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1145: EXCEPTION
1146: WHEN OTHERS THEN
1147: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while deleting the records from DPP_EXECUTION_PROCESSES table: ' || SQLERRM);
1148: FND_FILE.NEW_LINE(FND_FILE.LOG);
1149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1150: END;
1151: END IF;
1152:
1153: FOR get_process_codes_rec IN get_process_codes_csr(p_supp_trd_prfl_id)

Line 1177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1173: EXCEPTION
1174: WHEN OTHERS THEN
1175: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception while inserting into DPP_EXECUTION_PROCESSES: ' || SQLERRM);
1176: FND_FILE.NEW_LINE(FND_FILE.LOG);
1177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1178: END;
1179: END LOOP;
1180:
1181: EXCEPTION

Line 1182: WHEN FND_API.G_EXC_ERROR THEN

1178: END;
1179: END LOOP;
1180:
1181: EXCEPTION
1182: WHEN FND_API.G_EXC_ERROR THEN
1183: ROLLBACK TO InsertExecProcesses;
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1186: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1184: x_return_status := FND_API.G_RET_STS_ERROR;

1180:
1181: EXCEPTION
1182: WHEN FND_API.G_EXC_ERROR THEN
1183: ROLLBACK TO InsertExecProcesses;
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1186: FND_FILE.NEW_LINE(FND_FILE.LOG);
1187: -- Standard call to get message count and if count=1, get the message
1188: FND_MSG_PUB.Count_And_Get (

Line 1189: p_encoded => FND_API.G_FALSE,

1185: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1186: FND_FILE.NEW_LINE(FND_FILE.LOG);
1187: -- Standard call to get message count and if count=1, get the message
1188: FND_MSG_PUB.Count_And_Get (
1189: p_encoded => FND_API.G_FALSE,
1190: p_count => x_msg_count,
1191: p_data => x_msg_data
1192: );
1193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1189: p_encoded => FND_API.G_FALSE,
1190: p_count => x_msg_count,
1191: p_data => x_msg_data
1192: );
1193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1194: ROLLBACK TO InsertExecProcesses;
1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1196: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1197: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1191: p_data => x_msg_data
1192: );
1193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1194: ROLLBACK TO InsertExecProcesses;
1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1196: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1197: FND_FILE.NEW_LINE(FND_FILE.LOG);
1198: -- Standard call to get message count and if count=1, get the message
1199: FND_MSG_PUB.Count_And_Get (

Line 1200: p_encoded => FND_API.G_FALSE,

1196: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1197: FND_FILE.NEW_LINE(FND_FILE.LOG);
1198: -- Standard call to get message count and if count=1, get the message
1199: FND_MSG_PUB.Count_And_Get (
1200: p_encoded => FND_API.G_FALSE,
1201: p_count => x_msg_count,
1202: p_data => x_msg_data
1203: );
1204: WHEN OTHERS THEN

Line 1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1202: p_data => x_msg_data
1203: );
1204: WHEN OTHERS THEN
1205: ROLLBACK TO InsertExecProcesses;
1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1207: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1208: FND_FILE.NEW_LINE(FND_FILE.LOG);
1209: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 1214: p_encoded => FND_API.G_FALSE,

1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1211: END IF;
1212: -- Standard call to get message count and if count=1, get the message
1213: FND_MSG_PUB.Count_And_Get (
1214: p_encoded => FND_API.G_FALSE,
1215: p_count => x_msg_count,
1216: p_data => x_msg_data
1217: );
1218:

Line 1318: , p_init_msg_list => FND_API.G_FALSE

1314: IF l_skip_adjustment_flag = 'Y' AND l_skip_approval_flag = 'N' THEN
1315: BEGIN
1316: DPP_APPROVAL_PVT.Get_AllApprovers(
1317: p_api_version => 1.0
1318: , p_init_msg_list => FND_API.G_FALSE
1319: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1320: , x_return_status => l_return_status
1321: , x_msg_data => l_msg_data
1322: , x_msg_count => l_msg_count

Line 1319: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1315: BEGIN
1316: DPP_APPROVAL_PVT.Get_AllApprovers(
1317: p_api_version => 1.0
1318: , p_init_msg_list => FND_API.G_FALSE
1319: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1320: , x_return_status => l_return_status
1321: , x_msg_data => l_msg_data
1322: , x_msg_count => l_msg_count
1323: , p_approval_rec => l_approval_rec

Line 1328: RAISE FND_API.G_EXC_ERROR;

1324: , p_approversOut => l_approversOut
1325: );
1326:
1327: IF l_approversOut.COUNT = 0 THEN
1328: RAISE FND_API.G_EXC_ERROR;
1329: END IF;
1330:
1331: UPDATE dpp_transaction_headers_all
1332: SET transaction_status = 'PENDING_APPROVAL',

Line 1345: , p_init_msg_list => FND_API.G_FALSE

1341: WHERE transaction_header_id = l_transaction_header_id;
1342:
1343: DPP_APPROVAL_PVT.Process_User_Action (
1344: p_api_version => 1.0
1345: , p_init_msg_list => FND_API.G_FALSE
1346: , p_commit => FND_API.G_FALSE
1347: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1348: , x_return_status => l_return_status
1349: , x_msg_data => l_msg_data

Line 1346: , p_commit => FND_API.G_FALSE

1342:
1343: DPP_APPROVAL_PVT.Process_User_Action (
1344: p_api_version => 1.0
1345: , p_init_msg_list => FND_API.G_FALSE
1346: , p_commit => FND_API.G_FALSE
1347: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1348: , x_return_status => l_return_status
1349: , x_msg_data => l_msg_data
1350: , x_msg_count => l_msg_count

Line 1347: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1343: DPP_APPROVAL_PVT.Process_User_Action (
1344: p_api_version => 1.0
1345: , p_init_msg_list => FND_API.G_FALSE
1346: , p_commit => FND_API.G_FALSE
1347: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1348: , x_return_status => l_return_status
1349: , x_msg_data => l_msg_data
1350: , x_msg_count => l_msg_count
1351: , p_approval_rec => l_approval_rec

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

1352: , p_approver_id => null
1353: , x_final_approval_flag => l_final_approval_flag
1354: );
1355:
1356: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1357: fnd_file.put_line(fnd_file.log, l_msg_data);
1358: fnd_file.new_line(fnd_file.log);
1359: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1360: END IF;

Line 1359: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1355:
1356: IF l_return_status = Fnd_Api.g_ret_sts_error OR l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1357: fnd_file.put_line(fnd_file.log, l_msg_data);
1358: fnd_file.new_line(fnd_file.log);
1359: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1360: END IF;
1361:
1362: EXCEPTION
1363: WHEN FND_API.G_EXC_ERROR THEN

Line 1363: WHEN FND_API.G_EXC_ERROR THEN

1359: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1360: END IF;
1361:
1362: EXCEPTION
1363: WHEN FND_API.G_EXC_ERROR THEN
1364: l_msg_data := fnd_message.get_string('DPP','DPP_AME_NO_APP');
1365: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Transaction Number : ' || l_transaction_number || ' Ref. Document Number : ' || l_ref_document_number);
1366: FND_FILE.NEW_LINE(FND_FILE.LOG);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Message : ' || l_msg_data);

Line 1369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1365: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Transaction Number : ' || l_transaction_number || ' Ref. Document Number : ' || l_ref_document_number);
1366: FND_FILE.NEW_LINE(FND_FILE.LOG);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Message : ' || l_msg_data);
1368: FND_FILE.NEW_LINE(FND_FILE.LOG);
1369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1370: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Transaction Number : ' || l_transaction_number || ' Ref. Document Number : ' || l_ref_document_number);
1371: FND_FILE.NEW_LINE(FND_FILE.LOG);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error Message : ' || l_msg_data);
1373: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1376: fnd_message.set_token('ROUTINE', l_full_name);
1377: fnd_message.set_token('ERRNO', sqlcode);
1378: fnd_message.set_token('REASON', sqlerrm);
1379: FND_MSG_PUB.add;
1380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1381: END;
1382:
1383: ELSIF l_skip_adjustment_flag = 'Y' AND l_skip_approval_flag = 'Y' THEN
1384: BEGIN

Line 1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1419: fnd_message.set_token('ROUTINE', l_full_name);
1420: fnd_message.set_token('ERRNO', sqlcode);
1421: fnd_message.set_token('REASON', sqlerrm);
1422: FND_MSG_PUB.add;
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END;
1425:
1426: ELSE
1427:

Line 1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1447: fnd_message.set_token('ROUTINE', l_full_name);
1448: fnd_message.set_token('ERRNO', sqlcode);
1449: fnd_message.set_token('REASON', sqlerrm);
1450: FND_MSG_PUB.add;
1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1452: END;
1453:
1454: END IF;
1455:

Line 1458: , p_init_msg_list => FND_API.G_FALSE

1454: END IF;
1455:
1456: Update_HeaderLog(
1457: p_api_version_number => 1.0
1458: , p_init_msg_list => FND_API.G_FALSE
1459: , p_commit => FND_API.G_FALSE
1460: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1461: , x_return_status => l_return_status
1462: , x_msg_count => l_msg_count

Line 1459: , p_commit => FND_API.G_FALSE

1455:
1456: Update_HeaderLog(
1457: p_api_version_number => 1.0
1458: , p_init_msg_list => FND_API.G_FALSE
1459: , p_commit => FND_API.G_FALSE
1460: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1461: , x_return_status => l_return_status
1462: , x_msg_count => l_msg_count
1463: , x_msg_data => l_msg_data

Line 1460: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1456: Update_HeaderLog(
1457: p_api_version_number => 1.0
1458: , p_init_msg_list => FND_API.G_FALSE
1459: , p_commit => FND_API.G_FALSE
1460: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1461: , x_return_status => l_return_status
1462: , x_msg_count => l_msg_count
1463: , x_msg_data => l_msg_data
1464: , p_transaction_header_id => l_transaction_header_id

Line 1471: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

1467: IF G_DEBUG THEN
1468: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1469: END IF;
1470:
1471: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1472: RAISE Fnd_Api.g_exc_error;
1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1474: RAISE Fnd_Api.g_exc_unexpected_error;
1475: END IF;

Line 1472: RAISE Fnd_Api.g_exc_error;

1468: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1469: END IF;
1470:
1471: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1472: RAISE Fnd_Api.g_exc_error;
1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1474: RAISE Fnd_Api.g_exc_unexpected_error;
1475: END IF;
1476:

Line 1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1469: END IF;
1470:
1471: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1472: RAISE Fnd_Api.g_exc_error;
1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1474: RAISE Fnd_Api.g_exc_unexpected_error;
1475: END IF;
1476:
1477: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,

Line 1474: RAISE Fnd_Api.g_exc_unexpected_error;

1470:
1471: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1472: RAISE Fnd_Api.g_exc_error;
1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1474: RAISE Fnd_Api.g_exc_unexpected_error;
1475: END IF;
1476:
1477: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,
1478: l_transaction_header_id, l_transaction_number, 'POPINVDTLS');

Line 1477: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,

1473: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1474: RAISE Fnd_Api.g_exc_unexpected_error;
1475: END IF;
1476:
1477: EXECUTE_PROCESS(L_API_VERSION, FND_API.G_FALSE, FND_API.G_FALSE, FND_API.G_VALID_LEVEL_FULL, L_RETURN_STATUS, L_MSG_COUNT, L_MSG_DATA,
1478: l_transaction_header_id, l_transaction_number, 'POPINVDTLS');
1479:
1480: END LOOP;
1481:

Line 1486: ,p_init_msg_list => FND_API.G_FALSE

1482: IF l_eligible_txn_exist = 'Y' THEN
1483:
1484: --Invoke the API to raise the business event
1485: DPP_BUSINESSEVENTS_PVT.RAISE_EFFECTIVE_DATE_EVENT( p_api_version => 1.0
1486: ,p_init_msg_list => FND_API.G_FALSE
1487: ,p_commit => FND_API.G_FALSE
1488: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1489: ,x_return_status => l_return_status
1490: ,x_msg_data => l_msg_data

Line 1487: ,p_commit => FND_API.G_FALSE

1483:
1484: --Invoke the API to raise the business event
1485: DPP_BUSINESSEVENTS_PVT.RAISE_EFFECTIVE_DATE_EVENT( p_api_version => 1.0
1486: ,p_init_msg_list => FND_API.G_FALSE
1487: ,p_commit => FND_API.G_FALSE
1488: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1489: ,x_return_status => l_return_status
1490: ,x_msg_data => l_msg_data
1491: ,x_msg_count => l_msg_count

Line 1488: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

1484: --Invoke the API to raise the business event
1485: DPP_BUSINESSEVENTS_PVT.RAISE_EFFECTIVE_DATE_EVENT( p_api_version => 1.0
1486: ,p_init_msg_list => FND_API.G_FALSE
1487: ,p_commit => FND_API.G_FALSE
1488: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1489: ,x_return_status => l_return_status
1490: ,x_msg_data => l_msg_data
1491: ,x_msg_count => l_msg_count
1492: ,p_program_id => l_request_id

Line 1495: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

1491: ,x_msg_count => l_msg_count
1492: ,p_program_id => l_request_id
1493: );
1494:
1495: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1496: FND_FILE.PUT_LINE(FND_FILE.LOG,'Invoked API to send WF Notifications to the '
1497: || 'Creator on the effective date of the Price Protection Transaction');
1498: FND_FILE.NEW_LINE(FND_FILE.LOG);
1499: ELSE

Line 1505: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1501: ||'Creator on the effective date of the Price Protection Transaction');
1502: FND_FILE.NEW_LINE(FND_FILE.LOG);
1503: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : '||l_msg_data),1,4000));
1504: FND_FILE.NEW_LINE(FND_FILE.LOG);
1505: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1506: END IF;
1507:
1508: ELSE
1509: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No Price protection transactions effective today.');

Line 1518: WHEN FND_API.G_EXC_ERROR THEN

1514: --Commit the changes
1515: COMMIT;
1516:
1517: EXCEPTION
1518: WHEN FND_API.G_EXC_ERROR THEN
1519: ROLLBACK TO Change_Status;
1520: retcode := 2;
1521: errbuf := 'Error';
1522: -- Standard call to get message count and if count=1, get the message

Line 1524: p_encoded => FND_API.G_FALSE,

1520: retcode := 2;
1521: errbuf := 'Error';
1522: -- Standard call to get message count and if count=1, get the message
1523: FND_MSG_PUB.Count_And_Get (
1524: p_encoded => FND_API.G_FALSE,
1525: p_count => l_msg_count,
1526: p_data => l_msg_data
1527: );
1528: IF l_msg_count > 1 THEN

Line 1536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1532: END IF;
1533:
1534: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));
1535: FND_FILE.NEW_LINE(FND_FILE.LOG);
1536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1537: ROLLBACK TO Change_Status;
1538: retcode := 2;
1539: errbuf := 'Error';
1540: -- Standard call to get message count and if count=1, get the message

Line 1542: p_encoded => FND_API.G_FALSE,

1538: retcode := 2;
1539: errbuf := 'Error';
1540: -- Standard call to get message count and if count=1, get the message
1541: FND_MSG_PUB.Count_And_Get (
1542: p_encoded => FND_API.G_FALSE,
1543: p_count => l_msg_count,
1544: p_data => l_msg_data
1545: );
1546: IF l_msg_count > 1 THEN

Line 1566: p_encoded => FND_API.G_FALSE,

1562: FND_MSG_PUB.add;
1563:
1564: -- Standard call to get message count and if count=1, get the message
1565: FND_MSG_PUB.Count_And_Get (
1566: p_encoded => FND_API.G_FALSE,
1567: p_count => l_msg_count,
1568: p_data => l_msg_data
1569: );
1570: IF l_msg_count > 1 THEN

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

1594: -- 2.
1595: ----------------------------------------------------------------------
1596: PROCEDURE approve_transaction(
1597: p_api_version_number IN NUMBER,
1598: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1599: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1600: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1601: x_return_status OUT NOCOPY VARCHAR2,
1602: x_msg_count OUT NOCOPY NUMBER,

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

1595: ----------------------------------------------------------------------
1596: PROCEDURE approve_transaction(
1597: p_api_version_number IN NUMBER,
1598: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1599: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1600: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1601: x_return_status OUT NOCOPY VARCHAR2,
1602: x_msg_count OUT NOCOPY NUMBER,
1603: x_msg_data OUT NOCOPY VARCHAR2,

Line 1600: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

1596: PROCEDURE approve_transaction(
1597: p_api_version_number IN NUMBER,
1598: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1599: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1600: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1601: x_return_status OUT NOCOPY VARCHAR2,
1602: x_msg_count OUT NOCOPY NUMBER,
1603: x_msg_data OUT NOCOPY VARCHAR2,
1604: p_txn_hdr_id IN NUMBER

Line 1644: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1640: -- Standard Start of API savepoint
1641: SAVEPOINT APPROVE_TRANSACTION;
1642:
1643: -- Standard call to check for call compatibility.
1644: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1645: p_api_version_number,
1646: l_api_name,
1647: G_PKG_NAME)
1648: THEN

Line 1649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1645: p_api_version_number,
1646: l_api_name,
1647: G_PKG_NAME)
1648: THEN
1649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1650: END IF;
1651:
1652: -- Initialize message list if p_init_msg_list is set to TRUE.
1653: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1653: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1650: END IF;
1651:
1652: -- Initialize message list if p_init_msg_list is set to TRUE.
1653: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1654: FND_MSG_PUB.initialize;
1655: END IF;
1656:
1657: -- Initialize API return status to SUCCESS

Line 1658: x_return_status := FND_API.G_RET_STS_SUCCESS;

1654: FND_MSG_PUB.initialize;
1655: END IF;
1656:
1657: -- Initialize API return status to SUCCESS
1658: x_return_status := FND_API.G_RET_STS_SUCCESS;
1659:
1660: update_status(
1661: p_api_version_number => l_api_version_number
1662: , p_init_msg_list => l_init_msg_list

Line 1676: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

1672: IF G_DEBUG THEN
1673: fnd_file.put_line(fnd_file.log, ' Update_Status. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1674: END IF;
1675:
1676: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1677: RAISE Fnd_Api.g_exc_error;
1678: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1679: RAISE Fnd_Api.g_exc_unexpected_error;
1680: END IF;

Line 1677: RAISE Fnd_Api.g_exc_error;

1673: fnd_file.put_line(fnd_file.log, ' Update_Status. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1674: END IF;
1675:
1676: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1677: RAISE Fnd_Api.g_exc_error;
1678: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1679: RAISE Fnd_Api.g_exc_unexpected_error;
1680: END IF;
1681:

Line 1678: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1674: END IF;
1675:
1676: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1677: RAISE Fnd_Api.g_exc_error;
1678: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1679: RAISE Fnd_Api.g_exc_unexpected_error;
1680: END IF;
1681:
1682: BEGIN

Line 1679: RAISE Fnd_Api.g_exc_unexpected_error;

1675:
1676: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1677: RAISE Fnd_Api.g_exc_error;
1678: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1679: RAISE Fnd_Api.g_exc_unexpected_error;
1680: END IF;
1681:
1682: BEGIN
1683: OPEN txn_dtls_cur(l_txn_hdr_id);

Line 1688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1684: FETCH txn_dtls_cur INTO l_txn_number, l_org_id;
1685: CLOSE txn_dtls_cur;
1686: EXCEPTION
1687: WHEN OTHERS THEN
1688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1689: END;
1690:
1691: --Call the Initiate execution process
1692: Initiate_ExecutionProcess(errbuff,

Line 1703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1699: fnd_file.put_line(fnd_file.log, ' Initiate_ExecutionProcess. retcode: ' || retcode || ' errbuff: ' || errbuff);
1700: END IF;
1701:
1702: IF retcode <> 0 THEN
1703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1704: END IF;
1705:
1706: EXCEPTION
1707: WHEN FND_API.G_EXC_ERROR THEN

Line 1707: WHEN FND_API.G_EXC_ERROR THEN

1703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1704: END IF;
1705:
1706: EXCEPTION
1707: WHEN FND_API.G_EXC_ERROR THEN
1708: ROLLBACK TO APPROVE_TRANSACTION;
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1711: --FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1709: x_return_status := FND_API.G_RET_STS_ERROR;

1705:
1706: EXCEPTION
1707: WHEN FND_API.G_EXC_ERROR THEN
1708: ROLLBACK TO APPROVE_TRANSACTION;
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1711: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1712: -- Standard call to get message count and if count=1, get the message
1713: FND_MSG_PUB.Count_And_Get (

Line 1714: p_encoded => FND_API.G_FALSE,

1710: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1711: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1712: -- Standard call to get message count and if count=1, get the message
1713: FND_MSG_PUB.Count_And_Get (
1714: p_encoded => FND_API.G_FALSE,
1715: p_count => x_msg_count,
1716: p_data => x_msg_data
1717: );
1718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1714: p_encoded => FND_API.G_FALSE,
1715: p_count => x_msg_count,
1716: p_data => x_msg_data
1717: );
1718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1719: ROLLBACK TO APPROVE_TRANSACTION;
1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1722: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1716: p_data => x_msg_data
1717: );
1718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1719: ROLLBACK TO APPROVE_TRANSACTION;
1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1722: FND_FILE.NEW_LINE(FND_FILE.LOG);
1723: -- Standard call to get message count and if count=1, get the message
1724: FND_MSG_PUB.Count_And_Get (

Line 1725: p_encoded => FND_API.G_FALSE,

1721: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1722: FND_FILE.NEW_LINE(FND_FILE.LOG);
1723: -- Standard call to get message count and if count=1, get the message
1724: FND_MSG_PUB.Count_And_Get (
1725: p_encoded => FND_API.G_FALSE,
1726: p_count => x_msg_count,
1727: p_data => x_msg_data
1728: );
1729: WHEN OTHERS THEN

Line 1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1727: p_data => x_msg_data
1728: );
1729: WHEN OTHERS THEN
1730: ROLLBACK TO APPROVE_TRANSACTION;
1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1733: FND_FILE.NEW_LINE(FND_FILE.LOG);
1734: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 1739: p_encoded => FND_API.G_FALSE,

1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1736: END IF;
1737: -- Standard call to get message count and if count=1, get the message
1738: FND_MSG_PUB.Count_And_Get (
1739: p_encoded => FND_API.G_FALSE,
1740: p_count => x_msg_count,
1741: p_data => x_msg_data
1742: );
1743:

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

1758: -- 2.
1759: ----------------------------------------------------------------------
1760: PROCEDURE update_status(
1761: p_api_version_number IN NUMBER,
1762: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1763: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1764: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1765: x_return_status OUT NOCOPY VARCHAR2,
1766: x_msg_count OUT NOCOPY NUMBER,

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

1759: ----------------------------------------------------------------------
1760: PROCEDURE update_status(
1761: p_api_version_number IN NUMBER,
1762: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1763: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1764: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1765: x_return_status OUT NOCOPY VARCHAR2,
1766: x_msg_count OUT NOCOPY NUMBER,
1767: x_msg_data OUT NOCOPY VARCHAR2,

Line 1764: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

1760: PROCEDURE update_status(
1761: p_api_version_number IN NUMBER,
1762: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1763: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1764: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1765: x_return_status OUT NOCOPY VARCHAR2,
1766: x_msg_count OUT NOCOPY NUMBER,
1767: x_msg_data OUT NOCOPY VARCHAR2,
1768: p_txn_hdr_id IN NUMBER,

Line 1789: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1785: -- Standard Start of API savepoint
1786: SAVEPOINT UPDATE_STATUS;
1787:
1788: -- Standard call to check for call compatibility.
1789: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1790: p_api_version_number,
1791: l_api_name,
1792: G_PKG_NAME)
1793: THEN

Line 1794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1790: p_api_version_number,
1791: l_api_name,
1792: G_PKG_NAME)
1793: THEN
1794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1797: -- Initialize message list if p_init_msg_list is set to TRUE.
1798: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1798: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1797: -- Initialize message list if p_init_msg_list is set to TRUE.
1798: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1799: FND_MSG_PUB.initialize;
1800: END IF;
1801:
1802: -- Initialize API return status to SUCCESS

Line 1803: x_return_status := FND_API.G_RET_STS_SUCCESS;

1799: FND_MSG_PUB.initialize;
1800: END IF;
1801:
1802: -- Initialize API return status to SUCCESS
1803: x_return_status := FND_API.G_RET_STS_SUCCESS;
1804:
1805: UPDATE dpp_transaction_headers_all
1806: SET transaction_status = p_to_status,
1807: object_version_number = object_version_number +1,

Line 1828: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

1824: IF G_DEBUG THEN
1825: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1826: END IF;
1827:
1828: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1829: RAISE Fnd_Api.g_exc_error;
1830: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1831: RAISE Fnd_Api.g_exc_unexpected_error;
1832: END IF;

Line 1829: RAISE Fnd_Api.g_exc_error;

1825: fnd_file.put_line(fnd_file.log, ' Update_HeaderLog. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1826: END IF;
1827:
1828: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1829: RAISE Fnd_Api.g_exc_error;
1830: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1831: RAISE Fnd_Api.g_exc_unexpected_error;
1832: END IF;
1833:

Line 1830: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1826: END IF;
1827:
1828: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1829: RAISE Fnd_Api.g_exc_error;
1830: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1831: RAISE Fnd_Api.g_exc_unexpected_error;
1832: END IF;
1833:
1834: EXCEPTION

Line 1831: RAISE Fnd_Api.g_exc_unexpected_error;

1827:
1828: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1829: RAISE Fnd_Api.g_exc_error;
1830: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1831: RAISE Fnd_Api.g_exc_unexpected_error;
1832: END IF;
1833:
1834: EXCEPTION
1835: WHEN FND_API.G_EXC_ERROR THEN

Line 1835: WHEN FND_API.G_EXC_ERROR THEN

1831: RAISE Fnd_Api.g_exc_unexpected_error;
1832: END IF;
1833:
1834: EXCEPTION
1835: WHEN FND_API.G_EXC_ERROR THEN
1836: ROLLBACK TO UPDATE_STATUS;
1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1839: --FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1837: x_return_status := FND_API.G_RET_STS_ERROR;

1833:
1834: EXCEPTION
1835: WHEN FND_API.G_EXC_ERROR THEN
1836: ROLLBACK TO UPDATE_STATUS;
1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1839: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1840: -- Standard call to get message count and if count=1, get the message
1841: FND_MSG_PUB.Count_And_Get (

Line 1842: p_encoded => FND_API.G_FALSE,

1838: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1839: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1840: -- Standard call to get message count and if count=1, get the message
1841: FND_MSG_PUB.Count_And_Get (
1842: p_encoded => FND_API.G_FALSE,
1843: p_count => x_msg_count,
1844: p_data => x_msg_data
1845: );
1846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1842: p_encoded => FND_API.G_FALSE,
1843: p_count => x_msg_count,
1844: p_data => x_msg_data
1845: );
1846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1847: ROLLBACK TO UPDATE_STATUS;
1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1849: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1850: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1844: p_data => x_msg_data
1845: );
1846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1847: ROLLBACK TO UPDATE_STATUS;
1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1849: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1850: FND_FILE.NEW_LINE(FND_FILE.LOG);
1851: -- Standard call to get message count and if count=1, get the message
1852: FND_MSG_PUB.Count_And_Get (

Line 1853: p_encoded => FND_API.G_FALSE,

1849: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1850: FND_FILE.NEW_LINE(FND_FILE.LOG);
1851: -- Standard call to get message count and if count=1, get the message
1852: FND_MSG_PUB.Count_And_Get (
1853: p_encoded => FND_API.G_FALSE,
1854: p_count => x_msg_count,
1855: p_data => x_msg_data
1856: );
1857: WHEN OTHERS THEN

Line 1859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1855: p_data => x_msg_data
1856: );
1857: WHEN OTHERS THEN
1858: ROLLBACK TO UPDATE_STATUS;
1859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1860: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1861: FND_FILE.NEW_LINE(FND_FILE.LOG);
1862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 1867: p_encoded => FND_API.G_FALSE,

1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1864: END IF;
1865: -- Standard call to get message count and if count=1, get the message
1866: FND_MSG_PUB.Count_And_Get (
1867: p_encoded => FND_API.G_FALSE,
1868: p_count => x_msg_count,
1869: p_data => x_msg_data
1870: );
1871:

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

1887: ----------------------------------------------------------------------
1888:
1889: PROCEDURE Update_HeaderLog(
1890: p_api_version_number IN NUMBER,
1891: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1892: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1893: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1894: x_return_status OUT NOCOPY VARCHAR2,
1895: x_msg_count OUT NOCOPY NUMBER,

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

1888:
1889: PROCEDURE Update_HeaderLog(
1890: p_api_version_number IN NUMBER,
1891: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1892: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1893: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1894: x_return_status OUT NOCOPY VARCHAR2,
1895: x_msg_count OUT NOCOPY NUMBER,
1896: x_msg_data OUT NOCOPY VARCHAR2,

Line 1893: p_validation_level IN NUMBER := FND_API.g_valid_level_full,

1889: PROCEDURE Update_HeaderLog(
1890: p_api_version_number IN NUMBER,
1891: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1892: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1893: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
1894: x_return_status OUT NOCOPY VARCHAR2,
1895: x_msg_count OUT NOCOPY NUMBER,
1896: x_msg_data OUT NOCOPY VARCHAR2,
1897: p_transaction_header_id IN NUMBER

Line 1928: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1924: -- Standard Start of API savepoint
1925: SAVEPOINT UPDATE_HEADERLOG;
1926:
1927: -- Standard call to check for call compatibility.
1928: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1929: p_api_version_number,
1930: l_api_name,
1931: G_PKG_NAME)
1932: THEN

Line 1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1929: p_api_version_number,
1930: l_api_name,
1931: G_PKG_NAME)
1932: THEN
1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;
1935:
1936: -- Initialize message list if p_init_msg_list is set to TRUE.
1937: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1937: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;
1935:
1936: -- Initialize message list if p_init_msg_list is set to TRUE.
1937: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1938: FND_MSG_PUB.initialize;
1939: END IF;
1940:
1941: -- Initialize API return status to SUCCESS

Line 1942: x_return_status := FND_API.G_RET_STS_SUCCESS;

1938: FND_MSG_PUB.initialize;
1939: END IF;
1940:
1941: -- Initialize API return status to SUCCESS
1942: x_return_status := FND_API.G_RET_STS_SUCCESS;
1943:
1944: IF G_DEBUG THEN
1945: FND_FILE.PUT_LINE(FND_FILE.LOG,' Begin Update HeaderLog');
1946: END IF;

Line 2028: IF l_return_status = Fnd_Api.g_ret_sts_error THEN

2024: IF G_DEBUG THEN
2025: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2026: END IF;
2027:
2028: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2029: RAISE Fnd_Api.g_exc_error;
2030: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2031: RAISE Fnd_Api.g_exc_unexpected_error;
2032: END IF;

Line 2029: RAISE Fnd_Api.g_exc_error;

2025: FND_FILE.PUT_LINE(FND_FILE.LOG,' End Update HeaderLog');
2026: END IF;
2027:
2028: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2029: RAISE Fnd_Api.g_exc_error;
2030: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2031: RAISE Fnd_Api.g_exc_unexpected_error;
2032: END IF;
2033: END LOOP;

Line 2030: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

2026: END IF;
2027:
2028: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2029: RAISE Fnd_Api.g_exc_error;
2030: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2031: RAISE Fnd_Api.g_exc_unexpected_error;
2032: END IF;
2033: END LOOP;
2034: END IF;

Line 2031: RAISE Fnd_Api.g_exc_unexpected_error;

2027:
2028: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
2029: RAISE Fnd_Api.g_exc_error;
2030: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2031: RAISE Fnd_Api.g_exc_unexpected_error;
2032: END IF;
2033: END LOOP;
2034: END IF;
2035: EXCEPTION

Line 2036: WHEN Fnd_Api.G_EXC_ERROR THEN

2032: END IF;
2033: END LOOP;
2034: END IF;
2035: EXCEPTION
2036: WHEN Fnd_Api.G_EXC_ERROR THEN
2037: x_return_status := Fnd_Api.g_ret_sts_error ;
2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN

Line 2037: x_return_status := Fnd_Api.g_ret_sts_error ;

2033: END LOOP;
2034: END IF;
2035: EXCEPTION
2036: WHEN Fnd_Api.G_EXC_ERROR THEN
2037: x_return_status := Fnd_Api.g_ret_sts_error ;
2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN
2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

Line 2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2034: END IF;
2035: EXCEPTION
2036: WHEN Fnd_Api.G_EXC_ERROR THEN
2037: x_return_status := Fnd_Api.g_ret_sts_error ;
2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN
2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2042: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2035: EXCEPTION
2036: WHEN Fnd_Api.G_EXC_ERROR THEN
2037: x_return_status := Fnd_Api.g_ret_sts_error ;
2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN
2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2042: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2043: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2037: x_return_status := Fnd_Api.g_ret_sts_error ;
2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN
2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2042: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2043: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2044: fnd_message.set_token('ROUTINE', l_full_name);
2045: fnd_message.set_token('ERRNO', SQLCODE);