24: -- Called By:
25: ------------------------------------------------------------------------------
26: PROCEDURE generate_line_payments(
27: p_api_version IN NUMBER,
28: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
29: x_return_status OUT NOCOPY VARCHAR2,
30: x_msg_count OUT NOCOPY NUMBER,
31: x_msg_data OUT NOCOPY VARCHAR2,
32: p_chr_id IN OKC_K_HEADERS_V.ID%TYPE,
44: l_precision FND_CURRENCIES.PRECISION%TYPE;
45:
46: BEGIN -- main process begins here
47:
48: x_return_status := OKC_API.G_RET_STS_SUCCESS;
49: -- call START_ACTIVITY to create savepoint, check compatibility
50: -- and initialize message list
51: x_return_status := OKC_API.START_ACTIVITY(
52: p_api_name => l_api_name,
47:
48: x_return_status := OKC_API.G_RET_STS_SUCCESS;
49: -- call START_ACTIVITY to create savepoint, check compatibility
50: -- and initialize message list
51: x_return_status := OKC_API.START_ACTIVITY(
52: p_api_name => l_api_name,
53: p_pkg_name => G_PKG_NAME,
54: p_init_msg_list => p_init_msg_list,
55: l_api_version => l_api_version,
57: p_api_type => G_API_TYPE,
58: x_return_status => x_return_status);
59:
60: -- check if activity started successfully
61: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
62: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
63: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
64: raise OKC_API.G_EXCEPTION_ERROR;
65: END IF;
58: x_return_status => x_return_status);
59:
60: -- check if activity started successfully
61: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
62: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
63: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
64: raise OKC_API.G_EXCEPTION_ERROR;
65: END IF;
66:
59:
60: -- check if activity started successfully
61: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
62: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
63: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
64: raise OKC_API.G_EXCEPTION_ERROR;
65: END IF;
66:
67:
60: -- check if activity started successfully
61: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
62: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
63: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
64: raise OKC_API.G_EXCEPTION_ERROR;
65: END IF;
66:
67:
68: okl_payment_split_pvt.generate_line_payments(
78: p_period => p_period,
79: p_frequency => p_frequency,
80: x_strm_tbl => x_strm_tbl
81: );
82: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
83: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
84: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
85: raise OKC_API.G_EXCEPTION_ERROR;
86: END IF;
79: p_frequency => p_frequency,
80: x_strm_tbl => x_strm_tbl
81: );
82: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
83: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
84: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
85: raise OKC_API.G_EXCEPTION_ERROR;
86: END IF;
87:
80: x_strm_tbl => x_strm_tbl
81: );
82: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
83: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
84: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
85: raise OKC_API.G_EXCEPTION_ERROR;
86: END IF;
87:
88: --Call End Activity
81: );
82: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
83: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
84: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
85: raise OKC_API.G_EXCEPTION_ERROR;
86: END IF;
87:
88: --Call End Activity
89: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
90: x_msg_data => x_msg_data);
91:
92: EXCEPTION
93:
94: when OKC_API.G_EXCEPTION_ERROR then
95: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
96: p_api_name => l_api_name,
97: p_pkg_name => G_PKG_NAME,
98: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
91:
92: EXCEPTION
93:
94: when OKC_API.G_EXCEPTION_ERROR then
95: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
96: p_api_name => l_api_name,
97: p_pkg_name => G_PKG_NAME,
98: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
99: x_msg_count => x_msg_count,
94: when OKC_API.G_EXCEPTION_ERROR then
95: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
96: p_api_name => l_api_name,
97: p_pkg_name => G_PKG_NAME,
98: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
99: x_msg_count => x_msg_count,
100: x_msg_data => x_msg_data,
101: p_api_type => G_API_TYPE);
102:
99: x_msg_count => x_msg_count,
100: x_msg_data => x_msg_data,
101: p_api_type => G_API_TYPE);
102:
103: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
104: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
105: p_api_name => l_api_name,
106: p_pkg_name => G_PKG_NAME,
107: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
100: x_msg_data => x_msg_data,
101: p_api_type => G_API_TYPE);
102:
103: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
104: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
105: p_api_name => l_api_name,
106: p_pkg_name => G_PKG_NAME,
107: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
108: x_msg_count => x_msg_count,
103: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
104: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
105: p_api_name => l_api_name,
106: p_pkg_name => G_PKG_NAME,
107: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
108: x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data,
110: p_api_type => G_API_TYPE);
111:
109: x_msg_data => x_msg_data,
110: p_api_type => G_API_TYPE);
111:
112: when OTHERS then
113: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
114: p_api_name => l_api_name,
115: p_pkg_name => G_PKG_NAME,
116: p_exc_name => 'OTHERS',
117: x_msg_count => x_msg_count,