1 Package Csd_Repairs_Util AS
2 /* $Header: csdxutls.pls 120.17.12020000.4 2013/04/09 05:15:18 subhat ship $ */
3 --
4 -- Package name : CSD_REPAIRS_UTIL
5 -- Purpose : This package contains utility programs for the Depot
6 -- Repair module. Access is restricted to Oracle Depot
7 -- Repair Internal Development.
8 -- History :
9 -- Version Date Name Description
10 -- 115.0 12/18/99 pkdas Created.
11 -- 115.1 01/04/00 pkdas Added some program units.
12 -- 115.2 01/18/00 pkdas Added DATE_CLOSED to Convert_to_Repln_Rec_Type procedure.
13 -- 115.3 02/23/00 pkdas Added CONTRACT_LINE_ID to Convert_to_Repln_Rec_Type procedure.
14 -- 115.4 11/30/01 travi Added AUTO_PROCESS_RMA, OBJECT_VERSION_NUMBER and REPAIR_MODE to
15 -- Convert_to_Repln_Rec_Type
16 -- 115.5 01/14/02 travi Added Item_REVISION col.
17 --
18 -- 115.19 05/19/05 vparvath Added check_task_n_wipjob proc for
19 -- R12 development.
20 --
21 --
22 -- NOTE :
23 --
24 TYPE DEF_Rec_Type IS RECORD
25 (
26 attribute_category VARCHAR2(30) := Fnd_Api.G_MISS_CHAR,
27 attribute1 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
28 attribute2 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
29 attribute3 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
30 attribute4 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
31 attribute5 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
32 attribute6 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
33 attribute7 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
34 attribute8 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
35 attribute9 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
36 attribute10 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
37 attribute11 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
38 attribute12 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
39 attribute13 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
40 attribute14 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
41 attribute15 VARCHAR2(150) := Fnd_Api.G_MISS_CHAR,
42 attribute16 VARCHAR2(150) := FND_API.G_MISS_CHAR, -- subhat, dff changes(bug#7497907)
43 attribute17 VARCHAR2(150) := FND_API.G_MISS_CHAR,
44 attribute18 VARCHAR2(150) := FND_API.G_MISS_CHAR,
45 attribute19 VARCHAR2(150) := FND_API.G_MISS_CHAR,
46 attribute20 VARCHAR2(150) := FND_API.G_MISS_CHAR,
47 attribute21 VARCHAR2(150) := FND_API.G_MISS_CHAR,
48 attribute22 VARCHAR2(150) := FND_API.G_MISS_CHAR,
49 attribute23 VARCHAR2(150) := FND_API.G_MISS_CHAR,
50 attribute24 VARCHAR2(150) := FND_API.G_MISS_CHAR,
51 attribute25 VARCHAR2(150) := FND_API.G_MISS_CHAR,
52 attribute26 VARCHAR2(150) := FND_API.G_MISS_CHAR,
53 attribute27 VARCHAR2(150) := FND_API.G_MISS_CHAR,
54 attribute28 VARCHAR2(150) := FND_API.G_MISS_CHAR,
55 attribute29 VARCHAR2(150) := FND_API.G_MISS_CHAR,
56 attribute30 VARCHAR2(150) := FND_API.G_MISS_CHAR
57 );
58
59
60 --
61 -- bug#7043215, subhat.
62 -- changed the function signature. Changed p_attr_values to IN OUT.
63 -- Added a new parameter p_validate_only.
64 -- For validate and default pass p_validate_only = FND_API.G_FALSE
65 -- For validation only, pass p_validate_only = FND_API.G_TRUE(Default)
66 --
67
68 FUNCTION Is_DescFlex_Valid
69 (
70 p_api_name IN VARCHAR2,
71 p_desc_flex_name IN VARCHAR2,
72 p_attr_values IN OUT NOCOPY CSD_REPAIRS_UTIL.DEF_Rec_Type,
73 -- bug#7043215, subhat.
74 p_validate_only IN VARCHAR2 := FND_API.G_TRUE
75 -- end bug#7043215, subhat.
76 ) RETURN BOOLEAN ;
77
78 PROCEDURE Convert_to_Repln_Rec_Type
79 (
80 p_REPAIR_NUMBER IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
81 p_INCIDENT_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
82 p_INVENTORY_ITEM_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
83 p_CUSTOMER_PRODUCT_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
84 p_UNIT_OF_MEASURE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
85 p_REPAIR_TYPE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
86 -- RESOURCE_GROUP Added by Vijay 10/28/2004
87 p_RESOURCE_GROUP IN NUMBER := Fnd_Api.G_MISS_NUM,
88 p_RESOURCE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
89 p_PROJECT_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
90 p_TASK_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
91 p_UNIT_NUMBER IN VARCHAR2 := FND_API.G_MISS_CHAR, -- rfieldma, prj integration
92 p_CONTRACT_LINE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
93 p_AUTO_PROCESS_RMA IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
94 p_REPAIR_MODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
95 p_OBJECT_VERSION_NUMBER IN NUMBER := Fnd_Api.G_MISS_NUM,
96 p_ITEM_REVISION IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
97 p_INSTANCE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
98 p_STATUS IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
102 p_APPROVAL_STATUS IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
99 p_STATUS_REASON_CODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
100 p_DATE_CLOSED IN DATE := Fnd_Api.G_MISS_DATE,
101 p_APPROVAL_REQUIRED_FLAG IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
103 p_SERIAL_NUMBER IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
104 p_PROMISE_DATE IN DATE := Fnd_Api.G_MISS_DATE,
105 p_ATTRIBUTE_CATEGORY IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
106 p_ATTRIBUTE1 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
107 p_ATTRIBUTE2 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
108 p_ATTRIBUTE3 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
109 p_ATTRIBUTE4 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
110 p_ATTRIBUTE5 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
111 p_ATTRIBUTE6 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
112 p_ATTRIBUTE7 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
113 p_ATTRIBUTE8 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
114 p_ATTRIBUTE9 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
115 p_ATTRIBUTE10 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
116 p_ATTRIBUTE11 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
117 p_ATTRIBUTE12 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
118 p_ATTRIBUTE13 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
119 p_ATTRIBUTE14 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
120 p_ATTRIBUTE15 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
121 P_ATTRIBUTE16 IN VARCHAR2 := FND_API.G_MISS_CHAR,-- SUBHAT, DFF CHANGES(bug#7497907)
122 P_ATTRIBUTE17 IN VARCHAR2 := FND_API.G_MISS_CHAR,
123 P_ATTRIBUTE18 IN VARCHAR2 := FND_API.G_MISS_CHAR,
124 P_ATTRIBUTE19 IN VARCHAR2 := FND_API.G_MISS_CHAR,
125 P_ATTRIBUTE20 IN VARCHAR2 := FND_API.G_MISS_CHAR,
126 P_ATTRIBUTE21 IN VARCHAR2 := FND_API.G_MISS_CHAR,
127 P_ATTRIBUTE22 IN VARCHAR2 := FND_API.G_MISS_CHAR,
128 P_ATTRIBUTE23 IN VARCHAR2 := FND_API.G_MISS_CHAR,
129 P_ATTRIBUTE24 IN VARCHAR2 := FND_API.G_MISS_CHAR,
130 P_ATTRIBUTE25 IN VARCHAR2 := FND_API.G_MISS_CHAR,
131 P_ATTRIBUTE26 IN VARCHAR2 := FND_API.G_MISS_CHAR,
132 P_ATTRIBUTE27 IN VARCHAR2 := FND_API.G_MISS_CHAR,
133 P_ATTRIBUTE28 IN VARCHAR2 := FND_API.G_MISS_CHAR,
134 P_ATTRIBUTE29 IN VARCHAR2 := FND_API.G_MISS_CHAR,
135 P_ATTRIBUTE30 IN VARCHAR2 := FND_API.G_MISS_CHAR,
136 p_QUANTITY IN NUMBER := Fnd_Api.G_MISS_NUM,
137 p_QUANTITY_IN_WIP IN NUMBER := Fnd_Api.G_MISS_NUM,
138 p_QUANTITY_RCVD IN NUMBER := Fnd_Api.G_MISS_NUM,
139 p_QUANTITY_SHIPPED IN NUMBER := Fnd_Api.G_MISS_NUM,
140 p_CURRENCY_CODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
141 p_DEFAULT_PO_NUM IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
142 p_REPAIR_GROUP_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
143 p_RO_TXN_STATUS IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
144 p_ORDER_LINE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
145 p_ORIGINAL_SOURCE_REFERENCE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
146 p_ORIGINAL_SOURCE_HEADER_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
147 p_ORIGINAL_SOURCE_LINE_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
148 p_PRICE_LIST_HEADER_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
149 p_INVENTORY_ORG_ID IN NUMBER := Fnd_Api.G_MISS_NUM,
150 -- swai: bug 4666344 added problem description
151 p_PROBLEM_DESCRIPTION IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
152 p_RO_PRIORITY_CODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR, -- swai: R12
153 p_RESOLVE_BY_DATE IN DATE := Fnd_Api.G_MISS_DATE, -- rfieldma: 5355051
154 p_BULLETIN_CHECK_DATE IN DATE := Fnd_Api.G_MISS_DATE,
155 p_ESCALATION_CODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
156 p_RO_WARRANTY_STATUS_CODE IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
157 x_Repln_Rec OUT NOCOPY Csd_Repairs_Pub.Repln_Rec_Type
158 );
159
160 PROCEDURE Convert_to_DEF_Rec_Type
161 (
162 p_attribute_category IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
163 p_attribute1 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
164 p_attribute2 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
165 p_attribute3 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
166 p_attribute4 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
167 p_attribute5 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
168 p_attribute6 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
169 p_attribute7 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
170 p_attribute8 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
171 p_attribute9 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
172 p_attribute10 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
173 p_attribute11 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
174 p_attribute12 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
175 p_attribute13 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
176 p_attribute14 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
177 p_attribute15 IN VARCHAR2 := Fnd_Api.G_MISS_CHAR,
178 p_attribute16 IN VARCHAR2 := FND_API.G_MISS_CHAR, -- subhat, dff changes(bug#7497907)
179 p_attribute17 IN VARCHAR2 := FND_API.G_MISS_CHAR,
180 p_attribute18 IN VARCHAR2 := FND_API.G_MISS_CHAR,
181 p_attribute19 IN VARCHAR2 := FND_API.G_MISS_CHAR,
182 p_attribute20 IN VARCHAR2 := FND_API.G_MISS_CHAR,
183 p_attribute21 IN VARCHAR2 := FND_API.G_MISS_CHAR,
187 p_attribute25 IN VARCHAR2 := FND_API.G_MISS_CHAR,
184 p_attribute22 IN VARCHAR2 := FND_API.G_MISS_CHAR,
185 p_attribute23 IN VARCHAR2 := FND_API.G_MISS_CHAR,
186 p_attribute24 IN VARCHAR2 := FND_API.G_MISS_CHAR,
188 p_attribute26 IN VARCHAR2 := FND_API.G_MISS_CHAR,
189 p_attribute27 IN VARCHAR2 := FND_API.G_MISS_CHAR,
190 p_attribute28 IN VARCHAR2 := FND_API.G_MISS_CHAR,
191 p_attribute29 IN VARCHAR2 := FND_API.G_MISS_CHAR,
192 p_attribute30 IN VARCHAR2 := FND_API.G_MISS_CHAR,
193 x_DEF_Rec OUT NOCOPY Csd_Repairs_Util.DEF_Rec_Type
194 );
195
196 PROCEDURE GET_ENTITLEMENTS
197 (
198 P_API_VERSION_NUMBER IN NUMBER,
199 P_INIT_MSG_LIST IN VARCHAR2 := 'F',
200 P_COMMIT IN VARCHAR2 := 'F',
201 P_CONTRACT_NUMBER IN VARCHAR2 := NULL,
202 P_SERVICE_LINE_ID IN NUMBER := NULL,
203 P_CUSTOMER_ID IN NUMBER := NULL,
204 P_SITE_ID IN NUMBER := NULL,
205 P_CUSTOMER_ACCOUNT_ID IN NUMBER := NULL,
206 P_SYSTEM_ID IN NUMBER := NULL,
207 P_INVENTORY_ITEM_ID IN NUMBER := NULL,
208 P_CUSTOMER_PRODUCT_ID IN NUMBER := NULL,
209 P_REQUEST_DATE IN DATE := NULL,
210 P_VALIDATE_FLAG IN VARCHAR2 := 'Y',
211 --Begin forwardporting bug fix for 2806199,2806661,2802141 By Vijay
212 P_BUSINESS_PROCESS_ID IN NUMBER DEFAULT NULL,
213 P_SEVERITY_ID IN NUMBER DEFAULT NULL,
214 P_TIME_ZONE_ID IN NUMBER DEFAULT NULL,
215 P_CALC_RESPTIME_FLAG IN VARCHAR2 DEFAULT NULL,
216 --End forwardporting bug fix for 2806199,2806661,2802141 By Vijay
217 X_ENT_CONTRACTS OUT NOCOPY Oks_Entitlements_Pub.GET_CONTOP_TBL,
218 X_RETURN_STATUS OUT NOCOPY VARCHAR2,
219 X_MSG_COUNT OUT NOCOPY NUMBER,
220 X_MSG_DATA OUT NOCOPY VARCHAR2
221 );
222
223 -- swai: bug 4939782 (FP of ER 4723163)
224 /*-----------------------------------------------------------------*/
225 /* procedure name: change_item_ib_owner */
226 /* description : Procedure to Change the Install Base Owner for */
227 /* a single item */
231 p_create_tca_relation IN VARCHAR2 := NULL,
228 /*-----------------------------------------------------------------*/
229 PROCEDURE CHANGE_ITEM_IB_OWNER
230 (
232 p_instance_id IN NUMBER,
233 p_new_owner_party_id IN NUMBER,
234 p_new_owner_account_id IN NUMBER,
235 p_current_owner_party_id IN NUMBER,
236 x_return_status OUT NOCOPY VARCHAR2,
237 x_msg_count OUT NOCOPY NUMBER,
238 x_msg_data OUT NOCOPY VARCHAR2,
239 x_tca_relation_id OUT NOCOPY NUMBER
240 );
241 -- end swai: bug 4939782 (FP of ER 4723163)
242
243 PROCEDURE Get_KB_Element_Description
244 (
245 p_element_id IN NUMBER,
246 p_element_description OUT NOCOPY VARCHAR2
247 );
248
249 PROCEDURE Check_Reqd_Param
250 (
251 p_param_value IN NUMBER,
252 p_param_name IN VARCHAR2,
253 p_api_name IN VARCHAR2
254 );
255
256 PROCEDURE Check_Reqd_Param
257 (
258 p_param_value IN VARCHAR2,
259 p_param_name IN VARCHAR2,
260 p_api_name IN VARCHAR2
261 );
262
263 PROCEDURE Check_Reqd_Param
264 (
265 p_param_value IN DATE,
266 p_param_name IN VARCHAR2,
267 p_api_name IN VARCHAR2
268 );
269
270 -- R12 Development Begin
271 -- *******************************************************
272 -- API Name: check_task_n_wip
273 -- Type : Private
274 -- Pre-Req : None
275 -- Parameters:
276 -- IN
277 -- p_repair_line_id IN VARCHAR2,
278 -- p_repair_status IN VARCHAR2,
279 -- OUT
280 -- x_return_status
281 -- x_msg_count
282 -- x_msg_data
283 --
284 -- Version : Current version 1.0
285 -- Initial Version 1.0
286 --
287 -- Description : This API checks if there are any open tasks or wip jobs
288 -- for the repair order if the status is 'C'. If there are
289 -- open tasks or wipjobs depending on the mode, this api
290 -- returns FAILURE otherwise SUCCESS.
291 --
292 --
293 -- ***********************************************************
294 PROCEDURE Check_Task_N_Wipjob
295 (
296 p_repair_line_id IN NUMBER,
297 p_repair_status IN VARCHAR2,
298 x_return_status OUT NOCOPY VARCHAR2,
299 x_msg_count OUT NOCOPY NUMBER,
300 x_msg_data OUT NOCOPY VARCHAR2
301 );
302
303
304 -- *******************************************************
305 -- API Name: convert_Status_val_to_Id
306 -- Type : Private
307 -- Pre-Req : None
308 -- Parameters:
309 -- IN
310 -- p_status_rec IN CSD_REPAIRS_PUB.REPAIR_STATUS_REC_TYPE ,
311 -- OUT
312 -- x_status_rec OUT CSD_REPAIRS_PUB.REPAIR_STATUS_REC_TYPE ,
313 -- x_return_status
314 --
315 -- Version : Current version 1.0
316 -- Initial Version 1.0
317 --
318 -- Description : Converts value to Ids in the input repair status record.
319 --
320 -- ***********************************************************
321
322 PROCEDURE Convert_status_Val_to_Id(p_repair_status_rec IN Csd_Repairs_Pub.REPAIR_STATUS_REC_TYPE,
323 x_repair_status_rec OUT NOCOPY Csd_Repairs_Pub.REPAIR_STATUS_REC_TYPE,
324 x_return_status OUT NOCOPY VARCHAR2);
325
326 -- ***********************************************************
327 -- ***********************************************************
328 PROCEDURE Check_WebSrvc_Security
329 (
330 p_repair_line_id IN NUMBER,
331 x_return_status OUT NOCOPY VARCHAR2
332 );
333
334 -- R12 Development End
335
336 --bug#5874431
337 Procedure create_csd_index (p_sql_stmt IN varchar2,
338 p_object IN varchar2
339 );
340
341 -- *******************************************************
342 -- API Name: get_contract_resolve_by_date
343 -- Type : Private
344 -- Pre-Req : None
345 -- Parameters:
346 -- IN required?
347 -- p_contract_line_id IN NUMBER, Y
348 -- p_bus_proc_id IN NUMBER, Y
349 -- p_severity_id IN NUMBER, Y
350 -- p_request_date IN NUMBER, N - if not passed, use sysdate
351 -- OUT
352 -- x_return_status
353 -- x_msg_count
354 -- x_msg_data
355 -- x_resolve_by_date OUT DATE
356 --
357 -- Version : Current version 1.0
358 -- Initial Version 1.0
359 --
360 -- Description : rfieldma: 5355051
361 -- calls oks_entitlements_pub.get_react_resolve_by
362 -- return resolve_by_date
363 --
364 --
365 --
366 --
367 -- ***********************************************************
368 PROCEDURE get_contract_resolve_by_date
369 (
370 p_contract_line_id IN NUMBER,
371 p_bus_proc_id IN NUMBER,
372 p_severity_id IN NUMBER,
373 p_request_date IN DATE := sysdate,
374 x_return_status OUT NOCOPY VARCHAR2,
375 x_msg_count OUT NOCOPY NUMBER,
376 x_msg_data OUT NOCOPY VARCHAR2,
377 x_resolve_by_date OUT NOCOPY DATE
378 );
379
380
381 -- *******************************************************
385 -- Parameters:
382 -- API Name: get_user_profile_option_name
383 -- Type : Private
384 -- Pre-Req : None
386 -- IN required?
387 -- p_profile_name IN VARHAR2 Y
388 --
389 -- Version : Current version 1.0
390 -- Initial Version 1.0
391 --
392 -- Description : rfieldma: utility function
393 -- returns language specific user profile
394 -- option name
395 --
396 --
397 --
398 --
399 -- ***********************************************************
400 FUNCTION get_user_profile_option_name
401 (
402 p_profile_name IN VARCHAR2
403 ) RETURN VARCHAR2 ;
404
405 -- bug#7497790, 12.1 FP, subhat.
406 -- ***************************************************
407 -- Automatically update the RO status when the item is received.
408 -- The API receives the Repair line id and updates the RO status if the conditions are met.
409 -- Parameters:
410 -- p_event : Specify the event that is calling this program. Based on the event, the program logic might change.
411 -- p_reason_code: The reason code for the status change defaulted to null
412 -- p_comments: The comments for the flow status, defaulted to null
413 -- p_validation_level: validation level for the routine. Pass fnd_api.g_valid_level_full to get the messages from the API
414 -- pass fnd_api.g_valid_level_none will ignore all error messages and return success always. The error messages
415 -- will be logged in the fnd_log_messages if logging is enabled
416 --*****************************************************
417 procedure auto_update_ro_status(
418 p_api_version in number,
419 p_commit in varchar2,
420 p_init_msg_list in varchar2,
421 p_repair_line_id in number,
422 x_return_status out nocopy varchar2,
423 x_msg_count out nocopy number,
424 x_msg_data out nocopy varchar2,
425 p_event in varchar2,
426 p_reason_code in varchar2 default null,
427 p_comments in varchar2 default null,
428 p_validation_level in number);
429
430
431 --
432
433 -- *******************************************************
434 -- API Name: default_ro_attrs_from_rule
435 -- Type : Private
436 -- Pre-Req : None
437 -- Parameters:
438 -- IN OUT required?
439 -- px_repln_rec in out nocopy CSD_REPAIRS_PUB.REPLN_REC_TYPE Y
440 --
441 -- Version : Current version 1.0
442 -- Initial Version 1.0
443 --
444 -- Description : swai: utility procedure added for bug 7657379
448 -- the rule input rec for defaulting rules.
445 -- defaults Repair Order attributes from defaulting
446 -- rules into px_repln_rec if the field is not already
447 -- set. Uses existing values in px_repln_rec to populate
449 -- Currently, the following fields are defaulted if
450 -- they are passed in as G_MISS:
451 -- Inventory Org
452 -- Repair Org
453 -- Repair Owner
454 -- Repair Priority
455 -- Repair Type
456 -- Note that the profile option value will be returned
457 -- if no applicable rules exist. For Repair Types,
458 -- the profile value returned in for profile
459 -- 'CSD_DEFAULT_REPAIR_TYPE'
460 -- ***********************************************************
461 procedure default_ro_attrs_from_rule (
462 p_api_version in number,
463 p_commit in varchar2,
464 p_init_msg_list in varchar2,
465 px_repln_rec in out nocopy CSD_REPAIRS_PUB.repln_rec_type,
466 x_return_status out nocopy varchar2,
467 x_msg_count out nocopy number,
468 x_msg_data out nocopy varchar2);
469
470 /**************************************************************************/
471 /* Procedure: create_requisition */
472 /* Description: This will insert the records into requisition interface */
473 /* table and subsequently launches the concurrent request to */
474 /* create the requisitions.If the concurrent program is */
475 /* launched successfully then the concurrent request id is */
476 /* is returned. */
477 /* Created by: subhat - 02-09-09 */
478 /**************************************************************************/
479
480 PROCEDURE create_requisition
481 (
482 p_api_version_number IN NUMBER,
483 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
484 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
485 x_return_Status OUT NOCOPY VARCHAR2,
486 x_msg_count OUT NOCOPY NUMBER,
487 x_msg_data OUT NOCOPY VARCHAR2,
488 p_wip_entity_id_tbl IN JTF_NUMBER_TABLE,
489 p_quantity_tbl IN JTF_NUMBER_TABLE,
490 p_uom_code_tbl IN VARCHAR2_TABLE_100,
491 p_op_seq_num_tbl IN JTF_NUMBER_TABLE,
492 p_item_id_tbl IN JTF_NUMBER_TABLE,
493 p_item_description_tbl IN VARCHAR2_TABLE_100,
494 p_organization_id IN NUMBER,
495 x_request_id OUT NOCOPY NUMBER,
496 p_repair_line_id IN NUMBER DEFAULT NULL
497 );
498
499 /**************************************************************************/
500 /* Procedure: create_requisition_cp */
501 /* Description: This is concurrent wrapper to process the records inserted*/
502 /* by depot application in the po_requisitions_all_interface */
503 /* table. The program also automatically created internal sales*/
504 /* order if the requisition is internal and is approved. */
505 /* If p_requisition_id is passed as null then it picks up all */
506 /* eligible records and creates internal sales order for the same*/
507 /**************************************************************************/
508
509 PROCEDURE create_requisition_cp
510 (
511 errbuf OUT NOCOPY VARCHAR2,
512 retcode OUT NOCOPY VARCHAR2,
513 p_ir_operating_unit IN NUMBER DEFAULT NULL,
514 p_so_operating_unit IN NUMBER DEFAULT NULL,
515 p_repair_line_id IN NUMBER DEFAULT NULL,
516 p_requisition_id IN NUMBER DEFAULT NULL
517 );
518
519 -- validate the order line id.
520 -- validate its a valid OM order line id originating from depot repair.
521 -- make a call out to user hooks to derive the service item.
522 -- if the user hook returns null, then call depot defaulting rules to determine if the
523 -- item being shipped out is covered under warranty.
524 -- service item is not null, derive the service attributes.
525 -- create a new line under the order header for the service item with necessary service
526 -- information.
527 -- once the new service line is added, call the OKS CP to create the warranty for the
528 -- service line.
529 -- if contracts creation successful, add a new repair activity.
530
531 PROCEDURE create_repair_warranty
532 (
533 p_api_version_number IN NUMBER,
534 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
535 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
536 x_return_status OUT NOCOPY VARCHAR2,
537 x_msg_count OUT NOCOPY NUMBER,
538 x_msg_data OUT NOCOPY VARCHAR2,
539 x_contract_number OUT NOCOPY VARCHAR2,
540 p_order_line_id IN NUMBER
541 );
542
543 /****************************************************************************************/
544 /* Procedure: create_inst_party_relation */
545 /* Description: This is the utility wrapper around the CSI API. This API */
546 /* does not do any validations of the input data. All the validation */
547 /* is deferred for the CSI API. The API checks if there already exists */
548 /* a relationship for the instance,party and relationship type combination.*/
549 /* If yes, then API immediately returns with x_relationship_created = F. */
550 /* Otherwise, a new relationship is created and the API will return with */
551 /* x_relationship_created = T. */
552 /* @params: */
553 /* p_sr_party_id: Service request party id or any party id to whom the new relation*/
554 /* ship needs to be created. */
555 /* p_sr_account_id: account id corresponding to p_sr_party_id. Currently it doesn't*/
556 /* have any significance. Can be passed as null. */
557 /* p_instance_id: Item instance id */
558 /* p_relationship_type: Relationship type code. Should be a valid relationship type*/
559 /* defined in the CSI lookups. */
560 /* x_relationship_created: T if a new relationship is created, F otherwise. */
561 /* Created by: subhat */
562 /****************************************************************************************/
563 PROCEDURE create_inst_party_relation
564 (
565 p_api_version_number IN NUMBER,
566 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
567 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
568 x_return_status OUT NOCOPY VARCHAR2,
569 x_msg_count OUT NOCOPY NUMBER,
570 x_msg_data OUT NOCOPY VARCHAR2,
571 x_relationship_created OUT NOCOPY VARCHAR2,
572 p_sr_party_id IN NUMBER,
573 p_sr_account_id IN NUMBER,
574 p_instance_id IN NUMBER,
575 p_relationship_type IN VARCHAR2
576 );
577
578 END Csd_Repairs_Util;