61: -- record already exists
62: PA_UTILS.Add_Message( p_app_short_name => 'PA'
63: ,p_msg_name => 'PA_TASK_NAME_INVALID');
64:
65: x_return_status := FND_API.G_RET_STS_ERROR;
66: END IF;
67:
68: CLOSE get_task_id; --Bug 3868121
69:
210: p_ci_impact_id IN NUMBER:= null,
211: p_ci_id IN NUMBER := null,
212: p_impact_type_code IN VARCHAR2 := null,
213: p_status_code IN VARCHAR2 := null,
214: p_description IN VARCHAR2 := FND_API.g_miss_char,
215: p_implementation_date IN DATE := FND_API.g_miss_date,
216: p_implemented_by IN NUMBER := FND_API.g_miss_num,
217: p_impby_name IN VARCHAR2 := NULL,
218: p_impby_type_id IN NUMBER := null,
211: p_ci_id IN NUMBER := null,
212: p_impact_type_code IN VARCHAR2 := null,
213: p_status_code IN VARCHAR2 := null,
214: p_description IN VARCHAR2 := FND_API.g_miss_char,
215: p_implementation_date IN DATE := FND_API.g_miss_date,
216: p_implemented_by IN NUMBER := FND_API.g_miss_num,
217: p_impby_name IN VARCHAR2 := NULL,
218: p_impby_type_id IN NUMBER := null,
219: p_implementation_comment IN VARCHAR2 := FND_API.g_miss_char,
212: p_impact_type_code IN VARCHAR2 := null,
213: p_status_code IN VARCHAR2 := null,
214: p_description IN VARCHAR2 := FND_API.g_miss_char,
215: p_implementation_date IN DATE := FND_API.g_miss_date,
216: p_implemented_by IN NUMBER := FND_API.g_miss_num,
217: p_impby_name IN VARCHAR2 := NULL,
218: p_impby_type_id IN NUMBER := null,
219: p_implementation_comment IN VARCHAR2 := FND_API.g_miss_char,
220: p_record_version_number IN NUMBER := null,
215: p_implementation_date IN DATE := FND_API.g_miss_date,
216: p_implemented_by IN NUMBER := FND_API.g_miss_num,
217: p_impby_name IN VARCHAR2 := NULL,
218: p_impby_type_id IN NUMBER := null,
219: p_implementation_comment IN VARCHAR2 := FND_API.g_miss_char,
220: p_record_version_number IN NUMBER := null,
221: p_impacted_task_id IN NUMBER := FND_API.g_miss_num,
222: p_impacted_task_name IN VARCHAR2 := NULL,
223:
217: p_impby_name IN VARCHAR2 := NULL,
218: p_impby_type_id IN NUMBER := null,
219: p_implementation_comment IN VARCHAR2 := FND_API.g_miss_char,
220: p_record_version_number IN NUMBER := null,
221: p_impacted_task_id IN NUMBER := FND_API.g_miss_num,
222: p_impacted_task_name IN VARCHAR2 := NULL,
223:
224: x_return_status OUT NOCOPY VARCHAR2,
225: x_msg_count OUT NOCOPY NUMBER,
272: -- record already exists
273: PA_UTILS.Add_Message( p_app_short_name => 'PA'
274: ,p_msg_name => 'PA_TASK_NAME_INVALID');
275:
276: x_return_status := FND_API.G_RET_STS_ERROR;
277: END IF;
278:
279: CLOSE get_task_id; --Bug 3868121
280: ELSE
289:
290:
291:
292: FOR rec IN get_ci_info LOOP
293: IF p_description = FND_API.g_miss_char then
294: l_description := rec.description ;
295: END IF;
296:
297: IF p_implementation_date = FND_API.g_miss_date then
293: IF p_description = FND_API.g_miss_char then
294: l_description := rec.description ;
295: END IF;
296:
297: IF p_implementation_date = FND_API.g_miss_date then
298: l_implementation_date := rec.implementation_date;
299: END IF;
300:
301: IF p_implemented_by = FND_API.g_miss_num AND p_impby_name IS NULL then
297: IF p_implementation_date = FND_API.g_miss_date then
298: l_implementation_date := rec.implementation_date;
299: END IF;
300:
301: IF p_implemented_by = FND_API.g_miss_num AND p_impby_name IS NULL then
302: l_implemented_by := rec.implemented_by;
303: END IF;
304:
305: IF p_implementation_comment = FND_API.g_miss_char then
301: IF p_implemented_by = FND_API.g_miss_num AND p_impby_name IS NULL then
302: l_implemented_by := rec.implemented_by;
303: END IF;
304:
305: IF p_implementation_comment = FND_API.g_miss_char then
306: l_implementation_comment := rec.implementation_comment;
307: END IF;
308:
309: IF p_impacted_task_id = FND_API.g_miss_num
305: IF p_implementation_comment = FND_API.g_miss_char then
306: l_implementation_comment := rec.implementation_comment;
307: END IF;
308:
309: IF p_impacted_task_id = FND_API.g_miss_num
310: AND p_impacted_task_name IS NULL then
311: l_task_id := rec.impacted_task_id;
312: END IF;
313:
360: ROLLBACK TO update_ci_impact;
361: END IF;
362:
363: PA_UTILS.Add_Message ( p_app_short_name => 'PA',p_msg_name => 'PA_XC_RECORD_CHANGED');
364: x_return_status := FND_API.G_RET_STS_ERROR;
365:
366:
367: WHEN OTHERS THEN
368: IF p_commit = 'T' THEN