[Home] [Help]
104: IS_DEBUG_PROCEDURE_ON := Okl_Debug_Pub.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
105: END IF;
106: IF(IS_DEBUG_PROCEDURE_ON) THEN
107: BEGIN
108: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRSIBB.pls call okl_sib_pvt.insert_row');
109: END;
110: END IF;
111:
112: l_budget_line_tbl := p_budget_line_tbl;
128: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
129: RAISE OKL_API.G_EXCEPTION_ERROR;
130: END IF;
131: -- TAPI call which inserts the budget line records in the table OKL_SUBSIDY_POOL_BUDGETS_B.
132: okl_sib_pvt.insert_row(l_api_version,
133: l_init_msg_list,
134: l_return_status,
135: l_msg_count,
136: l_msg_data,
149: x_msg_count := l_msg_count;
150:
151: IF(IS_DEBUG_PROCEDURE_ON) THEN
152: BEGIN
153: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRSIBB.pls call okl_sib_pvt.insert_row ');
154: END;
155: END IF;
156:
157: EXCEPTION
245: IS_DEBUG_PROCEDURE_ON := Okl_Debug_Pub.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
246: END IF;
247: IF(IS_DEBUG_PROCEDURE_ON) THEN
248: BEGIN
249: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRSIBB.pls call okl_sib_pvt.update_row ');
250: END;
251: END IF;
252:
253: l_budget_line_tbl := p_budget_line_tbl;
270: RAISE OKL_API.G_EXCEPTION_ERROR;
271: END IF;
272:
273: -- TAPI call which updates the budget line records in the table OKL_SUBSIDY_POOL_BUDGETS_B.
274: okl_sib_pvt.update_row (l_api_version,
275: l_init_msg_list,
276: l_return_status,
277: l_msg_count,
278: l_msg_data,
291: x_msg_count := l_msg_count;
292:
293: IF(IS_DEBUG_PROCEDURE_ON) THEN
294: BEGIN
295: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRSIBB.pls call okl_sib_pvt.update_row ');
296: END;
297: END IF;
298:
299: EXCEPTION
422: IS_DEBUG_PROCEDURE_ON := Okl_Debug_Pub.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
423: END IF;
424: IF(IS_DEBUG_PROCEDURE_ON) THEN
425: BEGIN
426: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRSIBB.pls call okl_sib_pvt.update_row ');
427: END;
428: END IF;
429: l_row_found := FALSE;
430: l_api_version := 1.0;
458: IF l_row_found THEN
459: l_budget_line_rec.decision_status_code := p_decision_status_code;
460: l_budget_line_rec.decision_date := l_system_date;
461: --TAPI call to update the record.
462: okl_sib_pvt.update_row(l_api_version,
463: l_init_msg_list,
464: l_return_status,
465: l_msg_count,
466: l_msg_data,
504: x_msg_count := l_msg_count;
505:
506: IF(IS_DEBUG_PROCEDURE_ON) THEN
507: BEGIN
508: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRSIBB.pls call okl_sib_pvt.update_row ');
509: END;
510: END IF;
511:
512: EXCEPTION
587: IS_DEBUG_PROCEDURE_ON := Okl_Debug_Pub.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
588: END IF;
589: IF(IS_DEBUG_PROCEDURE_ON) THEN
590: BEGIN
591: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLRSIBB.pls call okl_sib_pvt.validate_row ');
592: END;
593: END IF;
594: l_return_status := OKL_API.G_RET_STS_SUCCESS;
595: -- call START_ACTIVITY to create savepoint, check compatibility
613:
614: l_budget_line_tbl := p_budget_line_tbl;
615:
616: -- TAPI call to validate the records passed to it.
617: okl_sib_pvt.validate_row( p_api_version => p_api_version,
618: p_init_msg_list => p_init_msg_list,
619: x_return_status => x_return_status,
620: x_msg_count => x_msg_count,
621: x_msg_data => x_msg_data,
632: x_msg_data => x_msg_data);
633:
634: IF(IS_DEBUG_PROCEDURE_ON) THEN
635: BEGIN
636: Okl_Debug_Pub.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLRSIBB.pls call okl_sib_pvt.validate_row ');
637: END;
638: END IF;
639:
640: EXCEPTION