[Home] [Help]
546: return;
547: end if;
548: else
549: -- ci number may not be NULL in non CI_DRAFT status
550: l_ci_system_status := PA_CONTROL_ITEMS_UTILS.getSystemStatus(l_status_code);
551: if l_ci_system_status is NULL then
552: PA_UTILS.Add_Message( p_app_short_name => 'PA'
553: ,p_msg_name => 'PA_CI_NO_STATUS');
554: x_return_status := FND_API.G_RET_STS_ERROR;
998:
999: ---- check that impacts of source ci_id_from should be less than or equalto the
1000: ---- impacts of the destination ci_type_id. (i.e. new ci)
1001: if (x_return_status = 'S' and p_include = 'Y') then
1002: if (pa_control_items_utils.IsImpactOkToInclude(p_ci_type_id, null, p_ci_id_from) <> 'Y') then
1003: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1004: ,p_msg_name => 'PA_CI_NO_IMP_INCLUDE');
1005: x_return_status := FND_API.G_RET_STS_ERROR;
1006: end if;
1048:
1049: ,p_ci_type_id => p_ci_type_id
1050: ,p_summary => copy_from_row.summary
1051:
1052: -- ,p_status_code => pa_control_items_utils.get_initial_ci_status(p_ci_type_id)
1053:
1054: -- set the initial status to Draft. When numbers are assigned manually, there is no way
1055: -- to enter the number when an item is copied. The Number (ci_number) is a required field
1056: -- when a control item is is any status other than "Draft".
1062: ,p_progress_as_of_date => SYSDATE
1063: ,p_classification_code => l_class_code
1064: ,p_reason_code => l_reason
1065: ,p_project_id => p_project_id
1066: ,p_last_modified_by_id => PA_CONTROL_ITEMS_UTILS.GetPartyId(fnd_global.user_id )
1067: ,p_object_type => copy_from_row.object_type
1068: ,p_object_id => copy_from_row.object_id
1069: ,p_ci_number => NULL
1070: ,p_date_required => to_date(NULL)
1342: INTO l_record_version_number
1343: FROM PA_CONTROL_ITEMS
1344: WHERE ci_id = p_to_ci_id;
1345:
1346: PA_CONTROL_ITEMS_UTILS.ChangeCIStatus (
1347: p_init_msg_list => FND_API.G_TRUE
1348: ,p_validate_only => FND_API.G_FALSE
1349: ,p_ci_id => p_to_ci_id
1350: ,p_status => 'CI_CLOSED'
1633: l_closed_date := cp.date_closed;
1634: l_ci_number_char := cp.ci_number;
1635: l_project_id := cp.project_id;
1636:
1637: l_new_system_status_code := PA_CONTROL_ITEMS_UTILS.getSystemStatus(p_status_code);
1638: l_curr_system_status_code := PA_CONTROL_ITEMS_UTILS.getCISystemStatus(p_ci_id);
1639:
1640: --Bug 4618856 Changes start here
1641:
1634: l_ci_number_char := cp.ci_number;
1635: l_project_id := cp.project_id;
1636:
1637: l_new_system_status_code := PA_CONTROL_ITEMS_UTILS.getSystemStatus(p_status_code);
1638: l_curr_system_status_code := PA_CONTROL_ITEMS_UTILS.getCISystemStatus(p_ci_id);
1639:
1640: --Bug 4618856 Changes start here
1641:
1642: if l_new_system_status_code is not NULL and l_new_system_status_code = 'CI_WORKING' then
1710: -- x_return_status := 'E';
1711: -- PA_DEBUG.Reset_Err_Stack;
1712: -- return;
1713: -- END IF;
1714: l_closed_by := PA_CONTROL_ITEMS_UTILS.GetPartyId(fnd_global.user_id );
1715: l_closed_date := sysdate;
1716: end if;
1717: end if;
1718:
1728: ,cp.classification_code_id
1729: ,cp.reason_code_id
1730: ,p_record_version_number
1731: ,cp.project_id
1732: ,PA_CONTROL_ITEMS_UTILS.GetPartyId(fnd_global.user_id ) --cp.last_modified_by_id
1733: ,cp.object_type
1734: ,cp.object_id
1735: ,l_ci_number_char --cp.ci_number
1736: ,cp.date_required
1958:
1959: x_return_status := FND_API.G_RET_STS_SUCCESS;
1960:
1961: FOR cur in items_c LOOP
1962: PA_CONTROL_ITEMS_UTILS.ChangeCIStatus (
1963: p_init_msg_list => FND_API.G_TRUE
1964: ,p_validate_only => FND_API.G_FALSE
1965: ,p_ci_id => cur.included_ci_id
1966: ,p_status => 'CI_APPROVED'