6: -- GLOBAL CONSTANTS
7: ---------------------------------------------------------------------------
8:
9: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_LEASE_LOAN_TRMNT_PVT';
10: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
11: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
12: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_COL_NAME_TOKEN;
13: --Bug# 3999921: pagarg +++ T and A ++++
14: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
8:
9: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_LEASE_LOAN_TRMNT_PVT';
10: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
11: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
12: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_COL_NAME_TOKEN;
13: --Bug# 3999921: pagarg +++ T and A ++++
14: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
15:
16: -- RMUNJULU 06-MAR-03 Fixed msg constants
10: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
11: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
12: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_COL_NAME_TOKEN;
13: --Bug# 3999921: pagarg +++ T and A ++++
14: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
15:
16: -- RMUNJULU 06-MAR-03 Fixed msg constants
17: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
18: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
28: -- GLOBAL DATASTRUCTURES
29: ---------------------------------------------------------------------------
30:
31: TYPE term_rec_type IS RECORD (
32: p_contract_id NUMBER := OKL_API.G_MISS_NUM,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
29: ---------------------------------------------------------------------------
30:
31: TYPE term_rec_type IS RECORD (
32: p_contract_id NUMBER := OKL_API.G_MISS_NUM,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
30:
31: TYPE term_rec_type IS RECORD (
32: p_contract_id NUMBER := OKL_API.G_MISS_NUM,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
31: TYPE term_rec_type IS RECORD (
32: p_contract_id NUMBER := OKL_API.G_MISS_NUM,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
32: p_contract_id NUMBER := OKL_API.G_MISS_NUM,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
33: p_contract_number VARCHAR2(200) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
34: p_contract_modifier VARCHAR2(200) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
35: p_orig_end_date DATE := OKL_API.G_MISS_DATE,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
36: p_contract_version VARCHAR2(200) := OKL_API.G_MISS_CHAR,
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
44: p_recycle_flag VARCHAR2(1) := OKL_API.G_MISS_CHAR);
37: p_termination_date DATE := OKL_API.G_MISS_DATE,
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
44: p_recycle_flag VARCHAR2(1) := OKL_API.G_MISS_CHAR);
45:
38: p_termination_reason VARCHAR2(200) := OKL_API.G_MISS_CHAR,
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
44: p_recycle_flag VARCHAR2(1) := OKL_API.G_MISS_CHAR);
45:
46:
39: p_quote_id NUMBER := OKL_API.G_MISS_NUM,
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
44: p_recycle_flag VARCHAR2(1) := OKL_API.G_MISS_CHAR);
45:
46:
47: SUBTYPE tcnv_rec_type IS OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
40: p_quote_type VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
41: p_quote_reason VARCHAR2(2000) := OKL_API.G_MISS_CHAR,
42: p_early_termination_yn VARCHAR2(1) := OKL_API.G_MISS_CHAR,
43: p_control_flag VARCHAR2(200) := OKL_API.G_MISS_CHAR,
44: p_recycle_flag VARCHAR2(1) := OKL_API.G_MISS_CHAR);
45:
46:
47: SUBTYPE tcnv_rec_type IS OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
48: SUBTYPE tcnv_tbl_type IS OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
57: ---------------------------------------------------------------------------
58:
59: PROCEDURE validate_contract(
60: p_api_version IN NUMBER,
61: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
62: x_return_status OUT NOCOPY VARCHAR2,
63: x_msg_count OUT NOCOPY NUMBER,
64: x_msg_data OUT NOCOPY VARCHAR2,
65: p_contract_id IN NUMBER,
67: x_contract_status OUT NOCOPY VARCHAR2);
68:
69: PROCEDURE lease_loan_termination(
70: p_api_version IN NUMBER,
71: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
72: x_return_status OUT NOCOPY VARCHAR2,
73: x_msg_count OUT NOCOPY NUMBER,
74: x_msg_data OUT NOCOPY VARCHAR2,
75: p_term_rec IN term_rec_type,
77:
78:
79: PROCEDURE lease_loan_termination(
80: p_api_version IN NUMBER,
81: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
82: x_return_status OUT NOCOPY VARCHAR2,
83: x_msg_count OUT NOCOPY NUMBER,
84: x_msg_data OUT NOCOPY VARCHAR2,
85: p_term_tbl IN term_tbl_type,
86: p_tcnv_tbl IN tcnv_tbl_type);
87:
88: PROCEDURE process_discount_subsidy(
89: p_api_version IN NUMBER,
90: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
91: x_return_status OUT NOCOPY VARCHAR2,
92: x_msg_count OUT NOCOPY NUMBER,
93: x_msg_data OUT NOCOPY VARCHAR2,
94: p_term_rec IN term_rec_type,
170:
171: --Bug# 3999921: pagarg +++ T and A +++++++ Start ++++++++++
172: PROCEDURE process_adjustments(
173: p_api_version IN NUMBER,
174: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
175: x_return_status OUT NOCOPY VARCHAR2,
176: x_msg_count OUT NOCOPY NUMBER,
177: x_msg_data OUT NOCOPY VARCHAR2,
178: p_term_rec IN term_rec_type,
192:
193: -- rmunjulu LOANS_ENHANCEMENTS refund excess loan payments
194: PROCEDURE process_loan_refunds(
195: p_api_version IN NUMBER,
196: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
197: x_return_status OUT NOCOPY VARCHAR2,
198: x_msg_count OUT NOCOPY NUMBER,
199: x_msg_data OUT NOCOPY VARCHAR2,
200: p_term_rec IN term_rec_type,