62: open csr_ret_rights;
63: fetch csr_ret_rights into l_dummy;
64: if csr_ret_rights%found then
65: close csr_ret_rights;
66: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RES_EXISTS');
67: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
68: fnd_message.raise_error;
69: end if;
70: close csr_ret_rights;
63: fetch csr_ret_rights into l_dummy;
64: if csr_ret_rights%found then
65: close csr_ret_rights;
66: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RES_EXISTS');
67: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
68: fnd_message.raise_error;
69: end if;
70: close csr_ret_rights;
71:
64: if csr_ret_rights%found then
65: close csr_ret_rights;
66: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RES_EXISTS');
67: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
68: fnd_message.raise_error;
69: end if;
70: close csr_ret_rights;
71:
72: -- Next get the result data as identified by cagr_entitlement_result_id
76: open csr_results;
77: fetch csr_results into l_result;
78: if csr_results%notfound then
79: close csr_results;
80: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RESULT_ID');
81: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
82: fnd_message.raise_error;
83: end if;
84: close csr_results;
77: fetch csr_results into l_result;
78: if csr_results%notfound then
79: close csr_results;
80: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RESULT_ID');
81: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
82: fnd_message.raise_error;
83: end if;
84: close csr_results;
85:
78: if csr_results%notfound then
79: close csr_results;
80: fnd_message.set_name(800, 'PER_XXXXX_INV_CAGR_RESULT_ID');
81: fnd_message.set_token('CAGR_ENTITLEMENT_RESULT_ID', p_cagr_entitlement_result_id);
82: fnd_message.raise_error;
83: end if;
84: close csr_results;
85:
86: