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.OKL_INTERNAL_BILLING_PVT dependencies on OKL_API

Line 51: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

47: ----------------------------------------------------------------------------------
48:
49: PROCEDURE create_accounting_dist(
50: p_api_version IN NUMBER
51: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
52: ,x_return_status OUT NOCOPY VARCHAR2
53: ,x_msg_count OUT NOCOPY NUMBER
54: ,x_msg_data OUT NOCOPY VARCHAR2
55: ,p_tldv_tbl IN okl_tld_pvt.tldv_tbl_type

Line 62: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

58: IS
59: l_api_name CONSTANT VARCHAR2(30) := 'create_accounting_dist';
60: l_api_version CONSTANT NUMBER := 1.0;
61: l_til_loop_cnt NUMBER;
62: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
63: lp_tldv_tbl okl_tld_pvt.tldv_tbl_type := p_tldv_tbl;
64: lx_tldv_tbl okl_tld_pvt.tldv_tbl_type;
65: l_tld_loop_cnt NUMBER;
66: lx_tldv_rec okl_tld_pvt.tldv_rec_type;

Line 109: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

105: x_msg_count => x_msg_count,
106: x_msg_data => x_msg_data,
107: p_bpd_acc_rec => p_bpd_acc_rec);
108:
109: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
110: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
111: x_return_status := l_return_status;
112: END IF;
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 110: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

106: x_msg_data => x_msg_data,
107: p_bpd_acc_rec => p_bpd_acc_rec);
108:
109: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
110: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
111: x_return_status := l_return_status;
112: END IF;
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: END IF;

Line 113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

109: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
110: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
111: x_return_status := l_return_status;
112: END IF;
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: END IF;
115:
116: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
117: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Okl_Acc_Call_Pub.CREATE_ACC_TRANS:p_bpd_acc_rec.id: '||to_char(p_bpd_acc_rec.id));

Line 134: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

130: x_dist_info_rec => l_dist_info_rec,
131: x_ctxt_val_tbl => l_ctxt_val_tbl,
132: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
133:
134: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
135: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
136: x_return_status := l_return_status;
137: END IF;
138: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 135: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

131: x_ctxt_val_tbl => l_ctxt_val_tbl,
132: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
133:
134: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
135: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
136: x_return_status := l_return_status;
137: END IF;
138: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
139: END IF;

Line 138: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

134: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
135: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
136: x_return_status := l_return_status;
137: END IF;
138: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
139: END IF;
140:
141: --debug_proc('Vipp 333...p_bpd_acc_rec.id '||p_bpd_acc_rec.id );
142: --- populate the tables for passing to Okl_Account_Dist_Pvt.CREATE_ACCOUNTING_DIST

Line 184: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

180: x_amount_tbl => l_amount_out_tbl,
181: p_trx_header_id => l_trx_header_id,
182: p_trx_header_table => l_trx_header_tbl);
183:
184: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
185: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
187: RAISE OKL_API.G_EXCEPTION_ERROR;
188: END IF;

Line 185: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

181: p_trx_header_id => l_trx_header_id,
182: p_trx_header_table => l_trx_header_tbl);
183:
184: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
185: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
187: RAISE OKL_API.G_EXCEPTION_ERROR;
188: END IF;
189:

Line 186: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

182: p_trx_header_table => l_trx_header_tbl);
183:
184: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
185: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
187: RAISE OKL_API.G_EXCEPTION_ERROR;
188: END IF;
189:
190: --debug_proc('Vipp 333...l_trx_header_id '||l_trx_header_id );

Line 187: RAISE OKL_API.G_EXCEPTION_ERROR;

183:
184: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
185: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
187: RAISE OKL_API.G_EXCEPTION_ERROR;
188: END IF;
189:
190: --debug_proc('Vipp 333...l_trx_header_id '||l_trx_header_id );
191: ---- End Added by Vpanwar --- Code for new accounting API uptake

Line 200: WHEN OKL_API.G_EXCEPTION_ERROR THEN

196: (p_count => x_msg_count,
197: p_data => x_msg_data);
198:
199: EXCEPTION
200: WHEN OKL_API.G_EXCEPTION_ERROR THEN
201: ROLLBACK TO CREATE_ACCOUNTING_DIST;
202: x_return_status := OKL_API.G_RET_STS_ERROR;
203: FND_MSG_PUB.Count_And_Get
204: (p_count => x_msg_count,

Line 202: x_return_status := OKL_API.G_RET_STS_ERROR;

198:
199: EXCEPTION
200: WHEN OKL_API.G_EXCEPTION_ERROR THEN
201: ROLLBACK TO CREATE_ACCOUNTING_DIST;
202: x_return_status := OKL_API.G_RET_STS_ERROR;
203: FND_MSG_PUB.Count_And_Get
204: (p_count => x_msg_count,
205: p_data => x_msg_data);
206:

Line 207: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

203: FND_MSG_PUB.Count_And_Get
204: (p_count => x_msg_count,
205: p_data => x_msg_data);
206:
207: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
208: ROLLBACK TO CREATE_ACCOUNTING_DIST;
209: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
210: FND_MSG_PUB.Count_And_Get
211: (p_count => x_msg_count,

Line 209: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

205: p_data => x_msg_data);
206:
207: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
208: ROLLBACK TO CREATE_ACCOUNTING_DIST;
209: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
210: FND_MSG_PUB.Count_And_Get
211: (p_count => x_msg_count,
212: p_data => x_msg_data);
213:

Line 216: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

212: p_data => x_msg_data);
213:
214: WHEN OTHERS THEN
215: ROLLBACK TO CREATE_ACCOUNTING_DIST;
216: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
217: OKL_API.Set_Message(p_app_name => G_APP_NAME,
218: p_msg_name => G_UNEXPECTED_ERROR,
219: p_token1 => G_SQLCODE_TOKEN,
220: p_token1_value => SQLCODE,

Line 217: OKL_API.Set_Message(p_app_name => G_APP_NAME,

213:
214: WHEN OTHERS THEN
215: ROLLBACK TO CREATE_ACCOUNTING_DIST;
216: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
217: OKL_API.Set_Message(p_app_name => G_APP_NAME,
218: p_msg_name => G_UNEXPECTED_ERROR,
219: p_token1 => G_SQLCODE_TOKEN,
220: p_token1_value => SQLCODE,
221: p_token2 => G_SQLERRM_TOKEN,

Line 246: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

242: -- End of comments
243: ----------------------------------------------------------------------------------
244: PROCEDURE additional_tai_attr(
245: p_api_version IN NUMBER
246: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
247: ,x_return_status OUT NOCOPY VARCHAR2
248: ,x_msg_count OUT NOCOPY NUMBER
249: ,x_msg_data OUT NOCOPY VARCHAR2
250: ,p_taiv_rec IN taiv_rec_type

Line 256: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

252: )
253: is
254: l_api_name CONSTANT VARCHAR2(30) := 'additional_tai_attr';
255: l_api_version CONSTANT NUMBER := 1.0;
256: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
257:
258: --START: cklee 3/20/07
259: l_legal_entity_id okl_trx_ar_invoices_b.legal_entity_id%TYPE; -- for LE Uptake project 08-11-2006
260:

Line 430: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

426: p_api_version,
427: l_api_name,
428: G_PKG_NAME ))
429: THEN
430: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
431: END IF;
432:
433: -- Initialize message list if requested
434: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 439: x_return_status := OKL_API.G_RET_STS_SUCCESS;

435: FND_MSG_PUB.initialize;
436: END IF;
437:
438: -- Initialize API status to success
439: x_return_status := OKL_API.G_RET_STS_SUCCESS;
440:
441:
442: /*** Begin API body ****************************************************/
443: -- assign all passed in attributes from IN to OUT record

Line 484: IF (p_taiv_rec.legal_entity_id IS NULL OR (p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)) THEN

480: l_object1_id2 := NULL;
481: l_jtot_object2_code := NULL;
482:
483: -- for LE Uptake project 08-11-2006
484: IF (p_taiv_rec.legal_entity_id IS NULL OR (p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)) THEN
485: l_legal_entity_id := OKL_LEGAL_ENTITY_UTIL.get_khr_le_id(l_khr_id);
486: ELSE
487: l_legal_entity_id := p_taiv_rec.legal_entity_id;
488: END IF;

Line 539: IF (p_taiv_rec.ixx_id IS NULL OR (p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)) THEN

535: -- x_taiv_rec.ixx_id := NVL(p_taiv_rec.ixx_id, billto_rec.cust_account_id);
536: -- x_taiv_rec.ibt_id := NVL(p_taiv_rec.ibt_id, billto_rec.cust_acct_site_id);
537:
538: -- rmunjulu R12 Fixes -- changed to check for g_miss
539: IF (p_taiv_rec.ixx_id IS NULL OR (p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)) THEN
540: x_taiv_rec.ixx_id := billto_rec.cust_account_id;
541: ELSE
542: x_taiv_rec.ixx_id := p_taiv_rec.ixx_id;
543: END IF;

Line 545: IF (p_taiv_rec.ibt_id IS NULL OR (p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)) THEN

541: ELSE
542: x_taiv_rec.ixx_id := p_taiv_rec.ixx_id;
543: END IF;
544:
545: IF (p_taiv_rec.ibt_id IS NULL OR (p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)) THEN
546: x_taiv_rec.ibt_id := billto_rec.cust_acct_site_id;
547: ELSE
548: x_taiv_rec.ibt_id := p_taiv_rec.ibt_id;
549: END IF;

Line 558: if p_taiv_rec.irt_id is null or p_taiv_rec.irt_id = okl_api.g_miss_num

554: CLOSE std_terms_csr;
555:
556: -- cklee: set when irt_id is null
557: --x_taiv_rec.irt_id := NVL(p_taiv_rec.irt_id, l_term_id); -- 6140771
558: if p_taiv_rec.irt_id is null or p_taiv_rec.irt_id = okl_api.g_miss_num
559: then
560: x_taiv_rec.irt_id := l_term_id;
561: else
562: x_taiv_rec.irt_id := p_taiv_rec.irt_id;

Line 565: IF (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id=OKL_API.G_MISS_NUM) THEN

561: else
562: x_taiv_rec.irt_id := p_taiv_rec.irt_id;
563: end if;
564:
565: IF (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id=OKL_API.G_MISS_NUM) THEN
566:
567: OPEN org_id_csr(l_khr_id);
568: FETCH org_id_csr
569: INTO x_taiv_rec.org_id;

Line 662: IF ( p_ie_tbl1(k).legal_entity_id IS NULL OR (p_ie_tbl1(k).legal_entity_id = Okl_Api.G_MISS_NUM)) THEN

658: --l_xsiv_rec.ORG_ID := ln_dtls_rec.ORG_ID; --TAI
659: xsi_tbl(l_xsi_cnt).org_id := NULL;
660: END IF;
661: -- for LE Uptake project 08-11-2006
662: IF ( p_ie_tbl1(k).legal_entity_id IS NULL OR (p_ie_tbl1(k).legal_entity_id = Okl_Api.G_MISS_NUM)) THEN
663: --d*bms_output.put_line ('LEGAL_ENTITY_ID must be populated WHEN the contract header IS NULL!');
664: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'LEGAL_ENTITY_ID must be populated WHEN the contract header IS NULL');
665: ELSE
666: xsi_tbl(l_xsi_cnt).legal_entity_id := p_ie_tbl1(k).legal_entity_id;

Line 674: IF (p_taiv_rec.set_of_books_id IS NULL OR p_taiv_rec.set_of_books_id = OKL_API.G_MISS_NUM) THEN

670: END IF; -- IF l_khr_id IS NOT NULL THEN
671:
672: --How to get the set_of_books_id ?
673:
674: IF (p_taiv_rec.set_of_books_id IS NULL OR p_taiv_rec.set_of_books_id = OKL_API.G_MISS_NUM) THEN
675: x_taiv_rec.set_of_books_id := Okl_Accounting_Util.get_set_of_books_id;
676: ELSE
677: x_taiv_rec.set_of_books_id := p_taiv_rec.set_of_books_id;
678: --TAI

Line 684: IF (p_taiv_rec.currency_code IS NULL OR p_taiv_rec.currency_code=OKL_API.G_MISS_CHAR) THEN

680:
681: --Start code added by pgomes on 20-NOV-2002
682: --Check for currency code
683:
684: IF (p_taiv_rec.currency_code IS NULL OR p_taiv_rec.currency_code=OKL_API.G_MISS_CHAR) THEN
685: x_taiv_rec.currency_code := l_currency_code;
686: ELSE
687: x_taiv_rec.currency_code := p_taiv_rec.currency_code;
688: END IF;

Line 692: IF (p_taiv_rec.currency_conversion_type IS NULL OR p_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR) THEN

688: END IF;
689:
690: --Check for currency conversion type
691:
692: IF (p_taiv_rec.currency_conversion_type IS NULL OR p_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR) THEN
693: x_taiv_rec.currency_conversion_type := l_currency_conversion_type;
694: ELSE
695: x_taiv_rec.currency_conversion_type := p_taiv_rec.currency_conversion_type;
696: END IF;

Line 707: IF (p_taiv_rec.currency_conversion_rate IS NULL OR p_taiv_rec.currency_conversion_rate=OKL_API.G_MISS_NUM) THEN

703: IF(x_taiv_rec.currency_code = Okl_Accounting_Util.get_func_curr_code) THEN
704: x_taiv_rec.currency_conversion_rate := 1;
705: ELSE
706:
707: IF (p_taiv_rec.currency_conversion_rate IS NULL OR p_taiv_rec.currency_conversion_rate=OKL_API.G_MISS_NUM) THEN
708: x_taiv_rec.currency_conversion_rate := l_currency_conversion_rate;
709: ELSE
710: x_taiv_rec.currency_conversion_rate := p_taiv_rec.currency_conversion_rate;
711: END IF;

Line 721: IF (p_taiv_rec.currency_conversion_date IS NULL OR p_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE) THEN

717: END IF;
718:
719: --Check for currency conversion date
720:
721: IF (p_taiv_rec.currency_conversion_date IS NULL OR p_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE) THEN
722: x_taiv_rec.currency_conversion_date := l_currency_conversion_date;
723: ELSE
724: x_taiv_rec.currency_conversion_date := p_taiv_rec.currency_conversion_date;
725: END IF;

Line 735: IF(x_taiv_rec.currency_conversion_type IS NULL OR x_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR

731: -- 6140771
732: /* ankushar 16-Apr-2008 Bug# 6237730, Added condition for defaulting currency rate, date and type
733: start code changes
734: */
735: IF(x_taiv_rec.currency_conversion_type IS NULL OR x_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR
736: OR x_taiv_rec.currency_conversion_date IS NULL OR x_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE
737: OR x_taiv_rec.currency_conversion_rate IS NULL OR x_taiv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM) THEN
738: /* ankushar End Changes */
739:

Line 736: OR x_taiv_rec.currency_conversion_date IS NULL OR x_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE

732: /* ankushar 16-Apr-2008 Bug# 6237730, Added condition for defaulting currency rate, date and type
733: start code changes
734: */
735: IF(x_taiv_rec.currency_conversion_type IS NULL OR x_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR
736: OR x_taiv_rec.currency_conversion_date IS NULL OR x_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE
737: OR x_taiv_rec.currency_conversion_rate IS NULL OR x_taiv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM) THEN
738: /* ankushar End Changes */
739:
740: x_taiv_rec.currency_conversion_type := 'User';

Line 737: OR x_taiv_rec.currency_conversion_rate IS NULL OR x_taiv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM) THEN

733: start code changes
734: */
735: IF(x_taiv_rec.currency_conversion_type IS NULL OR x_taiv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR
736: OR x_taiv_rec.currency_conversion_date IS NULL OR x_taiv_rec.currency_conversion_date = OKL_API.G_MISS_DATE
737: OR x_taiv_rec.currency_conversion_rate IS NULL OR x_taiv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM) THEN
738: /* ankushar End Changes */
739:
740: x_taiv_rec.currency_conversion_type := 'User';
741: x_taiv_rec.currency_conversion_rate := 1;

Line 797: IF p_taiv_rec.trx_status_code IS NULL or p_taiv_rec.trx_status_code = okl_api.g_miss_char

793: x_taiv_rec.tax_exempt_reason_code := NULL;
794:
795: --start: | 30-Mar-2007 cklee -- validate taiv_rec.trx_status_code and default to |
796: --| 'SUBMITTED' |
797: IF p_taiv_rec.trx_status_code IS NULL or p_taiv_rec.trx_status_code = okl_api.g_miss_char
798: THEN
799: x_taiv_rec.trx_status_code := G_SUBMITTED;
800: END IF;
801: --end: | 30-Mar-2007 cklee -- validate taiv_rec.trx_status_code and default to |

Line 812: WHEN OKL_API.G_EXCEPTION_ERROR THEN

808: (p_count => x_msg_count,
809: p_data => x_msg_data);
810:
811: EXCEPTION
812: WHEN OKL_API.G_EXCEPTION_ERROR THEN
813: ROLLBACK TO additional_tai_attr;
814: x_return_status := OKL_API.G_RET_STS_ERROR;
815: FND_MSG_PUB.Count_And_Get
816: (p_count => x_msg_count,

Line 814: x_return_status := OKL_API.G_RET_STS_ERROR;

810:
811: EXCEPTION
812: WHEN OKL_API.G_EXCEPTION_ERROR THEN
813: ROLLBACK TO additional_tai_attr;
814: x_return_status := OKL_API.G_RET_STS_ERROR;
815: FND_MSG_PUB.Count_And_Get
816: (p_count => x_msg_count,
817: p_data => x_msg_data);
818:

Line 819: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

815: FND_MSG_PUB.Count_And_Get
816: (p_count => x_msg_count,
817: p_data => x_msg_data);
818:
819: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
820: ROLLBACK TO additional_tai_attr;
821: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
822: FND_MSG_PUB.Count_And_Get
823: (p_count => x_msg_count,

Line 821: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

817: p_data => x_msg_data);
818:
819: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
820: ROLLBACK TO additional_tai_attr;
821: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
822: FND_MSG_PUB.Count_And_Get
823: (p_count => x_msg_count,
824: p_data => x_msg_data);
825:

Line 828: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

824: p_data => x_msg_data);
825:
826: WHEN OTHERS THEN
827: ROLLBACK TO additional_tai_attr;
828: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
829: OKL_API.Set_Message(p_app_name => G_APP_NAME,
830: p_msg_name => G_UNEXPECTED_ERROR,
831: p_token1 => G_SQLCODE_TOKEN,
832: p_token1_value => SQLCODE,

Line 829: OKL_API.Set_Message(p_app_name => G_APP_NAME,

825:
826: WHEN OTHERS THEN
827: ROLLBACK TO additional_tai_attr;
828: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
829: OKL_API.Set_Message(p_app_name => G_APP_NAME,
830: p_msg_name => G_UNEXPECTED_ERROR,
831: p_token1 => G_SQLCODE_TOKEN,
832: p_token1_value => SQLCODE,
833: p_token2 => G_SQLERRM_TOKEN,

Line 855: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

851: -- End of comments
852: ----------------------------------------------------------------------------------
853: PROCEDURE additional_til_attr(
854: p_api_version IN NUMBER
855: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
856: ,x_return_status OUT NOCOPY VARCHAR2
857: ,x_msg_count OUT NOCOPY NUMBER
858: ,x_msg_data OUT NOCOPY VARCHAR2
859: ,p_tilv_rec IN tilv_rec_type

Line 865: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

861: )
862: is
863: l_api_name CONSTANT VARCHAR2(30) := 'additional_til_attr';
864: l_api_version CONSTANT NUMBER := 1.0;
865: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
866: l_line_code CONSTANT VARCHAR2(30) := 'LINE';
867:
868:
869: begin

Line 885: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

881: p_api_version,
882: l_api_name,
883: G_PKG_NAME ))
884: THEN
885: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
886: END IF;
887:
888: -- Initialize message list if requested
889: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 894: x_return_status := OKL_API.G_RET_STS_SUCCESS;

890: FND_MSG_PUB.initialize;
891: END IF;
892:
893: -- Initialize API status to success
894: x_return_status := OKL_API.G_RET_STS_SUCCESS;
895:
896:
897: /*** Begin API body ****************************************************/
898: -- assign all passed in attributes from IN to OUT record

Line 919: WHEN OKL_API.G_EXCEPTION_ERROR THEN

915: (p_count => x_msg_count,
916: p_data => x_msg_data);
917:
918: EXCEPTION
919: WHEN OKL_API.G_EXCEPTION_ERROR THEN
920: ROLLBACK TO additional_til_attr;
921: x_return_status := OKL_API.G_RET_STS_ERROR;
922: FND_MSG_PUB.Count_And_Get
923: (p_count => x_msg_count,

Line 921: x_return_status := OKL_API.G_RET_STS_ERROR;

917:
918: EXCEPTION
919: WHEN OKL_API.G_EXCEPTION_ERROR THEN
920: ROLLBACK TO additional_til_attr;
921: x_return_status := OKL_API.G_RET_STS_ERROR;
922: FND_MSG_PUB.Count_And_Get
923: (p_count => x_msg_count,
924: p_data => x_msg_data);
925:

Line 926: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

922: FND_MSG_PUB.Count_And_Get
923: (p_count => x_msg_count,
924: p_data => x_msg_data);
925:
926: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
927: ROLLBACK TO additional_til_attr;
928: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
929: FND_MSG_PUB.Count_And_Get
930: (p_count => x_msg_count,

Line 928: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

924: p_data => x_msg_data);
925:
926: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
927: ROLLBACK TO additional_til_attr;
928: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
929: FND_MSG_PUB.Count_And_Get
930: (p_count => x_msg_count,
931: p_data => x_msg_data);
932:

Line 935: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

931: p_data => x_msg_data);
932:
933: WHEN OTHERS THEN
934: ROLLBACK TO additional_til_attr;
935: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
936: OKL_API.Set_Message(p_app_name => G_APP_NAME,
937: p_msg_name => G_UNEXPECTED_ERROR,
938: p_token1 => G_SQLCODE_TOKEN,
939: p_token1_value => SQLCODE,

Line 936: OKL_API.Set_Message(p_app_name => G_APP_NAME,

932:
933: WHEN OTHERS THEN
934: ROLLBACK TO additional_til_attr;
935: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
936: OKL_API.Set_Message(p_app_name => G_APP_NAME,
937: p_msg_name => G_UNEXPECTED_ERROR,
938: p_token1 => G_SQLCODE_TOKEN,
939: p_token1_value => SQLCODE,
940: p_token2 => G_SQLERRM_TOKEN,

Line 962: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

958: -- End of comments
959: ----------------------------------------------------------------------------------
960: PROCEDURE additional_tld_attr(
961: p_api_version IN NUMBER
962: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
963: ,x_return_status OUT NOCOPY VARCHAR2
964: ,x_msg_count OUT NOCOPY NUMBER
965: ,x_msg_data OUT NOCOPY VARCHAR2
966: ,p_tldv_rec IN tldv_rec_type

Line 972: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

968: )
969: is
970: l_api_name CONSTANT VARCHAR2(30) := 'additional_tld_attr';
971: l_api_version CONSTANT NUMBER := 1.0;
972: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
973: /*
974: l_recv_inv_id NUMBER;
975: CURSOR reverse_csr1(p_tld_id NUMBER) IS
976: SELECT receivables_invoice_id

Line 1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1026: p_api_version,
1027: l_api_name,
1028: G_PKG_NAME ))
1029: THEN
1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: END IF;
1032:
1033: -- Initialize message list if requested
1034: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 1039: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1035: FND_MSG_PUB.initialize;
1036: END IF;
1037:
1038: -- Initialize API status to success
1039: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1040:
1041:
1042: /*** Begin API body ****************************************************/
1043: -- assign all passed in attributes from IN to OUT record

Line 1065: IF(p_tldv_rec.inventory_org_id IS NULL OR p_tldv_rec.inventory_org_id=OKL_API.G_MISS_NUM) THEN

1061: x_tldv_rec.receivables_invoice_id := NULL;
1062: -- Populated later by fetch
1063: */
1064:
1065: IF(p_tldv_rec.inventory_org_id IS NULL OR p_tldv_rec.inventory_org_id=OKL_API.G_MISS_NUM) THEN
1066:
1067: OPEN inv_org_id_csr(p_tldv_rec.khr_id);
1068: FETCH inv_org_id_csr
1069: INTO x_tldv_rec.inventory_org_id;

Line 1107: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1103: (p_count => x_msg_count,
1104: p_data => x_msg_data);
1105:
1106: EXCEPTION
1107: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1108: ROLLBACK TO additional_tld_attr;
1109: x_return_status := OKL_API.G_RET_STS_ERROR;
1110: FND_MSG_PUB.Count_And_Get
1111: (p_count => x_msg_count,

Line 1109: x_return_status := OKL_API.G_RET_STS_ERROR;

1105:
1106: EXCEPTION
1107: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1108: ROLLBACK TO additional_tld_attr;
1109: x_return_status := OKL_API.G_RET_STS_ERROR;
1110: FND_MSG_PUB.Count_And_Get
1111: (p_count => x_msg_count,
1112: p_data => x_msg_data);
1113:

Line 1114: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1110: FND_MSG_PUB.Count_And_Get
1111: (p_count => x_msg_count,
1112: p_data => x_msg_data);
1113:
1114: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1115: ROLLBACK TO additional_tld_attr;
1116: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1117: FND_MSG_PUB.Count_And_Get
1118: (p_count => x_msg_count,

Line 1116: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1112: p_data => x_msg_data);
1113:
1114: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1115: ROLLBACK TO additional_tld_attr;
1116: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1117: FND_MSG_PUB.Count_And_Get
1118: (p_count => x_msg_count,
1119: p_data => x_msg_data);
1120:

Line 1123: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1119: p_data => x_msg_data);
1120:
1121: WHEN OTHERS THEN
1122: ROLLBACK TO additional_tld_attr;
1123: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1124: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1125: p_msg_name => G_UNEXPECTED_ERROR,
1126: p_token1 => G_SQLCODE_TOKEN,
1127: p_token1_value => SQLCODE,

Line 1124: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1120:
1121: WHEN OTHERS THEN
1122: ROLLBACK TO additional_tld_attr;
1123: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1124: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1125: p_msg_name => G_UNEXPECTED_ERROR,
1126: p_token1 => G_SQLCODE_TOKEN,
1127: p_token1_value => SQLCODE,
1128: p_token2 => G_SQLERRM_TOKEN,

Line 1153: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1149: p_tilv_tbl IN tilv_tbl_type,
1150: p_tldv_tbl IN tldv_tbl_type
1151: ) RETURN VARCHAR2
1152: IS
1153: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1154: l_til_exist BOOLEAN;
1155: l_tld_exist BOOLEAN;
1156:
1157: BEGIN

Line 1171: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1167: G_IS_STREAM_BASED_BILLING := FALSE;
1168: ELSIF p_tilv_tbl.COUNT = 0 THEN
1169:
1170: -- developer note: Replace with a proper message
1171: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1172: p_msg_name => G_REQUIRED_VALUE,
1173: p_token1 => G_COL_NAME_TOKEN,
1174: p_token1_value => 'p_tilv_tbl.STY_ID');
1175:

Line 1187: l_return_status := OKL_API.G_RET_STS_ERROR;

1183:
1184:
1185: EXCEPTION
1186: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1187: l_return_status := OKL_API.G_RET_STS_ERROR;
1188: RETURN l_return_status;
1189: WHEN OTHERS THEN
1190: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1191: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 1190: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1186: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1187: l_return_status := OKL_API.G_RET_STS_ERROR;
1188: RETURN l_return_status;
1189: WHEN OTHERS THEN
1190: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1191: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1192: p_msg_name => G_UNEXPECTED_ERROR,
1193: p_token1 => G_SQLCODE_TOKEN,
1194: p_token1_value => SQLCODE,

Line 1191: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1187: l_return_status := OKL_API.G_RET_STS_ERROR;
1188: RETURN l_return_status;
1189: WHEN OTHERS THEN
1190: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1191: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1192: p_msg_name => G_UNEXPECTED_ERROR,
1193: p_token1 => G_SQLCODE_TOKEN,
1194: p_token1_value => SQLCODE,
1195: p_token2 => G_SQLERRM_TOKEN,

Line 1217: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1213: p_tilv_tbl IN tilv_tbl_type,
1214: p_tldv_tbl IN tldv_tbl_type
1215: ) RETURN VARCHAR2
1216: IS
1217: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1218: l_til_loop_cnt NUMBER := 0;
1219: l_til_ln_number NUMBER := 0;
1220: l_current NUMBER := 0;
1221: l_tld_loop_cnt NUMBER := 0;

Line 1233: p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER = Okl_Api.G_MISS_NUM

1229:
1230: -- for l_til_loop_cnt in 1 .. p_tilv_tbl.count loop
1231: -- Raise Exception if any of til records does not have TXL_AR_LINE_NUMBER
1232: if p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER is null OR
1233: p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER = Okl_Api.G_MISS_NUM
1234: then
1235: raise G_EXCEPTION_HALT_VALIDATION;
1236: end if;
1237: l_til_ln_number := p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER;

Line 1244: p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER = Okl_Api.G_MISS_NUM

1240: loop
1241: --for l_tld_loop_cnt in 1 .. p_tldv_tbl.count loop
1242: -- Raise Exception if any of tld record does not have txl_ar_ln_number
1243: if p_tldv_tbl(l_tld_loop_cnt).TXL_AR_LINE_NUMBER is null OR
1244: p_tilv_tbl(l_til_loop_cnt).TXL_AR_LINE_NUMBER = Okl_Api.G_MISS_NUM
1245: then
1246: raise G_EXCEPTION_HALT_VALIDATION;
1247: end if;
1248: if (p_tldv_tbl(l_tld_loop_cnt).TXL_AR_LINE_NUMBER = l_til_ln_number) then

Line 1276: l_return_status := OKL_API.G_RET_STS_ERROR;

1272:
1273:
1274: EXCEPTION
1275: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1276: l_return_status := OKL_API.G_RET_STS_ERROR;
1277: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1278: p_msg_name => G_REQUIRED_VALUE,
1279: p_token1 => G_COL_NAME_TOKEN,
1280: p_token1_value => 'TXL_AR_LINE_NUMBER');

Line 1277: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1273:
1274: EXCEPTION
1275: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1276: l_return_status := OKL_API.G_RET_STS_ERROR;
1277: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1278: p_msg_name => G_REQUIRED_VALUE,
1279: p_token1 => G_COL_NAME_TOKEN,
1280: p_token1_value => 'TXL_AR_LINE_NUMBER');
1281: RETURN l_return_status;

Line 1283: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1279: p_token1 => G_COL_NAME_TOKEN,
1280: p_token1_value => 'TXL_AR_LINE_NUMBER');
1281: RETURN l_return_status;
1282: WHEN OTHERS THEN
1283: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1284: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1285: p_msg_name => G_UNEXPECTED_ERROR,
1286: p_token1 => G_SQLCODE_TOKEN,
1287: p_token1_value => SQLCODE,

Line 1284: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1280: p_token1_value => 'TXL_AR_LINE_NUMBER');
1281: RETURN l_return_status;
1282: WHEN OTHERS THEN
1283: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1284: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1285: p_msg_name => G_UNEXPECTED_ERROR,
1286: p_token1 => G_SQLCODE_TOKEN,
1287: p_token1_value => SQLCODE,
1288: p_token2 => G_SQLERRM_TOKEN,

Line 1310: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1306: p_tilv_tbl IN tilv_tbl_type,
1307: p_tldv_tbl IN tldv_tbl_type
1308: ) RETURN VARCHAR2
1309: IS
1310: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1311: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1312:
1313: BEGIN
1314:

Line 1311: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1307: p_tldv_tbl IN tldv_tbl_type
1308: ) RETURN VARCHAR2
1309: IS
1310: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1311: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1312:
1313: BEGIN
1314:
1315: -- Do formal attribute validation:

Line 1319: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1315: -- Do formal attribute validation:
1316: l_return_status := validate_billing_usage(p_tilv_tbl => p_tilv_tbl,
1317: p_tldv_tbl => p_tldv_tbl);
1318: --- Store the highest degree of error
1319: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1320: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1321: x_return_status := l_return_status;
1322: END IF;
1323: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1320: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1316: l_return_status := validate_billing_usage(p_tilv_tbl => p_tilv_tbl,
1317: p_tldv_tbl => p_tldv_tbl);
1318: --- Store the highest degree of error
1319: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1320: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1321: x_return_status := l_return_status;
1322: END IF;
1323: RAISE G_EXCEPTION_HALT_VALIDATION;
1324: END IF;

Line 1333: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1329:
1330: l_return_status := validate_TXL_AR_LINE_NUMBER(p_tilv_tbl => p_tilv_tbl,
1331: p_tldv_tbl => p_tldv_tbl);
1332: --- Store the highest degree of error
1333: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1334: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1335: x_return_status := l_return_status;
1336: END IF;
1337: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1334: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1330: l_return_status := validate_TXL_AR_LINE_NUMBER(p_tilv_tbl => p_tilv_tbl,
1331: p_tldv_tbl => p_tldv_tbl);
1332: --- Store the highest degree of error
1333: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1334: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1335: x_return_status := l_return_status;
1336: END IF;
1337: RAISE G_EXCEPTION_HALT_VALIDATION;
1338: END IF;

Line 1345: l_return_status := OKL_API.G_RET_STS_ERROR;

1341:
1342: RETURN x_return_status;
1343: EXCEPTION
1344: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1345: l_return_status := OKL_API.G_RET_STS_ERROR;
1346: RETURN l_return_status;
1347: WHEN OTHERS THEN
1348: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1349: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 1348: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1344: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1345: l_return_status := OKL_API.G_RET_STS_ERROR;
1346: RETURN l_return_status;
1347: WHEN OTHERS THEN
1348: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1349: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1350: p_msg_name => G_UNEXPECTED_ERROR,
1351: p_token1 => G_SQLCODE_TOKEN,
1352: p_token1_value => SQLCODE,

Line 1349: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1345: l_return_status := OKL_API.G_RET_STS_ERROR;
1346: RETURN l_return_status;
1347: WHEN OTHERS THEN
1348: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1349: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1350: p_msg_name => G_UNEXPECTED_ERROR,
1351: p_token1 => G_SQLCODE_TOKEN,
1352: p_token1_value => SQLCODE,
1353: p_token2 => G_SQLERRM_TOKEN,

Line 1374: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

1370: PROCEDURE validate_tai_values(
1371: p_taiv_rec IN taiv_rec_type,
1372: x_return_status OUT NOCOPY VARCHAR2
1373: ) IS
1374: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1375: BEGIN
1376:
1377: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1378: (p_taiv_rec.ixx_id IS NULL OR p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)

Line 1377: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1373: ) IS
1374: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1375: BEGIN
1376:
1377: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1378: (p_taiv_rec.ixx_id IS NULL OR p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)
1379: THEN
1380: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1381: p_msg_name => G_REQUIRED_VALUE,

Line 1378: (p_taiv_rec.ixx_id IS NULL OR p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)

1374: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1375: BEGIN
1376:
1377: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1378: (p_taiv_rec.ixx_id IS NULL OR p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)
1379: THEN
1380: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1381: p_msg_name => G_REQUIRED_VALUE,
1382: p_token1 => G_COL_NAME_TOKEN,

Line 1380: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1376:
1377: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1378: (p_taiv_rec.ixx_id IS NULL OR p_taiv_rec.ixx_id = Okl_Api.G_MISS_NUM)
1379: THEN
1380: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1381: p_msg_name => G_REQUIRED_VALUE,
1382: p_token1 => G_COL_NAME_TOKEN,
1383: p_token1_value => 'okl_trx_ar_invoices_b.ixx_id');
1384:

Line 1388: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1384:
1385: RAISE G_EXCEPTION_HALT_VALIDATION;
1386: END IF;
1387:
1388: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1389: (p_taiv_rec.irm_id IS NULL OR p_taiv_rec.irm_id = Okl_Api.G_MISS_NUM)
1390: THEN
1391: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1392: p_msg_name => G_REQUIRED_VALUE,

Line 1389: (p_taiv_rec.irm_id IS NULL OR p_taiv_rec.irm_id = Okl_Api.G_MISS_NUM)

1385: RAISE G_EXCEPTION_HALT_VALIDATION;
1386: END IF;
1387:
1388: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1389: (p_taiv_rec.irm_id IS NULL OR p_taiv_rec.irm_id = Okl_Api.G_MISS_NUM)
1390: THEN
1391: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1392: p_msg_name => G_REQUIRED_VALUE,
1393: p_token1 => G_COL_NAME_TOKEN,

Line 1391: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1387:
1388: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1389: (p_taiv_rec.irm_id IS NULL OR p_taiv_rec.irm_id = Okl_Api.G_MISS_NUM)
1390: THEN
1391: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1392: p_msg_name => G_REQUIRED_VALUE,
1393: p_token1 => G_COL_NAME_TOKEN,
1394: p_token1_value => 'okl_trx_ar_invoices_b.irm_id');
1395:

Line 1399: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1395:
1396: RAISE G_EXCEPTION_HALT_VALIDATION;
1397: END IF;
1398:
1399: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1400: (p_taiv_rec.irt_id IS NULL OR p_taiv_rec.irt_id = Okl_Api.G_MISS_NUM)
1401: THEN
1402: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1403: p_msg_name => G_REQUIRED_VALUE,

Line 1400: (p_taiv_rec.irt_id IS NULL OR p_taiv_rec.irt_id = Okl_Api.G_MISS_NUM)

1396: RAISE G_EXCEPTION_HALT_VALIDATION;
1397: END IF;
1398:
1399: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1400: (p_taiv_rec.irt_id IS NULL OR p_taiv_rec.irt_id = Okl_Api.G_MISS_NUM)
1401: THEN
1402: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1403: p_msg_name => G_REQUIRED_VALUE,
1404: p_token1 => G_COL_NAME_TOKEN,

Line 1402: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1398:
1399: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1400: (p_taiv_rec.irt_id IS NULL OR p_taiv_rec.irt_id = Okl_Api.G_MISS_NUM)
1401: THEN
1402: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1403: p_msg_name => G_REQUIRED_VALUE,
1404: p_token1 => G_COL_NAME_TOKEN,
1405: p_token1_value => 'okl_trx_ar_invoices_b.irt_id');
1406:

Line 1410: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1406:
1407: RAISE G_EXCEPTION_HALT_VALIDATION;
1408: END IF;
1409:
1410: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1411: (p_taiv_rec.ibt_id IS NULL OR p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)
1412: THEN
1413: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1414: p_msg_name => G_REQUIRED_VALUE,

Line 1411: (p_taiv_rec.ibt_id IS NULL OR p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)

1407: RAISE G_EXCEPTION_HALT_VALIDATION;
1408: END IF;
1409:
1410: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1411: (p_taiv_rec.ibt_id IS NULL OR p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)
1412: THEN
1413: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1414: p_msg_name => G_REQUIRED_VALUE,
1415: p_token1 => G_COL_NAME_TOKEN,

Line 1413: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1409:
1410: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1411: (p_taiv_rec.ibt_id IS NULL OR p_taiv_rec.ibt_id = Okl_Api.G_MISS_NUM)
1412: THEN
1413: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1414: p_msg_name => G_REQUIRED_VALUE,
1415: p_token1 => G_COL_NAME_TOKEN,
1416: p_token1_value => 'okl_trx_ar_invoices_b.ibt_id');
1417:

Line 1421: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1417:
1418: RAISE G_EXCEPTION_HALT_VALIDATION;
1419: END IF;
1420:
1421: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1422: (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id = Okl_Api.G_MISS_NUM)
1423: THEN
1424: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_REQUIRED_VALUE,

Line 1422: (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id = Okl_Api.G_MISS_NUM)

1418: RAISE G_EXCEPTION_HALT_VALIDATION;
1419: END IF;
1420:
1421: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1422: (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id = Okl_Api.G_MISS_NUM)
1423: THEN
1424: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_REQUIRED_VALUE,
1426: p_token1 => G_COL_NAME_TOKEN,

Line 1424: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1420:
1421: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1422: (p_taiv_rec.org_id IS NULL OR p_taiv_rec.org_id = Okl_Api.G_MISS_NUM)
1423: THEN
1424: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_REQUIRED_VALUE,
1426: p_token1 => G_COL_NAME_TOKEN,
1427: p_token1_value => 'okl_trx_ar_invoices_b.org_id');
1428:

Line 1432: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND

1428:
1429: RAISE G_EXCEPTION_HALT_VALIDATION;
1430: END IF;
1431:
1432: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1433: (p_taiv_rec.legal_entity_id IS NULL OR p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)
1434: THEN
1435: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1436: p_msg_name => G_REQUIRED_VALUE,

Line 1433: (p_taiv_rec.legal_entity_id IS NULL OR p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)

1429: RAISE G_EXCEPTION_HALT_VALIDATION;
1430: END IF;
1431:
1432: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1433: (p_taiv_rec.legal_entity_id IS NULL OR p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)
1434: THEN
1435: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1436: p_msg_name => G_REQUIRED_VALUE,
1437: p_token1 => G_COL_NAME_TOKEN,

Line 1435: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1431:
1432: IF (p_taiv_rec.khr_id IS NULL OR p_taiv_rec.khr_id = Okl_Api.G_MISS_NUM) AND
1433: (p_taiv_rec.legal_entity_id IS NULL OR p_taiv_rec.legal_entity_id = Okl_Api.G_MISS_NUM)
1434: THEN
1435: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1436: p_msg_name => G_REQUIRED_VALUE,
1437: p_token1 => G_COL_NAME_TOKEN,
1438: p_token1_value => 'okl_trx_ar_invoices_b.legal_entity_id');
1439:

Line 1451: OKL_API.set_message(p_app_name => 'OKL',

1447: --gkhuntet added for Manual Invoice on 06-07-2007 End.
1448: p_taiv_rec.trx_status_code IS NOT NULL
1449: and p_taiv_rec.trx_status_code <> G_SUBMITTED
1450: THEN
1451: OKL_API.set_message(p_app_name => 'OKL',
1452: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1453: p_token1 => 'COL_NAME',
1454: p_token1_value => 'okl_trx_ar_invoices_b.trx_status_code');
1455: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1465: x_return_status := OKL_API.G_RET_STS_ERROR;

1461: x_return_status := l_return_status;
1462:
1463: EXCEPTION
1464: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1465: x_return_status := OKL_API.G_RET_STS_ERROR;
1466: WHEN OTHERS THEN
1467: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1468: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1469: p_msg_name => G_UNEXPECTED_ERROR,

Line 1467: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1463: EXCEPTION
1464: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1465: x_return_status := OKL_API.G_RET_STS_ERROR;
1466: WHEN OTHERS THEN
1467: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1468: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1469: p_msg_name => G_UNEXPECTED_ERROR,
1470: p_token1 => G_SQLCODE_TOKEN,
1471: p_token1_value => SQLCODE,

Line 1468: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1464: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1465: x_return_status := OKL_API.G_RET_STS_ERROR;
1466: WHEN OTHERS THEN
1467: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1468: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1469: p_msg_name => G_UNEXPECTED_ERROR,
1470: p_token1 => G_SQLCODE_TOKEN,
1471: p_token1_value => SQLCODE,
1472: p_token2 => G_SQLERRM_TOKEN,

Line 1501: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

1497: p_tldv_rec IN tldv_rec_type,
1498: p_source IN VARCHAR2,
1499: x_return_status OUT NOCOPY VARCHAR2
1500: ) IS
1501: l_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1502: BEGIN
1503: -- rmunjulu R12 Fixes -- do not allow caller to pass values to following columns
1504: --INVOICE_FORMAT_LINE_TYPE
1505: --LATE_CHARGE_ASSESS_DATE

Line 1517: OKL_API.set_message(p_app_name => 'OKL',

1513: --TAX_AMOUNT
1514: --INVOICE_FORMAT_TYPE
1515: /*
1516: IF p_tldv_rec.INVOICE_FORMAT_LINE_TYPE IS NOT NULL THEN
1517: OKL_API.set_message(p_app_name => 'OKL',
1518: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1519: p_token1 => 'COL_NAME',
1520: p_token1_value => 'INVOICE_FORMAT_LINE_TYPE');
1521: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1525: OKL_API.set_message(p_app_name => 'OKL',

1521: RAISE G_EXCEPTION_HALT_VALIDATION;
1522: END IF;
1523:
1524: IF p_tldv_rec.LATE_CHARGE_ASSESS_DATE IS NOT NULL THEN
1525: OKL_API.set_message(p_app_name => 'OKL',
1526: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1527: p_token1 => 'COL_NAME',
1528: p_token1_value => 'LATE_CHARGE_ASSESS_DATE');
1529: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1533: OKL_API.set_message(p_app_name => 'OKL',

1529: RAISE G_EXCEPTION_HALT_VALIDATION;
1530: END IF;
1531:
1532: IF p_tldv_rec.LATE_INT_ASSESS_DATE IS NOT NULL THEN
1533: OKL_API.set_message(p_app_name => 'OKL',
1534: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1535: p_token1 => 'COL_NAME',
1536: p_token1_value => 'LATE_INT_ASSESS_DATE');
1537: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1541: OKL_API.set_message(p_app_name => 'OKL',

1537: RAISE G_EXCEPTION_HALT_VALIDATION;
1538: END IF;
1539:
1540: IF p_tldv_rec.LATE_CHARGE_ASS_YN IS NOT NULL THEN
1541: OKL_API.set_message(p_app_name => 'OKL',
1542: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1543: p_token1 => 'COL_NAME',
1544: p_token1_value => 'LATE_CHARGE_ASS_YN');
1545: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1549: OKL_API.set_message(p_app_name => 'OKL',

1545: RAISE G_EXCEPTION_HALT_VALIDATION;
1546: END IF;
1547:
1548: IF p_tldv_rec.LATE_INT_ASS_YN IS NOT NULL THEN
1549: OKL_API.set_message(p_app_name => 'OKL',
1550: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1551: p_token1 => 'COL_NAME',
1552: p_token1_value => 'LATE_INT_ASS_YN');
1553: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1557: OKL_API.set_message(p_app_name => 'OKL',

1553: RAISE G_EXCEPTION_HALT_VALIDATION;
1554: END IF;
1555:
1556: IF p_tldv_rec.INVESTOR_DISB_STATUS IS NOT NULL THEN
1557: OKL_API.set_message(p_app_name => 'OKL',
1558: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1559: p_token1 => 'COL_NAME',
1560: p_token1_value => 'INVESTOR_DISB_STATUS');
1561: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1565: OKL_API.set_message(p_app_name => 'OKL',

1561: RAISE G_EXCEPTION_HALT_VALIDATION;
1562: END IF;
1563:
1564: IF p_tldv_rec.INVESTOR_DISB_ERR_MG IS NOT NULL THEN
1565: OKL_API.set_message(p_app_name => 'OKL',
1566: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1567: p_token1 => 'COL_NAME',
1568: p_token1_value => 'INVESTOR_DISB_ERR_MG');
1569: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1573: OKL_API.set_message(p_app_name => 'OKL',

1569: RAISE G_EXCEPTION_HALT_VALIDATION;
1570: END IF;
1571:
1572: IF p_tldv_rec.DATE_DISBURSED IS NOT NULL THEN
1573: OKL_API.set_message(p_app_name => 'OKL',
1574: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1575: p_token1 => 'COL_NAME',
1576: p_token1_value => 'DATE_DISBURSED');
1577: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1581: OKL_API.set_message(p_app_name => 'OKL',

1577: RAISE G_EXCEPTION_HALT_VALIDATION;
1578: END IF;
1579:
1580: IF p_tldv_rec.PAY_STATUS_CODE IS NOT NULL THEN
1581: OKL_API.set_message(p_app_name => 'OKL',
1582: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1583: p_token1 => 'COL_NAME',
1584: p_token1_value => 'PAY_STATUS_CODE');
1585: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1589: OKL_API.set_message(p_app_name => 'OKL',

1585: RAISE G_EXCEPTION_HALT_VALIDATION;
1586: END IF;
1587:
1588: IF p_tldv_rec.TAX_AMOUNT IS NOT NULL THEN
1589: OKL_API.set_message(p_app_name => 'OKL',
1590: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1591: p_token1 => 'COL_NAME',
1592: p_token1_value => 'TAX_AMOUNT');
1593: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1597: OKL_API.set_message(p_app_name => 'OKL',

1593: RAISE G_EXCEPTION_HALT_VALIDATION;
1594: END IF;
1595:
1596: IF p_tldv_rec.INVOICE_FORMAT_TYPE IS NOT NULL THEN
1597: OKL_API.set_message(p_app_name => 'OKL',
1598: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1599: p_token1 => 'COL_NAME',
1600: p_token1_value => 'INVOICE_FORMAT_TYPE');
1601: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1607: OKL_API.set_message(p_app_name => 'OKL',

1603: */
1604: -- LSM_ID does not exist in tapi yet
1605: /*
1606: IF p_tldv_rec.LSM_ID IS NOT NULL THEN
1607: OKL_API.set_message(p_app_name => 'OKL',
1608: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1609: p_token1 => 'COL_NAME',
1610: p_token1_value => 'LSM_ID');
1611: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1616: OKL_API.set_message(p_app_name => 'OKL',

1612: END IF;
1613: */
1614: /*
1615: IF p_tldv_rec.KHR_ID IS NOT NULL THEN
1616: OKL_API.set_message(p_app_name => 'OKL',
1617: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1618: p_token1 => 'COL_NAME',
1619: p_token1_value => 'KHR_ID');
1620: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1625: OKL_API.set_message(p_app_name => 'OKL',

1621: END IF;
1622:
1623: -- if source not rebook then do not allow this column to be populated by called process
1624: IF nvl(p_source,'*') <> 'REBOOK' AND p_tldv_rec.RBK_ORI_INVOICE_NUMBER IS NOT NULL THEN
1625: OKL_API.set_message(p_app_name => 'OKL',
1626: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1627: p_token1 => 'COL_NAME',
1628: p_token1_value => 'RBK_ORI_INVOICE_NUMBER');
1629: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1634: OKL_API.set_message(p_app_name => 'OKL',

1630: END IF;
1631:
1632: -- if source not rebook then do not allow this column to be populated by called process
1633: IF nvl(p_source,'*') <> 'REBOOK' AND p_tldv_rec.RBK_ORI_INVOICE_LINE_NUMBER IS NOT NULL THEN
1634: OKL_API.set_message(p_app_name => 'OKL',
1635: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1636: p_token1 => 'COL_NAME',
1637: p_token1_value => 'RBK_ORI_INVOICE_LINE_NUMBER');
1638: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1643: OKL_API.set_message(p_app_name => 'OKL',

1639: END IF;
1640:
1641: -- if source not rebook then do not allow this column to be populated by called process
1642: IF nvl(p_source,'*') <> 'REBOOK' AND p_tldv_rec.RBK_ADJUSTMENT_DATE IS NOT NULL THEN
1643: OKL_API.set_message(p_app_name => 'OKL',
1644: p_msg_name => 'OKL_CONTRACTS_INVALID_VALUE',
1645: p_token1 => 'COL_NAME',
1646: p_token1_value => 'RBK_ADJUSTMENT_DATE');
1647: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1655: IF (p_tldv_rec.SEL_ID IS NULL or p_tldv_rec.SEL_ID = okl_api.g_miss_num )

1651:
1652:
1653: IF G_IS_STREAM_BASED_BILLING = TRUE THEN
1654:
1655: IF (p_tldv_rec.SEL_ID IS NULL or p_tldv_rec.SEL_ID = okl_api.g_miss_num )
1656: AND (p_source <> 'UBB')
1657: --gkhuntet 26-07-2007
1658: AND (p_source <> 'REMARKETING') THEN ----gkhuntet 26-07-2007 -- apaul 20-June-2007
1659: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 1659: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1655: IF (p_tldv_rec.SEL_ID IS NULL or p_tldv_rec.SEL_ID = okl_api.g_miss_num )
1656: AND (p_source <> 'UBB')
1657: --gkhuntet 26-07-2007
1658: AND (p_source <> 'REMARKETING') THEN ----gkhuntet 26-07-2007 -- apaul 20-June-2007
1659: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1660: p_msg_name => G_REQUIRED_VALUE,
1661: p_token1 => G_COL_NAME_TOKEN,
1662: p_token1_value => 'SEL_ID');
1663: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1674: x_return_status := OKL_API.G_RET_STS_ERROR;

1670: x_return_status := l_return_status;
1671:
1672: EXCEPTION
1673: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1674: x_return_status := OKL_API.G_RET_STS_ERROR;
1675: WHEN OTHERS THEN
1676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1677: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1678: p_msg_name => G_UNEXPECTED_ERROR,

Line 1676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1672: EXCEPTION
1673: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1674: x_return_status := OKL_API.G_RET_STS_ERROR;
1675: WHEN OTHERS THEN
1676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1677: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1678: p_msg_name => G_UNEXPECTED_ERROR,
1679: p_token1 => G_SQLCODE_TOKEN,
1680: p_token1_value => SQLCODE,

Line 1677: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1673: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1674: x_return_status := OKL_API.G_RET_STS_ERROR;
1675: WHEN OTHERS THEN
1676: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1677: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1678: p_msg_name => G_UNEXPECTED_ERROR,
1679: p_token1 => G_SQLCODE_TOKEN,
1680: p_token1_value => SQLCODE,
1681: p_token2 => G_SQLERRM_TOKEN,

Line 1718: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

1714: ----------------------------------------------------------------------------------
1715:
1716: PROCEDURE create_non_sel_billing_trx(
1717: p_api_version IN NUMBER
1718: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
1719: ,x_return_status OUT NOCOPY VARCHAR2
1720: ,x_msg_count OUT NOCOPY NUMBER
1721: ,x_msg_data OUT NOCOPY VARCHAR2
1722: ,p_taiv_rec IN okl_tai_pvt.taiv_rec_type

Line 1734: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1730: is
1731: l_api_name CONSTANT VARCHAR2(30) := 'create_non_sel_billing_trx';
1732: l_api_version CONSTANT NUMBER := 1.0;
1733: l_til_loop_cnt NUMBER;
1734: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1735: lp_taiv_rec okl_tai_pvt.taiv_rec_type := p_taiv_rec;
1736: lx_taiv_rec okl_tai_pvt.taiv_rec_type;
1737: lp_tilv_tbl okl_til_pvt.tilv_tbl_type := p_tilv_tbl;
1738: lx_tilv_tbl okl_til_pvt.tilv_tbl_type;

Line 1799: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1795: p_api_version,
1796: l_api_name,
1797: G_PKG_NAME ))
1798: THEN
1799: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1800: END IF;
1801:
1802: -- Initialize message list if requested
1803: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 1808: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1804: FND_MSG_PUB.initialize;
1805: END IF;
1806:
1807: -- Initialize API status to success
1808: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1809:
1810:
1811: /*** Begin API body ****************************************************/
1812:

Line 1821: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1817: validate_tai_values(
1818: p_taiv_rec => lp_taiv_rec,
1819: x_return_status => l_return_status);
1820:
1821: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_ERROR;
1825: END IF;

Line 1822: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1818: p_taiv_rec => lp_taiv_rec,
1819: x_return_status => l_return_status);
1820:
1821: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_ERROR;
1825: END IF;
1826:

Line 1823: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1819: x_return_status => l_return_status);
1820:
1821: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_ERROR;
1825: END IF;
1826:
1827: additional_tai_attr(

Line 1824: RAISE OKL_API.G_EXCEPTION_ERROR;

1820:
1821: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1822: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1823: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1824: RAISE OKL_API.G_EXCEPTION_ERROR;
1825: END IF;
1826:
1827: additional_tai_attr(
1828: p_api_version => p_api_version,

Line 1838: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1834: x_taiv_rec => lx_taiv_rec);
1835:
1836: lp_taiv_rec := lx_taiv_rec;
1837:
1838: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1839: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1840: x_return_status := l_return_status;
1841: END IF;
1842: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1839: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1835:
1836: lp_taiv_rec := lx_taiv_rec;
1837:
1838: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1839: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1840: x_return_status := l_return_status;
1841: END IF;
1842: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1843: END IF;

Line 1842: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1838: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1839: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1840: x_return_status := l_return_status;
1841: END IF;
1842: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1843: END IF;
1844: -- end: cklee -- add additional columns 3/19/07
1845:
1846: okl_tai_pvt.insert_row(

Line 1855: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1851: x_msg_data => x_msg_data,
1852: p_taiv_rec => lp_taiv_rec,
1853: x_taiv_rec => lx_taiv_rec);
1854:
1855: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1856: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1857: x_return_status := l_return_status;
1858: END IF;
1859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1856: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1852: p_taiv_rec => lp_taiv_rec,
1853: x_taiv_rec => lx_taiv_rec);
1854:
1855: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1856: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1857: x_return_status := l_return_status;
1858: END IF;
1859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1860: END IF;

Line 1859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1855: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1856: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1857: x_return_status := l_return_status;
1858: END IF;
1859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1860: END IF;
1861:
1862: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1863: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_taiv_rec.id: '||to_char(lx_taiv_rec.id));

Line 1893: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1889: x_tilv_rec => lx_tilv_tbl(l_til_loop_cnt));
1890:
1891: lp_tilv_tbl(l_til_loop_cnt) := lx_tilv_tbl(l_til_loop_cnt);
1892:
1893: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1894: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1895: x_return_status := l_return_status;
1896: END IF;
1897: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1894: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1890:
1891: lp_tilv_tbl(l_til_loop_cnt) := lx_tilv_tbl(l_til_loop_cnt);
1892:
1893: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1894: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1895: x_return_status := l_return_status;
1896: END IF;
1897: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1898: END IF;

Line 1897: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1893: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1894: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1895: x_return_status := l_return_status;
1896: END IF;
1897: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1898: END IF;
1899: -- end: cklee -- add additional columns 3/19/07
1900:
1901: -- Create okl_TXL_AR_INV_LNS_B record: okl_til_pvt.insert_row;

Line 1912: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1908: p_tilv_rec => lp_tilv_tbl(l_til_loop_cnt),
1909: x_tilv_rec => lx_tilv_rec);
1910:
1911: -- Error handling lx_taiv_rec;
1912: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1913: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1914: x_return_status := l_return_status;
1915: END IF;
1916: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1913: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1909: x_tilv_rec => lx_tilv_rec);
1910:
1911: -- Error handling lx_taiv_rec;
1912: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1913: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1914: x_return_status := l_return_status;
1915: END IF;
1916: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: END IF;

Line 1916: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1912: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1913: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1914: x_return_status := l_return_status;
1915: END IF;
1916: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1917: END IF;
1918:
1919: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1920: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_tilv_rec.id: '||to_char(lx_tilv_rec.id));

Line 1953: ,p_init_msg_list => OKL_API.G_FALSE

1949:
1950: -- rmunjulu R12 Fixes -- Default invoice_format_type, invoice_format_line_type
1951: Get_Invoice_format(
1952: p_api_version => p_api_version
1953: ,p_init_msg_list => OKL_API.G_FALSE
1954: ,x_return_status => l_return_status
1955: ,x_msg_count => x_msg_count
1956: ,x_msg_data => x_msg_data
1957: ,p_inf_id => lp_taiv_rec.inf_id

Line 1962: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1958: ,p_sty_id => lp_tldv_tbl(l_til_loop_cnt).STY_ID
1959: ,x_invoice_format_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_type
1960: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
1961:
1962: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1964: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1965: RAISE OKL_API.G_EXCEPTION_ERROR;
1966: END IF;

Line 1963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1959: ,x_invoice_format_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_type
1960: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
1961:
1962: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1964: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1965: RAISE OKL_API.G_EXCEPTION_ERROR;
1966: END IF;
1967:

Line 1964: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1960: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
1961:
1962: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1964: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1965: RAISE OKL_API.G_EXCEPTION_ERROR;
1966: END IF;
1967:
1968: -- start: cklee -- add additional columns 3/19/07

Line 1965: RAISE OKL_API.G_EXCEPTION_ERROR;

1961:
1962: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1963: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1964: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1965: RAISE OKL_API.G_EXCEPTION_ERROR;
1966: END IF;
1967:
1968: -- start: cklee -- add additional columns 3/19/07
1969: additional_tld_attr(

Line 1980: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1976: x_tldv_rec => lx_tldv_tbl(l_til_loop_cnt));
1977:
1978: lp_tldv_tbl(l_til_loop_cnt) := lx_tldv_tbl(l_til_loop_cnt);
1979:
1980: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1981: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1982: x_return_status := l_return_status;
1983: END IF;
1984: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1981: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1977:
1978: lp_tldv_tbl(l_til_loop_cnt) := lx_tldv_tbl(l_til_loop_cnt);
1979:
1980: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1981: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1982: x_return_status := l_return_status;
1983: END IF;
1984: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1985: END IF;

Line 1984: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1980: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1981: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1982: x_return_status := l_return_status;
1983: END IF;
1984: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1985: END IF;
1986: -- end: cklee -- add additional columns 3/19/07
1987:
1988: okl_tld_pvt.insert_row(

Line 1997: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1993: x_msg_data => x_msg_data,
1994: p_tldv_rec => lp_tldv_tbl(l_til_loop_cnt),
1995: x_tldv_rec => lx_tldv_rec);
1996:
1997: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1998: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1999: x_return_status := l_return_status;
2000: END IF;
2001: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1998: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1994: p_tldv_rec => lp_tldv_tbl(l_til_loop_cnt),
1995: x_tldv_rec => lx_tldv_rec);
1996:
1997: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1998: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1999: x_return_status := l_return_status;
2000: END IF;
2001: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2002: END IF;

Line 2001: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1997: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1998: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1999: x_return_status := l_return_status;
2000: END IF;
2001: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2002: END IF;
2003: lp_tldv_tbl(l_til_loop_cnt) := lx_tldv_rec;
2004:
2005: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 2032: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2028: p_tldv_rec => lp_tldv_tbl(l_tld_loop_cnt),
2029: x_tldv_rec => lx_tldv_rec);
2030: -- Assign attributes back to lx_tldv_rec along with ID;
2031: -- Error handling;
2032: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2033: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2034: x_return_status := l_return_status;
2035: END IF;
2036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2033: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2029: x_tldv_rec => lx_tldv_rec);
2030: -- Assign attributes back to lx_tldv_rec along with ID;
2031: -- Error handling;
2032: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2033: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2034: x_return_status := l_return_status;
2035: END IF;
2036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2037: END IF;

Line 2036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2032: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2033: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2034: x_return_status := l_return_status;
2035: END IF;
2036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2037: END IF;
2038: lp_tldv_tbl(l_tld_loop_cnt) := lx_tldv_rec;
2039: -- end if;
2040: End If;

Line 2075: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2071: p_tldv_tbl => lp_tldv_tbl ,
2072: p_tai_id => lx_taiv_rec.ID
2073: );
2074: END IF;
2075: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2076: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2077: x_return_status := l_return_status;
2078: END IF;
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2076: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2072: p_tai_id => lx_taiv_rec.ID
2073: );
2074: END IF;
2075: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2076: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2077: x_return_status := l_return_status;
2078: END IF;
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: END IF;

Line 2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2075: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2076: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2077: x_return_status := l_return_status;
2078: END IF;
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: END IF;
2081: --gkhuntet end.
2082:
2083: /****** Code commented by gkhuntet , call the create_accounting_dist. ******/

Line 2103: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2099: x_msg_count => x_msg_count,
2100: x_msg_data => x_msg_data,
2101: p_bpd_acc_rec => p_bpd_acc_rec);
2102:
2103: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2104: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2105: x_return_status := l_return_status;
2106: END IF;
2107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2104: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2100: x_msg_data => x_msg_data,
2101: p_bpd_acc_rec => p_bpd_acc_rec);
2102:
2103: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2104: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2105: x_return_status := l_return_status;
2106: END IF;
2107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2108: END IF;

Line 2107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2103: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2104: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2105: x_return_status := l_return_status;
2106: END IF;
2107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2108: END IF;
2109:
2110: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2111: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Okl_Acc_Call_Pub.CREATE_ACC_TRANS:p_bpd_acc_rec.id: '||to_char(p_bpd_acc_rec.id));

Line 2128: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2124: x_dist_info_rec => l_dist_info_rec,
2125: x_ctxt_val_tbl => l_ctxt_val_tbl,
2126: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
2127:
2128: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2129: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2130: x_return_status := l_return_status;
2131: END IF;
2132: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2129: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2125: x_ctxt_val_tbl => l_ctxt_val_tbl,
2126: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
2127:
2128: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2129: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2130: x_return_status := l_return_status;
2131: END IF;
2132: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2133: END IF;

Line 2132: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2128: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2129: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2130: x_return_status := l_return_status;
2131: END IF;
2132: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2133: END IF;
2134:
2135:
2136: --- populate the tables for passing to Okl_Account_Dist_Pvt.CREATE_ACCOUNTING_DIST

Line 2177: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2173: x_amount_tbl => l_amount_out_tbl,
2174: p_trx_header_id => l_trx_header_id,
2175: p_trx_header_table => l_trx_header_tbl);
2176:
2177: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2178: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2179: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2180: RAISE OKL_API.G_EXCEPTION_ERROR;
2181: END IF;

Line 2178: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2174: p_trx_header_id => l_trx_header_id,
2175: p_trx_header_table => l_trx_header_tbl);
2176:
2177: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2178: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2179: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2180: RAISE OKL_API.G_EXCEPTION_ERROR;
2181: END IF;
2182: */

Line 2179: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2175: p_trx_header_table => l_trx_header_tbl);
2176:
2177: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2178: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2179: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2180: RAISE OKL_API.G_EXCEPTION_ERROR;
2181: END IF;
2182: */
2183: ---- End Added by Vpanwar --- Code for new accounting API uptake

Line 2180: RAISE OKL_API.G_EXCEPTION_ERROR;

2176:
2177: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2178: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2179: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2180: RAISE OKL_API.G_EXCEPTION_ERROR;
2181: END IF;
2182: */
2183: ---- End Added by Vpanwar --- Code for new accounting API uptake
2184:

Line 2197: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2193: (p_count => x_msg_count,
2194: p_data => x_msg_data);
2195:
2196: EXCEPTION
2197: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2198: ROLLBACK TO create_non_sel_billing_trx;
2199: x_return_status := OKL_API.G_RET_STS_ERROR;
2200: FND_MSG_PUB.Count_And_Get
2201: (p_count => x_msg_count,

Line 2199: x_return_status := OKL_API.G_RET_STS_ERROR;

2195:
2196: EXCEPTION
2197: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2198: ROLLBACK TO create_non_sel_billing_trx;
2199: x_return_status := OKL_API.G_RET_STS_ERROR;
2200: FND_MSG_PUB.Count_And_Get
2201: (p_count => x_msg_count,
2202: p_data => x_msg_data);
2203:

Line 2204: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2200: FND_MSG_PUB.Count_And_Get
2201: (p_count => x_msg_count,
2202: p_data => x_msg_data);
2203:
2204: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2205: ROLLBACK TO create_non_sel_billing_trx;
2206: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2207: FND_MSG_PUB.Count_And_Get
2208: (p_count => x_msg_count,

Line 2206: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

2202: p_data => x_msg_data);
2203:
2204: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2205: ROLLBACK TO create_non_sel_billing_trx;
2206: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2207: FND_MSG_PUB.Count_And_Get
2208: (p_count => x_msg_count,
2209: p_data => x_msg_data);
2210:

Line 2214: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

2210:
2211: WHEN OTHERS THEN
2212: ROLLBACK TO create_non_sel_billing_trx;
2213:
2214: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
2215: OKL_API.Set_Message(p_app_name => G_APP_NAME,
2216: p_msg_name => G_UNEXPECTED_ERROR,
2217: p_token1 => G_SQLCODE_TOKEN,
2218: p_token1_value => SQLCODE,

Line 2215: OKL_API.Set_Message(p_app_name => G_APP_NAME,

2211: WHEN OTHERS THEN
2212: ROLLBACK TO create_non_sel_billing_trx;
2213:
2214: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
2215: OKL_API.Set_Message(p_app_name => G_APP_NAME,
2216: p_msg_name => G_UNEXPECTED_ERROR,
2217: p_token1 => G_SQLCODE_TOKEN,
2218: p_token1_value => SQLCODE,
2219: p_token2 => G_SQLERRM_TOKEN,

Line 2268: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

2264: ----------------------------------------------------------------------------------
2265:
2266: PROCEDURE create_sel_billing_trx(
2267: p_api_version IN NUMBER
2268: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
2269: ,x_return_status OUT NOCOPY VARCHAR2
2270: ,x_msg_count OUT NOCOPY NUMBER
2271: ,x_msg_data OUT NOCOPY VARCHAR2
2272: ,p_taiv_rec IN okl_tai_pvt.taiv_rec_type

Line 2283: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2279: is
2280: l_api_name CONSTANT VARCHAR2(30) := 'create_sel_billing_trx';
2281: l_api_version CONSTANT NUMBER := 1.0;
2282: l_til_loop_cnt NUMBER;
2283: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2284: lp_taiv_rec okl_tai_pvt.taiv_rec_type := p_taiv_rec;
2285: lx_taiv_rec okl_tai_pvt.taiv_rec_type;
2286: lp_tilv_tbl okl_til_pvt.tilv_tbl_type := p_tilv_tbl;
2287: lx_tilv_tbl okl_til_pvt.tilv_tbl_type;

Line 2354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2350: p_api_version,
2351: l_api_name,
2352: G_PKG_NAME ))
2353: THEN
2354: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2355: END IF;
2356:
2357: -- Initialize message list if requested
2358: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 2363: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2359: FND_MSG_PUB.initialize;
2360: END IF;
2361:
2362: -- Initialize API status to success
2363: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2364:
2365:
2366: /*** Begin API body ****************************************************/
2367:

Line 2378: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2374: validate_tai_values(
2375: p_taiv_rec => lp_taiv_rec,
2376: x_return_status => l_return_status);
2377:
2378: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2379: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2380: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2381: RAISE OKL_API.G_EXCEPTION_ERROR;
2382: END IF;

Line 2379: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2375: p_taiv_rec => lp_taiv_rec,
2376: x_return_status => l_return_status);
2377:
2378: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2379: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2380: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2381: RAISE OKL_API.G_EXCEPTION_ERROR;
2382: END IF;
2383:

Line 2380: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2376: x_return_status => l_return_status);
2377:
2378: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2379: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2380: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2381: RAISE OKL_API.G_EXCEPTION_ERROR;
2382: END IF;
2383:
2384: additional_tai_attr(

Line 2381: RAISE OKL_API.G_EXCEPTION_ERROR;

2377:
2378: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2379: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2380: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2381: RAISE OKL_API.G_EXCEPTION_ERROR;
2382: END IF;
2383:
2384: additional_tai_attr(
2385: p_api_version => p_api_version,

Line 2395: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2391: x_taiv_rec => lx_taiv_rec);
2392:
2393: lp_taiv_rec := lx_taiv_rec;
2394:
2395: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2396: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2397: x_return_status := l_return_status;
2398: END IF;
2399: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2396: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2392:
2393: lp_taiv_rec := lx_taiv_rec;
2394:
2395: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2396: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2397: x_return_status := l_return_status;
2398: END IF;
2399: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2400: END IF;

Line 2399: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2395: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2396: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2397: x_return_status := l_return_status;
2398: END IF;
2399: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2400: END IF;
2401: -- end: cklee -- add additional columns 3/19/07
2402:
2403: okl_tai_pvt.insert_row(

Line 2412: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2408: x_msg_data => x_msg_data,
2409: p_taiv_rec => lp_taiv_rec,
2410: x_taiv_rec => lx_taiv_rec);
2411:
2412: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2413: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2414: x_return_status := l_return_status;
2415: END IF;
2416: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2413: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2409: p_taiv_rec => lp_taiv_rec,
2410: x_taiv_rec => lx_taiv_rec);
2411:
2412: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2413: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2414: x_return_status := l_return_status;
2415: END IF;
2416: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2417: END IF;

Line 2416: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2412: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2413: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2414: x_return_status := l_return_status;
2415: END IF;
2416: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2417: END IF;
2418: -- 3. Assign attributes back to lx_taiv_rec along with ID (passed lx_taiv_rec as OUT parameter)
2419: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2420: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_taiv_rec.id: '||to_char(lx_taiv_rec.id));

Line 2448: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2444: x_tilv_rec => lx_tilv_tbl(l_til_loop_cnt));
2445:
2446: lp_tilv_tbl(l_til_loop_cnt) := lx_tilv_tbl(l_til_loop_cnt);
2447:
2448: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2449: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2450: x_return_status := l_return_status;
2451: END IF;
2452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2449: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2445:
2446: lp_tilv_tbl(l_til_loop_cnt) := lx_tilv_tbl(l_til_loop_cnt);
2447:
2448: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2449: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2450: x_return_status := l_return_status;
2451: END IF;
2452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2453: END IF;

Line 2452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2448: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2449: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2450: x_return_status := l_return_status;
2451: END IF;
2452: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2453: END IF;
2454: -- end: cklee -- add additional columns 3/19/07
2455:
2456: -- Create okl_TXL_AR_INV_LNS_B record: okl_til_pvt.insert_row;

Line 2467: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2463: p_tilv_rec => lp_tilv_tbl(l_til_loop_cnt),
2464: x_tilv_rec => lx_tilv_rec);
2465:
2466: -- Error handling lx_taiv_rec;
2467: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2468: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2469: x_return_status := l_return_status;
2470: END IF;
2471: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2468: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2464: x_tilv_rec => lx_tilv_rec);
2465:
2466: -- Error handling lx_taiv_rec;
2467: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2468: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2469: x_return_status := l_return_status;
2470: END IF;
2471: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2472: END IF;

Line 2471: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2467: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2468: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2469: x_return_status := l_return_status;
2470: END IF;
2471: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2472: END IF;
2473: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2474: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_tilv_rec.id: '||to_char(lx_tilv_rec.id));
2475: END IF;

Line 2502: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2498: p_tldv_rec => lp_tldv_tbl(l_til_loop_cnt),
2499: p_source => lp_taiv_rec.okl_source_billing_trx,
2500: x_return_status => l_return_status);
2501:
2502: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2503: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2504: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2505: RAISE OKL_API.G_EXCEPTION_ERROR;
2506: END IF;

Line 2503: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2499: p_source => lp_taiv_rec.okl_source_billing_trx,
2500: x_return_status => l_return_status);
2501:
2502: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2503: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2504: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2505: RAISE OKL_API.G_EXCEPTION_ERROR;
2506: END IF;
2507:

Line 2504: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2500: x_return_status => l_return_status);
2501:
2502: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2503: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2504: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2505: RAISE OKL_API.G_EXCEPTION_ERROR;
2506: END IF;
2507:
2508: -- Assign lx_til_rec.ID to lp_tld_rec.TIL_ID_DETAILS;

Line 2505: RAISE OKL_API.G_EXCEPTION_ERROR;

2501:
2502: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2503: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2504: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2505: RAISE OKL_API.G_EXCEPTION_ERROR;
2506: END IF;
2507:
2508: -- Assign lx_til_rec.ID to lp_tld_rec.TIL_ID_DETAILS;
2509: lp_tldv_tbl(l_tld_loop_cnt).TIL_ID_DETAILS := l_til_id;

Line 2527: ,p_init_msg_list => OKL_API.G_FALSE

2523:
2524: -- rmunjulu R12 Fixes -- Default invoice_format_type, invoice_format_line_type
2525: Get_Invoice_format(
2526: p_api_version => p_api_version
2527: ,p_init_msg_list => OKL_API.G_FALSE
2528: ,x_return_status => l_return_status
2529: ,x_msg_count => x_msg_count
2530: ,x_msg_data => x_msg_data
2531: ,p_inf_id => lp_taiv_rec.inf_id

Line 2536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2532: ,p_sty_id => lp_tldv_tbl(l_til_loop_cnt).STY_ID
2533: ,x_invoice_format_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_type
2534: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
2535:
2536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2539: RAISE OKL_API.G_EXCEPTION_ERROR;
2540: END IF;

Line 2537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2533: ,x_invoice_format_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_type
2534: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
2535:
2536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2539: RAISE OKL_API.G_EXCEPTION_ERROR;
2540: END IF;
2541:

Line 2538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2534: ,x_invoice_format_line_type => lp_tldv_tbl(l_til_loop_cnt).invoice_format_line_type);
2535:
2536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2539: RAISE OKL_API.G_EXCEPTION_ERROR;
2540: END IF;
2541:
2542: -- start: cklee -- add additional columns 3/19/07

Line 2539: RAISE OKL_API.G_EXCEPTION_ERROR;

2535:
2536: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2538: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2539: RAISE OKL_API.G_EXCEPTION_ERROR;
2540: END IF;
2541:
2542: -- start: cklee -- add additional columns 3/19/07
2543: additional_tld_attr(

Line 2554: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2550: x_tldv_rec => lx_tldv_tbl(l_tld_loop_cnt));
2551:
2552: lp_tldv_tbl(l_tld_loop_cnt) := lx_tldv_tbl(l_tld_loop_cnt);
2553:
2554: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2555: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2556: x_return_status := l_return_status;
2557: END IF;
2558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2555: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2551:
2552: lp_tldv_tbl(l_tld_loop_cnt) := lx_tldv_tbl(l_tld_loop_cnt);
2553:
2554: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2555: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2556: x_return_status := l_return_status;
2557: END IF;
2558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: END IF;

Line 2558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2554: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2555: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2556: x_return_status := l_return_status;
2557: END IF;
2558: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: END IF;
2560: -- end: cklee -- add additional columns 3/19/07
2561:
2562: okl_tld_pvt.insert_row(

Line 2572: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2568: p_tldv_rec => lp_tldv_tbl(l_tld_loop_cnt),
2569: x_tldv_rec => lx_tldv_rec);
2570: -- Assign attributes back to lx_tldv_rec along with ID;
2571: -- Error handling;
2572: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2573: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2574: x_return_status := l_return_status;
2575: END IF;
2576: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2573: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2569: x_tldv_rec => lx_tldv_rec);
2570: -- Assign attributes back to lx_tldv_rec along with ID;
2571: -- Error handling;
2572: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2573: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2574: x_return_status := l_return_status;
2575: END IF;
2576: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2577: END IF;

Line 2576: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2572: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2573: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2574: x_return_status := l_return_status;
2575: END IF;
2576: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2577: END IF;
2578: lp_tldv_tbl(l_tld_loop_cnt) := lx_tldv_rec;
2579:
2580: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 2609: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2605: x_msg_data => x_msg_data ,
2606: p_tldv_tbl => lp_tldv_tbl ,
2607: p_tai_id => lx_taiv_rec.ID);
2608:
2609: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2610: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2611: x_return_status := l_return_status;
2612: END IF;
2613: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2610: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2606: p_tldv_tbl => lp_tldv_tbl ,
2607: p_tai_id => lx_taiv_rec.ID);
2608:
2609: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2610: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2611: x_return_status := l_return_status;
2612: END IF;
2613: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2614: END IF;

Line 2613: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2609: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2610: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2611: x_return_status := l_return_status;
2612: END IF;
2613: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2614: END IF;
2615: --gkhuntet end.
2616:
2617: /*-- Increase the counter;

Line 2636: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2632: x_msg_count => x_msg_count,
2633: x_msg_data => x_msg_data,
2634: p_bpd_acc_rec => p_bpd_acc_rec);
2635:
2636: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2637: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2638: x_return_status := l_return_status;
2639: END IF;
2640: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2637: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2633: x_msg_data => x_msg_data,
2634: p_bpd_acc_rec => p_bpd_acc_rec);
2635:
2636: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2637: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2638: x_return_status := l_return_status;
2639: END IF;
2640: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2641: END IF;

Line 2640: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2636: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2637: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2638: x_return_status := l_return_status;
2639: END IF;
2640: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2641: END IF;
2642:
2643: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
2644: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Okl_Acc_Call_Pub.CREATE_ACC_TRANS:p_bpd_acc_rec.id: '||to_char(p_bpd_acc_rec.id));

Line 2663: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2659: x_dist_info_rec => l_dist_info_rec,
2660: x_ctxt_val_tbl => l_ctxt_val_tbl,
2661: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
2662:
2663: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2664: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2665: x_return_status := l_return_status;
2666: END IF;
2667: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2664: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2660: x_ctxt_val_tbl => l_ctxt_val_tbl,
2661: x_acc_gen_primary_key_tbl => l_acc_gen_primary_key_tbl);
2662:
2663: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2664: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2665: x_return_status := l_return_status;
2666: END IF;
2667: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: END IF;

Line 2667: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2663: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2664: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2665: x_return_status := l_return_status;
2666: END IF;
2667: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2668: END IF;
2669:
2670:
2671: --- populate the tables for passing to Okl_Account_Dist_Pvt.CREATE_ACCOUNTING_DIST

Line 2713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2709: x_amount_tbl => l_amount_out_tbl,
2710: p_trx_header_id => l_trx_header_id,
2711: p_trx_header_table => l_trx_header_tbl);
2712:
2713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2716: RAISE OKL_API.G_EXCEPTION_ERROR;
2717: END IF;

Line 2714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2710: p_trx_header_id => l_trx_header_id,
2711: p_trx_header_table => l_trx_header_tbl);
2712:
2713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2716: RAISE OKL_API.G_EXCEPTION_ERROR;
2717: END IF;
2718: */

Line 2715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2711: p_trx_header_table => l_trx_header_tbl);
2712:
2713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2716: RAISE OKL_API.G_EXCEPTION_ERROR;
2717: END IF;
2718: */
2719: ---- End Added by Vpanwar --- Code for new accounting API uptake

Line 2716: RAISE OKL_API.G_EXCEPTION_ERROR;

2712:
2713: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2714: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2716: RAISE OKL_API.G_EXCEPTION_ERROR;
2717: END IF;
2718: */
2719: ---- End Added by Vpanwar --- Code for new accounting API uptake
2720:

Line 2732: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2728: (p_count => x_msg_count,
2729: p_data => x_msg_data);
2730:
2731: EXCEPTION
2732: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2733: ROLLBACK TO create_sel_billing_trx;
2734: x_return_status := OKL_API.G_RET_STS_ERROR;
2735: FND_MSG_PUB.Count_And_Get
2736: (p_count => x_msg_count,

Line 2734: x_return_status := OKL_API.G_RET_STS_ERROR;

2730:
2731: EXCEPTION
2732: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2733: ROLLBACK TO create_sel_billing_trx;
2734: x_return_status := OKL_API.G_RET_STS_ERROR;
2735: FND_MSG_PUB.Count_And_Get
2736: (p_count => x_msg_count,
2737: p_data => x_msg_data);
2738:

Line 2739: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2735: FND_MSG_PUB.Count_And_Get
2736: (p_count => x_msg_count,
2737: p_data => x_msg_data);
2738:
2739: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2740: ROLLBACK TO create_sel_billing_trx;
2741: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2742: FND_MSG_PUB.Count_And_Get
2743: (p_count => x_msg_count,

Line 2741: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

2737: p_data => x_msg_data);
2738:
2739: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2740: ROLLBACK TO create_sel_billing_trx;
2741: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2742: FND_MSG_PUB.Count_And_Get
2743: (p_count => x_msg_count,
2744: p_data => x_msg_data);
2745:

Line 2748: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

2744: p_data => x_msg_data);
2745:
2746: WHEN OTHERS THEN
2747: ROLLBACK TO create_sel_billing_trx;
2748: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
2749: OKL_API.Set_Message(p_app_name => G_APP_NAME,
2750: p_msg_name => G_UNEXPECTED_ERROR,
2751: p_token1 => G_SQLCODE_TOKEN,
2752: p_token1_value => SQLCODE,

Line 2749: OKL_API.Set_Message(p_app_name => G_APP_NAME,

2745:
2746: WHEN OTHERS THEN
2747: ROLLBACK TO create_sel_billing_trx;
2748: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
2749: OKL_API.Set_Message(p_app_name => G_APP_NAME,
2750: p_msg_name => G_UNEXPECTED_ERROR,
2751: p_token1 => G_SQLCODE_TOKEN,
2752: p_token1_value => SQLCODE,
2753: p_token2 => G_SQLERRM_TOKEN,

Line 2825: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

2821: -- End of comments
2822: ----------------------------------------------------------------------------------
2823: PROCEDURE create_billing_trx(
2824: p_api_version IN NUMBER
2825: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
2826: ,x_return_status OUT NOCOPY VARCHAR2
2827: ,x_msg_count OUT NOCOPY NUMBER
2828: ,x_msg_data OUT NOCOPY VARCHAR2
2829: ,p_taiv_rec IN okl_tai_pvt.taiv_rec_type

Line 2840: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2836: is
2837: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_BILLING_TRX';
2838: l_api_version CONSTANT NUMBER := 1.0;
2839: l_til_loop_cnt NUMBER;
2840: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2841: lp_taiv_rec okl_tai_pvt.taiv_rec_type := p_taiv_rec;
2842: lx_taiv_rec okl_tai_pvt.taiv_rec_type;
2843: lp_tilv_tbl okl_til_pvt.tilv_tbl_type := p_tilv_tbl;
2844: lx_tilv_tbl okl_til_pvt.tilv_tbl_type;

Line 2895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2891: p_api_version,
2892: l_api_name,
2893: G_PKG_NAME ))
2894: THEN
2895: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2896: END IF;
2897:
2898: -- Initialize message list if requested
2899: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 2904: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2900: FND_MSG_PUB.initialize;
2901: END IF;
2902:
2903: -- Initialize API status to success
2904: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2905:
2906:
2907: /*** Begin API body ****************************************************/
2908:

Line 2916: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2912: p_tilv_tbl => lp_tilv_tbl,
2913: p_tldv_tbl => lp_tldv_tbl);
2914:
2915: --- Store the highest degree of error
2916: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2917: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2918: x_return_status := l_return_status;
2919: END IF;
2920: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2917: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2913: p_tldv_tbl => lp_tldv_tbl);
2914:
2915: --- Store the highest degree of error
2916: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2917: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2918: x_return_status := l_return_status;
2919: END IF;
2920: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: END IF;

Line 2920: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2916: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2917: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2918: x_return_status := l_return_status;
2919: END IF;
2920: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: END IF;
2922:
2923: IF G_IS_STREAM_BASED_BILLING = TRUE THEN
2924:

Line 2938: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2934: x_taiv_rec => lx_taiv_rec,
2935: x_tilv_tbl => lx_tilv_tbl,
2936: x_tldv_tbl => lx_tldv_tbl);
2937:
2938: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2939: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2940: x_return_status := l_return_status;
2941: END IF;
2942: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2939: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2935: x_tilv_tbl => lx_tilv_tbl,
2936: x_tldv_tbl => lx_tldv_tbl);
2937:
2938: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2939: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2940: x_return_status := l_return_status;
2941: END IF;
2942: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2943: END IF;

Line 2942: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2938: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2939: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2940: x_return_status := l_return_status;
2941: END IF;
2942: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2943: END IF;
2944:
2945: ELSE
2946:

Line 2961: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

2957: x_tilv_tbl => lx_tilv_tbl,
2958: x_tldv_tbl => lx_tldv_tbl);
2959: -- end: cklee -- fixed return parameters issues 4/6/07
2960:
2961: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2962: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2963: x_return_status := l_return_status;
2964: END IF;
2965: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2962: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2958: x_tldv_tbl => lx_tldv_tbl);
2959: -- end: cklee -- fixed return parameters issues 4/6/07
2960:
2961: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2962: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2963: x_return_status := l_return_status;
2964: END IF;
2965: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2966: END IF;

Line 2965: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2961: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2962: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2963: x_return_status := l_return_status;
2964: END IF;
2965: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2966: END IF;
2967:
2968: END IF;
2969:

Line 2990: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2986: (p_count => x_msg_count,
2987: p_data => x_msg_data);
2988:
2989: EXCEPTION
2990: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2991: ROLLBACK TO CREATE_BILLING_TRX;
2992: x_return_status := OKL_API.G_RET_STS_ERROR;
2993: FND_MSG_PUB.Count_And_Get
2994: (p_count => x_msg_count,

Line 2992: x_return_status := OKL_API.G_RET_STS_ERROR;

2988:
2989: EXCEPTION
2990: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2991: ROLLBACK TO CREATE_BILLING_TRX;
2992: x_return_status := OKL_API.G_RET_STS_ERROR;
2993: FND_MSG_PUB.Count_And_Get
2994: (p_count => x_msg_count,
2995: p_data => x_msg_data);
2996:

Line 2997: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2993: FND_MSG_PUB.Count_And_Get
2994: (p_count => x_msg_count,
2995: p_data => x_msg_data);
2996:
2997: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2998: ROLLBACK TO CREATE_BILLING_TRX;
2999: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3000: FND_MSG_PUB.Count_And_Get
3001: (p_count => x_msg_count,

Line 2999: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

2995: p_data => x_msg_data);
2996:
2997: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2998: ROLLBACK TO CREATE_BILLING_TRX;
2999: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3000: FND_MSG_PUB.Count_And_Get
3001: (p_count => x_msg_count,
3002: p_data => x_msg_data);
3003:

Line 3006: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

3002: p_data => x_msg_data);
3003:
3004: WHEN OTHERS THEN
3005: ROLLBACK TO CREATE_BILLING_TRX;
3006: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3007: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3008: p_msg_name => G_UNEXPECTED_ERROR,
3009: p_token1 => G_SQLCODE_TOKEN,
3010: p_token1_value => SQLCODE,

Line 3007: OKL_API.Set_Message(p_app_name => G_APP_NAME,

3003:
3004: WHEN OTHERS THEN
3005: ROLLBACK TO CREATE_BILLING_TRX;
3006: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3007: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3008: p_msg_name => G_UNEXPECTED_ERROR,
3009: p_token1 => G_SQLCODE_TOKEN,
3010: p_token1_value => SQLCODE,
3011: p_token2 => G_SQLERRM_TOKEN,

Line 3039: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

3035: -- End of comments
3036: ----------------------------------------------------------------------------------
3037: PROCEDURE Get_Invoice_format(
3038: p_api_version IN NUMBER
3039: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3040: ,x_return_status OUT NOCOPY VARCHAR2
3041: ,x_msg_count OUT NOCOPY NUMBER
3042: ,x_msg_data OUT NOCOPY VARCHAR2
3043: ,p_inf_id IN NUMBER DEFAULT NULL

Line 3051: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

3047: )
3048: is
3049: l_api_name CONSTANT VARCHAR2(30) := 'Get_Invoice_format';
3050: l_api_version CONSTANT NUMBER := 1.0;
3051: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3052:
3053: CURSOR inv_format_csr ( p_format_id IN NUMBER, p_stream_id IN NUMBER ) IS
3054: SELECT
3055: ity.name ity_name,

Line 3094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3090: p_api_version,
3091: l_api_name,
3092: G_PKG_NAME ))
3093: THEN
3094: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3095: END IF;
3096:
3097: -- Initialize message list if requested
3098: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 3103: x_return_status := OKL_API.G_RET_STS_SUCCESS;

3099: FND_MSG_PUB.initialize;
3100: END IF;
3101:
3102: -- Initialize API status to success
3103: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3104:
3105:
3106: /*** Begin API body ****************************************************/
3107:

Line 3139: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3135: (p_count => x_msg_count,
3136: p_data => x_msg_data);
3137:
3138: EXCEPTION
3139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3140: ROLLBACK TO Get_Invoice_format;
3141: x_return_status := OKL_API.G_RET_STS_ERROR;
3142: FND_MSG_PUB.Count_And_Get
3143: (p_count => x_msg_count,

Line 3141: x_return_status := OKL_API.G_RET_STS_ERROR;

3137:
3138: EXCEPTION
3139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3140: ROLLBACK TO Get_Invoice_format;
3141: x_return_status := OKL_API.G_RET_STS_ERROR;
3142: FND_MSG_PUB.Count_And_Get
3143: (p_count => x_msg_count,
3144: p_data => x_msg_data);
3145:

Line 3146: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3142: FND_MSG_PUB.Count_And_Get
3143: (p_count => x_msg_count,
3144: p_data => x_msg_data);
3145:
3146: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3147: ROLLBACK TO Get_Invoice_format;
3148: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3149: FND_MSG_PUB.Count_And_Get
3150: (p_count => x_msg_count,

Line 3148: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

3144: p_data => x_msg_data);
3145:
3146: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3147: ROLLBACK TO Get_Invoice_format;
3148: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3149: FND_MSG_PUB.Count_And_Get
3150: (p_count => x_msg_count,
3151: p_data => x_msg_data);
3152:

Line 3155: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

3151: p_data => x_msg_data);
3152:
3153: WHEN OTHERS THEN
3154: ROLLBACK TO Get_Invoice_format;
3155: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3156: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3157: p_msg_name => G_UNEXPECTED_ERROR,
3158: p_token1 => G_SQLCODE_TOKEN,
3159: p_token1_value => SQLCODE,

Line 3156: OKL_API.Set_Message(p_app_name => G_APP_NAME,

3152:
3153: WHEN OTHERS THEN
3154: ROLLBACK TO Get_Invoice_format;
3155: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3156: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3157: p_msg_name => G_UNEXPECTED_ERROR,
3158: p_token1 => G_SQLCODE_TOKEN,
3159: p_token1_value => SQLCODE,
3160: p_token2 => G_SQLERRM_TOKEN,

Line 3188: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

3184: -- End of comments
3185:
3186: PROCEDURE update_manual_invoice(
3187: p_api_version IN NUMBER
3188: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3189: ,x_return_status OUT NOCOPY VARCHAR2
3190: ,x_msg_count OUT NOCOPY NUMBER
3191: ,x_msg_data OUT NOCOPY VARCHAR2
3192: ,p_taiv_rec IN okl_tai_pvt.taiv_rec_type

Line 3203: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

3199:
3200: l_api_name CONSTANT VARCHAR2(30) := 'update_manual_invoice';
3201: l_api_version CONSTANT NUMBER := 1.0;
3202: l_til_loop_cnt NUMBER;
3203: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3204: lp_taiv_rec okl_tai_pvt.taiv_rec_type := p_taiv_rec;
3205: lx_taiv_rec okl_tai_pvt.taiv_rec_type;
3206: lp_tilv_tbl okl_til_pvt.tilv_tbl_type := p_tilv_tbl;
3207: lx_tilv_tbl okl_til_pvt.tilv_tbl_type;

Line 3234: x_return_status := OKL_API.G_RET_STS_SUCCESS;

3230:
3231: BEGIN
3232:
3233: SAVEPOINT UPDATE_MANUAL_INVOICE;
3234: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3235: x_return_status := OKL_API.START_ACTIVITY( l_api_name
3236: , g_pkg_name
3237: , p_init_msg_list
3238: , l_api_version

Line 3235: x_return_status := OKL_API.START_ACTIVITY( l_api_name

3231: BEGIN
3232:
3233: SAVEPOINT UPDATE_MANUAL_INVOICE;
3234: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3235: x_return_status := OKL_API.START_ACTIVITY( l_api_name
3236: , g_pkg_name
3237: , p_init_msg_list
3238: , l_api_version
3239: , p_api_version

Line 3242: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3238: , l_api_version
3239: , p_api_version
3240: , '_PVT'
3241: , x_return_status);
3242: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3245: RAISE OKL_API.G_EXCEPTION_ERROR;
3246: END IF;

Line 3243: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3239: , p_api_version
3240: , '_PVT'
3241: , x_return_status);
3242: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3245: RAISE OKL_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:

Line 3244: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3240: , '_PVT'
3241: , x_return_status);
3242: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3245: RAISE OKL_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:
3248: --Validating the TAI Attributes.

Line 3245: RAISE OKL_API.G_EXCEPTION_ERROR;

3241: , x_return_status);
3242: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3245: RAISE OKL_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:
3248: --Validating the TAI Attributes.
3249: validate_tai_values(

Line 3253: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3249: validate_tai_values(
3250: p_taiv_rec => lp_taiv_rec,
3251: x_return_status => l_return_status);
3252:
3253: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3255: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3256: RAISE OKL_API.G_EXCEPTION_ERROR;
3257: END IF;

Line 3254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3250: p_taiv_rec => lp_taiv_rec,
3251: x_return_status => l_return_status);
3252:
3253: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3255: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3256: RAISE OKL_API.G_EXCEPTION_ERROR;
3257: END IF;
3258: --Updating the TAI table.

Line 3255: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

3251: x_return_status => l_return_status);
3252:
3253: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3255: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3256: RAISE OKL_API.G_EXCEPTION_ERROR;
3257: END IF;
3258: --Updating the TAI table.
3259: okl_tai_pvt.update_row(

Line 3256: RAISE OKL_API.G_EXCEPTION_ERROR;

3252:
3253: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3255: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3256: RAISE OKL_API.G_EXCEPTION_ERROR;
3257: END IF;
3258: --Updating the TAI table.
3259: okl_tai_pvt.update_row(
3260: p_api_version => p_api_version,

Line 3268: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3264: x_msg_data => x_msg_data,
3265: p_taiv_rec => lp_taiv_rec,
3266: x_taiv_rec => lx_taiv_rec);
3267:
3268: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3269: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3270: x_return_status := l_return_status;
3271: END IF;
3272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3269: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3265: p_taiv_rec => lp_taiv_rec,
3266: x_taiv_rec => lx_taiv_rec);
3267:
3268: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3269: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3270: x_return_status := l_return_status;
3271: END IF;
3272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3273: END IF;

Line 3272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3268: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3269: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3270: x_return_status := l_return_status;
3271: END IF;
3272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3273: END IF;
3274:
3275: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3276: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_taiv_rec.id: '||to_char(lx_taiv_rec.id));

Line 3284: IF (lp_tilv_tbl(i).id = OKL_API.G_MISS_NUM or

3280:
3281:
3282: --TO filter the insert and update record from the the lp_tilv_tbl.
3283: FOR i IN lp_tilv_tbl.FIRST .. lp_tilv_tbl.LAST LOOP
3284: IF (lp_tilv_tbl(i).id = OKL_API.G_MISS_NUM or
3285: lp_tilv_tbl(i).id IS NULL) THEN
3286: l_tilv_Crt_tbl(crt_count) := lp_tilv_tbl(i);
3287: crt_count := crt_count + 1;
3288: ELSE

Line 3306: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3302: x_msg_data => x_msg_data,
3303: p_tilv_rec => l_tilv_Updt_tbl(i),
3304: x_tilv_rec => lx_tilv_rec);
3305:
3306: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3307: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3308: x_return_status := l_return_status;
3309: END IF;
3310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3307: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3303: p_tilv_rec => l_tilv_Updt_tbl(i),
3304: x_tilv_rec => lx_tilv_rec);
3305:
3306: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3307: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3308: x_return_status := l_return_status;
3309: END IF;
3310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3311: END IF;

Line 3310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3306: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3307: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3308: x_return_status := l_return_status;
3309: END IF;
3310: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3311: END IF;
3312:
3313: --Run the Cursor that query record from the TLD on the basis l_tilv_Updt_tbl(i).id
3314: -- Which is TIL_ID_Details in the TLD table.

Line 3344: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3340: x_msg_data => x_msg_data,
3341: p_tldv_rec => lp_tldv_tbl(i),
3342: x_tldv_rec => lx_tldv_rec);
3343:
3344: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3345: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3346: x_return_status := l_return_status;
3347: END IF;
3348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3345: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3341: p_tldv_rec => lp_tldv_tbl(i),
3342: x_tldv_rec => lx_tldv_rec);
3343:
3344: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3345: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3346: x_return_status := l_return_status;
3347: END IF;
3348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: END IF;

Line 3348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3344: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3345: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3346: x_return_status := l_return_status;
3347: END IF;
3348: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: END IF;
3350: END LOOP;
3351: /***** Updation Completed in TIL and TLD *****/
3352:

Line 3374: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3370: p_tldv_tbl => lp_tldv_tbl ,
3371: p_tai_id => lx_taiv_rec.ID
3372: );
3373: END IF;
3374: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3375: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3376: x_return_status := l_return_status;
3377: END IF;
3378: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3375: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3371: p_tai_id => lx_taiv_rec.ID
3372: );
3373: END IF;
3374: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3375: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3376: x_return_status := l_return_status;
3377: END IF;
3378: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3379: END IF;

Line 3378: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3374: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3375: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3376: x_return_status := l_return_status;
3377: END IF;
3378: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3379: END IF;
3380: END IF;
3381:
3382:

Line 3405: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3401: x_tilv_rec => lx_tilv_tbl(i));
3402:
3403: l_tilv_Crt_tbl(i) := lx_tilv_tbl(i);
3404:
3405: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3406: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3407: x_return_status := l_return_status;
3408: END IF;
3409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3406: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3402:
3403: l_tilv_Crt_tbl(i) := lx_tilv_tbl(i);
3404:
3405: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3406: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3407: x_return_status := l_return_status;
3408: END IF;
3409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3410: END IF;

Line 3409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3405: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3406: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3407: x_return_status := l_return_status;
3408: END IF;
3409: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3410: END IF;
3411:
3412:
3413: -- Create okl_TXL_AR_INV_LNS_B record: okl_til_pvt.insert_row;

Line 3422: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3418: x_msg_count => x_msg_count,
3419: x_msg_data => x_msg_data,
3420: p_tilv_rec => l_tilv_Crt_tbl(i),
3421: x_tilv_rec => lx_tilv_rec);
3422: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3423: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3424: x_return_status := l_return_status;
3425: END IF;
3426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3423: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3419: x_msg_data => x_msg_data,
3420: p_tilv_rec => l_tilv_Crt_tbl(i),
3421: x_tilv_rec => lx_tilv_rec);
3422: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3423: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3424: x_return_status := l_return_status;
3425: END IF;
3426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3427: END IF;

Line 3426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3422: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3423: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3424: x_return_status := l_return_status;
3425: END IF;
3426: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3427: END IF;
3428:
3429: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
3430: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'lx_tilv_rec.id: '||to_char(lx_tilv_rec.id));

Line 3454: ,p_init_msg_list => OKL_API.G_FALSE

3450: lp_tldv_tbl(i).KLE_ID := lx_tilv_rec.KLE_ID;
3451:
3452: Get_Invoice_format(
3453: p_api_version => p_api_version
3454: ,p_init_msg_list => OKL_API.G_FALSE
3455: ,x_return_status => l_return_status
3456: ,x_msg_count => x_msg_count
3457: ,x_msg_data => x_msg_data
3458: ,p_inf_id => lp_taiv_rec.inf_id

Line 3463: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3459: ,p_sty_id => lp_tldv_tbl(i).STY_ID
3460: ,x_invoice_format_type => lp_tldv_tbl(i).invoice_format_type
3461: ,x_invoice_format_line_type => lp_tldv_tbl(i).invoice_format_line_type);
3462:
3463: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3464: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3465: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3466: RAISE OKL_API.G_EXCEPTION_ERROR;
3467: END IF;

Line 3464: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3460: ,x_invoice_format_type => lp_tldv_tbl(i).invoice_format_type
3461: ,x_invoice_format_line_type => lp_tldv_tbl(i).invoice_format_line_type);
3462:
3463: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3464: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3465: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3466: RAISE OKL_API.G_EXCEPTION_ERROR;
3467: END IF;
3468:

Line 3465: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

3461: ,x_invoice_format_line_type => lp_tldv_tbl(i).invoice_format_line_type);
3462:
3463: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3464: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3465: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3466: RAISE OKL_API.G_EXCEPTION_ERROR;
3467: END IF;
3468:
3469: additional_tld_attr(

Line 3466: RAISE OKL_API.G_EXCEPTION_ERROR;

3462:
3463: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3464: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3465: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3466: RAISE OKL_API.G_EXCEPTION_ERROR;
3467: END IF;
3468:
3469: additional_tld_attr(
3470: p_api_version => p_api_version,

Line 3480: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3476: x_tldv_rec => lx_tldv_tbl(i));
3477:
3478: lp_tldv_tbl(i) := lx_tldv_tbl(i);
3479:
3480: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3481: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3482: x_return_status := l_return_status;
3483: END IF;
3484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3481: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3477:
3478: lp_tldv_tbl(i) := lx_tldv_tbl(i);
3479:
3480: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3481: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3482: x_return_status := l_return_status;
3483: END IF;
3484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3485: END IF;

Line 3484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3480: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3481: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3482: x_return_status := l_return_status;
3483: END IF;
3484: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3485: END IF;
3486:
3487: okl_tld_pvt.insert_row(
3488: p_api_version => p_api_version,

Line 3496: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3492: x_msg_data => x_msg_data,
3493: p_tldv_rec => lp_tldv_tbl(i),
3494: x_tldv_rec => lx_tldv_rec);
3495:
3496: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3497: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3498: x_return_status := l_return_status;
3499: END IF;
3500: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3497: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3493: p_tldv_rec => lp_tldv_tbl(i),
3494: x_tldv_rec => lx_tldv_rec);
3495:
3496: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3497: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3498: x_return_status := l_return_status;
3499: END IF;
3500: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3501: END IF;

Line 3500: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3496: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3497: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3498: x_return_status := l_return_status;
3499: END IF;
3500: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3501: END IF;
3502: -- lp_tldv_tbl(l_til_loop_cnt) := lx_tldv_rec;
3503:
3504: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN

Line 3531: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3527: p_tldv_tbl => lp_tldv_tbl ,
3528: p_tai_id => lx_taiv_rec.ID
3529: );
3530: END IF;
3531: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3532: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3533: x_return_status := l_return_status;
3534: END IF;
3535: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3532: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3528: p_tai_id => lx_taiv_rec.ID
3529: );
3530: END IF;
3531: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3532: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3533: x_return_status := l_return_status;
3534: END IF;
3535: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3536: END IF;

Line 3535: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3531: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3532: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3533: x_return_status := l_return_status;
3534: END IF;
3535: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3536: END IF;
3537: END IF;
3538:
3539:

Line 3546: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3542: (p_count => x_msg_count,
3543: p_data => x_msg_data);
3544:
3545: EXCEPTION
3546: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3547: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3548: x_return_status := OKL_API.G_RET_STS_ERROR;
3549: FND_MSG_PUB.Count_And_Get
3550: (p_count => x_msg_count,

Line 3548: x_return_status := OKL_API.G_RET_STS_ERROR;

3544:
3545: EXCEPTION
3546: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3547: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3548: x_return_status := OKL_API.G_RET_STS_ERROR;
3549: FND_MSG_PUB.Count_And_Get
3550: (p_count => x_msg_count,
3551: p_data => x_msg_data);
3552:

Line 3553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3549: FND_MSG_PUB.Count_And_Get
3550: (p_count => x_msg_count,
3551: p_data => x_msg_data);
3552:
3553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3554: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3555: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3556: FND_MSG_PUB.Count_And_Get
3557: (p_count => x_msg_count,

Line 3555: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

3551: p_data => x_msg_data);
3552:
3553: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3554: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3555: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3556: FND_MSG_PUB.Count_And_Get
3557: (p_count => x_msg_count,
3558: p_data => x_msg_data);
3559:

Line 3562: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

3558: p_data => x_msg_data);
3559:
3560: WHEN OTHERS THEN
3561: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3562: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3563: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3564: p_msg_name => G_UNEXPECTED_ERROR,
3565: p_token1 => G_SQLCODE_TOKEN,
3566: p_token1_value => SQLCODE,

Line 3563: OKL_API.Set_Message(p_app_name => G_APP_NAME,

3559:
3560: WHEN OTHERS THEN
3561: ROLLBACK TO UPDATE_MANUAL_INVOICE;
3562: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3563: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3564: p_msg_name => G_UNEXPECTED_ERROR,
3565: p_token1 => G_SQLCODE_TOKEN,
3566: p_token1_value => SQLCODE,
3567: p_token2 => G_SQLERRM_TOKEN,

Line 3597: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE

3593: -- End of comments
3594:
3595: PROCEDURE delete_manual_invoice(
3596: p_api_version IN NUMBER
3597: ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
3598: ,x_return_status OUT NOCOPY VARCHAR2
3599: ,x_msg_count OUT NOCOPY NUMBER
3600: ,x_msg_data OUT NOCOPY VARCHAR2
3601: ,p_taiv_id NUMBER

Line 3609: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

3605:
3606: l_api_name CONSTANT VARCHAR2(30) := 'update_manual_invoice';
3607: l_api_version CONSTANT NUMBER := 1.0;
3608: l_til_loop_cnt NUMBER;
3609: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3610: lp_tai_id OKL_TRX_AR_INVOICES_B.ID%TYPE :=p_taiv_id;
3611: lp_til_id OKL_TXL_AR_INV_LNS_B.ID%TYPE :=p_tilv_id;
3612: l_tai_id OKL_TRX_AR_INVOICES_B.ID%TYPE;
3613: l_til_id OKL_TXL_AR_INV_LNS_B.ID%TYPE ;

Line 3638: x_return_status := OKL_API.G_RET_STS_SUCCESS;

3634:
3635: BEGIN
3636: SAVEPOINT DELETE_MANUAL_INVOICE ;
3637:
3638: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3639: x_return_status := OKL_API.START_ACTIVITY( l_api_name
3640: , g_pkg_name
3641: , p_init_msg_list
3642: , l_api_version

Line 3639: x_return_status := OKL_API.START_ACTIVITY( l_api_name

3635: BEGIN
3636: SAVEPOINT DELETE_MANUAL_INVOICE ;
3637:
3638: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3639: x_return_status := OKL_API.START_ACTIVITY( l_api_name
3640: , g_pkg_name
3641: , p_init_msg_list
3642: , l_api_version
3643: , p_api_version

Line 3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3642: , l_api_version
3643: , p_api_version
3644: , '_PVT'
3645: , x_return_status);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3648: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3649: RAISE OKL_API.G_EXCEPTION_ERROR;
3650: END IF;

Line 3647: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3643: , p_api_version
3644: , '_PVT'
3645: , x_return_status);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3648: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3649: RAISE OKL_API.G_EXCEPTION_ERROR;
3650: END IF;
3651:

Line 3648: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3644: , '_PVT'
3645: , x_return_status);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3648: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3649: RAISE OKL_API.G_EXCEPTION_ERROR;
3650: END IF;
3651:
3652: -- IF lp_taiv_id is not null then delete TAI , TIL and TLD records else TIL and TLD.

Line 3649: RAISE OKL_API.G_EXCEPTION_ERROR;

3645: , x_return_status);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3648: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3649: RAISE OKL_API.G_EXCEPTION_ERROR;
3650: END IF;
3651:
3652: -- IF lp_taiv_id is not null then delete TAI , TIL and TLD records else TIL and TLD.
3653: IF lp_tai_id IS NOT NULL THEN

Line 3670: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3666: x_msg_count => x_msg_count,
3667: x_msg_data => x_msg_data,
3668: p_tldv_rec => l_tldv_rec
3669: );
3670: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3671: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3672: x_return_status := l_return_status;
3673: END IF;
3674: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3671: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3667: x_msg_data => x_msg_data,
3668: p_tldv_rec => l_tldv_rec
3669: );
3670: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3671: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3672: x_return_status := l_return_status;
3673: END IF;
3674: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3675: END IF;

Line 3674: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3670: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3671: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3672: x_return_status := l_return_status;
3673: END IF;
3674: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3675: END IF;
3676:
3677: END LOOP; --End loop for TLD
3678: --Delete a TIL Record.

Line 3686: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3682: x_msg_count => x_msg_count,
3683: x_msg_data => x_msg_data,
3684: p_tilv_rec => l_tilv_rec
3685: );
3686: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3687: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3688: x_return_status := l_return_status;
3689: END IF;
3690: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3687: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3683: x_msg_data => x_msg_data,
3684: p_tilv_rec => l_tilv_rec
3685: );
3686: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3687: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3688: x_return_status := l_return_status;
3689: END IF;
3690: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3691: END IF;

Line 3690: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3686: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3687: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3688: x_return_status := l_return_status;
3689: END IF;
3690: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3691: END IF;
3692:
3693: END LOOP;--End loop for TIL.
3694: --Delete a TAI Record.

Line 3702: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3698: x_return_status => l_return_status,
3699: x_msg_count => x_msg_count,
3700: x_msg_data => x_msg_data,
3701: p_taiv_rec => l_taiv_rec);
3702: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3703: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3704: x_return_status := l_return_status;
3705: END IF;
3706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3703: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3699: x_msg_count => x_msg_count,
3700: x_msg_data => x_msg_data,
3701: p_taiv_rec => l_taiv_rec);
3702: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3703: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3704: x_return_status := l_return_status;
3705: END IF;
3706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3707: END IF;

Line 3706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3702: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3703: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3704: x_return_status := l_return_status;
3705: END IF;
3706: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3707: END IF;
3708:
3709: ELSIF lp_til_id IS NOT NULL THEN -- Delete a TIL Rccord and all its TLD Records.
3710: FOR get_tld_dtl_rec in get_tld_dtl_csr(lp_til_id)

Line 3721: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3717: x_msg_count => x_msg_count,
3718: x_msg_data => x_msg_data,
3719: p_tldv_rec => l_tldv_rec
3720: );
3721: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3722: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3723: x_return_status := l_return_status;
3724: END IF;
3725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3722: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3718: x_msg_data => x_msg_data,
3719: p_tldv_rec => l_tldv_rec
3720: );
3721: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3722: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3723: x_return_status := l_return_status;
3724: END IF;
3725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3726: END IF;

Line 3725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3721: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3722: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3723: x_return_status := l_return_status;
3724: END IF;
3725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3726: END IF;
3727:
3728: END LOOP; --End loop for TLD.
3729: l_tilv_rec.id := lp_til_id;

Line 3738: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

3734: x_msg_count => x_msg_count,
3735: x_msg_data => x_msg_data,
3736: p_tilv_rec => l_tilv_rec
3737: );
3738: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3739: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3740: x_return_status := l_return_status;
3741: END IF;
3742: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3739: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3735: x_msg_data => x_msg_data,
3736: p_tilv_rec => l_tilv_rec
3737: );
3738: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3739: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3740: x_return_status := l_return_status;
3741: END IF;
3742: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3743: END IF;

Line 3742: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3738: IF(l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3739: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3740: x_return_status := l_return_status;
3741: END IF;
3742: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3743: END IF;
3744:
3745: END IF ;
3746:

Line 3755: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3751: (p_count => x_msg_count,
3752: p_data => x_msg_data);
3753:
3754: EXCEPTION
3755: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3756: ROLLBACK TO DELETE_MANUAL_INVOICE;
3757: x_return_status := OKL_API.G_RET_STS_ERROR;
3758: FND_MSG_PUB.Count_And_Get
3759: (p_count => x_msg_count,

Line 3757: x_return_status := OKL_API.G_RET_STS_ERROR;

3753:
3754: EXCEPTION
3755: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3756: ROLLBACK TO DELETE_MANUAL_INVOICE;
3757: x_return_status := OKL_API.G_RET_STS_ERROR;
3758: FND_MSG_PUB.Count_And_Get
3759: (p_count => x_msg_count,
3760: p_data => x_msg_data);
3761:

Line 3762: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3758: FND_MSG_PUB.Count_And_Get
3759: (p_count => x_msg_count,
3760: p_data => x_msg_data);
3761:
3762: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3763: ROLLBACK TO DELETE_MANUAL_INVOICE;
3764: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3765: FND_MSG_PUB.Count_And_Get
3766: (p_count => x_msg_count,

Line 3764: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

3760: p_data => x_msg_data);
3761:
3762: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3763: ROLLBACK TO DELETE_MANUAL_INVOICE;
3764: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3765: FND_MSG_PUB.Count_And_Get
3766: (p_count => x_msg_count,
3767: p_data => x_msg_data);
3768:

Line 3771: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

3767: p_data => x_msg_data);
3768:
3769: WHEN OTHERS THEN
3770: ROLLBACK TO DELETE_MANUAL_INVOICE;
3771: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3772: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3773: p_msg_name => G_UNEXPECTED_ERROR,
3774: p_token1 => G_SQLCODE_TOKEN,
3775: p_token1_value => SQLCODE,

Line 3772: OKL_API.Set_Message(p_app_name => G_APP_NAME,

3768:
3769: WHEN OTHERS THEN
3770: ROLLBACK TO DELETE_MANUAL_INVOICE;
3771: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
3772: OKL_API.Set_Message(p_app_name => G_APP_NAME,
3773: p_msg_name => G_UNEXPECTED_ERROR,
3774: p_token1 => G_SQLCODE_TOKEN,
3775: p_token1_value => SQLCODE,
3776: p_token2 => G_SQLERRM_TOKEN,