The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT birth_date
FROM IGS_PE_PERSON_BASE_V
WHERE person_id = cp_person_id ;
SELECT 'X'
FROM hz_citizenship
WHERE party_id = cp_party_id
AND cp_country_cd = country_code
AND (cp_citzn_id <> citizenship_id OR cp_citzn_id IS NULL)
AND (cp_start_date between date_recognized AND NVL(end_date,l_default_date)
OR cp_end_date between date_recognized AND NVL(end_date,l_default_date)
OR (cp_start_date <= date_recognized
AND NVL(cp_end_date,l_default_date) >= NVL(end_date,l_default_date)) );
P_birth_or_selected IN VARCHAR2,
P_country_code IN Varchar2,
p_date_disowned IN Date,
p_date_recognized IN DATE,
p_DOCUMENT_REFERENCE IN VARCHAR2,
p_DOCUMENT_TYPE IN VARCHAR2,
p_PARTY_ID IN NUMBER,
p_END_DATE IN DATE,
p_TERRITORY_SHORT_NAME IN VARCHAR2,
p_last_update_date IN OUT NOCOPY DATE,
P_citizenship_id IN OUT NOCOPY NUMBER,
p_return_status OUT NOCOPY VARCHAR2 ,
p_msg_count OUT NOCOPY VARCHAR2 ,
p_msg_data OUT NOCOPY VARCHAR2,
p_object_version_number IN OUT NOCOPY NUMBER,
p_Calling_From IN VARCHAR2
) AS
lv_init_msg_list VARCHAR2(1) := FND_API.G_FALSE;
lv_last_update_date DATE := p_last_update_date;
IF p_action='INSERT' THEN
lv_citizenship_rec_type.birth_or_selected := p_birth_or_selected;
ELSIF p_action = 'UPDATE' THEN
lv_citizenship_rec_type.birth_or_selected := NVL(p_birth_or_selected,FND_API.G_MISS_CHAR);
HZ_PERSON_INFO_V2PUB.update_citizenship(
p_init_msg_list => lv_init_msg_list,
p_citizenship_rec => lv_citizenship_rec_type,
x_return_status => p_return_status,
x_msg_count => p_msg_count,
x_msg_data => p_msg_data,
p_object_version_number => p_object_version_number
);