[Home] [Help]
1604: FOR i IN p_name_tbl.FIRST..p_name_tbl.LAST LOOP
1605: FOR j in p_name_tbl.FIRST..p_name_tbl.LAST LOOP
1606: IF ((nvl(p_name_tbl(i),'X') = nvl(p_name_tbl(j),'Y')) AND
1607: i <> j) THEN
1608: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_ALL_DUPLICATE_NAME') ;
1609: PA_UTILS.ADD_MESSAGE
1610: (p_app_short_name => 'PA',
1611: p_msg_name => 'PA_ACTION_NAME_ERR',
1612: p_token1 => 'ACTION_NAME',
1719: -- Please see point 1. in comments to know what validation ?
1720: IF (nvl(p_completed_flag_tbl(i),'N') = 'Y' AND
1721: p_completion_date_tbl(i) IS NULL )
1722: THEN
1723: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DLVR_COMPLT_DATE_MISSING') ;
1724: PA_UTILS.ADD_MESSAGE
1725: (p_app_short_name => 'PA',
1726: p_msg_name => 'PA_ACTION_NAME_ERR',
1727: p_token1 => 'ACTION_NAME',
1735: -- Validation 1
1736: IF (p_completion_date_tbl(i) IS NOT NULL AND
1737: (nvl(p_completed_flag_tbl(i),'N') = 'N'))
1738: THEN
1739: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_COMPLETION_FLAG_MUST_ERR') ;
1740: PA_UTILS.ADD_MESSAGE
1741: (p_app_short_name => 'PA',
1742: p_msg_name => 'PA_ACTION_NAME_ERR',
1743: p_token1 => 'ACTION_NAME',
1760: l_bill_event_processed := nvl(PA_BILLING_WRKBNCH_EVENTS.CHECK_DELV_EVENT_PROCESSED(p_project_id,p_object_version_id,p_element_version_id_tbl(i) ),'N') ; -- Passing Actions' version Id also (Included By avaithia for Bug 3512346 )
1761:
1762: -- Validation 2.1
1763: IF p_description_tbl(i) IS NULL THEN
1764: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DESCRIPTION_NULL_ERR') ;
1765: PA_UTILS.ADD_MESSAGE
1766: (p_app_short_name => 'PA',
1767: p_msg_name => 'PA_ACTION_NAME_ERR',
1768: p_token1 => 'ACTION_NAME',
1773: END IF ;
1774:
1775: -- Validation 2.2 Commented by avaithia (1-Apr-04) Bug 3512346
1776: -- IF p_due_date_tbl(i) IS NULL THEN
1777: -- l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DUE_DATE_NULL_ERR') ;
1778: -- PA_UTILS.ADD_MESSAGE
1779: -- (p_app_short_name => 'PA',
1780: -- p_msg_name => 'PA_ACTION_NAME_ERR',
1781: -- p_token1 => 'ACTION_NAME',
1792: IF (l_item_billable = 'N'
1793: AND nvl(p_completed_flag_tbl(i),'N') = 'Y'
1794: AND l_item_defined = 'Y') -- This check has been included by avaithia Bug 3496957
1795: THEN
1796: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_BILL_ITEM_NOT_BILLABLE_ERR') ;/*Corrected by avaithia*/
1797: PA_UTILS.ADD_MESSAGE
1798: (p_app_short_name => 'PA',
1799: p_msg_name => 'PA_ACTION_NAME_ERR',
1800: p_token1 => 'ACTION_NAME',
1808: IF l_is_dlv_itembased ='Y' THEN
1809: IF (l_item_defined = 'N'
1810: AND nvl(p_completed_flag_tbl(i),'N') = 'Y' )
1811: THEN
1812: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_BILL_NO_ITEM_ERR') ;
1813: PA_UTILS.ADD_MESSAGE
1814: (p_app_short_name => 'PA',
1815: p_msg_name => 'PA_ACTION_NAME_ERR',
1816: p_token1 => 'ACTION_NAME',
1824:
1825: IF (((nvl(trunc(p_completion_date_tbl(i)),to_date(null))<> trunc(l_completed_date))
1826: AND l_bill_event_processed = 'Y' ))
1827: THEN
1828: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_BILL_COMP_DATE_ERR') ;
1829: PA_UTILS.ADD_MESSAGE
1830: (p_app_short_name => 'PA',
1831: p_msg_name => 'PA_ACTION_NAME_ERR',
1832: p_token1 => 'ACTION_NAME',
1843: -- Validation 2.5
1844: IF(l_bill_event_processed = 'Y' AND (nvl(p_completed_flag_tbl(i),'N') = 'N'
1845: AND nvl(l_completed_flag,'N') = 'Y'))
1846: THEN
1847: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_BILL_COMP_FLAG_ERR') ;
1848: PA_UTILS.ADD_MESSAGE
1849: (p_app_short_name => 'PA',
1850: p_msg_name => 'PA_ACTION_NAME_ERR',
1851: p_token1 => 'ACTION_NAME',
1860: ELSIF (p_function_code_tbl(i) = g_shipping) THEN
1861:
1862: -- 4227845 Added dlvr action due date not null check and populating error message
1863: IF p_due_date_tbl(i) IS NULL THEN
1864: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DUE_DATE_ERR') ;
1865: PA_UTILS.ADD_MESSAGE
1866: (p_app_short_name => 'PA',
1867: p_msg_name => 'PA_ACTION_NAME_ERR',
1868: p_token1 => 'ACTION_NAME',
1883: -- Validation 3.1
1884: IF ( l_shipping_initiated = 'N'
1885: AND nvl(p_completed_flag_tbl(i),'N') = 'Y' )
1886: THEN
1887: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_PROC_COMP_ERR_Y') ;
1888: PA_UTILS.ADD_MESSAGE
1889: (p_app_short_name => 'PA',
1890: p_msg_name => 'PA_ACTION_NAME_ERR',
1891: p_token1 => 'ACTION_NAME',
1903: -- IF ((nvl(p_completed_flag_tbl(i),'N') = 'N'
1904: -- AND l_completed_flag = 'Y')
1905: -- AND l_shipping_initiated = 'Y')
1906: -- THEN
1907: -- l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_PROC_COMP_ERR_N') ;
1908: -- PA_UTILS.ADD_MESSAGE
1909: -- (p_app_short_name => 'PA',
1910: -- p_msg_name => 'PA_ACTION_NAME_ERR',
1911: -- p_token1 => 'ACTION_NAME',
1918: -- Validation 3.3
1919: IF ((trunc(p_due_date_tbl(i)) <> trunc(l_due_date )) AND
1920: l_ready_to_ship = 'Y' )
1921: THEN
1922: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_DUE_DATE_UPDATE_ERR') ;
1923: PA_UTILS.ADD_MESSAGE
1924: (p_app_short_name => 'PA',
1925: p_msg_name => 'PA_ACTION_NAME_ERR',
1926: p_token1 => 'ACTION_NAME',
1935: ELSIF (p_function_code_tbl(i) = g_procurement ) THEN
1936:
1937: -- 4227845 Added dlvr action due date not null check and populating error message
1938: IF p_due_date_tbl(i) IS NULL THEN
1939: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DUE_DATE_ERR') ;
1940: PA_UTILS.ADD_MESSAGE
1941: (p_app_short_name => 'PA',
1942: p_msg_name => 'PA_ACTION_NAME_ERR',
1943: p_token1 => 'ACTION_NAME',
1958: -- Validation 4.1
1959: IF (l_proc_initiated = 'N' AND
1960: nvl(p_completed_flag_tbl(i),'N') = 'Y' )
1961: THEN
1962: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_PROC_COMP_ERR_Y') ;
1963: PA_UTILS.ADD_MESSAGE
1964: (p_app_short_name => 'PA',
1965: p_msg_name => 'PA_ACTION_NAME_ERR',
1966: p_token1 => 'ACTION_NAME',
1977: -- IF (( nvl(p_completed_flag_tbl(i),'N') = 'N'
1978: -- AND l_completed_flag = 'Y')
1979: -- AND l_proc_initiated = 'Y' )
1980: -- THEN
1981: -- l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_PROC_COMP_ERR_N') ;
1982: -- PA_UTILS.ADD_MESSAGE
1983: -- (p_app_short_name => 'PA',
1984: -- p_msg_name => 'PA_ACTION_NAME_ERR',
1985: -- p_token1 => 'ACTION_NAME',
1994: -- Validation 4.3
1995: IF ((trunc(p_due_date_tbl(i)) <> trunc(l_due_date)) AND
1996: l_ready_to_proc = 'Y' )
1997: THEN
1998: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_PROC_DUE_DATE_UPDATE_ERR') ;
1999: PA_UTILS.ADD_MESSAGE
2000: (p_app_short_name => 'PA',
2001: p_msg_name => 'PA_ACTION_NAME_ERR',
2002: p_token1 => 'ACTION_NAME',
2067: IF ( (nvl(p_name_tbl(i),'X') = nvl(l_name_tbl(k),'Y')) AND
2068: p_proj_element_id_tbl(i) <> l_proj_element_id_tbl(k) ) THEN
2069:
2070: x_return_status := FND_API.G_RET_STS_ERROR ;
2071: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_ALL_DUPLICATE_NAME') ;
2072: PA_UTILS.ADD_MESSAGE
2073: (p_app_short_name => 'PA',
2074: p_msg_name => 'PA_ACTION_NAME_ERR',
2075: p_token1 => 'ACTION_NAME',
2131:
2132: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2134: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2135: l_err_message := FND_MESSAGE.GET_STRING('PA','ACTION_CARRYING_ORG_INVALID') ;
2136: PA_UTILS.ADD_MESSAGE
2137: (p_app_short_name => 'PA',
2138: p_msg_name => 'PA_ACTN_VALID_ERR',
2139: p_token1 => 'PROJECT',
2183:
2184: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2186: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2187: l_err_message := FND_MESSAGE.GET_STRING('PA','ACTION_OWNER_INVALID') ;
2188: PA_UTILS.ADD_MESSAGE
2189: (p_app_short_name => 'PA',
2190: p_msg_name => 'PA_ACTION_VALID_ERR',
2191: p_token1 => 'PROJECT',
2215: Pa_Debug.WRITE(g_module_name,'function code '||l_Function_code||'] validity ['||l_function_code_valid||']' , l_debug_level3);
2216: END IF;
2217:
2218: IF l_function_code_valid IS NULL OR l_function_code_valid = 'N' THEN
2219: l_err_message := FND_MESSAGE.GET_STRING('PA','ACTION_FUNC_CODE_INVALID') ;
2220: PA_UTILS.ADD_MESSAGE
2221: (p_app_short_name => 'PA',
2222: p_msg_name => 'PA_ACTION_VALID_ERR',
2223: p_token1 => 'PROJECT',
2241: IF ( ((p_function_code_tbl(i_act) = 'SHIPPING' AND p_function_code_tbl(j_act) = 'SHIPPING')
2242: OR (p_function_code_tbl(i_act) = 'PROCUREMENT' AND p_function_code_tbl(j_act) = 'PROCUREMENT'))
2243: AND i_act <> j_act ) THEN
2244: x_return_status := FND_API.G_RET_STS_ERROR;
2245: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DLV_TOO_MANY_ACTIONS');
2246: PA_UTILS.ADD_MESSAGE
2247: (p_app_short_name => 'PA',
2248: p_msg_name => 'PA_ACTION_VALID_ERR',
2249: p_token1 => 'PROJECT',
2267: OR (p_function_code_tbl(i_act) = 'PROCUREMENT' AND l_function_code_tbl(k_act) = 'PROCUREMENT'))
2268: AND p_proj_element_id_tbl(i_act) <> l_proj_element_id_tbl(k_act) ) THEN
2269:
2270: x_return_status := FND_API.G_RET_STS_ERROR;
2271: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DLV_TOO_MANY_ACTIONS') ;
2272: PA_UTILS.ADD_MESSAGE
2273: (p_app_short_name => 'PA',
2274: p_msg_name => 'PA_ACTION_VALID_ERR',
2275: p_token1 => 'PROJECT',
3285:
3286: IF (l_dlvr_action_enabled <> 'Y') THEN
3287:
3288: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3289: l_err_message := FND_MESSAGE.GET_STRING('PA','DLVR_ACTION_NOT_ENABLED') ;
3290: PA_UTILS.ADD_MESSAGE
3291: (p_app_short_name => 'PA',
3292: p_msg_name => 'PA_ACTION_VALID_ERR',
3293: p_token1 => 'PROJECT',
3323:
3324: IF p_action_in_tbl(i_actn).action_name IS NULL OR p_action_in_tbl(i_actn).action_name = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR THEN
3325:
3326: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3327: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_ACTION_NAME_NULL_ERROR') ;
3328: PA_UTILS.ADD_MESSAGE
3329: (p_app_short_name => 'PA',
3330: p_msg_name => 'PA_ACTION_VALID_ERR',
3331: p_token1 => 'PROJECT',
3576: Fetch is_lowest_task INTO l_fin_task_num_tbl(i_actn);
3577:
3578: IF is_lowest_task%NOTFOUND THEN
3579: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3580: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DLVR_INVALID_LOW_FIN_TASK') ;
3581: PA_UTILS.ADD_MESSAGE
3582: (p_app_short_name => 'PA',
3583: p_msg_name => 'PA_ACTION_VALID_ERR',
3584: p_token1 => 'PROJECT',
3609: Fetch is_top_task INTO l_fin_task_num_tbl(i_actn);
3610:
3611: IF is_top_task%NOTFOUND THEN
3612: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3613: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_DLVR_INVALID_TOP_FIN_TASK') ;
3614: PA_UTILS.ADD_MESSAGE
3615: (p_app_short_name => 'PA',
3616: p_msg_name => 'PA_ACTION_VALID_ERR',
3617: p_token1 => 'PROJECT',
4023: ELSE
4024: OPEN C_org_name(p_action_in_tbl(i_actn).organization_id);
4025: FETCH C_org_name INTO l_organization_name;
4026: IF (C_org_name%rowcount = 0 ) THEN
4027: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_EVNT_ORG_AMG') ; -- 3810957, changed error msg code
4028: PA_UTILS.ADD_MESSAGE
4029: (p_app_short_name => 'PA',
4030: p_msg_name => 'PA_ACTN_VALID_ERR',
4031: p_token1 => 'PROJECT',