DBA Data[Home] [Help]

APPS.PA_PROJ_STRUCTURE_PVT dependencies on FND_API

Line 39: IF ((l_looped = FND_API.G_RET_STS_SUCCESS) AND

35: x_msg_data => l_msg
36: );
37: END;
38: --
39: IF ((l_looped = FND_API.G_RET_STS_SUCCESS) AND
40: (l_linked = FND_API.G_RET_STS_SUCCESS)) THEN
41: return FND_API.G_RET_STS_SUCCESS;
42: ELSE
43: return FND_API.G_RET_STS_ERROR;

Line 40: (l_linked = FND_API.G_RET_STS_SUCCESS)) THEN

36: );
37: END;
38: --
39: IF ((l_looped = FND_API.G_RET_STS_SUCCESS) AND
40: (l_linked = FND_API.G_RET_STS_SUCCESS)) THEN
41: return FND_API.G_RET_STS_SUCCESS;
42: ELSE
43: return FND_API.G_RET_STS_ERROR;
44: END IF;

Line 41: return FND_API.G_RET_STS_SUCCESS;

37: END;
38: --
39: IF ((l_looped = FND_API.G_RET_STS_SUCCESS) AND
40: (l_linked = FND_API.G_RET_STS_SUCCESS)) THEN
41: return FND_API.G_RET_STS_SUCCESS;
42: ELSE
43: return FND_API.G_RET_STS_ERROR;
44: END IF;
45: --

Line 43: return FND_API.G_RET_STS_ERROR;

39: IF ((l_looped = FND_API.G_RET_STS_SUCCESS) AND
40: (l_linked = FND_API.G_RET_STS_SUCCESS)) THEN
41: return FND_API.G_RET_STS_SUCCESS;
42: ELSE
43: return FND_API.G_RET_STS_ERROR;
44: END IF;
45: --
46: pa_debug.reset_err_stack;
47: EXCEPTION

Line 50: -- return FND_API.G_RET_STS_UNEXP_ERROR;

46: pa_debug.reset_err_stack;
47: EXCEPTION
48: WHEN OTHERS THEN
49: RAISE;
50: -- return FND_API.G_RET_STS_UNEXP_ERROR;
51: END CHECK_ASSO_PROJ_OK;
52: --
53: --
54: --

Line 58: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

54: --
55: procedure CREATE_RELATIONSHIP
56: (
57: p_api_version IN NUMBER := 1.0,
58: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
61: p_debug_mode IN VARCHAR2 := 'N',
62: p_task_id IN NUMBER,

Line 59: p_commit IN VARCHAR2 := FND_API.G_FALSE,

55: procedure CREATE_RELATIONSHIP
56: (
57: p_api_version IN NUMBER := 1.0,
58: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
61: p_debug_mode IN VARCHAR2 := 'N',
62: p_task_id IN NUMBER,
63: p_project_id IN NUMBER,

Line 60: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

56: (
57: p_api_version IN NUMBER := 1.0,
58: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
61: p_debug_mode IN VARCHAR2 := 'N',
62: p_task_id IN NUMBER,
63: p_project_id IN NUMBER,
64: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895

Line 138: x_return_status := FND_API.G_RET_STS_SUCCESS;

134: --
135: Begin
136: pa_debug.set_err_stack('CREATE_RELATIONSHIP');
137: --
138: x_return_status := FND_API.G_RET_STS_SUCCESS;
139: l_user_id := FND_GLOBAL.USER_ID;
140: --
141: l_src_task_id:= p_task_id;
142: l_dest_proj_id:=p_project_id;

Line 146: RAISE FND_API.G_EXC_ERROR;

142: l_dest_proj_id:=p_project_id;
143: IF ((l_dest_proj_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) OR
144: (l_dest_proj_id IS NULL)) THEN
145: PA_UTILS.ADD_MESSAGE( 'PA', 'PA_PS_DEST_PROJ_NULL');
146: RAISE FND_API.G_EXC_ERROR;
147: END IF;
148: --
149: OPEN IS_CC_PRVDR(p_project_id);
150: LOOP

Line 159: IF (l_create_ok = FND_API.G_RET_STS_SUCCESS) THEN

155: --
156: IF (l_cc_prvdr <> 'Y') AND (l_cc_prvdr <> 'y') THEN
157: l_create_ok := CHECK_ASSO_PROJ_OK(p_task_id => p_task_id, p_project_id => p_project_id);
158: --
159: IF (l_create_ok = FND_API.G_RET_STS_SUCCESS) THEN
160: --
161: OPEN get_src_task_det(p_task_id);
162: FETCH get_src_task_det INTO l_src_task_det_rec;
163: IF get_src_task_det%NOTFOUND THEN

Line 165: x_return_status := FND_API.G_RET_STS_ERROR;

161: OPEN get_src_task_det(p_task_id);
162: FETCH get_src_task_det INTO l_src_task_det_rec;
163: IF get_src_task_det%NOTFOUND THEN
164: PA_UTILS.ADD_Message('PA','PA_STRUCT_CREATE_ERR');
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: END IF;
167: CLOSE get_src_task_det;
168: PA_PROJ_ELEMENTS_UTILS.Project_Name_Or_Id(
169: p_project_name => l_dest_proj_name

Line 179: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

175: ,x_error_msg_code => l_error_msg_code
176: );
177:
178: -- added for Bug: 4537865
179: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
180: l_dest_proj_id := l_new_dest_proj_id;
181: END IF;
182: -- added for Bug: 4537865
183:

Line 184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

180: l_dest_proj_id := l_new_dest_proj_id;
181: END IF;
182: -- added for Bug: 4537865
183:
184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
185: PA_UTILS.ADD_MESSAGE( 'PA', l_error_msg_code);
186: x_return_status := FND_API.G_RET_STS_ERROR;
187: END IF;
188: --

Line 186: x_return_status := FND_API.G_RET_STS_ERROR;

182: -- added for Bug: 4537865
183:
184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
185: PA_UTILS.ADD_MESSAGE( 'PA', l_error_msg_code);
186: x_return_status := FND_API.G_RET_STS_ERROR;
187: END IF;
188: --
189: /* Find owning project id */
190: OPEN get_owning_project_id(p_task_id);

Line 200: x_return_status := FND_API.G_RET_STS_ERROR;

196: --
197: IF (l_owning_proj_id is NULL) THEN
198: /* Selected task does not belong to a valid project */
199: PA_UTILS.ADD_Message('PA','PA_STRUCT_CREATE_ERR');
200: x_return_status := FND_API.G_RET_STS_ERROR;
201: ELSE
202: /* call table handler */
203: /*pa_object_relationships_pkg.insert_row(
204: p_user_id => l_user_id,

Line 247: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

243: x_msg_count => l_new_msg_count, --added for Bug: 4537865
244: x_msg_data => x_msg_data);
245: --
246: /* Check for date warning */
247: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
248: --
249: --added for Bug: 4537865
250: x_msg_count := l_new_msg_count;
251: --added for Bug: 4537865

Line 295: x_return_status := FND_API.G_RET_STS_ERROR;

291: --
292: END IF; /* End Create Relationship */
293: ELSE
294: PA_UTILS.Add_Message('PA','PA_STRUCT_PJ_EXT_IN_STRUCT');
295: x_return_status := FND_API.G_RET_STS_ERROR;
296: END IF;
297: ELSE
298: PA_UTILS.Add_Message('PA','PA_STRUCT_PROJ_BILLABLE');
299: x_return_status := FND_API.G_RET_STS_ERROR;

Line 299: x_return_status := FND_API.G_RET_STS_ERROR;

295: x_return_status := FND_API.G_RET_STS_ERROR;
296: END IF;
297: ELSE
298: PA_UTILS.Add_Message('PA','PA_STRUCT_PROJ_BILLABLE');
299: x_return_status := FND_API.G_RET_STS_ERROR;
300: END IF;
301: --
302: x_msg_count := FND_MSG_PUB.Count_Msg;
303: --

Line 305: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE

301: --
302: x_msg_count := FND_MSG_PUB.Count_Msg;
303: --
304: IF (x_msg_count = 1) THEN
305: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
306: ,p_msg_index => 1
307: ,p_data => x_msg_data
308: ,p_msg_index_out => l_msg_index_out
309: );

Line 317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

313: END IF;
314: pa_debug.reset_err_stack;
315: EXCEPTION
316: When OTHERS Then
317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
318: RAISE;
319: END CREATE_RELATIONSHIP;
320: --
321: --

Line 326: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

322: --
323: procedure DELETE_RELATIONSHIP
324: (
325: p_api_version IN NUMBER := 1.0,
326: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
327: p_commit IN VARCHAR2 := FND_API.G_FALSE,
328: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
329: p_debug_mode IN VARCHAR2 := 'N',
330: p_task_id IN NUMBER,

Line 327: p_commit IN VARCHAR2 := FND_API.G_FALSE,

323: procedure DELETE_RELATIONSHIP
324: (
325: p_api_version IN NUMBER := 1.0,
326: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
327: p_commit IN VARCHAR2 := FND_API.G_FALSE,
328: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
329: p_debug_mode IN VARCHAR2 := 'N',
330: p_task_id IN NUMBER,
331: p_project_id IN NUMBER,

Line 328: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

324: (
325: p_api_version IN NUMBER := 1.0,
326: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
327: p_commit IN VARCHAR2 := FND_API.G_FALSE,
328: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
329: p_debug_mode IN VARCHAR2 := 'N',
330: p_task_id IN NUMBER,
331: p_project_id IN NUMBER,
332: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895

Line 470: x_return_status := FND_API.G_RET_STS_SUCCESS;

466: l_msg_data VARCHAR2(250);
467: --
468: Begin
469: pa_debug.set_err_stack('DELETE_RELATIONSHIP');
470: x_return_status := FND_API.G_RET_STS_SUCCESS;
471: --
472: IF p_task_id IS NOT NULL THEN
473: OPEN get_src_task_det(p_task_id);
474: FETCH get_src_task_det INTO l_src_task_ver_id,l_src_proj_id;

Line 477: x_return_status := FND_API.G_RET_STS_ERROR;

473: OPEN get_src_task_det(p_task_id);
474: FETCH get_src_task_det INTO l_src_task_ver_id,l_src_proj_id;
475: IF get_src_task_det%NOTFOUND THEN
476: PA_UTILS.ADD_Message('PA','PA_STRUCT_CREATE_ERR');
477: x_return_status := FND_API.G_RET_STS_ERROR;
478: END IF;
479: CLOSE get_src_task_det;
480: END IF;
481: --

Line 490: x_return_status := FND_API.G_RET_STS_ERROR;

486: OPEN get_relationship_det1(l_src_task_ver_id,l_src_proj_id,p_project_id);
487: FETCH get_relationship_det1 INTO l_rel_id,l_rec_ver_num;
488: IF get_relationship_det1%NOTFOUND THEN
489: PA_UTILS.ADD_Message('PA','PA_STRUCT_CREATE_ERR');
490: x_return_status := FND_API.G_RET_STS_ERROR;
491: END IF;
492: CLOSE get_relationship_det1;
493: --
494: --

Line 546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

542: X_RETURN_STATUS => x_return_status
543: );
544: EXCEPTION
545: WHEN OTHERS THEN
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
548: END;
549: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
550: END LOOP;*/ --Commented the code to implement new functionality for subproject association

Line 549: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);

545: WHEN OTHERS THEN
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
548: END;
549: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
550: END LOOP;*/ --Commented the code to implement new functionality for subproject association
551: PA_RELATIONSHIP_PVT.Delete_SubProject_Association(
552: p_commit => p_commit
553: ,p_validate_only => p_validate_only

Line 563: x_return_status := FND_API.G_RET_STS_ERROR;

559: ,x_msg_data => x_msg_data);
560:
561: ELSE
562: /* Can't delete relationship due to other contracts*/
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: PA_UTILS.ADD_Message('PA','PA_STRUCT_HAS_SUB_CONT');
565: END IF;
566: ELSIF (p_task_id IS NOT NULL) AND (p_project_id IS NULL) THEN
567: /* If task_id is not null, then delete all relationships that the task is associated with */

Line 602: x_return_status := FND_API.G_RET_STS_ERROR;

598: l_disassociation := 'Y';
599: END IF;*/ --Commented if block
600: l_disassociation := 'Y'; --Moved this line here from the above if block
601: if (l_disassociation = 'N') THEN
602: x_return_status := FND_API.G_RET_STS_ERROR;
603: PA_UTILS.ADD_Message('PA','PA_STRUCT_HAS_SUB_CONT');
604: end if;
605: --EXIT when l_disassociation = 'N';
606: --

Line 639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

635: ,x_msg_count => x_msg_count
636: ,x_msg_data => x_msg_data);
637: EXCEPTION
638: WHEN OTHERS THEN
639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
640: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
641: END;
642: --EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
643:

Line 642: --EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);

638: WHEN OTHERS THEN
639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
640: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
641: END;
642: --EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
643:
644: END LOOP;
645: -- CLOSE get_all_projects_for_task;
646: CLOSE get_all_sub_proj_ass_det;

Line 703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

699: ,x_msg_data => x_msg_data);
700: --
701: EXCEPTION
702: WHEN OTHERS THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
705: END;
706: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
707: END LOOP;

Line 706: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);

702: WHEN OTHERS THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
705: END;
706: EXIT WHEN (x_return_status <> FND_API.G_RET_STS_SUCCESS);
707: END LOOP;
708: -- CLOSE get_all_tasks_for_project;
709: CLOSE get_str_sub_proj_ass_det; --SMukka Added
710: ELSE

Line 711: x_return_status := FND_API.G_RET_STS_ERROR;

707: END LOOP;
708: -- CLOSE get_all_tasks_for_project;
709: CLOSE get_str_sub_proj_ass_det; --SMukka Added
710: ELSE
711: x_return_status := FND_API.G_RET_STS_ERROR;
712: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
713: END IF;
714: --
715: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 715: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

711: x_return_status := FND_API.G_RET_STS_ERROR;
712: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
713: END IF;
714: --
715: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
716: x_return_status := FND_API.G_RET_STS_ERROR;
717: END IF;
718: --
719: x_msg_count := FND_MSG_PUB.Count_Msg;

Line 716: x_return_status := FND_API.G_RET_STS_ERROR;

712: PA_UTILS.ADD_Message('PA','PA_STRUCT_DELETE_ERR');
713: END IF;
714: --
715: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
716: x_return_status := FND_API.G_RET_STS_ERROR;
717: END IF;
718: --
719: x_msg_count := FND_MSG_PUB.Count_Msg;
720: IF (x_msg_count = 1) THEN

Line 721: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE

717: END IF;
718: --
719: x_msg_count := FND_MSG_PUB.Count_Msg;
720: IF (x_msg_count = 1) THEN
721: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
722: ,p_msg_index => 1
723: ,p_data => x_msg_data
724: ,p_msg_index_out => l_msg_index_out
725: );

Line 732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

728: END IF;
729: pa_debug.reset_err_stack;
730: EXCEPTION
731: When OTHERS Then
732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
733: Raise;
734: END DELETE_RELATIONSHIP;
735:
736: