[Home] [Help]
PACKAGE: APPS.OKL_SUC_PVT
Source
1 PACKAGE OKL_SUC_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSSUCS.pls 115.2 2004/03/18 07:10:11 avsingh noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 -- OKL_SUBSIDY_CRITERIA_V Record Spec
7 TYPE sucv_rec_type IS RECORD (
8 id NUMBER := OKL_API.G_MISS_NUM
9 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
10 ,subsidy_id NUMBER := OKL_API.G_MISS_NUM
11 ,display_sequence NUMBER := OKL_API.G_MISS_NUM
12 ,inventory_item_id NUMBER := OKL_API.G_MISS_NUM
13 ,organization_id NUMBER := OKL_API.G_MISS_NUM
14 ,credit_classification_code OKL_SUBSIDY_CRITERIA_V.CREDIT_CLASSIFICATION_CODE%TYPE := OKL_API.G_MISS_CHAR
15 ,sales_territory_code OKL_SUBSIDY_CRITERIA_V.SALES_TERRITORY_CODE%TYPE := OKL_API.G_MISS_CHAR
16 ,product_id NUMBER := OKL_API.G_MISS_NUM
17 ,industry_code_type OKL_SUBSIDY_CRITERIA_V.INDUSTRY_CODE_TYPE%TYPE := OKL_API.G_MISS_CHAR
18 ,industry_code OKL_SUBSIDY_CRITERIA_V.INDUSTRY_CODE%TYPE := OKL_API.G_MISS_CHAR
19 --Bug# 3313802
20 --,maximum_subsidy_amount NUMBER := OKL_API.G_MISS_NUM
21 ,maximum_financed_amount NUMBER := OKL_API.G_MISS_NUM
22 --Bug# 3508166
23 ,sales_territory_id NUMBER := OKL_API.G_MISS_NUM
24 ,attribute_category OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
25 ,attribute1 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
26 ,attribute2 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
27 ,attribute3 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
28 ,attribute4 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
29 ,attribute5 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
30 ,attribute6 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
31 ,attribute7 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
32 ,attribute8 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
33 ,attribute9 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
34 ,attribute10 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
35 ,attribute11 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
36 ,attribute12 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
37 ,attribute13 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
38 ,attribute14 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
39 ,attribute15 OKL_SUBSIDY_CRITERIA_V.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
40 ,created_by NUMBER := OKL_API.G_MISS_NUM
41 ,creation_date OKL_SUBSIDY_CRITERIA_V.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
42 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
43 ,last_update_date OKL_SUBSIDY_CRITERIA_V.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
44 ,last_update_login NUMBER := OKL_API.G_MISS_NUM);
45 G_MISS_sucv_rec sucv_rec_type;
46 TYPE sucv_tbl_type IS TABLE OF sucv_rec_type
47 INDEX BY BINARY_INTEGER;
48 -- OKL_SUBSIDY_CRITERIA Record Spec
49 TYPE suc_rec_type IS RECORD (
50 id NUMBER := OKL_API.G_MISS_NUM
51 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
52 ,subsidy_id NUMBER := OKL_API.G_MISS_NUM
53 ,display_sequence NUMBER := OKL_API.G_MISS_NUM
54 ,inventory_item_id NUMBER := OKL_API.G_MISS_NUM
55 ,organization_id NUMBER := OKL_API.G_MISS_NUM
56 ,credit_classification_code OKL_SUBSIDY_CRITERIA.CREDIT_CLASSIFICATION_CODE%TYPE := OKL_API.G_MISS_CHAR
57 ,sales_territory_code OKL_SUBSIDY_CRITERIA.SALES_TERRITORY_CODE%TYPE := OKL_API.G_MISS_CHAR
58 ,product_id NUMBER := OKL_API.G_MISS_NUM
59 ,industry_code_type OKL_SUBSIDY_CRITERIA.INDUSTRY_CODE_TYPE%TYPE := OKL_API.G_MISS_CHAR
60 ,industry_code OKL_SUBSIDY_CRITERIA.INDUSTRY_CODE%TYPE := OKL_API.G_MISS_CHAR
61 --Bug# 3313802:
62 --,maximum_subsidy_amount NUMBER := OKL_API.G_MISS_NUM
63 ,maximum_financed_amount NUMBER := OKL_API.G_MISS_NUM
64 --Bug# 3508166
65 ,sales_territory_id NUMBER := OKL_API.G_MISS_NUM
66 ,attribute_category OKL_SUBSIDY_CRITERIA.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
67 ,attribute1 OKL_SUBSIDY_CRITERIA.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
68 ,attribute2 OKL_SUBSIDY_CRITERIA.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
69 ,attribute3 OKL_SUBSIDY_CRITERIA.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
70 ,attribute4 OKL_SUBSIDY_CRITERIA.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
71 ,attribute5 OKL_SUBSIDY_CRITERIA.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
72 ,attribute6 OKL_SUBSIDY_CRITERIA.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
73 ,attribute7 OKL_SUBSIDY_CRITERIA.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
74 ,attribute8 OKL_SUBSIDY_CRITERIA.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
75 ,attribute9 OKL_SUBSIDY_CRITERIA.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
76 ,attribute10 OKL_SUBSIDY_CRITERIA.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
77 ,attribute11 OKL_SUBSIDY_CRITERIA.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
78 ,attribute12 OKL_SUBSIDY_CRITERIA.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
79 ,attribute13 OKL_SUBSIDY_CRITERIA.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
80 ,attribute14 OKL_SUBSIDY_CRITERIA.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
81 ,attribute15 OKL_SUBSIDY_CRITERIA.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
82 ,created_by NUMBER := OKL_API.G_MISS_NUM
83 ,creation_date OKL_SUBSIDY_CRITERIA.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
84 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
85 ,last_update_date OKL_SUBSIDY_CRITERIA.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
86 ,last_update_login NUMBER := OKL_API.G_MISS_NUM);
87 G_MISS_suc_rec suc_rec_type;
88 TYPE suc_tbl_type IS TABLE OF suc_rec_type
89 INDEX BY BINARY_INTEGER;
90 ---------------------------------------------------------------------------
91 -- GLOBAL MESSAGE CONSTANTS
92 ---------------------------------------------------------------------------
93 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
94 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
95 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
96 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
97 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
98 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
99 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
100 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
101 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
102 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
103 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXP_ERROR';
104 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
105 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
106
107 ---------------------------------------------------------------------------
108 -- GLOBAL EXCEPTIONS
109 ---------------------------------------------------------------------------
110 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
111
112 ---------------------------------------------------------------------------
113 -- GLOBAL VARIABLES
114 ---------------------------------------------------------------------------
115 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SUC_PVT';
116 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
117 ---------------------------------------------------------------------------
118 -- Procedures and Functions
119 ---------------------------------------------------------------------------
120
121 PROCEDURE qc;
122 PROCEDURE change_version;
123 PROCEDURE api_copy;
124 PROCEDURE insert_row(
125 p_api_version IN NUMBER,
126 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
127 x_return_status OUT NOCOPY VARCHAR2,
128 x_msg_count OUT NOCOPY NUMBER,
129 x_msg_data OUT NOCOPY VARCHAR2,
130 p_sucv_rec IN sucv_rec_type,
131 x_sucv_rec OUT NOCOPY sucv_rec_type);
132 PROCEDURE insert_row(
133 p_api_version IN NUMBER,
134 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
135 x_return_status OUT NOCOPY VARCHAR2,
136 x_msg_count OUT NOCOPY NUMBER,
137 x_msg_data OUT NOCOPY VARCHAR2,
138 p_sucv_tbl IN sucv_tbl_type,
139 x_sucv_tbl OUT NOCOPY sucv_tbl_type,
140 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
141 PROCEDURE insert_row(
142 p_api_version IN NUMBER,
143 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
144 x_return_status OUT NOCOPY VARCHAR2,
145 x_msg_count OUT NOCOPY NUMBER,
146 x_msg_data OUT NOCOPY VARCHAR2,
147 p_sucv_tbl IN sucv_tbl_type,
148 x_sucv_tbl OUT NOCOPY sucv_tbl_type);
149 PROCEDURE lock_row(
150 p_api_version IN NUMBER,
151 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
152 x_return_status OUT NOCOPY VARCHAR2,
153 x_msg_count OUT NOCOPY NUMBER,
154 x_msg_data OUT NOCOPY VARCHAR2,
155 p_sucv_rec IN sucv_rec_type);
156 PROCEDURE lock_row(
157 p_api_version IN NUMBER,
158 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
159 x_return_status OUT NOCOPY VARCHAR2,
160 x_msg_count OUT NOCOPY NUMBER,
161 x_msg_data OUT NOCOPY VARCHAR2,
162 p_sucv_tbl IN sucv_tbl_type,
163 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
164 PROCEDURE lock_row(
165 p_api_version IN NUMBER,
166 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
167 x_return_status OUT NOCOPY VARCHAR2,
168 x_msg_count OUT NOCOPY NUMBER,
169 x_msg_data OUT NOCOPY VARCHAR2,
170 p_sucv_tbl IN sucv_tbl_type);
171 PROCEDURE update_row(
172 p_api_version IN NUMBER,
173 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
174 x_return_status OUT NOCOPY VARCHAR2,
175 x_msg_count OUT NOCOPY NUMBER,
176 x_msg_data OUT NOCOPY VARCHAR2,
177 p_sucv_rec IN sucv_rec_type,
178 x_sucv_rec OUT NOCOPY sucv_rec_type);
179 PROCEDURE update_row(
180 p_api_version IN NUMBER,
181 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
182 x_return_status OUT NOCOPY VARCHAR2,
183 x_msg_count OUT NOCOPY NUMBER,
184 x_msg_data OUT NOCOPY VARCHAR2,
185 p_sucv_tbl IN sucv_tbl_type,
186 x_sucv_tbl OUT NOCOPY sucv_tbl_type,
187 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
188 PROCEDURE update_row(
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_sucv_tbl IN sucv_tbl_type,
195 x_sucv_tbl OUT NOCOPY sucv_tbl_type);
196 PROCEDURE delete_row(
197 p_api_version IN NUMBER,
198 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
199 x_return_status OUT NOCOPY VARCHAR2,
200 x_msg_count OUT NOCOPY NUMBER,
201 x_msg_data OUT NOCOPY VARCHAR2,
202 p_sucv_rec IN sucv_rec_type);
203 PROCEDURE delete_row(
204 p_api_version IN NUMBER,
205 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
206 x_return_status OUT NOCOPY VARCHAR2,
207 x_msg_count OUT NOCOPY NUMBER,
208 x_msg_data OUT NOCOPY VARCHAR2,
209 p_sucv_tbl IN sucv_tbl_type,
210 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
211 PROCEDURE delete_row(
212 p_api_version IN NUMBER,
213 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
214 x_return_status OUT NOCOPY VARCHAR2,
215 x_msg_count OUT NOCOPY NUMBER,
216 x_msg_data OUT NOCOPY VARCHAR2,
217 p_sucv_tbl IN sucv_tbl_type);
218 PROCEDURE validate_row(
219 p_api_version IN NUMBER,
220 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
221 x_return_status OUT NOCOPY VARCHAR2,
222 x_msg_count OUT NOCOPY NUMBER,
223 x_msg_data OUT NOCOPY VARCHAR2,
224 p_sucv_rec IN sucv_rec_type);
225 PROCEDURE validate_row(
226 p_api_version IN NUMBER,
227 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
228 x_return_status OUT NOCOPY VARCHAR2,
229 x_msg_count OUT NOCOPY NUMBER,
230 x_msg_data OUT NOCOPY VARCHAR2,
231 p_sucv_tbl IN sucv_tbl_type,
232 px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE);
233 PROCEDURE validate_row(
234 p_api_version IN NUMBER,
235 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
236 x_return_status OUT NOCOPY VARCHAR2,
237 x_msg_count OUT NOCOPY NUMBER,
238 x_msg_data OUT NOCOPY VARCHAR2,
239 p_sucv_tbl IN sucv_tbl_type);
240 END OKL_SUC_PVT;