DBA Data[Home] [Help]

APPS.OKL_BPD_CAP_PURPOSE_PVT dependencies on OKC_API

Line 19: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE

15: -- End of comments
16: ---------------------------------------------------------------------------
17:
18: PROCEDURE create_purpose( p_api_version IN NUMBER
19: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
20: ,x_return_status OUT NOCOPY VARCHAR2
21: ,x_msg_count OUT NOCOPY NUMBER
22: ,x_msg_data OUT NOCOPY VARCHAR2
23: ,p_strm_tbl IN okl_cash_dtls_tbl_type

Line 40: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;

36: l_org_id OKL_TXL_RCPT_APPS_B.ORG_ID%TYPE DEFAULT MO_GLOBAL.GET_CURRENT_ORG_ID();
37: i NUMBER DEFAULT NULL;
38: j NUMBER DEFAULT NULL;
39: l_api_version NUMBER := 1.0;
40: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;
41: l_return_status VARCHAR2(1);
42: l_msg_count NUMBER := 0;
43: l_msg_data VARCHAR2(2000);
44: l_api_name CONSTANT VARCHAR2(30) := 'create_purpose';

Line 95: OKC_API.init_msg_list(p_init_msg_list);

91: ----------
92:
93:
94: BEGIN
95: OKC_API.init_msg_list(p_init_msg_list);
96: SAVEPOINT create_purpose_PVT;
97: -- Initialize....
98: l_strm_tbl := p_strm_tbl;
99: IF l_strm_tbl.COUNT = 0 THEN

Line 101: x_return_status := OKC_API.G_RET_STS_ERROR;

97: -- Initialize....
98: l_strm_tbl := p_strm_tbl;
99: IF l_strm_tbl.COUNT = 0 THEN
100: -- Message Text: no allocation required if no records are found in the table...
101: x_return_status := OKC_API.G_RET_STS_ERROR;
102: OKC_API.set_message( p_app_name => G_APP_NAME,
103: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
104: RAISE G_EXCEPTION_HALT_VALIDATION;
105: END IF;

Line 102: OKC_API.set_message( p_app_name => G_APP_NAME,

98: l_strm_tbl := p_strm_tbl;
99: IF l_strm_tbl.COUNT = 0 THEN
100: -- Message Text: no allocation required if no records are found in the table...
101: x_return_status := OKC_API.G_RET_STS_ERROR;
102: OKC_API.set_message( p_app_name => G_APP_NAME,
103: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
104: RAISE G_EXCEPTION_HALT_VALIDATION;
105: END IF;
106:

Line 136: x_return_status := OKC_API.G_RET_STS_ERROR;

132:
133:
134: IF l_receipt_amount < l_total_amount_applied THEN
135: -- Message Text: the amount applied must be equal to receipt amount
136: x_return_status := OKC_API.G_RET_STS_ERROR;
137: OKC_API.set_message( p_app_name => G_APP_NAME,
138: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
139: RAISE G_EXCEPTION_HALT_VALIDATION;
140: END IF;

Line 137: OKC_API.set_message( p_app_name => G_APP_NAME,

133:
134: IF l_receipt_amount < l_total_amount_applied THEN
135: -- Message Text: the amount applied must be equal to receipt amount
136: x_return_status := OKC_API.G_RET_STS_ERROR;
137: OKC_API.set_message( p_app_name => G_APP_NAME,
138: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
139: RAISE G_EXCEPTION_HALT_VALIDATION;
140: END IF;
141:

Line 151: x_return_status := OKC_API.G_RET_STS_ERROR;

147: l_rcav_tbl(i).rct_id_details := l_rct_id_details;
148: l_rcav_tbl(i).sty_id := l_strm_tbl(j).sty_id;
149: IF (l_rcav_tbl(i).sty_id = NULL OR
150: l_rcav_tbl(i).sty_id = Okl_Api.G_MISS_NUM ) THEN
151: x_return_status := OKC_API.G_RET_STS_ERROR;
152: OKC_API.set_message( p_app_name => G_APP_NAME,
153: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
154: RAISE G_EXCEPTION_HALT_VALIDATION;
155: END IF;

Line 152: OKC_API.set_message( p_app_name => G_APP_NAME,

148: l_rcav_tbl(i).sty_id := l_strm_tbl(j).sty_id;
149: IF (l_rcav_tbl(i).sty_id = NULL OR
150: l_rcav_tbl(i).sty_id = Okl_Api.G_MISS_NUM ) THEN
151: x_return_status := OKC_API.G_RET_STS_ERROR;
152: OKC_API.set_message( p_app_name => G_APP_NAME,
153: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
154: RAISE G_EXCEPTION_HALT_VALIDATION;
155: END IF;
156:

Line 195: WHEN OKC_API.G_EXCEPTION_ERROR THEN

191: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count
192: ,p_data => x_msg_data);
193:
194:
195: WHEN OKC_API.G_EXCEPTION_ERROR THEN
196: ROLLBACK TO create_purpose_PVT;
197: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
198: x_msg_count := l_msg_count ;
199: x_msg_data := l_msg_data ;

Line 229: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE

225: -- End of comments
226: ---------------------------------------------------------------------------
227:
228: PROCEDURE update_purpose( p_api_version IN NUMBER
229: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
230: ,x_return_status OUT NOCOPY VARCHAR2
231: ,x_msg_count OUT NOCOPY NUMBER
232: ,x_msg_data OUT NOCOPY VARCHAR2
233: ,p_strm_tbl IN okl_cash_dtls_tbl_type

Line 246: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;

242: l_org_id OKL_TXL_RCPT_APPS_B.ORG_ID%TYPE DEFAULT MO_GLOBAL.GET_CURRENT_ORG_ID();
243: i NUMBER DEFAULT NULL;
244: j NUMBER DEFAULT NULL;
245: l_api_version NUMBER := 1.0;
246: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;
247: l_return_status VARCHAR2(1);
248: l_msg_count NUMBER := 0;
249: l_msg_data VARCHAR2(2000);
250: l_api_name CONSTANT VARCHAR2(30) := 'create_purpose';

Line 281: OKC_API.init_msg_list(p_init_msg_list);

277: ----------
278:
279:
280: BEGIN
281: OKC_API.init_msg_list(p_init_msg_list);
282: SAVEPOINT update_purpose_PVT;
283: -- Initialize....
284: l_strm_tbl := p_strm_tbl;
285: IF l_strm_tbl.COUNT = 0 THEN

Line 287: x_return_status := OKC_API.G_RET_STS_ERROR;

283: -- Initialize....
284: l_strm_tbl := p_strm_tbl;
285: IF l_strm_tbl.COUNT = 0 THEN
286: -- Message Text: no allocation required if no records are found in the table...
287: x_return_status := OKC_API.G_RET_STS_ERROR;
288: OKC_API.set_message( p_app_name => G_APP_NAME,
289: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
290: RAISE G_EXCEPTION_HALT_VALIDATION;
291: END IF;

Line 288: OKC_API.set_message( p_app_name => G_APP_NAME,

284: l_strm_tbl := p_strm_tbl;
285: IF l_strm_tbl.COUNT = 0 THEN
286: -- Message Text: no allocation required if no records are found in the table...
287: x_return_status := OKC_API.G_RET_STS_ERROR;
288: OKC_API.set_message( p_app_name => G_APP_NAME,
289: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
290: RAISE G_EXCEPTION_HALT_VALIDATION;
291: END IF;
292:

Line 310: x_return_status := OKC_API.G_RET_STS_ERROR;

306: l_rcav_tbl(i).id := l_strm_tbl(j).id;
307: l_rcav_tbl(i).sty_id := l_strm_tbl(j).sty_id;
308: IF (l_rcav_tbl(i).sty_id = NULL OR
309: l_rcav_tbl(i).sty_id = Okl_Api.G_MISS_NUM ) THEN
310: x_return_status := OKC_API.G_RET_STS_ERROR;
311: OKC_API.set_message( p_app_name => G_APP_NAME,
312: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
313: RAISE G_EXCEPTION_HALT_VALIDATION;
314: END IF;

Line 311: OKC_API.set_message( p_app_name => G_APP_NAME,

307: l_rcav_tbl(i).sty_id := l_strm_tbl(j).sty_id;
308: IF (l_rcav_tbl(i).sty_id = NULL OR
309: l_rcav_tbl(i).sty_id = Okl_Api.G_MISS_NUM ) THEN
310: x_return_status := OKC_API.G_RET_STS_ERROR;
311: OKC_API.set_message( p_app_name => G_APP_NAME,
312: p_msg_name =>'OKL_BPD_RCPT_ALLOC_ERR');
313: RAISE G_EXCEPTION_HALT_VALIDATION;
314: END IF;
315: l_rcav_tbl(i).amount := l_strm_tbl(j).amount;

Line 351: WHEN OKC_API.G_EXCEPTION_ERROR THEN

347: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count
348: ,p_data => x_msg_data);
349:
350:
351: WHEN OKC_API.G_EXCEPTION_ERROR THEN
352: ROLLBACK TO update_purpose_PVT;
353: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
354: x_msg_count := l_msg_count ;
355: x_msg_data := l_msg_data ;

Line 386: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE

382: -- End of comments
383: ---------------------------------------------------------------------------
384:
385: PROCEDURE delete_purpose( p_api_version IN NUMBER
386: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
387: ,x_return_status OUT NOCOPY VARCHAR2
388: ,x_msg_count OUT NOCOPY NUMBER
389: ,x_msg_data OUT NOCOPY VARCHAR2
390: ,p_strm_tbl IN okl_cash_dtls_tbl_type

Line 403: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;

399: l_org_id OKL_TXL_RCPT_APPS_B.ORG_ID%TYPE DEFAULT MO_GLOBAL.GET_CURRENT_ORG_ID();
400: i NUMBER DEFAULT NULL;
401: j NUMBER DEFAULT NULL;
402: l_api_version NUMBER := 1.0;
403: l_init_msg_list VARCHAR2(1) := Okc_Api.g_false;
404: l_return_status VARCHAR2(1);
405: l_msg_count NUMBER := 0;
406: l_msg_data VARCHAR2(2000);
407: l_api_name CONSTANT VARCHAR2(30) := 'create_purpose';

Line 438: OKC_API.init_msg_list(p_init_msg_list);

434: ----------
435:
436:
437: BEGIN
438: OKC_API.init_msg_list(p_init_msg_list);
439: SAVEPOINT delete_purpose_PVT;
440: -- Initialize....
441: l_strm_tbl := p_strm_tbl;
442: IF l_strm_tbl.COUNT = 0 THEN

Line 444: x_return_status := OKC_API.G_RET_STS_ERROR;

440: -- Initialize....
441: l_strm_tbl := p_strm_tbl;
442: IF l_strm_tbl.COUNT = 0 THEN
443: -- Message Text: no allocation required if no records are found in the table...
444: x_return_status := OKC_API.G_RET_STS_ERROR;
445: OKC_API.set_message( p_app_name => G_APP_NAME,
446: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
447: RAISE G_EXCEPTION_HALT_VALIDATION;
448: END IF;

Line 445: OKC_API.set_message( p_app_name => G_APP_NAME,

441: l_strm_tbl := p_strm_tbl;
442: IF l_strm_tbl.COUNT = 0 THEN
443: -- Message Text: no allocation required if no records are found in the table...
444: x_return_status := OKC_API.G_RET_STS_ERROR;
445: OKC_API.set_message( p_app_name => G_APP_NAME,
446: p_msg_name =>'OKL_BPD_NO_ALLOC_REQ');
447: RAISE G_EXCEPTION_HALT_VALIDATION;
448: END IF;
449:

Line 501: WHEN OKC_API.G_EXCEPTION_ERROR THEN

497: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count
498: ,p_data => x_msg_data);
499:
500:
501: WHEN OKC_API.G_EXCEPTION_ERROR THEN
502: ROLLBACK TO delete_purpose_PVT;
503: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
504: x_msg_count := l_msg_count ;
505: x_msg_data := l_msg_data ;