[Home] [Help]
PACKAGE: APPS.OKL_SETUPPRODUCTS_PVT
Source
1 PACKAGE OKL_SETUPPRODUCTS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRSPDS.pls 120.5 2007/05/11 10:55:49 dpsingh ship $ */
3
4 ---------------------------------------------------------------------------
5 -- GLOBAL VARIABLES
6 ---------------------------------------------------------------------------
7 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
8 G_VERSION_OVERLAPS CONSTANT VARCHAR2(200) := 'OKL_VERSION_OVERLAPS';
9 G_DATES_MISMATCH CONSTANT VARCHAR2(200) := 'OKL_DATES_MISMATCH';
10 G_PAST_RECORDS CONSTANT VARCHAR2(200) := 'OKL_PAST_RECORDS';
11 G_START_DATE CONSTANT VARCHAR2(200) := 'OKL_START_DATE';
12 G_UNQS CONSTANT VARCHAR2(200) := 'OKL_NOT_UNIQUE';
13 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLERRM';
14 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'OKL_SQLCODE';
15 G_TABLE_TOKEN CONSTANT VARCHAR2(100) := 'OKL_TABLE_NAME';
16 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(100) := OKL_API.G_PARENT_TABLE_TOKEN;
17 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(100) := OKL_API.G_CHILD_TABLE_TOKEN;
18 G_COL_NAME_TOKEN CONSTANT VARCHAR2(100) := OKL_API.G_COL_NAME_TOKEN;
19
20 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
21 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_SETUPPRODUCTS_PVT';
22
23 G_INIT_VERSION CONSTANT NUMBER := 1.0;
24 G_VERSION_MAJOR_INCREMENT CONSTANT NUMBER := 1.0;
25 G_VERSION_MINOR_INCREMENT CONSTANT NUMBER := 0.1;
26 G_VERSION_FORMAT CONSTANT VARCHAR2(100) := 'FM999.0999';
27 G_COPY CONSTANT VARCHAR2(10) := 'COPY';
28 G_UPDATE CONSTANT VARCHAR2(10) := 'UPDATE';
29
30 -- multi gaap
31 G_SEC_VALUES_MISS CONSTANT VARCHAR2(200) := 'OKL_SEC_VALUES_MISS';
32 G_LEASE_VALUES_MISS CONSTANT VARCHAR2(200) := 'OKL_LEASE_VALUES_MISS';
33 G_TAXOWN_VALUES_MISS CONSTANT VARCHAR2(200) := 'OKL_TAXOWN_VALUES_MISS';
34 G_LEASE_SEC_TAXOWN_MISS CONSTANT VARCHAR2(200) := 'OKL_LEASE_SEC_TAXOWN_MISS';
35 G_PRODUCT_SETUP_INCOMPLETE CONSTANT VARCHAR2(200) := 'OKL_PRODUCT_SETUP_INCOMPLETE';
36 G_INVALID_PDT CONSTANT VARCHAR2(200) := 'OKL_INVALID_PDT';
37
38 -- user defined streams
39 G_BOOK_CLASS_MISMATCH CONSTANT VARCHAR2(200) := 'OKL_BOOK_CLASS_MISMATCH';
40
41 G_PDT_STS_NEW CONSTANT VARCHAR2(10) := 'NEW';
42 G_PDT_STS_PASSED CONSTANT VARCHAR2(10) := 'PASSED';
43 G_PDT_STS_INVALID CONSTANT VARCHAR2(15) := 'INVALID';
44 G_PDT_STS_APPROVED CONSTANT VARCHAR2(15) := 'APPROVED';
45 G_PDT_STS_PENDING_APPROVAL CONSTANT VARCHAR2(20) := 'PENDING APPROVAL';
46
47 G_WF_ITM_APPLICATION_ID CONSTANT VARCHAR2(20) := 'APPLICATION_ID';
48 G_WF_ITM_TRANSACTION_TYPE_ID CONSTANT VARCHAR2(20) := 'TRX_TYPE_ID';
49 G_WF_ITM_TRANSACTION_ID CONSTANT VARCHAR2(20) := 'TRANSACTION_ID';
50 G_WF_ITM_REQUESTER CONSTANT VARCHAR2(20) := 'REQUESTER';
51 G_WF_ITM_REQUESTER_ID CONSTANT VARCHAR2(20) := 'REQUESTER_ID';
52 G_WF_ITM_APPROVER CONSTANT VARCHAR2(20) := 'APPROVER';
53 G_WF_ITM_APPROVAL_REQ_MSG CONSTANT VARCHAR2(30) := 'APPROVAL_REQUEST_MESSAGE';
54 G_WF_ITM_PRODUCT_ID CONSTANT VARCHAR2(20) := 'PRODUCT_ID';
55 G_WF_ITM_PRODUCT_NAME CONSTANT VARCHAR2(20) := 'PRODUCT_NAME';
56 G_WF_ITM_APPROVED_YN CONSTANT VARCHAR2(15) := 'APPROVED_YN';
57 G_WF_ITM_MESSAGE_DESCRIPTION CONSTANT VARCHAR2(30) := 'MESSAGE_DESCRIPTION';
58 G_WF_USER_ORIG_SYSTEM_HR CONSTANT VARCHAR2(5) := 'PER';
59 G_DEFAULT_USER_DESC CONSTANT VARCHAR2(30) := 'System Administrator';
60 G_WF_ITM_APPROVED_YN_YES CONSTANT VARCHAR2(1) := 'Y';
61 G_WF_ITM_APPROVED_YN_NO CONSTANT VARCHAR2(1) := 'N';
62
63 --Tax enhancement project
64 G_TAX_STYID_MISMATCH CONSTANT VARCHAR2(200) := 'OKL_TAX_STYID_MISMATCH';
65 --*** copied form lla need to create own later
66 G_NO_MATCHING_RECORD CONSTANT VARCHAR2(200) := 'OKL_LLA_NO_MATCHING_RECORD';
67 G_KHR_STATUS_NOT_COMPLETE VARCHAR2(200) := 'OKL_LLA_NOT_COMPLETE';
68 G_TRANS_APP_NAME CONSTANT VARCHAR2(200) := 'OKL LP Product Approval Process';
69 G_EVENT_APPROVE_AME CONSTANT VARCHAR2(50) := 'oracle.apps.okl.la.approve_lease_contract';
70 G_INVALID_APP VARCHAR2(200) := 'OKL_LLA_INVALID_APPLICATION';
71 G_API_TYPE CONSTANT VARCHAR2(200) := '_PVT';
72
73
74 G_EXCEPTION_HALT_PROCESSING EXCEPTION;
75
76 TYPE pdt_parameters_rec_type IS RECORD (
77 id NUMBER := okl_api.G_MISS_NUM,
78 name OKL_PRODUCTS_V.NAME%TYPE := okl_api.G_MISS_CHAR,
79 from_date OKL_PRODUCTS.FROM_DATE%TYPE := okl_api.G_MISS_DATE,
80 to_date OKL_PRODUCTS.TO_DATE%TYPE := okl_api.G_MISS_DATE,
81 version OKL_PRODUCTS_V.VERSION%TYPE := okl_api.G_MISS_CHAR,
82 object_version_number NUMBER := okl_api.G_MISS_NUM,
83 aes_id NUMBER := okl_api.G_MISS_NUM,
84 ptl_id NUMBER := okl_api.G_MISS_NUM,
85 legacy_product_yn OKL_PRODUCTS.LEGACY_PRODUCT_YN%TYPE := okl_api.G_MISS_CHAR,
86 attribute_category OKL_PRODUCTS.ATTRIBUTE_CATEGORY%TYPE := okl_api.G_MISS_CHAR,
87 attribute1 OKL_PRODUCTS.ATTRIBUTE1%TYPE := okl_api.G_MISS_CHAR,
88 attribute2 OKL_PRODUCTS.ATTRIBUTE2%TYPE := okl_api.G_MISS_CHAR,
89 attribute3 OKL_PRODUCTS.ATTRIBUTE3%TYPE := okl_api.G_MISS_CHAR,
90 attribute4 OKL_PRODUCTS.ATTRIBUTE4%TYPE := okl_api.G_MISS_CHAR,
91 attribute5 OKL_PRODUCTS.ATTRIBUTE5%TYPE := okl_api.G_MISS_CHAR,
92 attribute6 OKL_PRODUCTS.ATTRIBUTE6%TYPE := okl_api.G_MISS_CHAR,
93 attribute7 OKL_PRODUCTS.ATTRIBUTE7%TYPE := okl_api.G_MISS_CHAR,
94 attribute8 OKL_PRODUCTS.ATTRIBUTE8%TYPE := okl_api.G_MISS_CHAR,
95 attribute9 OKL_PRODUCTS.ATTRIBUTE9%TYPE := okl_api.G_MISS_CHAR,
96 attribute10 OKL_PRODUCTS.ATTRIBUTE10%TYPE := okl_api.G_MISS_CHAR,
97 attribute11 OKL_PRODUCTS.ATTRIBUTE11%TYPE := okl_api.G_MISS_CHAR,
98 attribute12 OKL_PRODUCTS.ATTRIBUTE12%TYPE := okl_api.G_MISS_CHAR,
99 attribute13 OKL_PRODUCTS.ATTRIBUTE13%TYPE := okl_api.G_MISS_CHAR,
100 attribute14 OKL_PRODUCTS.ATTRIBUTE14%TYPE := okl_api.G_MISS_CHAR,
101 attribute15 OKL_PRODUCTS.ATTRIBUTE15%TYPE := okl_api.G_MISS_CHAR,
102 Product_subclass OKL_PDT_QUALITYS_V.NAME%TYPE := okl_api.G_MISS_CHAR,
103 Deal_Type OKL_PQY_VALUES_V.VALUE%TYPE := okl_api.G_MISS_CHAR,
104 Tax_Owner OKL_PQY_VALUES_V.VALUE%TYPE := okl_api.G_MISS_CHAR,
105 Revenue_Recognition_Method OKL_PQY_VALUES_V.VALUE%TYPE := okl_api.G_MISS_CHAR,
106 Interest_Calculation_Basis OKL_PQY_VALUES_V.VALUE%TYPE := okl_api.G_MISS_CHAR,
107 reporting_pdt_id NUMBER := okl_api.G_MISS_NUM,
108 reporting_product OKL_PRODUCTS_V.NAME%TYPE := okl_api.G_MISS_CHAR
109 );
110
111 g_miss_pdt_parameters_rec pdt_parameters_rec_type;
112
113 TYPE pdt_parameters_tbl_type IS TABLE OF pdt_parameters_rec_type
114 INDEX BY BINARY_INTEGER;
115
116 SUBTYPE pdtv_rec_type IS okl_products_pub.pdtv_rec_type;
117 SUBTYPE pdtv_tbl_type IS okl_products_pub.pdtv_tbl_type;
118
119 SUBTYPE pqvv_rec_type IS okl_pqy_values_pub.pqvv_rec_type;
120 SUBTYPE pqvv_tbl_type IS okl_pqy_values_pub.pqvv_tbl_type;
121
122 SUBTYPE ponv_rec_type IS okl_product_options_pub.ponv_rec_type;
123 SUBTYPE ponv_tbl_type IS okl_product_options_pub.ponv_tbl_type;
124
125 SUBTYPE povv_rec_type IS okl_pdt_opt_vals_pub.povv_rec_type;
126 SUBTYPE povv_tbl_type IS okl_pdt_opt_vals_pub.povv_tbl_type;
127
128 PROCEDURE get_rec(
129 p_pdtv_rec IN pdtv_rec_type,
130 x_return_status OUT NOCOPY VARCHAR2,
131 x_no_data_found OUT NOCOPY BOOLEAN,
132 x_pdtv_rec OUT NOCOPY pdtv_rec_type);
133
134 PROCEDURE insert_products(
135 p_api_version IN NUMBER,
136 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
137 x_return_status OUT NOCOPY VARCHAR2,
138 x_msg_count OUT NOCOPY NUMBER,
139 x_msg_data OUT NOCOPY VARCHAR2,
140 p_pdtv_rec IN pdtv_rec_type,
141 x_pdtv_rec OUT NOCOPY pdtv_rec_type);
142
143 PROCEDURE update_products(
144 p_api_version IN NUMBER,
145 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
146 x_return_status OUT NOCOPY VARCHAR2,
147 x_msg_count OUT NOCOPY NUMBER,
148 x_msg_data OUT NOCOPY VARCHAR2,
149 p_pdtv_rec IN pdtv_rec_type,
150 x_pdtv_rec OUT NOCOPY pdtv_rec_type);
151
152
153 --- Submit for Approval
154 PROCEDURE product_approval_process
155 ( p_api_version IN NUMBER,
156 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
157 x_return_status OUT NOCOPY VARCHAR2,
158 x_msg_count OUT NOCOPY NUMBER,
159 x_msg_data OUT NOCOPY VARCHAR2,
160 p_pdtv_rec IN pdtv_rec_type);
161
162 -- set addtional product parameters and parameters for AME approval process
163 PROCEDURE set_additionalparameters(
164 itemtype IN VARCHAR2,
165 itemkey IN VARCHAR2,
166 actid IN NUMBER,
167 funcmode IN VARCHAR2,
168 resultout OUT NOCOPY VARCHAR2);
169
170 --- procedure called from workflow returning approval status
171 PROCEDURE get_approval_status(itemtype IN VARCHAR2,
172 itemkey IN VARCHAR2,
173 actid IN NUMBER,
174 funcmode IN VARCHAR2,
175 resultout OUT NOCOPY VARCHAR2);
176
177 --- procedure to update product status
178 PROCEDURE update_product_status(
179 p_api_version IN NUMBER,
180 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
181 x_return_status OUT NOCOPY VARCHAR2,
182 x_msg_count OUT NOCOPY NUMBER,
183 x_msg_data OUT NOCOPY VARCHAR2,
184 p_pdt_status IN VARCHAR2,
185 p_pdt_id IN VARCHAR2);
186
187 --procedure to validate_product
188 PROCEDURE validate_product(
189 p_api_version IN NUMBER,
190 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
191 x_return_status OUT NOCOPY VARCHAR2,
192 x_msg_count OUT NOCOPY NUMBER,
193 x_msg_data OUT NOCOPY VARCHAR2,
194 p_pdtv_rec IN pdtv_rec_type,
195 x_pdtv_rec OUT NOCOPY pdtv_rec_type
196 );
197
198
199
200
201 PROCEDURE Getpdt_parameters(
202 p_api_version IN NUMBER,
203 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
204 x_return_status OUT NOCOPY VARCHAR2,
205 x_no_data_found OUT NOCOPY BOOLEAN,
206 x_msg_count OUT NOCOPY NUMBER,
207 x_msg_data OUT NOCOPY VARCHAR2,
208 p_pdtv_rec IN pdtv_rec_type,
209 p_product_date IN DATE DEFAULT SYSDATE,
210 p_pdt_parameter_rec OUT NOCOPY pdt_parameters_rec_type);
211
212 END OKL_SETUPPRODUCTS_PVT;