DBA Data[Home] [Help]

APPS.OKL_ACCOUNTING_PROCESS_PVT dependencies on OKL_API

Line 96: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

92: l_tabv_tbl TABV_TBL_TYPE;
93: x_tabv_tbl TABV_TBL_TYPE;
94:
95: i NUMBER := 0;
96: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
97: l_api_version NUMBER := 1.0;
98: l_init_msg_list VARCHAR2(1);
99: l_msg_count NUMBER ;
100: l_msg_data VARCHAR2(2000);

Line 113: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

109: x_msg_count => l_msg_count,
110: x_msg_data => l_msg_data,
111: p_aetv_rec => p_aetv_rec);
112:
113: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
114:
115: FOR dist_rec IN dist_csr(p_aetv_rec.accounting_event_id)
116: LOOP
117: i := i + 1;

Line 217: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

213: l_api_version NUMBER := 1.0;
214: l_total_events NUMBER := 0;
215: l_trx_number OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE;
216:
217: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
218: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
219:
220: l_event_type_code OKL_ACCOUNTING_EVENTS.EVENT_TYPE_CODE%TYPE;
221: l_event_rec_in AETV_REC_TYPE;

Line 218: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

214: l_total_events NUMBER := 0;
215: l_trx_number OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE;
216:
217: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
218: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
219:
220: l_event_type_code OKL_ACCOUNTING_EVENTS.EVENT_TYPE_CODE%TYPE;
221: l_event_rec_in AETV_REC_TYPE;
222: l_event_rec_out AETV_REC_TYPE;

Line 231: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

227:
228:
229: BEGIN
230:
231: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
232:
233: FOR dists_rec IN dists_csr
234:
235: LOOP

Line 261: RAISE Okl_Api.G_EXCEPTION_ERROR;

257: l_trx_type_class;
258: IF (trx_csr%NOTFOUND) THEN
259: Fnd_File.PUT_LINE(Fnd_File.LOG, 'Could not get transaction Number and Transaction type Class');
260: CLOSE trx_csr;
261: RAISE Okl_Api.G_EXCEPTION_ERROR;
262: END IF;
263:
264: CLOSE trx_csr;
265:

Line 274: RAISE Okl_Api.G_EXCEPTION_ERROR;

270: l_trx_type_class;
271: IF (tal_csr%NOTFOUND) THEN
272: Fnd_File.PUT_LINE(Fnd_File.LOG, 'Could not get transaction Number and Transaction type Class');
273: CLOSE tal_csr;
274: RAISE Okl_Api.G_EXCEPTION_ERROR;
275: END IF;
276: CLOSE tal_csr;
277: ELSE
278: Fnd_File.PUT_LINE(Fnd_File.LOG, 'Invalid Source Table ' || dists_rec.source_table || ' found');

Line 279: RAISE Okl_Api.G_EXCEPTION_ERROR;

275: END IF;
276: CLOSE tal_csr;
277: ELSE
278: Fnd_File.PUT_LINE(Fnd_File.LOG, 'Invalid Source Table ' || dists_rec.source_table || ' found');
279: RAISE Okl_Api.G_EXCEPTION_ERROR;
280: END IF;
281:
282: -- Get the max event number for this source id and table combination
283:

Line 312: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

308: x_msg_data => x_msg_data,
309: p_aetv_rec => l_event_rec_in,
310: x_aetv_rec => l_event_rec_out);
311:
312: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
313: Fnd_File.PUT_LINE(Fnd_File.LOG,
314: 'Error in Creating Accounting event for transaction Number ' || l_trx_number);
315: RAISE Okl_Api.G_EXCEPTION_ERROR;
316: END IF;

Line 315: RAISE Okl_Api.G_EXCEPTION_ERROR;

311:
312: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
313: Fnd_File.PUT_LINE(Fnd_File.LOG,
314: 'Error in Creating Accounting event for transaction Number ' || l_trx_number);
315: RAISE Okl_Api.G_EXCEPTION_ERROR;
316: END IF;
317:
318: -- Update the accounting event id for the distributions
319:

Line 340: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

336: WHERE ID = l_tabv_tbl(l_tab_count).ID;
337:
338: EXCEPTION
339: WHEN OTHERS THEN
340: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
341: Fnd_File.PUT_LINE(Fnd_File.LOG, SQLERRM);
342:
343: END;
344:

Line 361: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

357:
358: */
359:
360:
361: IF (l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
362: Fnd_File.PUT_LINE(Fnd_File.LOG,
363: 'Error in Updating Distribution with accounting event id for transaction Number ' || l_trx_number);
364:
365: DO_CLEANUP(p_aetv_rec => l_Event_rec_out,

Line 368: RAISE Okl_Api.G_EXCEPTION_ERROR;

364:
365: DO_CLEANUP(p_aetv_rec => l_Event_rec_out,
366: x_return_status => l_return_status);
367:
368: RAISE Okl_Api.G_EXCEPTION_ERROR;
369: END IF;
370:
371: l_total_events := l_total_events + 1;
372:

Line 379: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

375: END IF;
376:
377: EXCEPTION
378:
379: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
380:
381: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
382: IF (l_error_msg_rec.COUNT > 0) THEN
383: FOR m IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST

Line 529: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

525:
526: l_start_date DATE;
527: l_end_date DATE;
528:
529: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
530:
531:
532: TYPE ref_cursor IS REF CURSOR;
533: trx_csr ref_cursor;

Line 549: RAISE Okl_Api.G_EXCEPTION_ERROR;

545:
546: IF (l_ae_category IS NULL) THEN
547: Fnd_File.PUT_LINE(Fnd_File.LOG,
548: 'GL Category Not Found while Processing Transaction Number ' || l_trx_number);
549: RAISE Okl_Api.G_EXCEPTION_ERROR;
550: END IF;
551:
552: l_header_rec_in.POST_TO_GL_FLAG := 'Y'; -- Unused Flag.
553: l_header_rec_in.ACCOUNTING_EVENT_ID := l_aetv_rec.accounting_event_id;

Line 597: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

593:
594:
595: EXCEPTION
596:
597: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
598: x_return_status := Okl_Api.G_RET_STS_ERROR;
599:
600: END CREATE_AE_HEADER;
601:

Line 598: x_return_status := Okl_Api.G_RET_STS_ERROR;

594:
595: EXCEPTION
596:
597: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
598: x_return_status := Okl_Api.G_RET_STS_ERROR;
599:
600: END CREATE_AE_HEADER;
601:
602:

Line 645: l_ccid_valid VARCHAR2(1) := Okl_Api.G_TRUE;

641: l_aelv_tbl_in aelv_tbl_type;
642: l_aelv_tbl_out aelv_tbl_type;
643: l_error_code OKL_AE_LINES.accounting_error_code%TYPE;
644: l_line_number NUMBER := 0;
645: l_ccid_valid VARCHAR2(1) := Okl_Api.G_TRUE;
646: i NUMBER := 0;
647: l_description OKL_AE_LINES.Description%TYPE;
648: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
649: l_trx_number OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE := p_trx_number;

Line 648: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

644: l_line_number NUMBER := 0;
645: l_ccid_valid VARCHAR2(1) := Okl_Api.G_TRUE;
646: i NUMBER := 0;
647: l_description OKL_AE_LINES.Description%TYPE;
648: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
649: l_trx_number OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE := p_trx_number;
650: l_total_lines NUMBER;
651: l_contract_number OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE;
652:

Line 762: IF (l_ccid_valid = Okl_Api.G_FALSE) THEN

758: l_aelv_tbl_in(i).TAX_CODE_ID := NULL;
759:
760: l_ccid_valid := Okl_Accounting_Util.validate_gl_ccid(dist_rec.code_combination_id);
761:
762: IF (l_ccid_valid = Okl_Api.G_FALSE) THEN
763: l_aelv_tbl_in(i).accounting_error_code := 'INVALID_ACCOUNT';
764: -- l_aelv_tbl_in(i).code_combination_id := -1;
765: x_ret_message := 'INVALID ACCOUNT';
766: Fnd_File.PUT_LINE(Fnd_File.LOG, 'A CCID is Invalid for Transaction Number '

Line 807: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

803: EXCEPTION
804:
805: WHEN OTHERS THEN
806:
807: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
808:
809: END CREATE_AE_LINES;
810:
811:

Line 833: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

829:
830:
831: BEGIN
832:
833: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
834:
835: FOR sum_rec IN sum_csr(p_aetv_rec.Accounting_event_id)
836: LOOP
837:

Line 855: WHEN OTHERS THEN x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;

851:
852:
853: EXCEPTION
854:
855: WHEN OTHERS THEN x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
856:
857: END VALIDATE_DR_CR;
858:
859:

Line 885: p_init_msg_list VARCHAR2(1) := Okl_Api.G_FALSE;

881: x_tabv_tbl TABV_TBL_TYPE;
882: l_aetv_tbl Okl_Acct_Event_Pub.AETV_TBL_TYPE;
883: i NUMBER := 0;
884: p_api_version NUMBER := 1.0;
885: p_init_msg_list VARCHAR2(1) := Okl_Api.G_FALSE;
886: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
887: x_msg_count NUMBER;
888: x_msg_data VARCHAR2(2000);
889:

Line 886: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

882: l_aetv_tbl Okl_Acct_Event_Pub.AETV_TBL_TYPE;
883: i NUMBER := 0;
884: p_api_version NUMBER := 1.0;
885: p_init_msg_list VARCHAR2(1) := Okl_Api.G_FALSE;
886: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
887: x_msg_count NUMBER;
888: x_msg_data VARCHAR2(2000);
889:
890: BEGIN

Line 1956: x_return_status := Okl_Api.G_RET_STS_SUCCESS;

1952: l_end_date VARCHAR2(30);
1953:
1954: BEGIN
1955:
1956: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
1957:
1958: l_start_date := Fnd_Date.DATE_TO_CANONICAL(p_start_date);
1959: l_end_date := Fnd_Date.DATE_TO_CANONICAL(p_end_date);
1960:

Line 1980: RAISE Okl_Api.g_exception_error;

1976: p_token1_value => 'Accounting Entry Process',
1977: p_token2 => 'REQUEST_ID',
1978: p_token2_value => x_request_id);
1979:
1980: RAISE Okl_Api.g_exception_error;
1981:
1982: END IF;
1983:
1984:

Line 1987: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

1983:
1984:
1985: EXCEPTION
1986:
1987: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1988: x_return_status := Okl_Api.G_RET_STS_ERROR;
1989:
1990: END DO_ACCOUNTING_CON;
1991:

Line 1988: x_return_status := Okl_Api.G_RET_STS_ERROR;

1984:
1985: EXCEPTION
1986:
1987: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1988: x_return_status := Okl_Api.G_RET_STS_ERROR;
1989:
1990: END DO_ACCOUNTING_CON;
1991:
1992: