[Home] [Help]
PACKAGE: APPS.OKC_RUL_PVT
Source
1 Package OKC_RUL_PVT AS
2 /* $Header: OKCSRULS.pls 120.0 2005/05/25 23:03:31 appldev noship $ */
3
4 ---------------------------------------------------------------------------
5 -- GLOBAL DATASTRUCTURES
6 ---------------------------------------------------------------------------
7 TYPE rul_rec_type IS RECORD (
8 id NUMBER := OKC_API.G_MISS_NUM,
9 rgp_id NUMBER := OKC_API.G_MISS_NUM,
10 object1_id1 OKC_RULES_B.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
11 object2_id1 OKC_RULES_B.OBJECT2_ID1%TYPE := OKC_API.G_MISS_CHAR,
12 object3_id1 OKC_RULES_B.OBJECT3_ID1%TYPE := OKC_API.G_MISS_CHAR,
13 object1_id2 OKC_RULES_B.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
14 object2_id2 OKC_RULES_B.OBJECT2_ID2%TYPE := OKC_API.G_MISS_CHAR,
15 object3_id2 OKC_RULES_B.OBJECT3_ID2%TYPE := OKC_API.G_MISS_CHAR,
16 jtot_object1_code OKC_RULES_B.JTOT_OBJECT1_CODE%TYPE := OKC_API.G_MISS_CHAR,
17 jtot_object2_code OKC_RULES_B.JTOT_OBJECT2_CODE%TYPE := OKC_API.G_MISS_CHAR,
18 jtot_object3_code OKC_RULES_B.JTOT_OBJECT3_CODE%TYPE := OKC_API.G_MISS_CHAR,
19 dnz_chr_id NUMBER := OKC_API.G_MISS_NUM,
20 std_template_yn OKC_RULES_B.STD_TEMPLATE_YN%TYPE := OKC_API.G_MISS_CHAR,
21 warn_yn OKC_RULES_B.WARN_YN%TYPE := OKC_API.G_MISS_CHAR,
22 priority NUMBER := OKC_API.G_MISS_NUM,
23 object_version_number NUMBER := OKC_API.G_MISS_NUM,
24 created_by NUMBER := OKC_API.G_MISS_NUM,
25 creation_date OKC_RULES_B.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
26 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
27 last_update_date OKC_RULES_B.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
28 last_update_login NUMBER := OKC_API.G_MISS_NUM,
29 attribute_category OKC_RULES_B.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
30 attribute1 OKC_RULES_B.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
31 attribute2 OKC_RULES_B.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
32 attribute3 OKC_RULES_B.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
33 attribute4 OKC_RULES_B.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
34 attribute5 OKC_RULES_B.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
35 attribute6 OKC_RULES_B.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
36 attribute7 OKC_RULES_B.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
37 attribute8 OKC_RULES_B.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
38 attribute9 OKC_RULES_B.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
39 attribute10 OKC_RULES_B.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
40 attribute11 OKC_RULES_B.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
41 attribute12 OKC_RULES_B.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
42 attribute13 OKC_RULES_B.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
43 attribute14 OKC_RULES_B.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
44 attribute15 OKC_RULES_B.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
45 rule_information_category OKC_RULES_B.RULE_INFORMATION_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
46 rule_information1 OKC_RULES_B.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
47 rule_information2 OKC_RULES_B.RULE_INFORMATION2%TYPE := OKC_API.G_MISS_CHAR,
48 rule_information3 OKC_RULES_B.RULE_INFORMATION3%TYPE := OKC_API.G_MISS_CHAR,
49 rule_information4 OKC_RULES_B.RULE_INFORMATION4%TYPE := OKC_API.G_MISS_CHAR,
50 rule_information5 OKC_RULES_B.RULE_INFORMATION5%TYPE := OKC_API.G_MISS_CHAR,
51 rule_information6 OKC_RULES_B.RULE_INFORMATION6%TYPE := OKC_API.G_MISS_CHAR,
52 rule_information7 OKC_RULES_B.RULE_INFORMATION7%TYPE := OKC_API.G_MISS_CHAR,
53 rule_information8 OKC_RULES_B.RULE_INFORMATION8%TYPE := OKC_API.G_MISS_CHAR,
54 rule_information9 OKC_RULES_B.RULE_INFORMATION9%TYPE := OKC_API.G_MISS_CHAR,
55 rule_information10 OKC_RULES_B.RULE_INFORMATION10%TYPE := OKC_API.G_MISS_CHAR,
56 rule_information11 OKC_RULES_B.RULE_INFORMATION11%TYPE := OKC_API.G_MISS_CHAR,
57 rule_information12 OKC_RULES_B.RULE_INFORMATION12%TYPE := OKC_API.G_MISS_CHAR,
58 rule_information13 OKC_RULES_B.RULE_INFORMATION13%TYPE := OKC_API.G_MISS_CHAR,
59 rule_information14 OKC_RULES_B.RULE_INFORMATION14%TYPE := OKC_API.G_MISS_CHAR,
60 rule_information15 OKC_RULES_B.RULE_INFORMATION15%TYPE := OKC_API.G_MISS_CHAR,
61 template_yn OKC_RULES_B.TEMPLATE_YN%TYPE := OKC_API.G_MISS_CHAR,
62 ans_set_jtot_object_code OKC_RULES_B.ans_set_jtot_object_code%TYPE := OKC_API.G_MISS_CHAR,
63 ans_set_jtot_object_id1 OKC_RULES_B.ans_set_jtot_object_id1%TYPE := OKC_API.G_MISS_CHAR,
64 ans_set_jtot_object_id2 OKC_RULES_B.ans_set_jtot_object_id2%TYPE := OKC_API.G_MISS_CHAR,
65 display_sequence NUMBER:= OKC_API.G_MISS_NUM,
66 --Bug 3055393
67 comments OKC_RULES_B.comments%TYPE := OKC_API.G_MISS_CHAR
68 );
69 g_miss_rul_rec rul_rec_type;
70 TYPE rul_tbl_type IS TABLE OF rul_rec_type
71 INDEX BY BINARY_INTEGER;
72 /*--Bug 3055393
73 TYPE okc_rules_tl_rec_type IS RECORD (
74 id NUMBER := OKC_API.G_MISS_NUM,
75 language OKC_RULES_TL.LANGUAGE%TYPE := OKC_API.G_MISS_CHAR,
76 source_lang OKC_RULES_TL.SOURCE_LANG%TYPE := OKC_API.G_MISS_CHAR,
77 sfwt_flag OKC_RULES_TL.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR,
78 comments OKC_RULES_TL.COMMENTS%TYPE := OKC_API.G_MISS_CHAR,
79 text OKC_RULES_TL.TEXT%TYPE := NULL,
80 created_by NUMBER := OKC_API.G_MISS_NUM,
81 creation_date OKC_RULES_TL.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
82 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
83 last_update_date OKC_RULES_TL.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
84 last_update_login NUMBER := OKC_API.G_MISS_NUM);
85 g_miss_okc_rules_tl_rec okc_rules_tl_rec_type;
86 TYPE okc_rules_tl_tbl_type IS TABLE OF okc_rules_tl_rec_type
87 INDEX BY BINARY_INTEGER;
88 */
89 TYPE rulv_rec_type IS RECORD (
90 id NUMBER := OKC_API.G_MISS_NUM,
91 object_version_number NUMBER := OKC_API.G_MISS_NUM,
92 sfwt_flag VARCHAR2(1) := 'N',
93 object1_id1 OKC_RULES_V.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR,
94 object2_id1 OKC_RULES_V.OBJECT2_ID1%TYPE := OKC_API.G_MISS_CHAR,
95 object3_id1 OKC_RULES_V.OBJECT3_ID1%TYPE := OKC_API.G_MISS_CHAR,
96 object1_id2 OKC_RULES_V.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR,
97 object2_id2 OKC_RULES_V.OBJECT2_ID2%TYPE := OKC_API.G_MISS_CHAR,
98 object3_id2 OKC_RULES_V.OBJECT3_ID2%TYPE := OKC_API.G_MISS_CHAR,
99 jtot_object1_code OKC_RULES_V.JTOT_OBJECT1_CODE%TYPE := OKC_API.G_MISS_CHAR,
100 jtot_object2_code OKC_RULES_V.JTOT_OBJECT2_CODE%TYPE := OKC_API.G_MISS_CHAR,
101 jtot_object3_code OKC_RULES_V.JTOT_OBJECT3_CODE%TYPE := OKC_API.G_MISS_CHAR,
102 dnz_chr_id NUMBER := OKC_API.G_MISS_NUM,
103 rgp_id NUMBER := OKC_API.G_MISS_NUM,
104 priority NUMBER := OKC_API.G_MISS_NUM,
105 std_template_yn OKC_RULES_V.STD_TEMPLATE_YN%TYPE := OKC_API.G_MISS_CHAR,
106 comments OKC_RULES_V.COMMENTS%TYPE := OKC_API.G_MISS_CHAR,
107 warn_yn OKC_RULES_V.WARN_YN%TYPE := OKC_API.G_MISS_CHAR,
108 attribute_category OKC_RULES_V.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
109 attribute1 OKC_RULES_V.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
110 attribute2 OKC_RULES_V.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
111 attribute3 OKC_RULES_V.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
112 attribute4 OKC_RULES_V.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
113 attribute5 OKC_RULES_V.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
114 attribute6 OKC_RULES_V.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
115 attribute7 OKC_RULES_V.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
116 attribute8 OKC_RULES_V.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
117 attribute9 OKC_RULES_V.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
118 attribute10 OKC_RULES_V.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
119 attribute11 OKC_RULES_V.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
120 attribute12 OKC_RULES_V.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
121 attribute13 OKC_RULES_V.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
122 attribute14 OKC_RULES_V.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
123 attribute15 OKC_RULES_V.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
124 created_by NUMBER := OKC_API.G_MISS_NUM,
125 creation_date OKC_RULES_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
126 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
127 last_update_date OKC_RULES_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
128 last_update_login NUMBER := OKC_API.G_MISS_NUM,
129 text VARCHAR2(1) := NULL,
130 rule_information_category OKC_RULES_V.RULE_INFORMATION_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
131 rule_information1 OKC_RULES_V.RULE_INFORMATION1%TYPE := OKC_API.G_MISS_CHAR,
132 rule_information2 OKC_RULES_V.RULE_INFORMATION2%TYPE := OKC_API.G_MISS_CHAR,
133 rule_information3 OKC_RULES_V.RULE_INFORMATION3%TYPE := OKC_API.G_MISS_CHAR,
134 rule_information4 OKC_RULES_V.RULE_INFORMATION4%TYPE := OKC_API.G_MISS_CHAR,
135 rule_information5 OKC_RULES_V.RULE_INFORMATION5%TYPE := OKC_API.G_MISS_CHAR,
136 rule_information6 OKC_RULES_V.RULE_INFORMATION6%TYPE := OKC_API.G_MISS_CHAR,
137 rule_information7 OKC_RULES_V.RULE_INFORMATION7%TYPE := OKC_API.G_MISS_CHAR,
138 rule_information8 OKC_RULES_V.RULE_INFORMATION8%TYPE := OKC_API.G_MISS_CHAR,
139 rule_information9 OKC_RULES_V.RULE_INFORMATION9%TYPE := OKC_API.G_MISS_CHAR,
140 rule_information10 OKC_RULES_V.RULE_INFORMATION10%TYPE := OKC_API.G_MISS_CHAR,
141 rule_information11 OKC_RULES_V.RULE_INFORMATION11%TYPE := OKC_API.G_MISS_CHAR,
142 rule_information12 OKC_RULES_V.RULE_INFORMATION12%TYPE := OKC_API.G_MISS_CHAR,
143 rule_information13 OKC_RULES_V.RULE_INFORMATION13%TYPE := OKC_API.G_MISS_CHAR,
144 rule_information14 OKC_RULES_V.RULE_INFORMATION14%TYPE := OKC_API.G_MISS_CHAR,
145 rule_information15 OKC_RULES_V.RULE_INFORMATION15%TYPE := OKC_API.G_MISS_CHAR,
146 template_yn OKC_RULES_B.TEMPLATE_YN%TYPE := OKC_API.G_MISS_CHAR,
147 ans_set_jtot_object_code OKC_RULES_B.ans_set_jtot_object_code%TYPE := OKC_API.G_MISS_CHAR,
148 ans_set_jtot_object_id1 OKC_RULES_B.ans_set_jtot_object_id1%TYPE := OKC_API.G_MISS_CHAR,
149 ans_set_jtot_object_id2 OKC_RULES_B.ans_set_jtot_object_id2%TYPE := OKC_API.G_MISS_CHAR,
150 display_sequence NUMBER:= OKC_API.G_MISS_NUM,
151 VALIDATE_YN VARCHAR2(1) DEFAULT 'Y'
152 );
153 g_miss_rulv_rec rulv_rec_type;
154 TYPE rulv_tbl_type IS TABLE OF rulv_rec_type
155 INDEX BY BINARY_INTEGER;
156 ---------------------------------------------------------------------------
157 -- GLOBAL MESSAGE CONSTANTS
158 ---------------------------------------------------------------------------
159 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
160 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
161 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
162 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
163 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
164 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
165 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
166 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
167 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
168 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
169 ---------------------------------------------------------------------------
170 -- GLOBAL VARIABLES
171 ---------------------------------------------------------------------------
172 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_RUL_PVT';
173 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
174 ---------------------------------------------------------------------------
175 -- Procedures and Functions
176 ---------------------------------------------------------------------------
177
178 PROCEDURE qc;
179 PROCEDURE change_version;
180 PROCEDURE api_copy;
181 PROCEDURE add_language;
182 PROCEDURE insert_row(
183 p_api_version IN NUMBER,
184 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
185 x_return_status OUT NOCOPY VARCHAR2,
186 x_msg_count OUT NOCOPY NUMBER,
187 x_msg_data OUT NOCOPY VARCHAR2,
188 p_rulv_rec IN rulv_rec_type,
189 x_rulv_rec OUT NOCOPY rulv_rec_type);
190
191 PROCEDURE insert_row(
192 p_api_version IN NUMBER,
193 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
194 x_return_status OUT NOCOPY VARCHAR2,
195 x_msg_count OUT NOCOPY NUMBER,
196 x_msg_data OUT NOCOPY VARCHAR2,
197 p_rulv_tbl IN rulv_tbl_type,
198 x_rulv_tbl OUT NOCOPY rulv_tbl_type);
199
200 PROCEDURE lock_row(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 p_rulv_rec IN rulv_rec_type);
207
208 PROCEDURE lock_row(
209 p_api_version IN NUMBER,
210 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
211 x_return_status OUT NOCOPY VARCHAR2,
212 x_msg_count OUT NOCOPY NUMBER,
213 x_msg_data OUT NOCOPY VARCHAR2,
214 p_rulv_tbl IN rulv_tbl_type);
215
216 PROCEDURE update_row(
217 p_api_version IN NUMBER,
218 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
219 x_return_status OUT NOCOPY VARCHAR2,
220 x_msg_count OUT NOCOPY NUMBER,
221 x_msg_data OUT NOCOPY VARCHAR2,
222 p_rulv_rec IN rulv_rec_type,
223 x_rulv_rec OUT NOCOPY rulv_rec_type);
224
225 PROCEDURE update_row(
226 p_api_version IN NUMBER,
227 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_rulv_tbl IN rulv_tbl_type,
232 x_rulv_tbl OUT NOCOPY rulv_tbl_type);
233
234 PROCEDURE delete_row(
235 p_api_version IN NUMBER,
236 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
237 x_return_status OUT NOCOPY VARCHAR2,
238 x_msg_count OUT NOCOPY NUMBER,
239 x_msg_data OUT NOCOPY VARCHAR2,
240 p_rulv_rec IN rulv_rec_type);
241
242 PROCEDURE delete_row(
243 p_api_version IN NUMBER,
244 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
245 x_return_status OUT NOCOPY VARCHAR2,
246 x_msg_count OUT NOCOPY NUMBER,
247 x_msg_data OUT NOCOPY VARCHAR2,
248 p_rulv_tbl IN rulv_tbl_type);
249
250 PROCEDURE validate_row(
251 p_api_version IN NUMBER,
252 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
253 x_return_status OUT NOCOPY VARCHAR2,
254 x_msg_count OUT NOCOPY NUMBER,
255 x_msg_data OUT NOCOPY VARCHAR2,
256 p_rulv_rec IN rulv_rec_type);
257
258 PROCEDURE validate_row(
259 p_api_version IN NUMBER,
260 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
261 x_return_status OUT NOCOPY VARCHAR2,
262 x_msg_count OUT NOCOPY NUMBER,
263 x_msg_data OUT NOCOPY VARCHAR2,
264 p_rulv_tbl IN rulv_tbl_type);
265
266 PROCEDURE INSERT_ROW_UPG
267 (x_return_status OUT NOCOPY VARCHAR2,p_rulv_tbl rulv_tbl_type);
268
269 FUNCTION create_version(
270 p_chr_id IN NUMBER,
271 p_major_version IN NUMBER) RETURN VARCHAR2;
272
273 FUNCTION restore_version(
274 p_chr_id IN NUMBER,
275 p_major_version IN NUMBER) RETURN VARCHAR2;
276
277 END OKC_RUL_PVT;