[Home] [Help]
674: --Added by Lakshmi for 12.1.2 project,Added another 'AND' condition ,
675: --To throw an error is a primary contact is endated and Profile 'CS_SR_CONTACT_MANDATORY' is set to Yes.
676: IF p_new_contact_rec.primary_flag = 'Y' AND
677: p_new_contact_rec.end_date_active IS NOT NULL AND
678: FND_PROFILE.value('CS_SR_CONTACT_MANDATORY') = 'Y'
679: THEN
680: FND_MESSAGE.set_name('CS','CS_SR_PRIMARY_END_DATED');
681: FND_MESSAGE.set_token('API_NAME','cs_srcontact_pkg.validate_contact');
682: FND_MSG_PUB.add_detail(p_associated_column1=>'CS_HZ_SR_CONTACT_POINTS.PRIMARY_FLAG');
948: l_activity_code VARCHAR2(1);
949: l_sr_contact_point_id NUMBER;
950: l_sysdate DATE;
951: l_add_audit VARCHAR2(1);
952: l_audit_enabled fnd_profile_option_values.profile_option_value % TYPE;
953: --
954: BEGIN
955: --siahmed added to disable auditing if invocation_mode is set to replay
956: --before there was no if condition it was just the following commented line
953: --
954: BEGIN
955: --siahmed added to disable auditing if invocation_mode is set to replay
956: --before there was no if condition it was just the following commented line
957: --l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
958: IF (p_invocation_mode = 'REPLAY' ) THEN
959: l_audit_enabled := 'N';
960: ELSE
961: l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
957: --l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
958: IF (p_invocation_mode = 'REPLAY' ) THEN
959: l_audit_enabled := 'N';
960: ELSE
961: l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
962: END IF;
963: --end of change siahmed
964:
965: IF p_contact_tbl.COUNT = 0
1099: l_new_cp_rec CS_SERVICEREQUEST_PVT.contacts_rec;
1100: l_old_cp_rec CS_SERVICEREQUEST_PVT.contacts_rec;
1101: l_msg_count NUMBER;
1102: l_msg_data VARCHAR2(4000);
1103: l_audit_enabled fnd_profile_option_values.profile_option_value % TYPE;
1104: BEGIN
1105: l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
1106: UPDATE cs_hz_sr_contact_points
1107: SET primary_flag = 'N'
1101: l_msg_count NUMBER;
1102: l_msg_data VARCHAR2(4000);
1103: l_audit_enabled fnd_profile_option_values.profile_option_value % TYPE;
1104: BEGIN
1105: l_audit_enabled := FND_PROFILE.value('CS_SR_CONT_PNT_AUDIT_ENABLED');
1106: UPDATE cs_hz_sr_contact_points
1107: SET primary_flag = 'N'
1108: WHERE incident_id = p_incident_id
1109: AND primary_flag = 'Y'
1357: IF l_new_contact_tbl.count = 1 -- IF THERE ONLY ONE CONTACT
1358: THEN
1359: IF NVL(l_new_contact_tbl(1).party_role_code,'CONTACT') = 'CONTACT'
1360: AND l_new_contact_tbl(1).end_date_active IS NOT NULL
1361: AND FND_PROFILE.value('CS_SR_CONTACT_MANDATORY') = 'Y'
1362: THEN
1363: l_primary_contact_type := l_new_contact_tbl(1).CONTACT_TYPE;
1364: l_primary_contact_id := l_new_contact_tbl(1).PARTY_ID;
1365: l_prm_contact_mand := 'Y';
1378: END IF;
1379: END IF;
1380: END lOOP;
1381: IF l_counter = l_new_contact_tbl.count
1382: AND FND_PROFILE.value('CS_SR_CONTACT_MANDATORY') = 'Y'
1383: THEN
1384: l_inact_prm_contact := 'Y';
1385: ELSIF l_counter <> l_new_contact_tbl.count
1386: AND l_primary_contact_id <> 0