107: raise FND_API.G_EXC_UNEXPECTED_ERROR;
108: end if;
109:
110: if FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) then
111: FND_MSG_PUB.initialize;
112: end if;
113:
114: if (p_debug_mode = 'Y') then
115: pa_debug.debug('Performing ID validations and conversions...');
167: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA', p_msg_name => l_error_msg_code);
168: end if;
169: end if;
170:
171: l_msg_count := FND_MSG_PUB.count_msg;
172: if l_msg_count > 0 then
173: x_msg_count := l_msg_count;
174: if x_msg_count = 1 then
175: pa_interface_utils_pub.get_messages
218: ,x_msg_count => l_msg_count
219: ,x_msg_data => l_msg_data );
220:
221: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
222: x_msg_count := FND_MSG_PUB.count_msg;
223: if x_msg_count = 1 then
224: pa_interface_utils_pub.get_messages
225: (p_encoded => FND_API.G_TRUE,
226: p_msg_index => 1,
253: if p_commit = FND_API.G_TRUE then
254: rollback to create_proj_workplan_attrs;
255: end if;
256: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
257: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
258: p_procedure_name => 'Create_Proj_Workplan_Attrs',
259: p_error_text => SUBSTRB(SQLERRM,1,240));
260: when OTHERS then
261: if p_commit = FND_API.G_TRUE then
261: if p_commit = FND_API.G_TRUE then
262: rollback to create_proj_workplan_attrs;
263: end if;
264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
265: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
266: p_procedure_name => 'Create_Proj_Workplan_Attrs',
267: p_error_text => SUBSTRB(SQLERRM,1,240));
268: raise;
269: END CREATE_PROJ_WORKPLAN_ATTRS;
391: raise FND_API.G_EXC_UNEXPECTED_ERROR;
392: end if;
393:
394: if FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) then
395: FND_MSG_PUB.initialize;
396: end if;
397:
398: if (p_debug_mode = 'Y') then
399: pa_debug.debug('Performing ID validations and conversions...');
491: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA', p_msg_name => l_error_msg_code);
492: end if;
493: end if;
494:
495: l_msg_count := FND_MSG_PUB.count_msg;
496: if l_msg_count > 0 then
497: x_msg_count := l_msg_count;
498: if x_msg_count = 1 then
499: pa_interface_utils_pub.get_messages
548: where proj_element_id = p_proj_element_id ;
549: --FP M:3491609:Project Execution Workflow
550:
551: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
552: x_msg_count := FND_MSG_PUB.count_msg;
553: if x_msg_count = 1 then
554: pa_interface_utils_pub.get_messages
555: (p_encoded => FND_API.G_TRUE,
556: p_msg_index => 1,
583: if p_commit = FND_API.G_TRUE then
584: rollback to update_proj_workplan_attrs;
585: end if;
586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
588: p_procedure_name => 'Update_Proj_Workplan_Attrs',
589: p_error_text => SUBSTRB(SQLERRM,1,240));
590: when OTHERS then
591: if p_commit = FND_API.G_TRUE then
591: if p_commit = FND_API.G_TRUE then
592: rollback to update_proj_workplan_attrs;
593: end if;
594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
595: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
596: p_procedure_name => 'Update_Proj_Workplan_Attrs',
597: p_error_text => SUBSTRB(SQLERRM,1,240));
598: raise;
599: END UPDATE_PROJ_WORKPLAN_ATTRS;
658: raise FND_API.G_EXC_UNEXPECTED_ERROR;
659: end if;
660:
661: if FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) then
662: FND_MSG_PUB.initialize;
663: end if;
664:
665: if (p_debug_mode = 'Y') then
666: pa_debug.debug('Performing ID validations and conversions...');
670: PA_UTILS.Add_Message( p_app_short_name => 'PA'
671: ,p_msg_name => 'PA_PS_STRUC_NAME_REQ');
672: End If;
673:
674: l_msg_count := FND_MSG_PUB.count_msg;
675: if l_msg_count > 0 then
676: x_msg_count := l_msg_count;
677: if x_msg_count = 1 then
678: pa_interface_utils_pub.get_messages
701: ,x_msg_count => l_msg_count
702: ,x_msg_data => l_msg_data );
703:
704: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
705: x_msg_count := FND_MSG_PUB.count_msg;
706: if x_msg_count = 1 then
707: pa_interface_utils_pub.get_messages
708: (p_encoded => FND_API.G_TRUE,
709: p_msg_index => 1,
736: if p_commit = FND_API.G_TRUE then
737: rollback to update_structure_name;
738: end if;
739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
740: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
741: p_procedure_name => 'Update_Structure_Name',
742: p_error_text => SUBSTRB(SQLERRM,1,240));
743: when OTHERS then
744: if p_commit = FND_API.G_TRUE then
744: if p_commit = FND_API.G_TRUE then
745: rollback to update_structure_name;
746: end if;
747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
748: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
749: p_procedure_name => 'Update_Structure_Name',
750: p_error_text => SUBSTRB(SQLERRM,1,240));
751: raise;
752: END UPDATE_STRUCTURE_NAME;
811: raise FND_API.G_EXC_UNEXPECTED_ERROR;
812: end if;
813:
814: if FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) then
815: FND_MSG_PUB.initialize;
816: end if;
817:
818: PA_WORKPLAN_ATTR_PVT.DELETE_PROJ_WORKPLAN_ATTRS
819: ( p_commit => FND_API.G_FALSE
829: ,x_msg_count => l_msg_count
830: ,x_msg_data => l_msg_data);
831:
832: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
833: x_msg_count := FND_MSG_PUB.count_msg;
834: if x_msg_count = 1 then
835: pa_interface_utils_pub.get_messages
836: (p_encoded => FND_API.G_TRUE,
837: p_msg_index => 1,
864: if p_commit = FND_API.G_TRUE then
865: rollback to delete_proj_workplan_attrs;
866: end if;
867: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
868: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
869: p_procedure_name => 'Delete_Proj_Workplan_Attrs',
870: p_error_text => SUBSTRB(SQLERRM,1,240));
871: when OTHERS then
872: if p_commit = FND_API.G_TRUE then
872: if p_commit = FND_API.G_TRUE then
873: rollback to delete_proj_workplan_attrs;
874: end if;
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
876: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_WORKPLAN_ATTR_PUB',
877: p_procedure_name => 'Delete_Proj_Workplan_Attrs',
878: p_error_text => SUBSTRB(SQLERRM,1,240));
879: raise;
880: END DELETE_PROJ_WORKPLAN_ATTRS;