[Home] [Help]
218: IF (p_key_members(i).person_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) AND
219: (p_key_members(i).person_id IS NOT NULL) THEN
220: IF check_valid_employee (p_key_members(i).person_id) = 'N'
221: THEN
222: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
223: THEN
224: pa_interface_utils_pub.map_new_amg_msg
225: ( p_old_message_code => 'PA_INVALID_KEY_MEMBER'
226: ,p_msg_attribute => 'CHANGE'
238: -- validate the role type
239: OPEN l_project_role_types_csr (p_key_members(i).project_role_type,p_project_id); --New parameter for bug 5196996
240: FETCH l_project_role_types_csr INTO l_dummy;
241: IF l_project_role_types_csr%NOTFOUND THEN
242: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
243: THEN
244: pa_interface_utils_pub.map_new_amg_msg
245: ( p_old_message_code => 'PA_INVALID_ROLE_TYPE'
246: ,p_msg_attribute => 'CHANGE'
264: THEN
265: IF p_key_members(i).end_date < p_key_members(i).start_date
266: THEN
267:
268: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
269: THEN
270: pa_interface_utils_pub.map_new_amg_msg
271: ( p_old_message_code => 'PA_SU_INVALID_DATES'
272: ,p_msg_attribute => 'CHANGE'
306: IF l_field_is_overridable <> 1
307: --if not overridable RAISE ERROR else insert
308: THEN
309:
310: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
311: THEN
312: pa_interface_utils_pub.map_new_amg_msg
313: ( p_old_message_code => 'PA_ROLE_TYPE_NOT_OVERRIDABLE'
314: ,p_msg_attribute => 'CHANGE'
329:
330: IF upper(p_key_members(i).project_role_type) = 'PROJECT MANAGER'
331: AND l_project_manager_counter > l_max_number_of_proj_managers
332: THEN
333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
334: THEN
335: pa_interface_utils_pub.map_new_amg_msg
336: ( p_old_message_code => 'PA_PR_TOO_MANY_MGRS'
337: ,p_msg_attribute => 'CHANGE'
500: ROLLBACK TO add_key_members_pvt;
501:
502: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
503:
504: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
505: THEN
506: FND_MSG_PUB.add_exc_msg
507: ( p_pkg_name => G_PKG_NAME
508: , p_procedure_name => l_api_name );
502: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
503:
504: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
505: THEN
506: FND_MSG_PUB.add_exc_msg
507: ( p_pkg_name => G_PKG_NAME
508: , p_procedure_name => l_api_name );
509:
510: END IF;
731:
732: IF l_field_is_overridable <> 1 --if not overridable error else insert
733: THEN
734:
735: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
736: THEN
737: pa_interface_utils_pub.map_new_amg_msg
738: ( p_old_message_code => 'PA_CLASS_CAT_NOT_OVERRIDABLE'
739: ,p_msg_attribute => 'CHANGE'
813: (p_class_categories(i).class_category,
814: p_class_categories(i).class_code) = 'N') OR
815: (l_dummy = 'N') OR (l_dummy2 = 'N')
816: THEN
817: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
818: THEN
819: pa_interface_utils_pub.map_new_amg_msg
820: ( p_old_message_code => 'PA_INVALID_CLASS_CATEGORY'
821: ,p_msg_attribute => 'CHANGE'
887: );
888:
889: EXCEPTION -- 5348726 : Exception block added for Bug#5294891
890: WHEN DUP_VAL_ON_INDEX THEN
891: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
892: pa_interface_utils_pub.map_new_amg_msg
893: ( p_old_message_code => 'PA_DUPLICATE_CLASS_CATG'
894: ,p_msg_attribute => 'CHANGE'
895: ,p_resize_flag => 'Y'
930: FETCH l_get_code_count into l_count;
931: CLOSE l_get_code_count;
932:
933: IF l_count > 1 THEN
934: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
935: pa_interface_utils_pub.map_new_amg_msg
936: ( p_old_message_code => 'PA_ONE_CODE_ONLY_CLASS'
937: ,p_msg_attribute => 'CHANGE'
938: ,p_resize_flag => 'Y' /* Bug 2888297 Changed N to Y */
978: ROLLBACK TO add_class_categories_pvt;
979:
980: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981:
982: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
983: THEN
984: FND_MSG_PUB.add_exc_msg
985: ( p_pkg_name => G_PKG_NAME
986: , p_procedure_name => l_api_name );
980: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981:
982: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
983: THEN
984: FND_MSG_PUB.add_exc_msg
985: ( p_pkg_name => G_PKG_NAME
986: , p_procedure_name => l_api_name );
987:
988: END IF;
1344:
1345: IF l_task_in_rec.pm_task_reference IS NULL
1346: OR l_task_in_rec.pm_task_reference = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1347: THEN
1348: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1349: THEN
1350: pa_interface_utils_pub.map_new_amg_msg
1351: ( p_old_message_code => 'PA_TASK_REF_IS_NULL'
1352: ,p_msg_attribute => 'CHANGE'
1367: OR l_task_in_rec.task_name = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1368: THEN
1369: p_return_status := FND_API.G_RET_STS_ERROR;
1370:
1371: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1372: THEN
1373: pa_interface_utils_pub.map_new_amg_msg
1374: ( p_old_message_code => 'PA_TASK_NAME_IS_NULL'
1375: ,p_msg_attribute => 'CHANGE'
1408: If l_task_in_rec.billable_flag = 'Y' and p_project_type_class_code = 'INDIRECT'
1409: THEN
1410: p_return_status := FND_API.G_RET_STS_ERROR;
1411:
1412: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1413: THEN
1414: pa_interface_utils_pub.map_new_amg_msg
1415: ( p_old_message_code => 'PA_PR_INDIRECT_NO_BILLING'
1416: ,p_msg_attribute => 'CHANGE'
1488: CLOSE l_customer_csr;
1489:
1490: IF l_address_valid = 'N'
1491: THEN
1492: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1493: THEN
1494: pa_interface_utils_pub.map_new_amg_msg
1495: ( p_old_message_code => 'PA_TASK_ADDRESS_INVALID'
1496: ,p_msg_attribute => 'CHANGE'
1527: IF l_service_type_csr%NOTFOUND
1528: THEN
1529:
1530: CLOSE l_service_type_csr;
1531: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1532: THEN
1533: pa_interface_utils_pub.map_new_amg_msg
1534: ( p_old_message_code => 'PA_SERVICE_TYPE_INVALID'
1535: ,p_msg_attribute => 'CHANGE'
1560: FETCH l_ind_rate_schedule_type_csr INTO l_temp_var_sch_type;
1561: IF l_temp_var_sch_type = 'P'
1562: THEN
1563: CLOSE l_ind_rate_schedule_type_csr;
1564: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1565: THEN
1566: pa_interface_utils_pub.map_new_amg_msg
1567: ( p_old_message_code => 'PA_CANT_FIX_DATE_PROV_SCH'
1568: ,p_msg_attribute => 'CHANGE'
1756: p_error_code => l_error_code,
1757: p_error_message => l_error_message );
1758:
1759: IF l_error_code <> 0 THEN
1760: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1761: pa_interface_utils_pub.map_new_amg_msg
1762: ( p_old_message_code => 'PA_ERROR_IN_CLIENT_EXTN'
1763: ,p_msg_attribute => 'CHANGE'
1764: ,p_resize_flag => 'N'
1777: --bug 2732788
1778: IF ( l_task_in_rec.task_start_date IS NULL AND
1779: l_task_in_rec.task_completion_date IS NOT NULL )
1780: THEN
1781: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1782: THEN
1783: pa_interface_utils_pub.map_new_amg_msg
1784: ( p_old_message_code => 'PA_TASK_ST_DATE_NULL'
1785: ,p_msg_attribute => 'CHANGE'
1802: <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE AND
1803: l_task_in_rec.task_completion_date IS NOT NULL
1804: AND l_task_in_rec.task_completion_date < l_task_in_rec.task_start_date
1805: THEN
1806: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1807: THEN
1808: pa_interface_utils_pub.map_new_amg_msg
1809: ( p_old_message_code => 'PA_TASK_DATES_INVALID'
1810: ,p_msg_attribute => 'CHANGE'
1838:
1839: IF l_task_in_rec.task_start_date < p_project_rec.start_date OR
1840: l_task_in_rec.task_start_date > p_project_rec.completion_date
1841: THEN
1842: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1843: THEN
1844: pa_interface_utils_pub.map_new_amg_msg
1845: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
1846: ,p_msg_attribute => 'CHANGE'
1858:
1859: IF l_task_in_rec.task_completion_date < p_project_rec.start_date OR
1860: l_task_in_rec.task_completion_date > p_project_rec.completion_date
1861: THEN
1862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1863: THEN
1864: pa_interface_utils_pub.map_new_amg_msg
1865: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
1866: ,p_msg_attribute => 'CHANGE'
2047: );
2048:
2049: IF l_validate_status = 'N'
2050: THEN
2051: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2052: THEN
2053: pa_interface_utils_pub.map_new_amg_msg
2054: ( p_old_message_code => 'PA_INVALID_FF_VALUES'
2055: ,p_msg_attribute => 'CHANGE'
2168: );
2169:
2170: IF l_validate_status = 'N'
2171: THEN
2172: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2173: THEN
2174: pa_interface_utils_pub.map_new_amg_msg
2175: ( p_old_message_code => 'PA_INVALID_FF_VALUES'
2176: ,p_msg_attribute => 'CHANGE'
2498:
2499: IF l_task_csr%NOTFOUND
2500: THEN
2501: CLOSE l_task_csr;
2502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2503: THEN
2504: pa_interface_utils_pub.map_new_amg_msg
2505: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2506: ,p_msg_attribute => 'CHANGE'
2523: FETCH l_task_id_csr INTO l_parent_TOP_TASK_ID; --l_parent_task_id_rec;
2524: IF l_task_id_csr%NOTFOUND
2525: THEN
2526: CLOSE l_task_id_csr;
2527: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2528: THEN
2529: pa_interface_utils_pub.map_new_amg_msg
2530: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2531: ,p_msg_attribute => 'CHANGE'
2755:
2756: EXCEPTION
2757: /* Added for Bug 6497559 */
2758: WHEN DUP_VAL_ON_INDEX THEN
2759: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2760: IF p_project_rec.pm_product_code = 'MSPROJECT'
2761: THEN
2762: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2763: p_msg_name => 'PA_PS_TASK_NOT_NUM_UNIQ_MSP',
2801:
2802: -- 4537865 RESET OUT PARAMS
2803: p_task_id := NULL ;
2804:
2805: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2806: THEN
2807: FND_MSG_PUB.add_exc_msg
2808: ( p_pkg_name => G_PKG_NAME
2809: , p_procedure_name => l_api_name );
2803: p_task_id := NULL ;
2804:
2805: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2806: THEN
2807: FND_MSG_PUB.add_exc_msg
2808: ( p_pkg_name => G_PKG_NAME
2809: , p_procedure_name => l_api_name );
2810:
2811: END IF;
2964:
2965: IF l_task_csr%NOTFOUND
2966: THEN
2967: CLOSE l_task_csr;
2968: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2969: THEN
2970: pa_interface_utils_pub.map_new_amg_msg
2971: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2972: ,p_msg_attribute => 'CHANGE'
2990:
2991: IF l_task_id_csr%NOTFOUND
2992: THEN
2993: CLOSE l_task_id_csr;
2994: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2995: THEN
2996: pa_interface_utils_pub.map_new_amg_msg
2997: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2998: ,p_msg_attribute => 'CHANGE'
3201: IF l_task_in_rec.task_start_date < l_parent_task_rec.start_date OR
3202: l_task_in_rec.task_start_date > l_parent_task_rec.completion_date
3203:
3204: THEN
3205: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3206: THEN
3207: pa_interface_utils_pub.map_new_amg_msg
3208: ( p_old_message_code => 'PA_PARENT_START_LATER'
3209: ,p_msg_attribute => 'CHANGE'
3221: IF l_task_in_rec.task_completion_date < l_parent_task_rec.start_date OR
3222: l_task_in_rec.task_completion_date > l_parent_task_rec.completion_date
3223:
3224: THEN
3225: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3226: THEN
3227: pa_interface_utils_pub.map_new_amg_msg
3228: ( p_old_message_code => 'PA_PARENT_COMPL_EARLIER'
3229: ,p_msg_attribute => 'CHANGE'
3547:
3548: -- 4537865 RESET OUT PARAMS
3549: p_task_version_id := NULL ;
3550:
3551: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3552: THEN
3553: FND_MSG_PUB.add_exc_msg
3554: ( p_pkg_name => G_PKG_NAME
3555: , p_procedure_name => l_api_name );
3549: p_task_version_id := NULL ;
3550:
3551: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3552: THEN
3553: FND_MSG_PUB.add_exc_msg
3554: ( p_pkg_name => G_PKG_NAME
3555: , p_procedure_name => l_api_name );
3556:
3557: END IF;
3692: FETCH l_project_id_csr INTO l_dummy;
3693:
3694: IF l_project_id_csr%NOTFOUND
3695: THEN
3696: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3697: THEN
3698: pa_interface_utils_pub.map_new_amg_msg
3699: ( p_old_message_code => 'PA_INVALID_PROJECT_ID'
3700: ,p_msg_attribute => 'CHANGE'
3721: (p_pm_project_reference => p_pm_project_reference);
3722:
3723: IF l_project_id IS NULL
3724: THEN
3725: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3726: THEN
3727: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- bug 2257612
3728: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Project Reference');
3729: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_project_reference);
3726: THEN
3727: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- bug 2257612
3728: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Project Reference');
3729: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_project_reference);
3730: FND_MSG_PUB.add;
3731: END IF;
3732:
3733: RAISE FND_API.G_EXC_ERROR;
3734: ELSE
3736:
3737: END IF;
3738: ELSE
3739:
3740: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3741: THEN
3742: pa_interface_utils_pub.map_new_amg_msg
3743: ( p_old_message_code => 'PA_PROJECT_REF_AND_ID_MISSING'
3744: ,p_msg_attribute => 'CHANGE'
3782:
3783: -- 4537865
3784: p_out_project_id := NULL ;
3785:
3786: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3787: THEN
3788: FND_MSG_PUB.add_exc_msg
3789: ( p_pkg_name => G_PKG_NAME
3790: , p_procedure_name => l_api_name );
3784: p_out_project_id := NULL ;
3785:
3786: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3787: THEN
3788: FND_MSG_PUB.add_exc_msg
3789: ( p_pkg_name => G_PKG_NAME
3790: , p_procedure_name => l_api_name );
3791:
3792: END IF;
3859: FETCH l_project_id_csr INTO l_dummy;
3860:
3861: IF l_project_id_csr%NOTFOUND
3862: THEN
3863: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3864: THEN
3865: pa_interface_utils_pub.map_new_amg_msg
3866: ( p_old_message_code => 'PA_INVALID_PROJECT_ID'
3867: ,p_msg_attribute => 'CHANGE'
3880:
3881: CLOSE l_project_id_csr;
3882: ELSE
3883:
3884: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3885: THEN
3886: pa_interface_utils_pub.map_new_amg_msg
3887: ( p_old_message_code => 'PA_PROJECT_ID_MISSING'
3888: ,p_msg_attribute => 'CHANGE'
3913: FETCH l_task_id_csr INTO l_dummy;
3914:
3915: IF l_task_id_csr%NOTFOUND
3916: THEN
3917: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3918: THEN
3919: pa_interface_utils_pub.map_new_amg_msg
3920: ( p_old_message_code => 'PA_TASK_ID_INVALID'
3921: ,p_msg_attribute => 'CHANGE'
3943: (p_pa_project_id => p_pa_project_id,
3944: p_pm_task_reference => p_pm_task_reference);
3945: IF l_task_id IS NULL
3946: THEN
3947: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3948: THEN
3949: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
3950: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
3951: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
3948: THEN
3949: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
3950: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
3951: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
3952: FND_MSG_PUB.add;
3953:
3954: RAISE FND_API.G_EXC_ERROR;
3955:
3956: END IF;
3958: p_out_task_id := l_task_id;
3959:
3960: END IF;
3961: ELSE
3962: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3963: THEN
3964: pa_interface_utils_pub.map_new_amg_msg
3965: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
3966: ,p_msg_attribute => 'CHANGE'
4004:
4005: -- 4537865 RESET OUT PARAMS
4006: p_out_task_id := NULL ;
4007:
4008: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4009: THEN
4010: FND_MSG_PUB.add_exc_msg
4011: ( p_pkg_name => G_PKG_NAME
4012: , p_procedure_name => l_api_name );
4006: p_out_task_id := NULL ;
4007:
4008: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4009: THEN
4010: FND_MSG_PUB.add_exc_msg
4011: ( p_pkg_name => G_PKG_NAME
4012: , p_procedure_name => l_api_name );
4013:
4014: END IF;
4106: FETCH l_project_id_csr INTO l_dummy;
4107:
4108: IF l_project_id_csr%NOTFOUND
4109: THEN
4110: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4111: THEN
4112: pa_interface_utils_pub.map_new_amg_msg
4113: ( p_old_message_code => 'PA_INVALID_PROJECT_ID'
4114: ,p_msg_attribute => 'CHANGE'
4127:
4128: CLOSE l_project_id_csr;
4129: ELSE
4130:
4131: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4132: THEN
4133: pa_interface_utils_pub.map_new_amg_msg
4134: ( p_old_message_code => 'PA_PROJECT_ID_MISSING'
4135: ,p_msg_attribute => 'CHANGE'
4181:
4182: IF l_proj_element_id_csr%NOTFOUND
4183: THEN
4184:
4185: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4186: THEN
4187: pa_interface_utils_pub.map_new_amg_msg
4188: ( p_old_message_code => 'PA_TASK_ID_INVALID'
4189: ,p_msg_attribute => 'CHANGE'
4201: CLOSE l_proj_element_id_csr;
4202: p_out_task_id := p_pa_task_id;
4203: ELSE
4204: --End Added by rtarway, for BUG 3919800
4205: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4206: THEN
4207: pa_interface_utils_pub.map_new_amg_msg
4208: ( p_old_message_code => 'PA_TASK_ID_INVALID'
4209: ,p_msg_attribute => 'CHANGE'
4242: OPEN cur_pa_proj_elems;
4243: FETCH cur_pa_proj_elems INTO p_out_task_id;
4244: IF cur_pa_proj_elems%NOTFOUND
4245: THEN
4246: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4247: THEN
4248: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4249: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4250: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4247: THEN
4248: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4249: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4250: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4251: FND_MSG_PUB.add;
4252: CLOSE cur_pa_proj_elems;
4253: RAISE FND_API.G_EXC_ERROR;
4254: END IF;
4255: END IF;
4256: CLOSE cur_pa_proj_elems;
4257: ELSE
4258: --End Add by rtarway,for BUG 3919800
4259:
4260: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4261: THEN
4262: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4263: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4264: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4261: THEN
4262: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4263: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4264: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4265: FND_MSG_PUB.add;
4266:
4267: RAISE FND_API.G_EXC_ERROR;
4268:
4269: END IF;
4271: ELSE
4272: p_out_task_id := l_task_id;
4273: END IF;
4274: ELSE
4275: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4276: THEN
4277: pa_interface_utils_pub.map_new_amg_msg
4278: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
4279: ,p_msg_attribute => 'CHANGE'
4303: FETCH l_proj_element_id_csr INTO l_dummy;
4304:
4305: IF l_proj_element_id_csr%NOTFOUND
4306: THEN
4307: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4308: THEN
4309: pa_interface_utils_pub.map_new_amg_msg
4310: ( p_old_message_code => 'PA_TASK_ID_INVALID'
4311: ,p_msg_attribute => 'CHANGE'
4334:
4335: IF cur_pa_proj_elems%NOTFOUND
4336: THEN
4337: p_return_status := FND_API.G_RET_STS_ERROR;
4338: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4339: THEN
4340: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4341: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4342: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4339: THEN
4340: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4341: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4342: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4343: FND_MSG_PUB.add;
4344: RAISE FND_API.G_EXC_ERROR;
4345: END IF;
4346: END IF;
4347: CLOSE cur_pa_proj_elems;
4346: END IF;
4347: CLOSE cur_pa_proj_elems;
4348:
4349: ELSE
4350: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4351: THEN
4352: pa_interface_utils_pub.map_new_amg_msg
4353: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
4354: ,p_msg_attribute => 'CHANGE'
4393:
4394: -- 4537865 RESET OUT PARAMS
4395: p_out_task_id := NULL ;
4396:
4397: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4398: THEN
4399: FND_MSG_PUB.add_exc_msg
4400: ( p_pkg_name => G_PKG_NAME
4401: , p_procedure_name => l_api_name );
4395: p_out_task_id := NULL ;
4396:
4397: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4398: THEN
4399: FND_MSG_PUB.add_exc_msg
4400: ( p_pkg_name => G_PKG_NAME
4401: , p_procedure_name => l_api_name );
4402:
4403: END IF;
4789: IF l_get_lower_task_det_csr%FOUND
4790: THEN
4791: CLOSE l_get_lower_task_det_csr;
4792:
4793: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4794: THEN
4795: pa_interface_utils_pub.map_new_amg_msg
4796: ( p_old_message_code => 'PA_TOP_TASK_CHILD_NO_DELETE'
4797: ,p_msg_attribute => 'CHANGE'
4889:
4890: WHEN FND_API.G_EXC_ERROR
4891: THEN
4892: p_return_status := FND_API.G_RET_STS_ERROR;
4893: p_msg_count := Fnd_Msg_Pub.count_msg; -- 4537865
4894:
4895: IF p_msg_count = 1 AND p_msg_data IS NULL
4896: THEN
4897: Pa_Interface_Utils_Pub.get_messages
4915: p_msg_data := SQLERRM;
4916:
4917: ROLLBACK TO delete_one_task;
4918:
4919: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4920: THEN
4921: FND_MSG_PUB.add_exc_msg
4922: ( p_pkg_name => G_PKG_NAME
4923: , p_procedure_name => l_api_name
4917: ROLLBACK TO delete_one_task;
4918:
4919: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4920: THEN
4921: FND_MSG_PUB.add_exc_msg
4922: ( p_pkg_name => G_PKG_NAME
4923: , p_procedure_name => l_api_name
4924: , p_error_text => p_msg_data
4925: );
4962: EXCEPTION
4963: WHEN OTHERS THEN
4964: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4965:
4966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4967: THEN
4968: FND_MSG_PUB.add_exc_msg
4969: ( p_pkg_name => G_PKG_NAME
4970: , p_procedure_name => 'Validate_billing_info'
4964: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4965:
4966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4967: THEN
4968: FND_MSG_PUB.add_exc_msg
4969: ( p_pkg_name => G_PKG_NAME
4970: , p_procedure_name => 'Validate_billing_info'
4971: , p_error_text => SUBSTRB(SQLERRM,1,240));
4972:
5022: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5023: p_update_end_date_flag := NULL ;
5024: p_update_start_date_flag := NULL ;
5025:
5026: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5027: THEN
5028: FND_MSG_PUB.add_exc_msg
5029: ( p_pkg_name => G_PKG_NAME
5030: , p_procedure_name => l_api_name
5024: p_update_start_date_flag := NULL ;
5025:
5026: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5027: THEN
5028: FND_MSG_PUB.add_exc_msg
5029: ( p_pkg_name => G_PKG_NAME
5030: , p_procedure_name => l_api_name
5031: , p_error_text => SUBSTRB(SQLERRM,1,240)
5032: );
5083: WHEN OTHERS THEN
5084:
5085: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5086:
5087: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5088: THEN
5089: FND_MSG_PUB.add_exc_msg
5090: ( p_pkg_name => G_PKG_NAME
5091: , p_procedure_name => 'check_for_one_manager'
5085: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5086:
5087: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5088: THEN
5089: FND_MSG_PUB.add_exc_msg
5090: ( p_pkg_name => G_PKG_NAME
5091: , p_procedure_name => 'check_for_one_manager'
5092: , p_error_text => SUBSTRB(SQLERRM,1,240)
5093: );
5122:
5123: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5124: p_proceed_with_update_flag := NULL ;
5125:
5126: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5127: THEN
5128: FND_MSG_PUB.add_exc_msg
5129: ( p_pkg_name => G_PKG_NAME
5130: , p_procedure_name => 'handle_task_number_change'
5124: p_proceed_with_update_flag := NULL ;
5125:
5126: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5127: THEN
5128: FND_MSG_PUB.add_exc_msg
5129: ( p_pkg_name => G_PKG_NAME
5130: , p_procedure_name => 'handle_task_number_change'
5131: , p_error_text => SUBSTRB(SQLERRM,1,240)
5132: );
5150: WHEN OTHERS THEN
5151:
5152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5153:
5154: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5155: THEN
5156: FND_MSG_PUB.add_exc_msg
5157: ( p_pkg_name => G_PKG_NAME
5158: , p_procedure_name => 'check_parent_child_task_dates'
5152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5153:
5154: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5155: THEN
5156: FND_MSG_PUB.add_exc_msg
5157: ( p_pkg_name => G_PKG_NAME
5158: , p_procedure_name => 'check_parent_child_task_dates'
5159: , p_error_text => SUBSTRB(SQLERRM,1,240)
5160: );
5649:
5650: IF FND_API.TO_BOOLEAN( p_init_msg_list )
5651: THEN
5652:
5653: FND_MSG_PUB.initialize;
5654:
5655: END IF;
5656:
5657: -- Set API return status to success
5752: --bug 2841158
5753: AND p_pm_product_code <> 'WORKPLAN' --bug 2665656
5754: THEN
5755:
5756: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5757: THEN
5758: pa_interface_utils_pub.map_new_amg_msg
5759: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
5760: ,p_msg_attribute => 'CHANGE'
5802: IF l_pm_product_code <> 'X'
5803: AND p_pm_product_code <> 'WORKPLAN' --bug 2665656
5804: THEN
5805:
5806: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5807: THEN
5808: pa_interface_utils_pub.map_new_amg_msg
5809: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
5810: ,p_msg_attribute => 'CHANGE'
6207: ,X_err_stage => l_err_stage
6208: ,X_err_stack => l_err_stack );
6209:
6210: IF l_err_code > 0 THEN
6211: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6212: THEN
6213: IF NOT pa_project_pvt.check_valid_message (l_err_stage)
6214: THEN
6215: pa_interface_utils_pub.map_new_amg_msg
6265: -- Cannot update chargeable flag for parent tasks
6266:
6267: IF l_children_exist = 'Y'
6268: THEN
6269: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6270: THEN
6271: pa_interface_utils_pub.map_new_amg_msg
6272: ( p_old_message_code => 'PA_CANNOT_CHANGE_CHRG_FLAG'
6273: ,p_msg_attribute => 'CHANGE'
6308: If p_billable_flag = 'Y' and l_project_type_class_code = 'INDIRECT'
6309: THEN
6310: p_return_status := FND_API.G_RET_STS_ERROR;
6311:
6312: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6313: THEN
6314: pa_interface_utils_pub.map_new_amg_msg
6315: ( p_old_message_code => 'PA_PR_INDIRECT_NO_BILLING'
6316: ,p_msg_attribute => 'CHANGE'
6361: IF l_service_type_csr%NOTFOUND
6362: THEN
6363:
6364: CLOSE l_service_type_csr;
6365: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6366: THEN
6367: pa_interface_utils_pub.map_new_amg_msg
6368: ( p_old_message_code => 'PA_SERVICE_TYPE_INVALID'
6369: ,p_msg_attribute => 'CHANGE'
6419: , p_task_number_change_Ok_flag => task_number_change_Ok_flag
6420: );
6421: IF task_number_change_Ok_flag = 'N' then */
6422: /** CODE CHANGE END BY ADITI for Bug 4120380 **/
6423: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6424: THEN
6425: pa_interface_utils_pub.map_new_amg_msg
6426: ( p_old_message_code => 'PA_TASK_NUMBER_NOT_UNIQUE'
6427: ,p_msg_attribute => 'CHANGE'
6446: x_err_stack => l_err_stack );
6447:
6448: IF l_err_code > 0
6449: THEN
6450: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6451: THEN
6452: IF NOT pa_project_pvt.check_valid_message (l_err_stage)
6453: THEN
6454: pa_interface_utils_pub.map_new_amg_msg
6560:
6561: IF p_task_start_date < l_project_start_date OR
6562: p_task_start_date > l_project_completion_date
6563: THEN
6564: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6565: THEN
6566: pa_interface_utils_pub.map_new_amg_msg
6567: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
6568: ,p_msg_attribute => 'CHANGE'
6582:
6583: IF pa_project_pub.G_ParChildTsk_chks_deferred = 'N' THEN
6584: IF l_children_exist = 'Y' THEN
6585: IF l_min_child_start_date < p_task_start_date THEN
6586: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6587: pa_interface_utils_pub.map_new_amg_msg
6588: ( p_old_message_code => 'PA_CHILD_START_EARLIER'
6589: ,p_msg_attribute => 'CHANGE'
6590: ,p_resize_flag => 'N'
6600: END IF;
6601:
6602: IF l_task_rec.parent_task_id IS NOT NULL THEN
6603: IF l_min_parent_start_date > p_task_start_date THEN
6604: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6605: pa_interface_utils_pub.map_new_amg_msg
6606: ( p_old_message_code => 'PA_PARENT_START_LATER'
6607: ,p_msg_attribute => 'CHANGE'
6608: ,p_resize_flag => 'N'
6657: THEN
6658: IF p_task_completion_date < l_project_start_date OR
6659: p_task_completion_date > l_project_completion_date
6660: THEN
6661: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6662: THEN
6663: pa_interface_utils_pub.map_new_amg_msg
6664: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
6665: ,p_msg_attribute => 'CHANGE'
6679:
6680: IF pa_project_pub.G_ParChildTsk_chks_deferred = 'N' THEN
6681: /* IF l_children_exist = 'Y' THEN
6682: IF l_max_child_completion_date > p_task_completion_date THEN
6683: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6684: THEN
6685: pa_interface_utils_pub.map_new_amg_msg
6686: ( p_old_message_code => 'PA_CHILD_COMPLETION_LATER'
6687: ,p_msg_attribute => 'CHANGE'
6700: IF l_task_rec.parent_task_id IS NOT NULL
6701: THEN
6702: IF l_max_parent_completion_date < p_task_completion_date
6703: THEN
6704: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6705: THEN
6706: pa_interface_utils_pub.map_new_amg_msg
6707: ( p_old_message_code => 'PA_PARENT_COMPLETION_EARLIER'
6708: ,p_msg_attribute => 'CHANGE'
6777: FETCH l_validate_parent_id_csr INTO l_temp;
6778: IF l_validate_parent_id_csr%NOTFOUND
6779: THEN
6780: CLOSE l_validate_parent_id_csr;
6781: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6782: THEN
6783: pa_interface_utils_pub.map_new_amg_msg
6784: ( p_old_message_code => 'PA_PARENT_TASK_ID_INVALID'
6785: ,p_msg_attribute => 'CHANGE'
6804: (l_project_id, p_pm_parent_task_reference );
6805: FETCH l_convert_pm_parent_to_id_csr INTO l_new_parent_task_id;
6806: IF l_convert_pm_parent_to_id_csr%NOTFOUND THEN
6807: CLOSE l_convert_pm_parent_to_id_csr;
6808: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6809: THEN
6810: pa_interface_utils_pub.map_new_amg_msg
6811: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
6812: ,p_msg_attribute => 'CHANGE'
6843:
6844: -- this means that a sub task is being changed to become a top task
6845: -- which is not allowed
6846:
6847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6848: THEN
6849: pa_interface_utils_pub.map_new_amg_msg
6850: ( p_old_message_code => 'PA_TOP_TASK_NOT_ALLOWED'
6851: ,p_msg_attribute => 'CHANGE'
6935: FETCH l_chk_chlds_parent_id_csr INTO l_temp;
6936:
6937: IF l_chk_chlds_parent_id_csr%FOUND
6938: THEN
6939: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6940: THEN
6941: pa_interface_utils_pub.map_new_amg_msg
6942: ( p_old_message_code => 'PA_TSK_MV_BELOW_SELF'
6943: ,p_msg_attribute => 'CHANGE'
6963: , x_err_stack => l_err_stack );
6964:
6965: IF l_err_code > 0
6966: THEN
6967: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6968: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
6969: THEN
6970: pa_interface_utils_pub.map_new_amg_msg
6971: ( p_old_message_code => 'PA_CHECK_ADD_SUBTASK_FAILED'
6999:
7000:
7001: IF l_task_rec.parent_task_id IS NULL
7002: THEN
7003: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7004: THEN
7005: pa_interface_utils_pub.map_new_amg_msg
7006: ( p_old_message_code => 'PA_CANT_MOVE_TOP_TASK'
7007: ,p_msg_attribute => 'CHANGE'
7016: RAISE FND_API.G_EXC_ERROR;
7017:
7018: ELSIF l_new_parent_task_id IS NULL
7019: THEN
7020: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7021: THEN
7022: pa_interface_utils_pub.map_new_amg_msg
7023: ( p_old_message_code => 'PA_TOP_TASK_NOT_ALLOWED'
7024: ,p_msg_attribute => 'CHANGE'
7041: /* dbms_output.put_line('New top task :'||l_top_task_id); */
7042:
7043: IF l_top_task_id <> l_task_rec.top_task_id
7044: THEN
7045: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7046: THEN
7047: pa_interface_utils_pub.map_new_amg_msg
7048: ( p_old_message_code => 'PA_CANT_CHANGE_PARENT'
7049: ,p_msg_attribute => 'CHANGE'
7133: CLOSE l_customer_csr;
7134:
7135: IF l_address_valid = 'N'
7136: THEN
7137: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7138: THEN
7139: pa_interface_utils_pub.map_new_amg_msg
7140: ( p_old_message_code => 'PA_TASK_ADDRESS_INVALID'
7141: ,p_msg_attribute => 'CHANGE'
7308: ,p_validate_status => l_validate_status
7309: );
7310: IF l_validate_status = 'N'
7311: THEN
7312: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7313: THEN
7314: pa_interface_utils_pub.map_new_amg_msg
7315: ( p_old_message_code => 'PA_INVALID_FF_VALUES'
7316: ,p_msg_attribute => 'CHANGE'
7772: --Added for bug 5745545
7773: IF nvl(p_work_type_id,-999) <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
7774: IF (nvl(fnd_profile.value('PA_EN_NEW_WORK_TYPE_PROCESS'),'N') = 'Y') OR (nvl(pa_install.is_prm_licensed(),'N') = 'Y' ) THEN
7775: IF p_work_type_id IS NULL AND (NOT (PA_GMS_API.vert_install)) THEN
7776: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7777: pa_interface_utils_pub.map_new_amg_msg
7778: ( p_old_message_code => 'PA_TASK_WORK_TYPE_MAND'
7779: ,p_msg_attribute => 'CHANGE'
7780: ,p_resize_flag => 'N'
7800: select count(1) into lv_count from PA_WORK_TYPES_B where WORK_TYPE_ID = p_work_type_id;
7801: if lv_count < 1 then
7802: FND_MESSAGE.SET_NAME('PA','PA_INVALID_WORK_TYPE_TASK');
7803: FND_MESSAGE.SET_TOKEN('TASK_NAME',l_amg_task_number);
7804: FND_MSG_PUB.add;
7805: RAISE FND_API.G_EXC_ERROR;
7806: END IF;
7807: END;
7808: ---Bug 14777618 ends here-----
8311: g_rev_rate_sch_type := l_rev_rate_sch_type; -- added for bug 3795253
8312: g_rev_ind_rate_sch_id := p_rev_ind_rate_sch_id; -- added for bug 3795253
8313: EXCEPTION
8314: WHEN NO_DATA_FOUND THEN
8315: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8316: THEN
8317: pa_interface_utils_pub.map_new_amg_msg
8318: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
8319: ,p_msg_attribute => 'CHANGE'
8375: g_inv_ind_rate_sch_id := p_inv_ind_rate_sch_id; -- added for bug 3795253
8376:
8377: EXCEPTION
8378: WHEN NO_DATA_FOUND THEN
8379: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8380: THEN
8381: pa_interface_utils_pub.map_new_amg_msg
8382: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
8383: ,p_msg_attribute => 'CHANGE'
8542: l_b_nl_std_bl_rt_sch_fg := 'Y';
8543: l_update_yes_flag := 'Y';
8544: EXCEPTION
8545: WHEN NO_DATA_FOUND THEN
8546: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8547: THEN
8548: pa_interface_utils_pub.map_new_amg_msg
8549: ( p_old_message_code => 'PA_PRJ_NL_SCHEDULE_ID'
8550: ,p_msg_attribute => 'CHANGE'
8860: FETCH l_cost_ind_rate_sch_id_csr INTO l_temp_var;
8861: IF l_cost_ind_rate_sch_id_csr%NOTFOUND
8862: THEN
8863: CLOSE l_cost_ind_rate_sch_id_csr;
8864: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8865: THEN
8866: pa_interface_utils_pub.map_new_amg_msg
8867: ( p_old_message_code => 'PA_PRJ_INV_BURDEN_SCH_ID'
8868: ,p_msg_attribute => 'CHANGE'
8904: FETCH l_ind_rate_schedule_type_csr INTO l_temp_var_sch_type;
8905: IF l_temp_var_sch_type = 'P'
8906: THEN
8907: CLOSE l_ind_rate_schedule_type_csr;
8908: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8909: THEN
8910: pa_interface_utils_pub.map_new_amg_msg
8911: ( p_old_message_code => 'PA_CANT_FIX_DATE_PROV_SCH'
8912: ,p_msg_attribute => 'CHANGE'
9482: p_out_pm_task_reference := NULL ;
9483:
9484: ROLLBACK TO Update_Task_pub;
9485:
9486: FND_MSG_PUB.Count_And_Get
9487: ( p_count => p_msg_count ,
9488: p_data => p_msg_data );
9489:
9490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9496:
9497: ROLLBACK TO Update_Task_pub;
9498:
9499:
9500: FND_MSG_PUB.Count_And_Get
9501: ( p_count => p_msg_count ,
9502: p_data => p_msg_data );
9503:
9504: WHEN ROW_ALREADY_LOCKED THEN
9510: p_out_pa_task_id := NULL ;
9511: p_out_pm_task_reference := NULL ;
9512:
9513:
9514: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9515: THEN
9516: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9517: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9518: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9516: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9517: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9518: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9519: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9520: FND_MSG_PUB.ADD;
9521: END IF;
9522:
9523: FND_MSG_PUB.Count_And_Get
9524: ( p_count => p_msg_count ,
9519: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9520: FND_MSG_PUB.ADD;
9521: END IF;
9522:
9523: FND_MSG_PUB.Count_And_Get
9524: ( p_count => p_msg_count ,
9525: p_data => p_msg_data );
9526:
9527: WHEN OTHERS THEN
9533: p_out_pa_task_id := NULL ;
9534: p_out_pm_task_reference := NULL ;
9535:
9536:
9537: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9538:
9539: FND_MSG_PUB.add_exc_msg
9540: ( p_pkg_name => G_PKG_NAME
9541: , p_procedure_name => l_api_name );
9535:
9536:
9537: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9538:
9539: FND_MSG_PUB.add_exc_msg
9540: ( p_pkg_name => G_PKG_NAME
9541: , p_procedure_name => l_api_name );
9542:
9543: END IF;
9541: , p_procedure_name => l_api_name );
9542:
9543: END IF;
9544:
9545: FND_MSG_PUB.Count_And_Get
9546: ( p_count => p_msg_count ,
9547: p_data => p_msg_data );
9548:
9549: END update_one_task;
9646: AND p_pm_product_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
9647: --bug 2841158
9648: THEN
9649:
9650: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9651: THEN
9652: pa_interface_utils_pub.map_new_amg_msg
9653: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
9654: ,p_msg_attribute => 'CHANGE'
9675: CLOSE p_product_code_csr;
9676: IF l_pm_product_code <> 'X'
9677: THEN
9678:
9679: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9680: THEN
9681: pa_interface_utils_pub.map_new_amg_msg
9682: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
9683: ,p_msg_attribute => 'CHANGE'
9739:
9740: IF FND_API.TO_BOOLEAN( p_init_msg_list )
9741: THEN
9742:
9743: FND_MSG_PUB.initialize;
9744:
9745: END IF;
9746:
9747:
9809: x_err_stack => l_err_stack);
9810: IF l_err_code > 0
9811: then
9812:
9813: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9814: THEN
9815:
9816: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
9817: THEN
9844:
9845: ELSIF l_err_code < 0
9846: then
9847:
9848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9849: THEN
9850: pa_interface_utils_pub.map_new_amg_msg
9851: ( p_old_message_code => 'PA_DELETE_TASK_FAILED'
9852: ,p_msg_attribute => 'CHANGE'
9894:
9895: ELSIF p_cascaded_delete_flag NOT IN ('Y','y','N','n')
9896: THEN
9897:
9898: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9899: THEN
9900: pa_interface_utils_pub.map_new_amg_msg
9901: ( p_old_message_code => 'PA_CASCADE_FLAG_INVALID'
9902: ,p_msg_attribute => 'CHANGE'
9927:
9928: IF l_err_code > 0
9929: THEN
9930:
9931: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9932: THEN
9933:
9934: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
9935: THEN
9962:
9963: ELSIF l_err_code < 0
9964: THEN
9965:
9966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9967: THEN
9968: pa_interface_utils_pub.map_new_amg_msg
9969: ( p_old_message_code => 'PA_DELETE_TASK_FAILED'
9970: ,p_msg_attribute => 'CHANGE'
10132: -- 4537865 RESET OUT PARAMS
10133: p_project_id := NULL ;
10134: p_task_id := NULL ;
10135:
10136: FND_MSG_PUB.Count_And_Get
10137: ( p_count => p_msg_count ,
10138: p_data => p_msg_data );
10139:
10140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
10146: -- 4537865 RESET OUT PARAMS
10147: p_project_id := NULL ;
10148: p_task_id := NULL ;
10149:
10150: FND_MSG_PUB.Count_And_Get
10151: ( p_count => p_msg_count ,
10152: p_data => p_msg_data );
10153:
10154: WHEN ROW_ALREADY_LOCKED
10160: -- 4537865 RESET OUT PARAMS
10161: p_project_id := NULL ;
10162: p_task_id := NULL ;
10163:
10164: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10165: THEN
10166: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
10167: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10168: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
10166: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
10167: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10168: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
10169: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
10170: FND_MSG_PUB.ADD;
10171: END IF;
10172:
10173: FND_MSG_PUB.Count_And_Get
10174: ( p_count => p_msg_count ,
10169: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
10170: FND_MSG_PUB.ADD;
10171: END IF;
10172:
10173: FND_MSG_PUB.Count_And_Get
10174: ( p_count => p_msg_count ,
10175: p_data => p_msg_data );
10176:
10177: WHEN OTHERS THEN
10182: -- 4537865 RESET OUT PARAMS
10183: p_project_id := NULL ;
10184: p_task_id := NULL ;
10185:
10186: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10187: THEN
10188: FND_MSG_PUB.add_exc_msg
10189: ( p_pkg_name => G_PKG_NAME
10190: , p_procedure_name => l_api_name );
10184: p_task_id := NULL ;
10185:
10186: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10187: THEN
10188: FND_MSG_PUB.add_exc_msg
10189: ( p_pkg_name => G_PKG_NAME
10190: , p_procedure_name => l_api_name );
10191:
10192: END IF;
10190: , p_procedure_name => l_api_name );
10191:
10192: END IF;
10193:
10194: FND_MSG_PUB.Count_And_Get
10195: ( p_count => p_msg_count ,
10196: p_data => p_msg_data );
10197:
10198: END delete_task1;
10310:
10311: IF FND_API.TO_BOOLEAN( p_init_msg_list )
10312: THEN
10313:
10314: FND_MSG_PUB.initialize;
10315:
10316: END IF;
10317:
10318: -- pm_product_code is mandatory
10324: AND p_pm_product_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
10325: --bug 2841158
10326: THEN
10327:
10328: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10329: THEN
10330: pa_interface_utils_pub.map_new_amg_msg
10331: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
10332: ,p_msg_attribute => 'CHANGE'
10353: CLOSE p_product_code_csr;
10354: IF l_pm_product_code <> 'X'
10355: THEN
10356:
10357: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10358: THEN
10359: pa_interface_utils_pub.map_new_amg_msg
10360: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
10361: ,p_msg_attribute => 'CHANGE'
10507: x_err_stack => l_err_stack);
10508:
10509: IF l_err_code <> 0 THEN
10510:
10511: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
10512:
10513: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
10514: THEN
10515: pa_interface_utils_pub.map_new_amg_msg
10555: x_err_stage => l_err_stage,
10556: x_err_stack => l_err_stack,
10557: x_commit => p_commit);
10558: IF l_err_code > 0 THEN
10559: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
10560: IF NOT pa_project_pvt.check_valid_message(l_err_stage) THEN
10561:
10562: pa_interface_utils_pub.map_new_amg_msg
10563: ( p_old_message_code => 'PA_DELETE_PROJECT_FAILED'
10584: END IF;
10585: END IF;
10586: RAISE FND_API.G_EXC_ERROR;
10587: ELSIF l_err_code < 0 THEN
10588: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10589: THEN
10590:
10591: pa_interface_utils_pub.map_new_amg_msg
10592: ( p_old_message_code => 'PA_DELETE_PROJECT_FAILED'
10614: ROLLBACK TO delete_project_pub;
10615:
10616: p_return_status := FND_API.G_RET_STS_ERROR;
10617:
10618: FND_MSG_PUB.Count_And_Get
10619: ( p_count => p_msg_count ,
10620: p_data => p_msg_data );
10621:
10622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
10624: ROLLBACK TO delete_project_pub;
10625:
10626: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10627:
10628: FND_MSG_PUB.Count_And_Get
10629: ( p_count => p_msg_count ,
10630: p_data => p_msg_data );
10631:
10632: WHEN ROW_ALREADY_LOCKED THEN
10634: ROLLBACK TO delete_project_pub;
10635:
10636: p_return_status := FND_API.G_RET_STS_ERROR;
10637:
10638: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10639: THEN
10640: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_P_AMG');
10641: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10642: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10639: THEN
10640: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_P_AMG');
10641: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10642: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10643: FND_MSG_PUB.ADD;
10644: END IF;
10645: FND_MSG_PUB.Count_And_Get
10646: ( p_count => p_msg_count ,
10647: p_data => p_msg_data );
10641: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10642: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10643: FND_MSG_PUB.ADD;
10644: END IF;
10645: FND_MSG_PUB.Count_And_Get
10646: ( p_count => p_msg_count ,
10647: p_data => p_msg_data );
10648:
10649: WHEN OTHERS THEN
10651: ROLLBACK TO delete_project_pub;
10652:
10653: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10654:
10655: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10656: THEN
10657: FND_MSG_PUB.add_exc_msg
10658: ( p_pkg_name => G_PKG_NAME
10659: , p_procedure_name => l_api_name
10653: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10654:
10655: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10656: THEN
10657: FND_MSG_PUB.add_exc_msg
10658: ( p_pkg_name => G_PKG_NAME
10659: , p_procedure_name => l_api_name
10660: , p_error_text => SUBSTRB(SQLERRM, 1, 240) ); -- 4537865 Changed substr to substrb
10661:
10658: ( p_pkg_name => G_PKG_NAME
10659: , p_procedure_name => l_api_name
10660: , p_error_text => SUBSTRB(SQLERRM, 1, 240) ); -- 4537865 Changed substr to substrb
10661:
10662: FND_MSG_PUB.add;
10663: END IF;
10664:
10665: FND_MSG_PUB.Count_And_Get
10666: ( p_count => p_msg_count ,
10661:
10662: FND_MSG_PUB.add;
10663: END IF;
10664:
10665: FND_MSG_PUB.Count_And_Get
10666: ( p_count => p_msg_count ,
10667: p_data => p_msg_data );
10668:
10669: END delete_project1;
10762: IF (p_org_roles(i).person_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) AND
10763: (p_org_roles(i).person_id IS NOT NULL) THEN
10764: IF check_valid_organization (p_org_roles(i).person_id) = 'N'
10765: THEN
10766: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10767: THEN
10768: pa_interface_utils_pub.map_new_amg_msg
10769: ( p_old_message_code => 'PA_INVALID_ORGANIZATION'
10770: ,p_msg_attribute => 'CHANGE'
10782: -- validate the role type
10783: OPEN l_project_role_types_csr (p_org_roles(i).project_role_type);
10784: FETCH l_project_role_types_csr INTO l_dummy;
10785: IF l_project_role_types_csr%NOTFOUND THEN
10786: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10787: THEN
10788: pa_interface_utils_pub.map_new_amg_msg
10789: ( p_old_message_code => 'PA_INVALID_ROLE_TYPE'
10790: ,p_msg_attribute => 'CHANGE'
10808: THEN
10809: IF p_org_roles(i).end_date < p_org_roles(i).start_date
10810: THEN
10811:
10812: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10813: THEN
10814: pa_interface_utils_pub.map_new_amg_msg
10815: ( p_old_message_code => 'PA_SU_INVALID_DATES'
10816: ,p_msg_attribute => 'CHANGE'
10951: ROLLBACK TO add_org_roles_pvt;
10952:
10953: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10954:
10955: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10956: THEN
10957: FND_MSG_PUB.add_exc_msg
10958: ( p_pkg_name => G_PKG_NAME
10959: , p_procedure_name => l_api_name );
10953: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10954:
10955: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10956: THEN
10957: FND_MSG_PUB.add_exc_msg
10958: ( p_pkg_name => G_PKG_NAME
10959: , p_procedure_name => l_api_name );
10960:
10961: END IF;
11178:
11179: END IF;
11180:
11181: ELSIF p_in_labor_sch_type IS NULL THEN
11182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11183: THEN
11184: pa_interface_utils_pub.map_new_amg_msg
11185: ( p_old_message_code => 'PA_LAB_SCH_NOT_NULL'
11186: ,p_msg_attribute => 'CHANGE'
11219: END IF;
11220:
11221: ELSIF p_in_nl_sch_type IS NULL THEN
11222:
11223: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11224: THEN
11225: pa_interface_utils_pub.map_new_amg_msg
11226: ( p_old_message_code => 'PA_NL_SCH_NOT_NULL'
11227: ,p_msg_attribute => 'CHANGE'
11268: -- 4537865 RESET OUT PARAMS
11269: p_out_nl_labor_sch_type := NULL ;
11270: p_out_labor_sch_type := NULL ;
11271:
11272: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11273: THEN
11274: FND_MSG_PUB.add_exc_msg
11275: ( p_pkg_name => G_PKG_NAME
11276: , p_procedure_name => l_api_name );
11270: p_out_labor_sch_type := NULL ;
11271:
11272: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11273: THEN
11274: FND_MSG_PUB.add_exc_msg
11275: ( p_pkg_name => G_PKG_NAME
11276: , p_procedure_name => l_api_name );
11277:
11278: END IF;
11448: if non_labor_std_bill_rt_sch_id is PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11449: when the Schedule is being changed from 'I' (burden) to 'B' (bill) */
11450:
11451: IF p_non_lab_std_bill_rt_sch_id IS NULL THEN /* Explicitly passed as NULL, hence Error */
11452: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11453: THEN
11454: pa_interface_utils_pub.map_new_amg_msg
11455: ( p_old_message_code => 'PA_NL_SCH_ID_NOT_NULL'
11456: ,p_msg_attribute => 'CHANGE'
11464: END IF;
11465: RAISE FND_API.G_EXC_ERROR;
11466: ELSIF p_non_lab_std_bill_rt_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11467: IF p_nl_db_sch_type = 'I' THEN /* Schedule is being changed from 'I' (burden) to 'B' (bill) */
11468: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11469: THEN
11470: pa_interface_utils_pub.map_new_amg_msg
11471: ( p_old_message_code => 'PA_NL_SCH_ID_NOT_NULL'
11472: ,p_msg_attribute => 'CHANGE'
11487: when the Schedule is being changed from 'I' to 'B'*/
11488:
11489: IF p_nl_bill_rate_org_id IS NULL
11490: THEN
11491: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11492: THEN
11493: pa_interface_utils_pub.map_new_amg_msg
11494: ( p_old_message_code => 'PA_BILL_RT_ORG_ID_NOT_NULL'
11495: ,p_msg_attribute => 'CHANGE'
11503: END IF;
11504: RAISE FND_API.G_EXC_ERROR;
11505: ELSIF p_nl_bill_rate_org_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11506: IF p_nl_db_sch_type = 'I' THEN
11507: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11508: THEN
11509: pa_interface_utils_pub.map_new_amg_msg
11510: ( p_old_message_code => 'PA_BILL_RT_ORG_ID_NOT_NULL'
11511: ,p_msg_attribute => 'CHANGE'
11531: FETCH l_nl_org_sch_id_csr INTO l_temp_dummy;
11532: IF l_nl_org_sch_id_csr%NOTFOUND
11533: THEN
11534: CLOSE l_nl_org_sch_id_csr;
11535: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11536: THEN
11537: pa_interface_utils_pub.map_new_amg_msg
11538: ( p_old_message_code => 'PA_INVALID_NL_ORG_SCH_ID'
11539: ,p_msg_attribute => 'CHANGE'
11565: THEN
11566: IF p_non_labor_disc_reason_code IS NOT NULL
11567: AND p_non_labor_disc_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11568: THEN
11569: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11570: THEN
11571: pa_interface_utils_pub.map_new_amg_msg
11572: ( p_old_message_code => 'PA_NL_DISC_REASON_CODE'
11573: ,p_msg_attribute => 'CHANGE'
11586: THEN
11587: IF (p_non_labor_disc_reason_code IS NULL
11588: OR p_non_labor_disc_reason_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR)
11589: THEN
11590: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11591: THEN
11592: pa_interface_utils_pub.map_new_amg_msg
11593: ( p_old_message_code => 'PA_NL_DISC_CODE_NOT_NULL'
11594: ,p_msg_attribute => 'CHANGE'
11605: OPEN get_nl_disc_reason_code_csr(p_non_labor_disc_reason_code);
11606: FETCH get_nl_disc_reason_code_csr INTO l_temp_dummy;
11607: IF get_nl_disc_reason_code_csr%NOTFOUND THEN
11608: CLOSE get_nl_disc_reason_code_csr;
11609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11610: THEN
11611: pa_interface_utils_pub.map_new_amg_msg
11612: ( p_old_message_code => 'PA_INVALID_NLDISC_RN_CODE'
11613: ,p_msg_attribute => 'CHANGE'
11633: and the schedule_type is being changed from 'B' to 'I'
11634: */
11635:
11636: IF p_rev_ind_rate_sch_id IS NULL THEN
11637: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11638: THEN
11639: pa_interface_utils_pub.map_new_amg_msg
11640: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
11641: ,p_msg_attribute => 'CHANGE'
11649: END IF;
11650: RAISE FND_API.G_EXC_ERROR;
11651: ELSIF p_rev_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11652: IF p_nl_db_sch_type = 'B' THEN
11653: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11654: THEN
11655: pa_interface_utils_pub.map_new_amg_msg
11656: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
11657: ,p_msg_attribute => 'CHANGE'
11680: OPEN l_rev_rate_schedule_type_csr(p_rev_ind_rate_sch_id);
11681: FETCH l_rev_rate_schedule_type_csr INTO l_rev_rate_schedule_type;
11682: IF l_rev_rate_schedule_type_csr%NOTFOUND THEN
11683: CLOSE l_rev_rate_schedule_type_csr;
11684: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11685: THEN
11686: pa_interface_utils_pub.map_new_amg_msg
11687: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
11688: ,p_msg_attribute => 'CHANGE'
11701: THEN
11702: IF p_rev_ind_sch_fixed_date IS NOT NULL
11703: AND p_rev_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11704: THEN
11705: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11706: THEN
11707: pa_interface_utils_pub.map_new_amg_msg
11708: ( p_old_message_code => 'PA_CNT_FIX_REV_DTE_PROV'
11709: ,p_msg_attribute => 'CHANGE'
11729: and the schedule_type is being changed from 'B' to 'I'
11730: */
11731:
11732: IF p_inv_ind_rate_sch_id IS NULL THEN
11733: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11734: THEN
11735: pa_interface_utils_pub.map_new_amg_msg
11736: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11737: ,p_msg_attribute => 'CHANGE'
11745: END IF;
11746: RAISE FND_API.G_EXC_ERROR;
11747: ELSIF p_inv_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11748: IF p_nl_db_sch_type = 'B' THEN
11749: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11750: THEN
11751: pa_interface_utils_pub.map_new_amg_msg
11752: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11753: ,p_msg_attribute => 'CHANGE'
11777: OPEN l_inv_rate_schedule_type_csr(p_inv_ind_rate_sch_id);
11778: FETCH l_inv_rate_schedule_type_csr INTO l_inv_rate_schedule_type;
11779: IF l_inv_rate_schedule_type_csr%NOTFOUND THEN
11780: CLOSE l_inv_rate_schedule_type_csr;
11781: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11782: THEN
11783: pa_interface_utils_pub.map_new_amg_msg
11784: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
11785: ,p_msg_attribute => 'CHANGE'
11798: THEN
11799: IF p_inv_ind_sch_fixed_date IS NOT NULL
11800: AND p_inv_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11801: THEN
11802: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11803: THEN
11804: pa_interface_utils_pub.map_new_amg_msg
11805: ( p_old_message_code => 'PA_CNT_FIX_INV_DTE_PROV'
11806: ,p_msg_attribute => 'CHANGE'
11835: IF l_emp_rate_sch_id_csr%NOTFOUND
11836: THEN
11837: CLOSE l_emp_rate_sch_id_csr;
11838:
11839: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11840: THEN
11841: pa_interface_utils_pub.map_new_amg_msg
11842: ( p_old_message_code => 'PA_INVALID_EMP_SCH_ID'
11843: ,p_msg_attribute => 'CHANGE'
11864:
11865: IF pa_install.is_prm_licensed='Y' THEN
11866: IF p_job_bill_rate_schedule_id IS NULL
11867: THEN
11868: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11869: THEN
11870: pa_interface_utils_pub.map_new_amg_msg
11871: ( p_old_message_code => 'PA_JOB_SCH_ID_NOT_NULL'
11872: ,p_msg_attribute => 'CHANGE'
11881: RAISE FND_API.G_EXC_ERROR;
11882: ELSIF p_job_bill_rate_schedule_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11883: THEN
11884: IF p_lab_db_sch_type = 'I' THEN
11885: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11886: THEN
11887: pa_interface_utils_pub.map_new_amg_msg
11888: ( p_old_message_code => 'PA_JOB_SCH_ID_NOT_NULL'
11889: ,p_msg_attribute => 'CHANGE'
11912: FETCH l_job_rate_sch_id_csr INTO l_temp_dummy;
11913: IF l_job_rate_sch_id_csr%NOTFOUND
11914: THEN
11915: CLOSE l_job_rate_sch_id_csr;
11916: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11917: THEN
11918: pa_interface_utils_pub.map_new_amg_msg
11919: ( p_old_message_code => 'PA_INVALID_JOB_SCH_ID'
11920: ,p_msg_attribute => 'CHANGE'
11955: THEN
11956: IF p_labor_disc_reason_code IS NOT NULL
11957: AND p_labor_disc_reason_code<> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11958: THEN
11959: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11960: THEN
11961: pa_interface_utils_pub.map_new_amg_msg
11962: ( p_old_message_code => 'PA_LAB_DISC_REASON_CODE'
11963: ,p_msg_attribute => 'CHANGE'
11977: THEN
11978: IF p_labor_disc_reason_code IS NULL
11979: OR p_labor_disc_reason_code= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11980: THEN
11981: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11982: THEN
11983: pa_interface_utils_pub.map_new_amg_msg
11984: ( p_old_message_code => 'PA_LAB_DISC_CODE_NOT_NULL'
11985: ,p_msg_attribute => 'CHANGE'
11996: OPEN get_lab_disc_reason_code_csr(p_labor_disc_reason_code);
11997: FETCH get_lab_disc_reason_code_csr INTO l_temp_dummy;
11998: IF get_lab_disc_reason_code_csr%NOTFOUND THEN
11999: CLOSE get_lab_disc_reason_code_csr;
12000: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12001: THEN
12002: pa_interface_utils_pub.map_new_amg_msg
12003: ( p_old_message_code => 'PA_INVALID_LDISC_RN_CODE'
12004: ,p_msg_attribute => 'CHANGE'
12027: and the schedule_type is being changed from 'B' to 'I'
12028: */
12029:
12030: IF p_rev_ind_rate_sch_id IS NULL THEN
12031: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12032: THEN
12033: pa_interface_utils_pub.map_new_amg_msg
12034: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
12035: ,p_msg_attribute => 'CHANGE'
12043: END IF;
12044: RAISE FND_API.G_EXC_ERROR;
12045: ELSIF p_rev_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
12046: IF p_lab_db_sch_type = 'B' THEN
12047: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12048: THEN
12049: pa_interface_utils_pub.map_new_amg_msg
12050: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
12051: ,p_msg_attribute => 'CHANGE'
12075: OPEN l_rev_rate_schedule_type_csr(p_rev_ind_rate_sch_id);
12076: FETCH l_rev_rate_schedule_type_csr INTO l_rev_rate_schedule_type;
12077: IF l_rev_rate_schedule_type_csr%NOTFOUND THEN
12078: CLOSE l_rev_rate_schedule_type_csr;
12079: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12080: THEN
12081: pa_interface_utils_pub.map_new_amg_msg
12082: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
12083: ,p_msg_attribute => 'CHANGE'
12095: THEN
12096: IF p_rev_ind_sch_fixed_date IS NOT NULL
12097: AND p_rev_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
12098: THEN
12099: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12100: THEN
12101: pa_interface_utils_pub.map_new_amg_msg
12102: ( p_old_message_code => 'PA_CNT_FIX_REV_DTE_PROV'
12103: ,p_msg_attribute => 'CHANGE'
12123: and the schedule_type is being changed from 'B'(bill) to 'I'(burden)
12124: */
12125:
12126: IF p_inv_ind_rate_sch_id IS NULL THEN
12127: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12128: THEN
12129: pa_interface_utils_pub.map_new_amg_msg
12130: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
12131: ,p_msg_attribute => 'CHANGE'
12139: END IF;
12140: RAISE FND_API.G_EXC_ERROR;
12141: ELSIF p_inv_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
12142: IF p_lab_db_sch_type = 'B' THEN
12143: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12144: THEN
12145: pa_interface_utils_pub.map_new_amg_msg
12146: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
12147: ,p_msg_attribute => 'CHANGE'
12171: OPEN l_inv_rate_schedule_type_csr(p_inv_ind_rate_sch_id);
12172: FETCH l_inv_rate_schedule_type_csr INTO l_inv_rate_schedule_type;
12173: IF l_inv_rate_schedule_type_csr%NOTFOUND THEN
12174: CLOSE l_inv_rate_schedule_type_csr;
12175: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12176: THEN
12177: pa_interface_utils_pub.map_new_amg_msg
12178: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
12179: ,p_msg_attribute => 'CHANGE'
12191: THEN
12192: IF p_inv_ind_sch_fixed_date IS NOT NULL
12193: AND p_inv_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
12194: THEN
12195: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
12196: THEN
12197: pa_interface_utils_pub.map_new_amg_msg
12198: ( p_old_message_code => 'PA_CNT_FIX_INV_DTE_PROV'
12199: ,p_msg_attribute => 'CHANGE'
12239:
12240: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12241:
12242:
12243: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12244: THEN
12245: FND_MSG_PUB.add_exc_msg
12246: ( p_pkg_name => G_PKG_NAME
12247: , p_procedure_name => l_api_name );
12241:
12242:
12243: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12244: THEN
12245: FND_MSG_PUB.add_exc_msg
12246: ( p_pkg_name => G_PKG_NAME
12247: , p_procedure_name => l_api_name );
12248:
12249: END IF;
12387: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
12388: x_return_status := FND_API.G_RET_STS_ERROR;
12389: END IF;
12390:
12391: l_msg_count := FND_MSG_PUB.count_msg;
12392:
12393: IF l_msg_count = 1 AND x_msg_data IS NULL THEN
12394: PA_INTERFACE_UTILS_PUB.get_messages
12395: (p_encoded => FND_API.G_TRUE,
12412: WHEN OTHERS THEN
12413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12414: x_msg_count := 1;
12415: x_msg_data := SQLERRM;
12416: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_PVT'
12417: ,p_procedure_name => 'VALIDATE_DATA'
12418: ,p_error_text => sqlerrm);
12419:
12420: IF l_debug_mode = 'Y' THEN