242:
243: if l_party_id is not null then
244: l_temp := null;
245: -- check if the org already exists as a customer org on the project
246: l_temp := PA_PROJECT_PARTIES_UTILS.get_customer_project_party_id
247: ( p_project_id => p_project_id
248: ,p_customer_id => p_customer_id);
249:
250: if l_temp is null then
248: ,p_customer_id => p_customer_id);
249:
250: if l_temp is null then
251:
252: PA_PROJECT_PARTIES_PUB.CREATE_PROJECT_PARTY(
253: p_validate_only => FND_API.G_FALSE
254: , p_object_id => p_project_id
255: , p_OBJECT_TYPE => 'PA_PROJECTS'
256: , p_project_role_id => 100
714:
715: /*
716: CURSOR c_ext_people_exists(c_project_party_id NUMBER) IS
717: SELECT pp.project_party_id project_party_id
718: FROM pa_project_parties po,
719: pa_project_parties pp,
720: hz_party_relationships hzr
721: WHERE po.resource_type_id = 112
722: AND po.project_party_id = c_project_party_id
715: /*
716: CURSOR c_ext_people_exists(c_project_party_id NUMBER) IS
717: SELECT pp.project_party_id project_party_id
718: FROM pa_project_parties po,
719: pa_project_parties pp,
720: hz_party_relationships hzr
721: WHERE po.resource_type_id = 112
722: AND po.project_party_id = c_project_party_id
723: AND pp.resource_type_id = 112
729: */
730:
731: CURSOR c_ext_people_exists(c_project_party_id NUMBER) IS
732: SELECT pp.project_party_id project_party_id
733: FROM pa_project_parties po,
734: pa_project_parties pp,
735: hz_relationships hzr
736: WHERE po.resource_type_id = 112
737: AND po.project_party_id = c_project_party_id
730:
731: CURSOR c_ext_people_exists(c_project_party_id NUMBER) IS
732: SELECT pp.project_party_id project_party_id
733: FROM pa_project_parties po,
734: pa_project_parties pp,
735: hz_relationships hzr
736: WHERE po.resource_type_id = 112
737: AND po.project_party_id = c_project_party_id
738: AND pp.resource_type_id = 112
895: end if;
896: raise FND_API.G_EXC_ERROR;
897: end if;
898:
899: /* Bug 3101990 - We are deleting the Customer Org role record in pa_project_parties if calling module is FORM,
900: and if there are no references for this project party record */
901:
902: IF p_calling_module = 'FORM' THEN
903:
911: IF (c_ext_people_exists%NOTFOUND) THEN
912: OPEN c_billing_accnt_exists(l_project_party_id);
913: FETCH c_billing_accnt_exists INTO l_billing_accnt_exists;
914: IF (c_billing_accnt_exists%NOTFOUND) THEN
915: pa_project_parties_pkg.delete_row(x_project_id => p_project_id,
916: x_project_party_id => l_project_party_id,
917: x_record_version_number => null);
918:
919: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN