[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;
1342:
1343: IF l_task_in_rec.pm_task_reference IS NULL
1344: OR l_task_in_rec.pm_task_reference = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1345: THEN
1346: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1347: THEN
1348: pa_interface_utils_pub.map_new_amg_msg
1349: ( p_old_message_code => 'PA_TASK_REF_IS_NULL'
1350: ,p_msg_attribute => 'CHANGE'
1365: OR l_task_in_rec.task_name = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
1366: THEN
1367: p_return_status := FND_API.G_RET_STS_ERROR;
1368:
1369: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1370: THEN
1371: pa_interface_utils_pub.map_new_amg_msg
1372: ( p_old_message_code => 'PA_TASK_NAME_IS_NULL'
1373: ,p_msg_attribute => 'CHANGE'
1406: If l_task_in_rec.billable_flag = 'Y' and p_project_type_class_code = 'INDIRECT'
1407: THEN
1408: p_return_status := FND_API.G_RET_STS_ERROR;
1409:
1410: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1411: THEN
1412: pa_interface_utils_pub.map_new_amg_msg
1413: ( p_old_message_code => 'PA_PR_INDIRECT_NO_BILLING'
1414: ,p_msg_attribute => 'CHANGE'
1486: CLOSE l_customer_csr;
1487:
1488: IF l_address_valid = 'N'
1489: THEN
1490: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1491: THEN
1492: pa_interface_utils_pub.map_new_amg_msg
1493: ( p_old_message_code => 'PA_TASK_ADDRESS_INVALID'
1494: ,p_msg_attribute => 'CHANGE'
1525: IF l_service_type_csr%NOTFOUND
1526: THEN
1527:
1528: CLOSE l_service_type_csr;
1529: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1530: THEN
1531: pa_interface_utils_pub.map_new_amg_msg
1532: ( p_old_message_code => 'PA_SERVICE_TYPE_INVALID'
1533: ,p_msg_attribute => 'CHANGE'
1558: FETCH l_ind_rate_schedule_type_csr INTO l_temp_var_sch_type;
1559: IF l_temp_var_sch_type = 'P'
1560: THEN
1561: CLOSE l_ind_rate_schedule_type_csr;
1562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1563: THEN
1564: pa_interface_utils_pub.map_new_amg_msg
1565: ( p_old_message_code => 'PA_CANT_FIX_DATE_PROV_SCH'
1566: ,p_msg_attribute => 'CHANGE'
1709: p_error_code => l_error_code,
1710: p_error_message => l_error_message );
1711:
1712: IF l_error_code <> 0 THEN
1713: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1714: pa_interface_utils_pub.map_new_amg_msg
1715: ( p_old_message_code => 'PA_ERROR_IN_CLIENT_EXTN'
1716: ,p_msg_attribute => 'CHANGE'
1717: ,p_resize_flag => 'N'
1730: --bug 2732788
1731: IF ( l_task_in_rec.task_start_date IS NULL AND
1732: l_task_in_rec.task_completion_date IS NOT NULL )
1733: THEN
1734: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1735: THEN
1736: pa_interface_utils_pub.map_new_amg_msg
1737: ( p_old_message_code => 'PA_TASK_ST_DATE_NULL'
1738: ,p_msg_attribute => 'CHANGE'
1755: <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE AND
1756: l_task_in_rec.task_completion_date IS NOT NULL
1757: AND l_task_in_rec.task_completion_date < l_task_in_rec.task_start_date
1758: THEN
1759: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1760: THEN
1761: pa_interface_utils_pub.map_new_amg_msg
1762: ( p_old_message_code => 'PA_TASK_DATES_INVALID'
1763: ,p_msg_attribute => 'CHANGE'
1791:
1792: IF l_task_in_rec.task_start_date < p_project_rec.start_date OR
1793: l_task_in_rec.task_start_date > p_project_rec.completion_date
1794: THEN
1795: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1796: THEN
1797: pa_interface_utils_pub.map_new_amg_msg
1798: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
1799: ,p_msg_attribute => 'CHANGE'
1811:
1812: IF l_task_in_rec.task_completion_date < p_project_rec.start_date OR
1813: l_task_in_rec.task_completion_date > p_project_rec.completion_date
1814: THEN
1815: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1816: THEN
1817: pa_interface_utils_pub.map_new_amg_msg
1818: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
1819: ,p_msg_attribute => 'CHANGE'
2000: );
2001:
2002: IF l_validate_status = 'N'
2003: THEN
2004: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2005: THEN
2006: pa_interface_utils_pub.map_new_amg_msg
2007: ( p_old_message_code => 'PA_INVALID_FF_VALUES'
2008: ,p_msg_attribute => 'CHANGE'
2329:
2330: IF l_task_csr%NOTFOUND
2331: THEN
2332: CLOSE l_task_csr;
2333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2334: THEN
2335: pa_interface_utils_pub.map_new_amg_msg
2336: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2337: ,p_msg_attribute => 'CHANGE'
2354: FETCH l_task_id_csr INTO l_parent_TOP_TASK_ID; --l_parent_task_id_rec;
2355: IF l_task_id_csr%NOTFOUND
2356: THEN
2357: CLOSE l_task_id_csr;
2358: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2359: THEN
2360: pa_interface_utils_pub.map_new_amg_msg
2361: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2362: ,p_msg_attribute => 'CHANGE'
2608:
2609: -- 4537865 RESET OUT PARAMS
2610: p_task_id := NULL ;
2611:
2612: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2613: THEN
2614: FND_MSG_PUB.add_exc_msg
2615: ( p_pkg_name => G_PKG_NAME
2616: , p_procedure_name => l_api_name );
2610: p_task_id := NULL ;
2611:
2612: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2613: THEN
2614: FND_MSG_PUB.add_exc_msg
2615: ( p_pkg_name => G_PKG_NAME
2616: , p_procedure_name => l_api_name );
2617:
2618: END IF;
2771:
2772: IF l_task_csr%NOTFOUND
2773: THEN
2774: CLOSE l_task_csr;
2775: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2776: THEN
2777: pa_interface_utils_pub.map_new_amg_msg
2778: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2779: ,p_msg_attribute => 'CHANGE'
2797:
2798: IF l_task_id_csr%NOTFOUND
2799: THEN
2800: CLOSE l_task_id_csr;
2801: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2802: THEN
2803: pa_interface_utils_pub.map_new_amg_msg
2804: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
2805: ,p_msg_attribute => 'CHANGE'
3008: IF l_task_in_rec.task_start_date < l_parent_task_rec.start_date OR
3009: l_task_in_rec.task_start_date > l_parent_task_rec.completion_date
3010:
3011: THEN
3012: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3013: THEN
3014: pa_interface_utils_pub.map_new_amg_msg
3015: ( p_old_message_code => 'PA_PARENT_START_LATER'
3016: ,p_msg_attribute => 'CHANGE'
3028: IF l_task_in_rec.task_completion_date < l_parent_task_rec.start_date OR
3029: l_task_in_rec.task_completion_date > l_parent_task_rec.completion_date
3030:
3031: THEN
3032: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3033: THEN
3034: pa_interface_utils_pub.map_new_amg_msg
3035: ( p_old_message_code => 'PA_PARENT_COMPL_EARLIER'
3036: ,p_msg_attribute => 'CHANGE'
3354:
3355: -- 4537865 RESET OUT PARAMS
3356: p_task_version_id := NULL ;
3357:
3358: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3359: THEN
3360: FND_MSG_PUB.add_exc_msg
3361: ( p_pkg_name => G_PKG_NAME
3362: , p_procedure_name => l_api_name );
3356: p_task_version_id := NULL ;
3357:
3358: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3359: THEN
3360: FND_MSG_PUB.add_exc_msg
3361: ( p_pkg_name => G_PKG_NAME
3362: , p_procedure_name => l_api_name );
3363:
3364: END IF;
3499: FETCH l_project_id_csr INTO l_dummy;
3500:
3501: IF l_project_id_csr%NOTFOUND
3502: THEN
3503: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3504: THEN
3505: pa_interface_utils_pub.map_new_amg_msg
3506: ( p_old_message_code => 'PA_INVALID_PROJECT_ID'
3507: ,p_msg_attribute => 'CHANGE'
3528: (p_pm_project_reference => p_pm_project_reference);
3529:
3530: IF l_project_id IS NULL
3531: THEN
3532: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3533: THEN
3534: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- bug 2257612
3535: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Project Reference');
3536: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_project_reference);
3533: THEN
3534: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- bug 2257612
3535: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Project Reference');
3536: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_project_reference);
3537: FND_MSG_PUB.add;
3538: END IF;
3539:
3540: RAISE FND_API.G_EXC_ERROR;
3541: ELSE
3543:
3544: END IF;
3545: ELSE
3546:
3547: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3548: THEN
3549: pa_interface_utils_pub.map_new_amg_msg
3550: ( p_old_message_code => 'PA_PROJECT_REF_AND_ID_MISSING'
3551: ,p_msg_attribute => 'CHANGE'
3589:
3590: -- 4537865
3591: p_out_project_id := NULL ;
3592:
3593: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3594: THEN
3595: FND_MSG_PUB.add_exc_msg
3596: ( p_pkg_name => G_PKG_NAME
3597: , p_procedure_name => l_api_name );
3591: p_out_project_id := NULL ;
3592:
3593: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3594: THEN
3595: FND_MSG_PUB.add_exc_msg
3596: ( p_pkg_name => G_PKG_NAME
3597: , p_procedure_name => l_api_name );
3598:
3599: END IF;
3666: FETCH l_project_id_csr INTO l_dummy;
3667:
3668: IF l_project_id_csr%NOTFOUND
3669: THEN
3670: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3671: THEN
3672: pa_interface_utils_pub.map_new_amg_msg
3673: ( p_old_message_code => 'PA_INVALID_PROJECT_ID'
3674: ,p_msg_attribute => 'CHANGE'
3687:
3688: CLOSE l_project_id_csr;
3689: ELSE
3690:
3691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3692: THEN
3693: pa_interface_utils_pub.map_new_amg_msg
3694: ( p_old_message_code => 'PA_PROJECT_ID_MISSING'
3695: ,p_msg_attribute => 'CHANGE'
3720: FETCH l_task_id_csr INTO l_dummy;
3721:
3722: IF l_task_id_csr%NOTFOUND
3723: THEN
3724: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3725: THEN
3726: pa_interface_utils_pub.map_new_amg_msg
3727: ( p_old_message_code => 'PA_TASK_ID_INVALID'
3728: ,p_msg_attribute => 'CHANGE'
3750: (p_pa_project_id => p_pa_project_id,
3751: p_pm_task_reference => p_pm_task_reference);
3752: IF l_task_id IS NULL
3753: THEN
3754: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3755: THEN
3756: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
3757: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
3758: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
3755: THEN
3756: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
3757: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
3758: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
3759: FND_MSG_PUB.add;
3760:
3761: RAISE FND_API.G_EXC_ERROR;
3762:
3763: END IF;
3765: p_out_task_id := l_task_id;
3766:
3767: END IF;
3768: ELSE
3769: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3770: THEN
3771: pa_interface_utils_pub.map_new_amg_msg
3772: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
3773: ,p_msg_attribute => 'CHANGE'
3811:
3812: -- 4537865 RESET OUT PARAMS
3813: p_out_task_id := NULL ;
3814:
3815: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3816: THEN
3817: FND_MSG_PUB.add_exc_msg
3818: ( p_pkg_name => G_PKG_NAME
3819: , p_procedure_name => l_api_name );
3813: p_out_task_id := NULL ;
3814:
3815: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3816: THEN
3817: FND_MSG_PUB.add_exc_msg
3818: ( p_pkg_name => G_PKG_NAME
3819: , p_procedure_name => l_api_name );
3820:
3821: END IF;
3913: FETCH l_project_id_csr INTO l_dummy;
3914:
3915: IF l_project_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_INVALID_PROJECT_ID'
3921: ,p_msg_attribute => 'CHANGE'
3934:
3935: CLOSE l_project_id_csr;
3936: ELSE
3937:
3938: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3939: THEN
3940: pa_interface_utils_pub.map_new_amg_msg
3941: ( p_old_message_code => 'PA_PROJECT_ID_MISSING'
3942: ,p_msg_attribute => 'CHANGE'
3984:
3985: IF l_proj_element_id_csr%NOTFOUND
3986: THEN
3987:
3988: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3989: THEN
3990: pa_interface_utils_pub.map_new_amg_msg
3991: ( p_old_message_code => 'PA_TASK_ID_INVALID'
3992: ,p_msg_attribute => 'CHANGE'
4004: CLOSE l_proj_element_id_csr;
4005: p_out_task_id := p_pa_task_id;
4006: ELSE
4007: --End Added by rtarway, for BUG 3919800
4008: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4009: THEN
4010: pa_interface_utils_pub.map_new_amg_msg
4011: ( p_old_message_code => 'PA_TASK_ID_INVALID'
4012: ,p_msg_attribute => 'CHANGE'
4045: OPEN cur_pa_proj_elems;
4046: FETCH cur_pa_proj_elems INTO p_out_task_id;
4047: IF cur_pa_proj_elems%NOTFOUND
4048: THEN
4049: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4050: THEN
4051: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4052: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4053: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4050: THEN
4051: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4052: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4053: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4054: FND_MSG_PUB.add;
4055: CLOSE cur_pa_proj_elems;
4056: RAISE FND_API.G_EXC_ERROR;
4057: END IF;
4058: END IF;
4059: CLOSE cur_pa_proj_elems;
4060: ELSE
4061: --End Add by rtarway,for BUG 3919800
4062:
4063: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4064: THEN
4065: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4066: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4067: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4064: THEN
4065: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4066: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4067: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4068: FND_MSG_PUB.add;
4069:
4070: RAISE FND_API.G_EXC_ERROR;
4071:
4072: END IF;
4074: ELSE
4075: p_out_task_id := l_task_id;
4076: END IF;
4077: ELSE
4078: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4079: THEN
4080: pa_interface_utils_pub.map_new_amg_msg
4081: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
4082: ,p_msg_attribute => 'CHANGE'
4106: FETCH l_proj_element_id_csr INTO l_dummy;
4107:
4108: IF l_proj_element_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_TASK_ID_INVALID'
4114: ,p_msg_attribute => 'CHANGE'
4137:
4138: IF cur_pa_proj_elems%NOTFOUND
4139: THEN
4140: p_return_status := FND_API.G_RET_STS_ERROR;
4141: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4142: THEN
4143: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4144: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4145: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4142: THEN
4143: FND_MESSAGE.SET_NAME('PA','PA_API_CONV_ERROR_AMG'); -- Bug 2257612
4144: FND_MESSAGE.SET_TOKEN('ATTR_NAME','Pm Task Reference');
4145: FND_MESSAGE.SET_TOKEN('ATTR_VALUE',p_pm_task_reference);
4146: FND_MSG_PUB.add;
4147: RAISE FND_API.G_EXC_ERROR;
4148: END IF;
4149: END IF;
4150: CLOSE cur_pa_proj_elems;
4149: END IF;
4150: CLOSE cur_pa_proj_elems;
4151:
4152: ELSE
4153: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4154: THEN
4155: pa_interface_utils_pub.map_new_amg_msg
4156: ( p_old_message_code => 'PA_TASK_REF_AND_ID_MISSING'
4157: ,p_msg_attribute => 'CHANGE'
4196:
4197: -- 4537865 RESET OUT PARAMS
4198: p_out_task_id := NULL ;
4199:
4200: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4201: THEN
4202: FND_MSG_PUB.add_exc_msg
4203: ( p_pkg_name => G_PKG_NAME
4204: , p_procedure_name => l_api_name );
4198: p_out_task_id := NULL ;
4199:
4200: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4201: THEN
4202: FND_MSG_PUB.add_exc_msg
4203: ( p_pkg_name => G_PKG_NAME
4204: , p_procedure_name => l_api_name );
4205:
4206: END IF;
4592: IF l_get_lower_task_det_csr%FOUND
4593: THEN
4594: CLOSE l_get_lower_task_det_csr;
4595:
4596: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
4597: THEN
4598: pa_interface_utils_pub.map_new_amg_msg
4599: ( p_old_message_code => 'PA_TOP_TASK_CHILD_NO_DELETE'
4600: ,p_msg_attribute => 'CHANGE'
4692:
4693: WHEN FND_API.G_EXC_ERROR
4694: THEN
4695: p_return_status := FND_API.G_RET_STS_ERROR;
4696: p_msg_count := Fnd_Msg_Pub.count_msg; -- 4537865
4697:
4698: IF p_msg_count = 1 AND p_msg_data IS NULL
4699: THEN
4700: Pa_Interface_Utils_Pub.get_messages
4718: p_msg_data := SQLERRM;
4719:
4720: ROLLBACK TO delete_one_task;
4721:
4722: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4723: THEN
4724: FND_MSG_PUB.add_exc_msg
4725: ( p_pkg_name => G_PKG_NAME
4726: , p_procedure_name => l_api_name
4720: ROLLBACK TO delete_one_task;
4721:
4722: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4723: THEN
4724: FND_MSG_PUB.add_exc_msg
4725: ( p_pkg_name => G_PKG_NAME
4726: , p_procedure_name => l_api_name
4727: , p_error_text => p_msg_data
4728: );
4765: EXCEPTION
4766: WHEN OTHERS THEN
4767: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4768:
4769: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4770: THEN
4771: FND_MSG_PUB.add_exc_msg
4772: ( p_pkg_name => G_PKG_NAME
4773: , p_procedure_name => 'Validate_billing_info'
4767: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4768:
4769: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4770: THEN
4771: FND_MSG_PUB.add_exc_msg
4772: ( p_pkg_name => G_PKG_NAME
4773: , p_procedure_name => 'Validate_billing_info'
4774: , p_error_text => SUBSTRB(SQLERRM,1,240));
4775:
4825: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4826: p_update_end_date_flag := NULL ;
4827: p_update_start_date_flag := NULL ;
4828:
4829: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4830: THEN
4831: FND_MSG_PUB.add_exc_msg
4832: ( p_pkg_name => G_PKG_NAME
4833: , p_procedure_name => l_api_name
4827: p_update_start_date_flag := NULL ;
4828:
4829: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4830: THEN
4831: FND_MSG_PUB.add_exc_msg
4832: ( p_pkg_name => G_PKG_NAME
4833: , p_procedure_name => l_api_name
4834: , p_error_text => SUBSTRB(SQLERRM,1,240)
4835: );
4886: WHEN OTHERS THEN
4887:
4888: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4889:
4890: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4891: THEN
4892: FND_MSG_PUB.add_exc_msg
4893: ( p_pkg_name => G_PKG_NAME
4894: , p_procedure_name => 'check_for_one_manager'
4888: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4889:
4890: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4891: THEN
4892: FND_MSG_PUB.add_exc_msg
4893: ( p_pkg_name => G_PKG_NAME
4894: , p_procedure_name => 'check_for_one_manager'
4895: , p_error_text => SUBSTRB(SQLERRM,1,240)
4896: );
4925:
4926: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4927: p_proceed_with_update_flag := NULL ;
4928:
4929: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4930: THEN
4931: FND_MSG_PUB.add_exc_msg
4932: ( p_pkg_name => G_PKG_NAME
4933: , p_procedure_name => 'handle_task_number_change'
4927: p_proceed_with_update_flag := NULL ;
4928:
4929: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4930: THEN
4931: FND_MSG_PUB.add_exc_msg
4932: ( p_pkg_name => G_PKG_NAME
4933: , p_procedure_name => 'handle_task_number_change'
4934: , p_error_text => SUBSTRB(SQLERRM,1,240)
4935: );
4953: WHEN OTHERS THEN
4954:
4955: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4956:
4957: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4958: THEN
4959: FND_MSG_PUB.add_exc_msg
4960: ( p_pkg_name => G_PKG_NAME
4961: , p_procedure_name => 'check_parent_child_task_dates'
4955: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4956:
4957: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4958: THEN
4959: FND_MSG_PUB.add_exc_msg
4960: ( p_pkg_name => G_PKG_NAME
4961: , p_procedure_name => 'check_parent_child_task_dates'
4962: , p_error_text => SUBSTRB(SQLERRM,1,240)
4963: );
5447:
5448: IF FND_API.TO_BOOLEAN( p_init_msg_list )
5449: THEN
5450:
5451: FND_MSG_PUB.initialize;
5452:
5453: END IF;
5454:
5455: -- Set API return status to success
5519: --bug 2841158
5520: AND p_pm_product_code <> 'WORKPLAN' --bug 2665656
5521: THEN
5522:
5523: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5524: THEN
5525: pa_interface_utils_pub.map_new_amg_msg
5526: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
5527: ,p_msg_attribute => 'CHANGE'
5551: IF l_pm_product_code <> 'X'
5552: AND p_pm_product_code <> 'WORKPLAN' --bug 2665656
5553: THEN
5554:
5555: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5556: THEN
5557: pa_interface_utils_pub.map_new_amg_msg
5558: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
5559: ,p_msg_attribute => 'CHANGE'
5915: ,X_err_stage => l_err_stage
5916: ,X_err_stack => l_err_stack );
5917:
5918: IF l_err_code > 0 THEN
5919: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5920: THEN
5921: IF NOT pa_project_pvt.check_valid_message (l_err_stage)
5922: THEN
5923: pa_interface_utils_pub.map_new_amg_msg
5973: -- Cannot update chargeable flag for parent tasks
5974:
5975: IF l_children_exist = 'Y'
5976: THEN
5977: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
5978: THEN
5979: pa_interface_utils_pub.map_new_amg_msg
5980: ( p_old_message_code => 'PA_CANNOT_CHANGE_CHRG_FLAG'
5981: ,p_msg_attribute => 'CHANGE'
6012: If p_billable_flag = 'Y' and l_project_type_class_code = 'INDIRECT'
6013: THEN
6014: p_return_status := FND_API.G_RET_STS_ERROR;
6015:
6016: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6017: THEN
6018: pa_interface_utils_pub.map_new_amg_msg
6019: ( p_old_message_code => 'PA_PR_INDIRECT_NO_BILLING'
6020: ,p_msg_attribute => 'CHANGE'
6065: IF l_service_type_csr%NOTFOUND
6066: THEN
6067:
6068: CLOSE l_service_type_csr;
6069: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6070: THEN
6071: pa_interface_utils_pub.map_new_amg_msg
6072: ( p_old_message_code => 'PA_SERVICE_TYPE_INVALID'
6073: ,p_msg_attribute => 'CHANGE'
6123: , p_task_number_change_Ok_flag => task_number_change_Ok_flag
6124: );
6125: IF task_number_change_Ok_flag = 'N' then */
6126: /** CODE CHANGE END BY ADITI for Bug 4120380 **/
6127: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6128: THEN
6129: pa_interface_utils_pub.map_new_amg_msg
6130: ( p_old_message_code => 'PA_TASK_NUMBER_NOT_UNIQUE'
6131: ,p_msg_attribute => 'CHANGE'
6150: x_err_stack => l_err_stack );
6151:
6152: IF l_err_code > 0
6153: THEN
6154: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6155: THEN
6156: IF NOT pa_project_pvt.check_valid_message (l_err_stage)
6157: THEN
6158: pa_interface_utils_pub.map_new_amg_msg
6256:
6257: IF p_task_start_date < l_project_date_rec.start_date OR
6258: p_task_start_date > l_project_date_rec.completion_date
6259: THEN
6260: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6261: THEN
6262: pa_interface_utils_pub.map_new_amg_msg
6263: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
6264: ,p_msg_attribute => 'CHANGE'
6278:
6279: IF pa_project_pub.G_ParChildTsk_chks_deferred = 'N' THEN
6280: IF l_children_exist = 'Y' THEN
6281: IF l_min_child_start_date < p_task_start_date THEN
6282: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6283: pa_interface_utils_pub.map_new_amg_msg
6284: ( p_old_message_code => 'PA_CHILD_START_EARLIER'
6285: ,p_msg_attribute => 'CHANGE'
6286: ,p_resize_flag => 'N'
6296: END IF;
6297:
6298: IF l_task_rec.parent_task_id IS NOT NULL THEN
6299: IF l_min_parent_start_date > p_task_start_date THEN
6300: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6301: pa_interface_utils_pub.map_new_amg_msg
6302: ( p_old_message_code => 'PA_PARENT_START_LATER'
6303: ,p_msg_attribute => 'CHANGE'
6304: ,p_resize_flag => 'N'
6346: THEN
6347: IF p_task_completion_date < l_project_date_rec.start_date OR
6348: p_task_completion_date > l_project_date_rec.completion_date
6349: THEN
6350: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6351: THEN
6352: pa_interface_utils_pub.map_new_amg_msg
6353: ( p_old_message_code => 'PA_TK_OUTSIDE_PROJECT_RANGE'
6354: ,p_msg_attribute => 'CHANGE'
6368:
6369: IF pa_project_pub.G_ParChildTsk_chks_deferred = 'N' THEN
6370: IF l_children_exist = 'Y' THEN
6371: IF l_max_child_completion_date > p_task_completion_date THEN
6372: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6373: THEN
6374: pa_interface_utils_pub.map_new_amg_msg
6375: ( p_old_message_code => 'PA_CHILD_COMPLETION_LATER'
6376: ,p_msg_attribute => 'CHANGE'
6389: IF l_task_rec.parent_task_id IS NOT NULL
6390: THEN
6391: IF l_max_parent_completion_date < p_task_completion_date
6392: THEN
6393: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6394: THEN
6395: pa_interface_utils_pub.map_new_amg_msg
6396: ( p_old_message_code => 'PA_PARENT_COMPLETION_EARLIER'
6397: ,p_msg_attribute => 'CHANGE'
6460: FETCH l_validate_parent_id_csr INTO l_temp;
6461: IF l_validate_parent_id_csr%NOTFOUND
6462: THEN
6463: CLOSE l_validate_parent_id_csr;
6464: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6465: THEN
6466: pa_interface_utils_pub.map_new_amg_msg
6467: ( p_old_message_code => 'PA_PARENT_TASK_ID_INVALID'
6468: ,p_msg_attribute => 'CHANGE'
6487: (l_project_id, p_pm_parent_task_reference );
6488: FETCH l_convert_pm_parent_to_id_csr INTO l_new_parent_task_id;
6489: IF l_convert_pm_parent_to_id_csr%NOTFOUND THEN
6490: CLOSE l_convert_pm_parent_to_id_csr;
6491: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6492: THEN
6493: pa_interface_utils_pub.map_new_amg_msg
6494: ( p_old_message_code => 'PA_PARENT_TASK_MISSING'
6495: ,p_msg_attribute => 'CHANGE'
6521:
6522: -- this means that a sub task is being changed to become a top task
6523: -- which is not allowed
6524:
6525: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6526: THEN
6527: pa_interface_utils_pub.map_new_amg_msg
6528: ( p_old_message_code => 'PA_TOP_TASK_NOT_ALLOWED'
6529: ,p_msg_attribute => 'CHANGE'
6613: FETCH l_chk_chlds_parent_id_csr INTO l_temp;
6614:
6615: IF l_chk_chlds_parent_id_csr%FOUND
6616: THEN
6617: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6618: THEN
6619: pa_interface_utils_pub.map_new_amg_msg
6620: ( p_old_message_code => 'PA_TSK_MV_BELOW_SELF'
6621: ,p_msg_attribute => 'CHANGE'
6641: , x_err_stack => l_err_stack );
6642:
6643: IF l_err_code > 0
6644: THEN
6645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6646: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
6647: THEN
6648: pa_interface_utils_pub.map_new_amg_msg
6649: ( p_old_message_code => 'PA_CHECK_ADD_SUBTASK_FAILED'
6677:
6678:
6679: IF l_task_rec.parent_task_id IS NULL
6680: THEN
6681: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6682: THEN
6683: pa_interface_utils_pub.map_new_amg_msg
6684: ( p_old_message_code => 'PA_CANT_MOVE_TOP_TASK'
6685: ,p_msg_attribute => 'CHANGE'
6694: RAISE FND_API.G_EXC_ERROR;
6695:
6696: ELSIF l_new_parent_task_id IS NULL
6697: THEN
6698: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6699: THEN
6700: pa_interface_utils_pub.map_new_amg_msg
6701: ( p_old_message_code => 'PA_TOP_TASK_NOT_ALLOWED'
6702: ,p_msg_attribute => 'CHANGE'
6719: /* dbms_output.put_line('New top task :'||l_top_task_id); */
6720:
6721: IF l_top_task_id <> l_task_rec.top_task_id
6722: THEN
6723: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6724: THEN
6725: pa_interface_utils_pub.map_new_amg_msg
6726: ( p_old_message_code => 'PA_CANT_CHANGE_PARENT'
6727: ,p_msg_attribute => 'CHANGE'
6811: CLOSE l_customer_csr;
6812:
6813: IF l_address_valid = 'N'
6814: THEN
6815: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6816: THEN
6817: pa_interface_utils_pub.map_new_amg_msg
6818: ( p_old_message_code => 'PA_TASK_ADDRESS_INVALID'
6819: ,p_msg_attribute => 'CHANGE'
6979: ,p_validate_status => l_validate_status
6980: );
6981: IF l_validate_status = 'N'
6982: THEN
6983: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
6984: THEN
6985: pa_interface_utils_pub.map_new_amg_msg
6986: ( p_old_message_code => 'PA_INVALID_FF_VALUES'
6987: ,p_msg_attribute => 'CHANGE'
7452: --Added for bug 5745545
7453: IF nvl(p_work_type_id,-999) <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
7454: IF (nvl(fnd_profile.value('PA_EN_NEW_WORK_TYPE_PROCESS'),'N') = 'Y') OR (nvl(pa_install.is_prm_licensed(),'N') = 'Y' ) THEN
7455: IF p_work_type_id IS NULL AND (NOT (PA_GMS_API.vert_install)) THEN
7456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7457: pa_interface_utils_pub.map_new_amg_msg
7458: ( p_old_message_code => 'PA_TASK_WORK_TYPE_MAND'
7459: ,p_msg_attribute => 'CHANGE'
7460: ,p_resize_flag => 'N'
7972: g_rev_rate_sch_type := l_rev_rate_sch_type; -- added for bug 3795253
7973: g_rev_ind_rate_sch_id := p_rev_ind_rate_sch_id; -- added for bug 3795253
7974: EXCEPTION
7975: WHEN NO_DATA_FOUND THEN
7976: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
7977: THEN
7978: pa_interface_utils_pub.map_new_amg_msg
7979: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
7980: ,p_msg_attribute => 'CHANGE'
8036: g_inv_ind_rate_sch_id := p_inv_ind_rate_sch_id; -- added for bug 3795253
8037:
8038: EXCEPTION
8039: WHEN NO_DATA_FOUND THEN
8040: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8041: THEN
8042: pa_interface_utils_pub.map_new_amg_msg
8043: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
8044: ,p_msg_attribute => 'CHANGE'
8203: l_b_nl_std_bl_rt_sch_fg := 'Y';
8204: l_update_yes_flag := 'Y';
8205: EXCEPTION
8206: WHEN NO_DATA_FOUND THEN
8207: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8208: THEN
8209: pa_interface_utils_pub.map_new_amg_msg
8210: ( p_old_message_code => 'PA_PRJ_NL_SCHEDULE_ID'
8211: ,p_msg_attribute => 'CHANGE'
8520: FETCH l_cost_ind_rate_sch_id_csr INTO l_temp_var;
8521: IF l_cost_ind_rate_sch_id_csr%NOTFOUND
8522: THEN
8523: CLOSE l_cost_ind_rate_sch_id_csr;
8524: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8525: THEN
8526: pa_interface_utils_pub.map_new_amg_msg
8527: ( p_old_message_code => 'PA_PRJ_INV_BURDEN_SCH_ID'
8528: ,p_msg_attribute => 'CHANGE'
8564: FETCH l_ind_rate_schedule_type_csr INTO l_temp_var_sch_type;
8565: IF l_temp_var_sch_type = 'P'
8566: THEN
8567: CLOSE l_ind_rate_schedule_type_csr;
8568: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
8569: THEN
8570: pa_interface_utils_pub.map_new_amg_msg
8571: ( p_old_message_code => 'PA_CANT_FIX_DATE_PROV_SCH'
8572: ,p_msg_attribute => 'CHANGE'
9142: p_out_pm_task_reference := NULL ;
9143:
9144: ROLLBACK TO Update_Task_pub;
9145:
9146: FND_MSG_PUB.Count_And_Get
9147: ( p_count => p_msg_count ,
9148: p_data => p_msg_data );
9149:
9150: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9156:
9157: ROLLBACK TO Update_Task_pub;
9158:
9159:
9160: FND_MSG_PUB.Count_And_Get
9161: ( p_count => p_msg_count ,
9162: p_data => p_msg_data );
9163:
9164: WHEN ROW_ALREADY_LOCKED THEN
9170: p_out_pa_task_id := NULL ;
9171: p_out_pm_task_reference := NULL ;
9172:
9173:
9174: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9175: THEN
9176: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9177: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9178: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9176: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9177: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9178: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9179: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9180: FND_MSG_PUB.ADD;
9181: END IF;
9182:
9183: FND_MSG_PUB.Count_And_Get
9184: ( p_count => p_msg_count ,
9179: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9180: FND_MSG_PUB.ADD;
9181: END IF;
9182:
9183: FND_MSG_PUB.Count_And_Get
9184: ( p_count => p_msg_count ,
9185: p_data => p_msg_data );
9186:
9187: WHEN OTHERS THEN
9193: p_out_pa_task_id := NULL ;
9194: p_out_pm_task_reference := NULL ;
9195:
9196:
9197: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9198:
9199: FND_MSG_PUB.add_exc_msg
9200: ( p_pkg_name => G_PKG_NAME
9201: , p_procedure_name => l_api_name );
9195:
9196:
9197: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9198:
9199: FND_MSG_PUB.add_exc_msg
9200: ( p_pkg_name => G_PKG_NAME
9201: , p_procedure_name => l_api_name );
9202:
9203: END IF;
9201: , p_procedure_name => l_api_name );
9202:
9203: END IF;
9204:
9205: FND_MSG_PUB.Count_And_Get
9206: ( p_count => p_msg_count ,
9207: p_data => p_msg_data );
9208:
9209: END update_one_task;
9306: AND p_pm_product_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
9307: --bug 2841158
9308: THEN
9309:
9310: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9311: THEN
9312: pa_interface_utils_pub.map_new_amg_msg
9313: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
9314: ,p_msg_attribute => 'CHANGE'
9335: CLOSE p_product_code_csr;
9336: IF l_pm_product_code <> 'X'
9337: THEN
9338:
9339: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9340: THEN
9341: pa_interface_utils_pub.map_new_amg_msg
9342: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
9343: ,p_msg_attribute => 'CHANGE'
9399:
9400: IF FND_API.TO_BOOLEAN( p_init_msg_list )
9401: THEN
9402:
9403: FND_MSG_PUB.initialize;
9404:
9405: END IF;
9406:
9407:
9469: x_err_stack => l_err_stack);
9470: IF l_err_code > 0
9471: then
9472:
9473: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9474: THEN
9475:
9476: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
9477: THEN
9504:
9505: ELSIF l_err_code < 0
9506: then
9507:
9508: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9509: THEN
9510: pa_interface_utils_pub.map_new_amg_msg
9511: ( p_old_message_code => 'PA_DELETE_TASK_FAILED'
9512: ,p_msg_attribute => 'CHANGE'
9554:
9555: ELSIF p_cascaded_delete_flag NOT IN ('Y','y','N','n')
9556: THEN
9557:
9558: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9559: THEN
9560: pa_interface_utils_pub.map_new_amg_msg
9561: ( p_old_message_code => 'PA_CASCADE_FLAG_INVALID'
9562: ,p_msg_attribute => 'CHANGE'
9587:
9588: IF l_err_code > 0
9589: THEN
9590:
9591: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9592: THEN
9593:
9594: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
9595: THEN
9622:
9623: ELSIF l_err_code < 0
9624: THEN
9625:
9626: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9627: THEN
9628: pa_interface_utils_pub.map_new_amg_msg
9629: ( p_old_message_code => 'PA_DELETE_TASK_FAILED'
9630: ,p_msg_attribute => 'CHANGE'
9792: -- 4537865 RESET OUT PARAMS
9793: p_project_id := NULL ;
9794: p_task_id := NULL ;
9795:
9796: FND_MSG_PUB.Count_And_Get
9797: ( p_count => p_msg_count ,
9798: p_data => p_msg_data );
9799:
9800: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
9806: -- 4537865 RESET OUT PARAMS
9807: p_project_id := NULL ;
9808: p_task_id := NULL ;
9809:
9810: FND_MSG_PUB.Count_And_Get
9811: ( p_count => p_msg_count ,
9812: p_data => p_msg_data );
9813:
9814: WHEN ROW_ALREADY_LOCKED
9820: -- 4537865 RESET OUT PARAMS
9821: p_project_id := NULL ;
9822: p_task_id := NULL ;
9823:
9824: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9825: THEN
9826: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9827: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9828: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9826: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_T_AMG');
9827: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
9828: FND_MESSAGE.SET_TOKEN('TASK', l_amg_task_number);
9829: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9830: FND_MSG_PUB.ADD;
9831: END IF;
9832:
9833: FND_MSG_PUB.Count_And_Get
9834: ( p_count => p_msg_count ,
9829: FND_MESSAGE.SET_TOKEN('ENTITY', G_TASK_CODE);
9830: FND_MSG_PUB.ADD;
9831: END IF;
9832:
9833: FND_MSG_PUB.Count_And_Get
9834: ( p_count => p_msg_count ,
9835: p_data => p_msg_data );
9836:
9837: WHEN OTHERS THEN
9842: -- 4537865 RESET OUT PARAMS
9843: p_project_id := NULL ;
9844: p_task_id := NULL ;
9845:
9846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9847: THEN
9848: FND_MSG_PUB.add_exc_msg
9849: ( p_pkg_name => G_PKG_NAME
9850: , p_procedure_name => l_api_name );
9844: p_task_id := NULL ;
9845:
9846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9847: THEN
9848: FND_MSG_PUB.add_exc_msg
9849: ( p_pkg_name => G_PKG_NAME
9850: , p_procedure_name => l_api_name );
9851:
9852: END IF;
9850: , p_procedure_name => l_api_name );
9851:
9852: END IF;
9853:
9854: FND_MSG_PUB.Count_And_Get
9855: ( p_count => p_msg_count ,
9856: p_data => p_msg_data );
9857:
9858: END delete_task1;
9970:
9971: IF FND_API.TO_BOOLEAN( p_init_msg_list )
9972: THEN
9973:
9974: FND_MSG_PUB.initialize;
9975:
9976: END IF;
9977:
9978: -- pm_product_code is mandatory
9984: AND p_pm_product_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
9985: --bug 2841158
9986: THEN
9987:
9988: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
9989: THEN
9990: pa_interface_utils_pub.map_new_amg_msg
9991: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_MISSING'
9992: ,p_msg_attribute => 'CHANGE'
10013: CLOSE p_product_code_csr;
10014: IF l_pm_product_code <> 'X'
10015: THEN
10016:
10017: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10018: THEN
10019: pa_interface_utils_pub.map_new_amg_msg
10020: ( p_old_message_code => 'PA_PRODUCT_CODE_IS_INVALID'
10021: ,p_msg_attribute => 'CHANGE'
10167: x_err_stack => l_err_stack);
10168:
10169: IF l_err_code <> 0 THEN
10170:
10171: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
10172:
10173: IF NOT pa_project_pvt.check_valid_message(l_err_stage)
10174: THEN
10175: pa_interface_utils_pub.map_new_amg_msg
10214: x_err_code => l_err_code,
10215: x_err_stage => l_err_stage,
10216: x_err_stack => l_err_stack );
10217: IF l_err_code > 0 THEN
10218: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
10219: IF NOT pa_project_pvt.check_valid_message(l_err_stage) THEN
10220:
10221: pa_interface_utils_pub.map_new_amg_msg
10222: ( p_old_message_code => 'PA_DELETE_PROJECT_FAILED'
10243: END IF;
10244: END IF;
10245: RAISE FND_API.G_EXC_ERROR;
10246: ELSIF l_err_code < 0 THEN
10247: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10248: THEN
10249:
10250: pa_interface_utils_pub.map_new_amg_msg
10251: ( p_old_message_code => 'PA_DELETE_PROJECT_FAILED'
10273: ROLLBACK TO delete_project_pub;
10274:
10275: p_return_status := FND_API.G_RET_STS_ERROR;
10276:
10277: FND_MSG_PUB.Count_And_Get
10278: ( p_count => p_msg_count ,
10279: p_data => p_msg_data );
10280:
10281: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
10283: ROLLBACK TO delete_project_pub;
10284:
10285: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10286:
10287: FND_MSG_PUB.Count_And_Get
10288: ( p_count => p_msg_count ,
10289: p_data => p_msg_data );
10290:
10291: WHEN ROW_ALREADY_LOCKED THEN
10293: ROLLBACK TO delete_project_pub;
10294:
10295: p_return_status := FND_API.G_RET_STS_ERROR;
10296:
10297: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10298: THEN
10299: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_P_AMG');
10300: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10301: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10298: THEN
10299: FND_MESSAGE.SET_NAME('PA','PA_ROW_ALREADY_LOCKED_P_AMG');
10300: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10301: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10302: FND_MSG_PUB.ADD;
10303: END IF;
10304: FND_MSG_PUB.Count_And_Get
10305: ( p_count => p_msg_count ,
10306: p_data => p_msg_data );
10300: FND_MESSAGE.SET_TOKEN('PROJECT', l_amg_segment1);
10301: FND_MESSAGE.SET_TOKEN('ENTITY', G_PROJECT_CODE);
10302: FND_MSG_PUB.ADD;
10303: END IF;
10304: FND_MSG_PUB.Count_And_Get
10305: ( p_count => p_msg_count ,
10306: p_data => p_msg_data );
10307:
10308: WHEN OTHERS THEN
10310: ROLLBACK TO delete_project_pub;
10311:
10312: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10313:
10314: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10315: THEN
10316: FND_MSG_PUB.add_exc_msg
10317: ( p_pkg_name => G_PKG_NAME
10318: , p_procedure_name => l_api_name
10312: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10313:
10314: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10315: THEN
10316: FND_MSG_PUB.add_exc_msg
10317: ( p_pkg_name => G_PKG_NAME
10318: , p_procedure_name => l_api_name
10319: , p_error_text => SUBSTRB(SQLERRM, 1, 240) ); -- 4537865 Changed substr to substrb
10320:
10317: ( p_pkg_name => G_PKG_NAME
10318: , p_procedure_name => l_api_name
10319: , p_error_text => SUBSTRB(SQLERRM, 1, 240) ); -- 4537865 Changed substr to substrb
10320:
10321: FND_MSG_PUB.add;
10322: END IF;
10323:
10324: FND_MSG_PUB.Count_And_Get
10325: ( p_count => p_msg_count ,
10320:
10321: FND_MSG_PUB.add;
10322: END IF;
10323:
10324: FND_MSG_PUB.Count_And_Get
10325: ( p_count => p_msg_count ,
10326: p_data => p_msg_data );
10327:
10328: END delete_project1;
10418: IF (p_org_roles(i).person_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) AND
10419: (p_org_roles(i).person_id IS NOT NULL) THEN
10420: IF check_valid_organization (p_org_roles(i).person_id) = 'N'
10421: THEN
10422: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10423: THEN
10424: pa_interface_utils_pub.map_new_amg_msg
10425: ( p_old_message_code => 'PA_INVALID_ORGANIZATION'
10426: ,p_msg_attribute => 'CHANGE'
10438: -- validate the role type
10439: OPEN l_project_role_types_csr (p_org_roles(i).project_role_type);
10440: FETCH l_project_role_types_csr INTO l_dummy;
10441: IF l_project_role_types_csr%NOTFOUND THEN
10442: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10443: THEN
10444: pa_interface_utils_pub.map_new_amg_msg
10445: ( p_old_message_code => 'PA_INVALID_ROLE_TYPE'
10446: ,p_msg_attribute => 'CHANGE'
10464: THEN
10465: IF p_org_roles(i).end_date < p_org_roles(i).start_date
10466: THEN
10467:
10468: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10469: THEN
10470: pa_interface_utils_pub.map_new_amg_msg
10471: ( p_old_message_code => 'PA_SU_INVALID_DATES'
10472: ,p_msg_attribute => 'CHANGE'
10601: ROLLBACK TO add_org_roles_pvt;
10602:
10603: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10604:
10605: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10606: THEN
10607: FND_MSG_PUB.add_exc_msg
10608: ( p_pkg_name => G_PKG_NAME
10609: , p_procedure_name => l_api_name );
10603: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10604:
10605: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10606: THEN
10607: FND_MSG_PUB.add_exc_msg
10608: ( p_pkg_name => G_PKG_NAME
10609: , p_procedure_name => l_api_name );
10610:
10611: END IF;
10828:
10829: END IF;
10830:
10831: ELSIF p_in_labor_sch_type IS NULL THEN
10832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10833: THEN
10834: pa_interface_utils_pub.map_new_amg_msg
10835: ( p_old_message_code => 'PA_LAB_SCH_NOT_NULL'
10836: ,p_msg_attribute => 'CHANGE'
10869: END IF;
10870:
10871: ELSIF p_in_nl_sch_type IS NULL THEN
10872:
10873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
10874: THEN
10875: pa_interface_utils_pub.map_new_amg_msg
10876: ( p_old_message_code => 'PA_NL_SCH_NOT_NULL'
10877: ,p_msg_attribute => 'CHANGE'
10918: -- 4537865 RESET OUT PARAMS
10919: p_out_nl_labor_sch_type := NULL ;
10920: p_out_labor_sch_type := NULL ;
10921:
10922: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10923: THEN
10924: FND_MSG_PUB.add_exc_msg
10925: ( p_pkg_name => G_PKG_NAME
10926: , p_procedure_name => l_api_name );
10920: p_out_labor_sch_type := NULL ;
10921:
10922: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10923: THEN
10924: FND_MSG_PUB.add_exc_msg
10925: ( p_pkg_name => G_PKG_NAME
10926: , p_procedure_name => l_api_name );
10927:
10928: END IF;
11092: if non_labor_std_bill_rt_sch_id is PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11093: when the Schedule is being changed from 'I' (burden) to 'B' (bill) */
11094:
11095: IF p_non_lab_std_bill_rt_sch_id IS NULL THEN /* Explicitly passed as NULL, hence Error */
11096: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11097: THEN
11098: pa_interface_utils_pub.map_new_amg_msg
11099: ( p_old_message_code => 'PA_NL_SCH_ID_NOT_NULL'
11100: ,p_msg_attribute => 'CHANGE'
11108: END IF;
11109: RAISE FND_API.G_EXC_ERROR;
11110: ELSIF p_non_lab_std_bill_rt_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11111: IF p_nl_db_sch_type = 'I' THEN /* Schedule is being changed from 'I' (burden) to 'B' (bill) */
11112: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11113: THEN
11114: pa_interface_utils_pub.map_new_amg_msg
11115: ( p_old_message_code => 'PA_NL_SCH_ID_NOT_NULL'
11116: ,p_msg_attribute => 'CHANGE'
11131: when the Schedule is being changed from 'I' to 'B'*/
11132:
11133: IF p_nl_bill_rate_org_id IS NULL
11134: THEN
11135: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11136: THEN
11137: pa_interface_utils_pub.map_new_amg_msg
11138: ( p_old_message_code => 'PA_BILL_RT_ORG_ID_NOT_NULL'
11139: ,p_msg_attribute => 'CHANGE'
11147: END IF;
11148: RAISE FND_API.G_EXC_ERROR;
11149: ELSIF p_nl_bill_rate_org_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11150: IF p_nl_db_sch_type = 'I' THEN
11151: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11152: THEN
11153: pa_interface_utils_pub.map_new_amg_msg
11154: ( p_old_message_code => 'PA_BILL_RT_ORG_ID_NOT_NULL'
11155: ,p_msg_attribute => 'CHANGE'
11175: FETCH l_nl_org_sch_id_csr INTO l_temp_dummy;
11176: IF l_nl_org_sch_id_csr%NOTFOUND
11177: THEN
11178: CLOSE l_nl_org_sch_id_csr;
11179: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11180: THEN
11181: pa_interface_utils_pub.map_new_amg_msg
11182: ( p_old_message_code => 'PA_INVALID_NL_ORG_SCH_ID'
11183: ,p_msg_attribute => 'CHANGE'
11209: THEN
11210: IF p_non_labor_disc_reason_code IS NOT NULL
11211: AND p_non_labor_disc_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11212: THEN
11213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11214: THEN
11215: pa_interface_utils_pub.map_new_amg_msg
11216: ( p_old_message_code => 'PA_NL_DISC_REASON_CODE'
11217: ,p_msg_attribute => 'CHANGE'
11230: THEN
11231: IF (p_non_labor_disc_reason_code IS NULL
11232: OR p_non_labor_disc_reason_code = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR)
11233: THEN
11234: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11235: THEN
11236: pa_interface_utils_pub.map_new_amg_msg
11237: ( p_old_message_code => 'PA_NL_DISC_CODE_NOT_NULL'
11238: ,p_msg_attribute => 'CHANGE'
11249: OPEN get_nl_disc_reason_code_csr(p_non_labor_disc_reason_code);
11250: FETCH get_nl_disc_reason_code_csr INTO l_temp_dummy;
11251: IF get_nl_disc_reason_code_csr%NOTFOUND THEN
11252: CLOSE get_nl_disc_reason_code_csr;
11253: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11254: THEN
11255: pa_interface_utils_pub.map_new_amg_msg
11256: ( p_old_message_code => 'PA_INVALID_NLDISC_RN_CODE'
11257: ,p_msg_attribute => 'CHANGE'
11277: and the schedule_type is being changed from 'B' to 'I'
11278: */
11279:
11280: IF p_rev_ind_rate_sch_id IS NULL THEN
11281: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11282: THEN
11283: pa_interface_utils_pub.map_new_amg_msg
11284: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
11285: ,p_msg_attribute => 'CHANGE'
11293: END IF;
11294: RAISE FND_API.G_EXC_ERROR;
11295: ELSIF p_rev_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11296: IF p_nl_db_sch_type = 'B' THEN
11297: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11298: THEN
11299: pa_interface_utils_pub.map_new_amg_msg
11300: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
11301: ,p_msg_attribute => 'CHANGE'
11324: OPEN l_rev_rate_schedule_type_csr(p_rev_ind_rate_sch_id);
11325: FETCH l_rev_rate_schedule_type_csr INTO l_rev_rate_schedule_type;
11326: IF l_rev_rate_schedule_type_csr%NOTFOUND THEN
11327: CLOSE l_rev_rate_schedule_type_csr;
11328: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11329: THEN
11330: pa_interface_utils_pub.map_new_amg_msg
11331: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
11332: ,p_msg_attribute => 'CHANGE'
11345: THEN
11346: IF p_rev_ind_sch_fixed_date IS NOT NULL
11347: AND p_rev_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11348: THEN
11349: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11350: THEN
11351: pa_interface_utils_pub.map_new_amg_msg
11352: ( p_old_message_code => 'PA_CNT_FIX_REV_DTE_PROV'
11353: ,p_msg_attribute => 'CHANGE'
11373: and the schedule_type is being changed from 'B' to 'I'
11374: */
11375:
11376: IF p_inv_ind_rate_sch_id IS NULL THEN
11377: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11378: THEN
11379: pa_interface_utils_pub.map_new_amg_msg
11380: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11381: ,p_msg_attribute => 'CHANGE'
11389: END IF;
11390: RAISE FND_API.G_EXC_ERROR;
11391: ELSIF p_inv_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11392: IF p_nl_db_sch_type = 'B' THEN
11393: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11394: THEN
11395: pa_interface_utils_pub.map_new_amg_msg
11396: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11397: ,p_msg_attribute => 'CHANGE'
11421: OPEN l_inv_rate_schedule_type_csr(p_inv_ind_rate_sch_id);
11422: FETCH l_inv_rate_schedule_type_csr INTO l_inv_rate_schedule_type;
11423: IF l_inv_rate_schedule_type_csr%NOTFOUND THEN
11424: CLOSE l_inv_rate_schedule_type_csr;
11425: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11426: THEN
11427: pa_interface_utils_pub.map_new_amg_msg
11428: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
11429: ,p_msg_attribute => 'CHANGE'
11442: THEN
11443: IF p_inv_ind_sch_fixed_date IS NOT NULL
11444: AND p_inv_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11445: THEN
11446: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11447: THEN
11448: pa_interface_utils_pub.map_new_amg_msg
11449: ( p_old_message_code => 'PA_CNT_FIX_INV_DTE_PROV'
11450: ,p_msg_attribute => 'CHANGE'
11479: IF l_emp_rate_sch_id_csr%NOTFOUND
11480: THEN
11481: CLOSE l_emp_rate_sch_id_csr;
11482:
11483: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11484: THEN
11485: pa_interface_utils_pub.map_new_amg_msg
11486: ( p_old_message_code => 'PA_INVALID_EMP_SCH_ID'
11487: ,p_msg_attribute => 'CHANGE'
11508:
11509: IF pa_install.is_prm_licensed='Y' THEN
11510: IF p_job_bill_rate_schedule_id IS NULL
11511: THEN
11512: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11513: THEN
11514: pa_interface_utils_pub.map_new_amg_msg
11515: ( p_old_message_code => 'PA_JOB_SCH_ID_NOT_NULL'
11516: ,p_msg_attribute => 'CHANGE'
11525: RAISE FND_API.G_EXC_ERROR;
11526: ELSIF p_job_bill_rate_schedule_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
11527: THEN
11528: IF p_lab_db_sch_type = 'I' THEN
11529: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11530: THEN
11531: pa_interface_utils_pub.map_new_amg_msg
11532: ( p_old_message_code => 'PA_JOB_SCH_ID_NOT_NULL'
11533: ,p_msg_attribute => 'CHANGE'
11556: FETCH l_job_rate_sch_id_csr INTO l_temp_dummy;
11557: IF l_job_rate_sch_id_csr%NOTFOUND
11558: THEN
11559: CLOSE l_job_rate_sch_id_csr;
11560: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11561: THEN
11562: pa_interface_utils_pub.map_new_amg_msg
11563: ( p_old_message_code => 'PA_INVALID_JOB_SCH_ID'
11564: ,p_msg_attribute => 'CHANGE'
11593: THEN
11594: IF p_labor_disc_reason_code IS NOT NULL
11595: AND p_labor_disc_reason_code<> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11596: THEN
11597: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11598: THEN
11599: pa_interface_utils_pub.map_new_amg_msg
11600: ( p_old_message_code => 'PA_LAB_DISC_REASON_CODE'
11601: ,p_msg_attribute => 'CHANGE'
11614: THEN
11615: IF p_labor_disc_reason_code IS NULL
11616: OR p_labor_disc_reason_code= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
11617: THEN
11618: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11619: THEN
11620: pa_interface_utils_pub.map_new_amg_msg
11621: ( p_old_message_code => 'PA_LAB_DISC_CODE_NOT_NULL'
11622: ,p_msg_attribute => 'CHANGE'
11633: OPEN get_lab_disc_reason_code_csr(p_labor_disc_reason_code);
11634: FETCH get_lab_disc_reason_code_csr INTO l_temp_dummy;
11635: IF get_lab_disc_reason_code_csr%NOTFOUND THEN
11636: CLOSE get_lab_disc_reason_code_csr;
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_INVALID_LDISC_RN_CODE'
11641: ,p_msg_attribute => 'CHANGE'
11664: and the schedule_type is being changed from 'B' to 'I'
11665: */
11666:
11667: IF p_rev_ind_rate_sch_id IS NULL THEN
11668: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11669: THEN
11670: pa_interface_utils_pub.map_new_amg_msg
11671: ( p_old_message_code => 'PA_REV_SCH_ID_NOT_NULL'
11672: ,p_msg_attribute => 'CHANGE'
11680: END IF;
11681: RAISE FND_API.G_EXC_ERROR;
11682: ELSIF p_rev_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11683: IF p_lab_db_sch_type = 'B' THEN
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_REV_SCH_ID_NOT_NULL'
11688: ,p_msg_attribute => 'CHANGE'
11712: OPEN l_rev_rate_schedule_type_csr(p_rev_ind_rate_sch_id);
11713: FETCH l_rev_rate_schedule_type_csr INTO l_rev_rate_schedule_type;
11714: IF l_rev_rate_schedule_type_csr%NOTFOUND THEN
11715: CLOSE l_rev_rate_schedule_type_csr;
11716: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11717: THEN
11718: pa_interface_utils_pub.map_new_amg_msg
11719: ( p_old_message_code => 'PA_INVALID_REV_SCH_ID'
11720: ,p_msg_attribute => 'CHANGE'
11732: THEN
11733: IF p_rev_ind_sch_fixed_date IS NOT NULL
11734: AND p_rev_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11735: THEN
11736: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11737: THEN
11738: pa_interface_utils_pub.map_new_amg_msg
11739: ( p_old_message_code => 'PA_CNT_FIX_REV_DTE_PROV'
11740: ,p_msg_attribute => 'CHANGE'
11760: and the schedule_type is being changed from 'B'(bill) to 'I'(burden)
11761: */
11762:
11763: IF p_inv_ind_rate_sch_id IS NULL THEN
11764: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11765: THEN
11766: pa_interface_utils_pub.map_new_amg_msg
11767: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11768: ,p_msg_attribute => 'CHANGE'
11776: END IF;
11777: RAISE FND_API.G_EXC_ERROR;
11778: ELSIF p_inv_ind_rate_sch_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
11779: IF p_lab_db_sch_type = 'B' THEN
11780: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11781: THEN
11782: pa_interface_utils_pub.map_new_amg_msg
11783: ( p_old_message_code => 'PA_INV_SCH_ID_NOT_NULL'
11784: ,p_msg_attribute => 'CHANGE'
11808: OPEN l_inv_rate_schedule_type_csr(p_inv_ind_rate_sch_id);
11809: FETCH l_inv_rate_schedule_type_csr INTO l_inv_rate_schedule_type;
11810: IF l_inv_rate_schedule_type_csr%NOTFOUND THEN
11811: CLOSE l_inv_rate_schedule_type_csr;
11812: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11813: THEN
11814: pa_interface_utils_pub.map_new_amg_msg
11815: ( p_old_message_code => 'PA_INVALID_INV_SCH_ID'
11816: ,p_msg_attribute => 'CHANGE'
11828: THEN
11829: IF p_inv_ind_sch_fixed_date IS NOT NULL
11830: AND p_inv_ind_sch_fixed_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
11831: THEN
11832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
11833: THEN
11834: pa_interface_utils_pub.map_new_amg_msg
11835: ( p_old_message_code => 'PA_CNT_FIX_INV_DTE_PROV'
11836: ,p_msg_attribute => 'CHANGE'
11876:
11877: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11878:
11879:
11880: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11881: THEN
11882: FND_MSG_PUB.add_exc_msg
11883: ( p_pkg_name => G_PKG_NAME
11884: , p_procedure_name => l_api_name );
11878:
11879:
11880: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11881: THEN
11882: FND_MSG_PUB.add_exc_msg
11883: ( p_pkg_name => G_PKG_NAME
11884: , p_procedure_name => l_api_name );
11885:
11886: END IF;
12024: x_return_status = FND_API.G_RET_STS_SUCCESS THEN
12025: x_return_status := FND_API.G_RET_STS_ERROR;
12026: END IF;
12027:
12028: l_msg_count := FND_MSG_PUB.count_msg;
12029:
12030: IF l_msg_count = 1 AND x_msg_data IS NULL THEN
12031: PA_INTERFACE_UTILS_PUB.get_messages
12032: (p_encoded => FND_API.G_TRUE,
12049: WHEN OTHERS THEN
12050: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12051: x_msg_count := 1;
12052: x_msg_data := SQLERRM;
12053: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_PVT'
12054: ,p_procedure_name => 'VALIDATE_DATA'
12055: ,p_error_text => sqlerrm);
12056:
12057: IF l_debug_mode = 'Y' THEN