[Home] [Help]
PACKAGE: APPS.OKC_K_REL_OBJS_PUB
Source
1 Package OKC_K_REL_OBJS_PUB AUTHID CURRENT_USER AS
2 /* $Header: OKCPCRJS.pls 120.0 2005/05/25 18:38:20 appldev noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 /* start added code
7 */
8 /*
9 JTF object types (jtf_objects_vl)
10 ----------------
11 OKX_ORDERHEAD => 'Sales Order'
12 OKX_ORDERLINE => 'Sales Order Line'
13 OKX_QUOTEHEAD => 'Quote'
14 OKX_QUOTELINE => 'Quote Line'
15 OKX_QUOTELINED => 'Quote Line Detail'
16
17 Relationships (fnd_lookups, type='OKC_REL_OBJ')
18 ----------------
19 'QUOTESUBJECTCONTRACT'
20 'ORDERSUBJECTCONTRACT'
21 NB. below read as 'obj1 verb obj2'
22 where obj1 is result of verb on obj2
23 'QUOTERENEWSCONTRACT'
24 'ORDERRENEWSCONTRACT'
25 'ORDERSHIPSCONTRACT'
26 'CONTRACTNEGOTIATESQUOTE'
27 'CONTRACTISTERMSFORQUOTE'
28 'CONTRACTSERVICESORDER'
29 */
30 TYPE crj_rel_hdr_rec_type IS RECORD -- all contract and object (and line) data for rel. create
31 /* (
32 chr_id NUMBER := OKC_API.G_MISS_NUM
33 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR
34 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR
35 )
36 */ (
37 chr_id NUMBER
38 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE
39 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE
40 )
41 ;
42 g_miss_crj_rel_hdr_rec crj_rel_hdr_rec_type;
43
44 TYPE crj_rel_hdr_full_rec_type IS RECORD -- all contract and object (and line) data for rel. create
45 /* (
46 chr_id NUMBER := OKC_API.G_MISS_NUM
47 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR
48 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR
49 ,jtot_object1_code OKC_K_REL_OBJS.jtot_object1_code%TYPE := OKC_API.G_MISS_CHAR
50 ,line_jtot_object1_code OKC_K_REL_OBJS.jtot_object1_code%TYPE := OKC_API.G_MISS_CHAR
51 ,rty_code OKC_K_REL_OBJS.RTY_CODE%TYPE := OKC_API.G_MISS_CHAR
52 )
53 */ (
54 chr_id NUMBER
55 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE
56 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE
57 ,jtot_object1_code OKC_K_REL_OBJS.jtot_object1_code%TYPE
58 ,line_jtot_object1_code OKC_K_REL_OBJS.jtot_object1_code%TYPE
59 ,rty_code OKC_K_REL_OBJS.RTY_CODE%TYPE
60 )
61 ;
62 g_miss_crj_rel_hdr_full_rec crj_rel_hdr_full_rec_type;
63
64 TYPE crj_rel_line_rec_type IS RECORD -- of contract and related object lines
65 /* (
66 cle_id NUMBER := OKC_API.G_MISS_NUM
67 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE := OKC_API.G_MISS_CHAR
68 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE := OKC_API.G_MISS_CHAR
69 )
70 */ (
71 cle_id NUMBER
72 ,object1_id1 OKC_K_REL_OBJS.OBJECT1_ID1%TYPE
73 ,object1_id2 OKC_K_REL_OBJS.OBJECT1_ID2%TYPE
74 )
75 ;
76 g_miss_crj_rel_line_rec crj_rel_line_rec_type;
77 TYPE crj_rel_line_tbl_type IS TABLE OF crj_rel_line_rec_type INDEX BY BINARY_INTEGER;
78
79 g_p_crj_rel_hdr_full_rec crj_rel_hdr_full_rec_type;
80
81 SUBTYPE crj_rec_type IS OKC_CRJ_PVT.crj_rec_type;
82 SUBTYPE crj_tbl_type is OKC_CRJ_PVT.crj_tbl_type;
83 SUBTYPE crjv_rec_type IS OKC_CRJ_PVT.crjv_rec_type;
84 SUBTYPE crjv_tbl_type IS OKC_CRJ_PVT.crjv_tbl_type;
85 /* end added code
86 */
87 ---------------------------------------------------------------------------
88 -- GLOBAL MESSAGE CONSTANTS
89 ---------------------------------------------------------------------------
90 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
91 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
92 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
93 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
94 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
95 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
96 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
97 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
98 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
99 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
100 ---------------------------------------------------------------------------
101 -- GLOBAL VARIABLES
102 ---------------------------------------------------------------------------
103 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_K_REL_OBJS_PUB';
104 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
105 ---------------------------------------------------------------------------
106 -- Procedures and Functions
107 ---------------------------------------------------------------------------
108 /* start added
109 */
110
111 PROCEDURE create_quote_renews_contract
112 (-- create records required for a renews relationship between contract and quote
113 p_api_version IN NUMBER
114 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
115 ,x_return_status OUT NOCOPY VARCHAR2
116 ,x_msg_count OUT NOCOPY NUMBER
117 ,x_msg_data OUT NOCOPY VARCHAR2
118 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
119 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
120 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
121 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
122 )
123 ;
124
125 PROCEDURE create_order_renews_contract
126 (-- create records required for a renews relationship between contract and quote
127 p_api_version IN NUMBER
128 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
129 ,x_return_status OUT NOCOPY VARCHAR2
130 ,x_msg_count OUT NOCOPY NUMBER
131 ,x_msg_data OUT NOCOPY VARCHAR2
132 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
133 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
134 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
135 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
136 )
137 ;
138
139 PROCEDURE create_contract_neg_quote
140 (-- create records required for a negotiates relationship between contract and quote
141 p_api_version IN NUMBER
142 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
143 ,x_return_status OUT NOCOPY VARCHAR2
144 ,x_msg_count OUT NOCOPY NUMBER
145 ,x_msg_data OUT NOCOPY VARCHAR2
146 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
147 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
148 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
149 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
150 )
151 ;
152
153 PROCEDURE create_k_terms_for_quote
154 (-- create records required for a terms relationship between contract and quote
155 p_api_version IN NUMBER
156 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
161 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
162 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
163 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
164 )
165 ;
166
167
168 PROCEDURE create_k_quote_rel
169 (-- create records required for relationship between contract and quote
170 p_api_version IN NUMBER
171 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
172 ,x_return_status OUT NOCOPY VARCHAR2
173 ,x_msg_count OUT NOCOPY NUMBER
174 ,x_msg_data OUT NOCOPY VARCHAR2
175 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
176 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
177 ,p_rel_type IN OKC_K_REL_OBJS.RTY_CODE%TYPE
178 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
179 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
180 );
181
182
183 PROCEDURE create_order_ships_contract
184 (-- create records required for a ships relationship between contract and order
185 p_api_version IN NUMBER
186 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
187 ,x_return_status OUT NOCOPY VARCHAR2
188 ,x_msg_count OUT NOCOPY NUMBER
189 ,x_msg_data OUT NOCOPY VARCHAR2
190 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
191 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
192 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
193 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
194 )
195 ;
196
197
198 PROCEDURE create_core_orders_service
199 (-- create records required for a relationship between a service contract and a sales contract
200 p_api_version IN NUMBER
201 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
202 ,x_return_status OUT NOCOPY VARCHAR2
203 ,x_msg_count OUT NOCOPY NUMBER
204 ,x_msg_data OUT NOCOPY VARCHAR2
205 ,p_rel_type IN VARCHAR2
206 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
207 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
208 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
209 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
210 )
211 ;
212
213
214
215 PROCEDURE create_quote_subject_contract
216 (-- create records required for a quote subject to contract
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_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
223 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
224 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
225 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
226 )
227 ;
228
229 PROCEDURE create_order_subject_contract
230 (-- create records required for an order subject to contract
231 p_api_version IN NUMBER
232 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
233 ,x_return_status OUT NOCOPY VARCHAR2
234 ,x_msg_count OUT NOCOPY NUMBER
235 ,x_msg_data OUT NOCOPY VARCHAR2
236 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
237 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
238 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
239 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
240 )
241 ;
242
243 PROCEDURE create_contract_serv_order
244 (-- create records required for a contract services order
245 p_api_version IN NUMBER
246 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
247 ,x_return_status OUT NOCOPY VARCHAR2
248 ,x_msg_count OUT NOCOPY NUMBER
249 ,x_msg_data OUT NOCOPY VARCHAR2
250 ,p_crj_rel_hdr_rec IN crj_rel_hdr_rec_type
251 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
252 ,x_crj_rel_hdr_rec OUT NOCOPY crj_rel_hdr_rec_type
253 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
254 )
255 ;
256
257 PROCEDURE create_k_rel_obj
258 (-- create all the records required for a relationship between contract and quote, order etc.
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_crj_rel_hdr_full_rec IN crj_rel_hdr_full_rec_type
265 ,p_crj_rel_line_tbl IN crj_rel_line_tbl_type
266 ,x_crj_rel_hdr_full_rec OUT NOCOPY crj_rel_hdr_full_rec_type
267 ,x_crj_rel_line_tbl OUT NOCOPY crj_rel_line_tbl_type
268 )
269 ;
270
271 /* end added
272 */
273 PROCEDURE create_row(
274 p_api_version IN NUMBER,
275 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
276 x_return_status OUT NOCOPY VARCHAR2,
277 x_msg_count OUT NOCOPY NUMBER,
278 x_msg_data OUT NOCOPY VARCHAR2,
279 p_crjv_rec IN crjv_rec_type,
280 x_crjv_rec OUT NOCOPY crjv_rec_type);
281
282 PROCEDURE create_row(
283 p_api_version IN NUMBER,
284 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
285 x_return_status OUT NOCOPY VARCHAR2,
286 x_msg_count OUT NOCOPY NUMBER,
287 x_msg_data OUT NOCOPY VARCHAR2,
288 p_crjv_tbl IN crjv_tbl_type,
289 x_crjv_tbl OUT NOCOPY crjv_tbl_type);
290
291 PROCEDURE lock_row(
292 p_api_version IN NUMBER,
293 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
294 x_return_status OUT NOCOPY VARCHAR2,
295 x_msg_count OUT NOCOPY NUMBER,
296 x_msg_data OUT NOCOPY VARCHAR2,
297 p_crjv_rec IN crjv_rec_type);
298
299 PROCEDURE lock_row(
300 p_api_version IN NUMBER,
301 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
302 x_return_status OUT NOCOPY VARCHAR2,
303 x_msg_count OUT NOCOPY NUMBER,
304 x_msg_data OUT NOCOPY VARCHAR2,
305 p_crjv_tbl IN crjv_tbl_type);
306 /*
307 PROCEDURE update_row(
308 p_api_version IN NUMBER,
309 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
310 x_return_status OUT NOCOPY VARCHAR2,
311 x_msg_count OUT NOCOPY NUMBER,
312 x_msg_data OUT NOCOPY VARCHAR2,
313 p_crjv_rec IN crjv_rec_type,
314 x_crjv_rec OUT NOCOPY crjv_rec_type);
315
316 PROCEDURE update_row(
317 p_api_version IN NUMBER,
318 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
319 x_return_status OUT NOCOPY VARCHAR2,
320 x_msg_count OUT NOCOPY NUMBER,
321 x_msg_data OUT NOCOPY VARCHAR2,
322 p_crjv_tbl IN crjv_tbl_type,
323 x_crjv_tbl OUT NOCOPY crjv_tbl_type);
324 */
325 PROCEDURE delete_row(
326 p_api_version IN NUMBER,
327 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
328 x_return_status OUT NOCOPY VARCHAR2,
329 x_msg_count OUT NOCOPY NUMBER,
330 x_msg_data OUT NOCOPY VARCHAR2,
331 p_crjv_rec IN crjv_rec_type);
332
333 PROCEDURE delete_row(
334 p_api_version IN NUMBER,
335 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
336 x_return_status OUT NOCOPY VARCHAR2,
337 x_msg_count OUT NOCOPY NUMBER,
338 x_msg_data OUT NOCOPY VARCHAR2,
339 p_crjv_tbl IN crjv_tbl_type);
340
341 PROCEDURE validate_row(
342 p_api_version IN NUMBER,
343 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
344 x_return_status OUT NOCOPY VARCHAR2,
345 x_msg_count OUT NOCOPY NUMBER,
346 x_msg_data OUT NOCOPY VARCHAR2,
347 p_crjv_rec IN crjv_rec_type);
348
349 PROCEDURE validate_row(
350 p_api_version IN NUMBER,
351 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
352 x_return_status OUT NOCOPY VARCHAR2,
353 x_msg_count OUT NOCOPY NUMBER,
354 x_msg_data OUT NOCOPY VARCHAR2,
355 p_crjv_tbl IN crjv_tbl_type);
356
357 PROCEDURE quote_is_renewal
358 (
359 p_api_version IN NUMBER
360 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
361 ,x_return_status OUT NOCOPY VARCHAR2
362 ,x_msg_count OUT NOCOPY NUMBER
363 ,x_msg_data OUT NOCOPY VARCHAR2
364 ,p_crjv_rec IN crjv_rec_type
365 ,x_true_false out nocopy varchar2
366 );
367
368 PROCEDURE order_is_renewal
369 (
370 p_api_version IN NUMBER
371 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
372 ,x_return_status OUT NOCOPY VARCHAR2
373 ,x_msg_count OUT NOCOPY NUMBER
374 ,x_msg_data OUT NOCOPY VARCHAR2
375 ,p_crjv_rec IN crjv_rec_type
376 ,x_true_false out nocopy varchar2
377 );
378
379 PROCEDURE quote_is_subject
380 (
381 p_api_version IN NUMBER
382 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
383 ,x_return_status OUT NOCOPY VARCHAR2
384 ,x_msg_count OUT NOCOPY NUMBER
385 ,x_msg_data OUT NOCOPY VARCHAR2
386 ,p_crjv_rec IN crjv_rec_type
387 ,x_true_false out nocopy varchar2
388 );
389
390 PROCEDURE order_is_subject
391 (
392 p_api_version IN NUMBER
393 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
394 ,x_return_status OUT NOCOPY VARCHAR2
395 ,x_msg_count OUT NOCOPY NUMBER
396 ,x_msg_data OUT NOCOPY VARCHAR2
397 ,p_crjv_rec IN crjv_rec_type
398 ,x_true_false out nocopy varchar2
399 );
400
401 PROCEDURE quote_contract_is_ordered
402 (
403 p_api_version IN NUMBER
404 ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
405 ,x_return_status OUT NOCOPY VARCHAR2
406 ,x_msg_count OUT NOCOPY NUMBER
407 ,x_msg_data OUT NOCOPY VARCHAR2
408 ,p_crjv_rec IN crjv_rec_type
409 ,x_true_false out nocopy varchar2
410 );
411
412 END OKC_K_REL_OBJS_PUB;