[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(1)
INTO l_count
FROM fnd_descr_flex_col_usage_vl
WHERE descriptive_flexfield_name = UPPER(trim(p_desc_name))
AND enabled_flag = 'Y'
AND display_flag = 'Y';
IF p_index_constraint_rec.last_update_date = pn_index_rent_utils.g_pn_miss_date
THEN
p_index_constraint_rec.last_update_date := NULL;
IF p_index_constraint_rec.last_updated_by = pn_index_rent_utils.g_pn_miss_num
THEN
p_index_constraint_rec.last_updated_by := NULL;
IF p_index_constraint_rec.last_update_login = pn_index_rent_utils.g_pn_miss_num
THEN
p_index_constraint_rec.last_update_login := NULL;
IF p_rent_index_rec.last_update_date = pn_index_rent_utils.g_pn_miss_date
THEN
p_rent_index_rec.last_update_date := NULL;
IF p_rent_index_rec.last_updated_by = pn_index_rent_utils.g_pn_miss_num
THEN
p_rent_index_rec.last_updated_by := NULL;
IF p_rent_index_rec.last_update_login = pn_index_rent_utils.g_pn_miss_num
THEN
p_rent_index_rec.last_update_login := NULL;
PROCEDURE update_index_rent_row (
p_rent_index_rec IN OUT NOCOPY rent_index_rec
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2)
IS
l_rowid VARCHAR2 (18) := NULL;
g_program_unit := 'UPDATE_INDENT_RENT_ROW';
|| ' Calling pn_index_leases_pkg.update_row'
, 3);
pn_index_leases_pkg.update_row
(x_rowid => l_rowid
, x_index_lease_id => p_rent_index_rec.index_lease_id
, x_lease_id => p_rent_index_rec.lease_id
, x_index_id => p_rent_index_rec.index_id
, x_commencement_date => p_rent_index_rec.commencement_date
, x_termination_date => p_rent_index_rec.termination_date
, x_index_lease_number => p_rent_index_rec.index_lease_number
, x_last_update_date => NVL (p_rent_index_rec.last_update_date, TRUNC(SYSDATE))
, x_last_updated_by => NVL (p_rent_index_rec.last_updated_by
, fnd_global.user_id)
, x_location_id => p_rent_index_rec.location_id
, x_term_template_id => p_rent_index_rec.term_template_id
, x_abstracted_by => p_rent_index_rec.abstracted_by
, x_assessment_date => p_rent_index_rec.assessment_date
, x_assessment_interval => p_rent_index_rec.assessment_interval
, x_spread_frequency => p_rent_index_rec.spread_frequency
, x_relationship_default => p_rent_index_rec.relationship_default
, x_basis_percent_default => p_rent_index_rec.basis_percent_default
, x_initial_basis => p_rent_index_rec.initial_basis
, x_base_index => p_rent_index_rec.base_index
, x_base_index_line_id => p_rent_index_rec.base_index_line_id
, x_index_finder_method => p_rent_index_rec.index_finder_method
, x_index_finder_months => p_rent_index_rec.index_finder_months
, x_negative_rent_type => p_rent_index_rec.negative_rent_type
, x_increase_on => p_rent_index_rec.increase_on
, x_basis_type => p_rent_index_rec.basis_type
, x_reference_period => p_rent_index_rec.reference_period
, x_base_year => p_rent_index_rec.base_year
, x_leased_area => p_rent_index_rec.leased_area
, x_rounding_flag => p_rent_index_rec.rounding_flag
, x_aggregation_flag => p_rent_index_rec.aggregation_flag
, x_gross_flag => NVL (p_rent_index_rec.gross_flag, 'N')
, x_last_update_login => NVL (p_rent_index_rec.last_update_login
, fnd_global.user_id)
, x_attribute_category => p_rent_index_rec.attribute_category
, x_attribute1 => p_rent_index_rec.attribute1
, x_attribute2 => p_rent_index_rec.attribute2
, x_attribute3 => p_rent_index_rec.attribute3
, x_attribute4 => p_rent_index_rec.attribute4
, x_attribute5 => p_rent_index_rec.attribute5
, x_attribute6 => p_rent_index_rec.attribute6
, x_attribute7 => p_rent_index_rec.attribute7
, x_attribute8 => p_rent_index_rec.attribute8
, x_attribute9 => p_rent_index_rec.attribute9
, x_attribute10 => p_rent_index_rec.attribute10
, x_attribute11 => p_rent_index_rec.attribute11
, x_attribute12 => p_rent_index_rec.attribute12
, x_attribute13 => p_rent_index_rec.attribute13
, x_attribute14 => p_rent_index_rec.attribute14
, x_attribute15 => p_rent_index_rec.attribute15
, x_agreement_category => p_rent_index_rec.agreement_category
, x_agreement_attribute1 => p_rent_index_rec.agreement_attribute1
, x_agreement_attribute2 => p_rent_index_rec.agreement_attribute2
, x_agreement_attribute3 => p_rent_index_rec.agreement_attribute3
, x_agreement_attribute4 => p_rent_index_rec.agreement_attribute4
, x_agreement_attribute5 => p_rent_index_rec.agreement_attribute5
, x_agreement_attribute6 => p_rent_index_rec.agreement_attribute6
, x_agreement_attribute7 => p_rent_index_rec.agreement_attribute7
, x_agreement_attribute8 => p_rent_index_rec.agreement_attribute8
, x_agreement_attribute9 => p_rent_index_rec.agreement_attribute9
, x_agreement_attribute10 => p_rent_index_rec.agreement_attribute10
, x_agreement_attribute11 => p_rent_index_rec.agreement_attribute11
, x_agreement_attribute12 => p_rent_index_rec.agreement_attribute12
, x_agreement_attribute13 => p_rent_index_rec.agreement_attribute13
, x_agreement_attribute14 => p_rent_index_rec.agreement_attribute14
, x_agreement_attribute15 => p_rent_index_rec.agreement_attribute15
, x_currency_code => p_rent_index_rec.currency_code
, x_carry_forward_flag => NVL (p_rent_index_rec.carry_forward_flag, 'N')
, x_retain_initial_basis_flag => p_rent_index_rec.retain_initial_basis_flag
, x_vr_nbp_flag => p_rent_index_rec.vr_nbp_flag
, x_index_multiplier => p_rent_index_rec.index_multiplier
, x_proration_rule => p_rent_index_rec.proration_rule
, x_proration_period_start_date => p_rent_index_rec.proration_period_start_date);
|| ' pn_index_leases_pkg.update_row successful index_lease_id:'|| p_rent_index_rec.index_lease_id
, 3);
END update_index_rent_row;
PROCEDURE insert_index_rent_row (
p_rent_index_rec IN OUT NOCOPY rent_index_rec
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2)
IS
l_rowid VARCHAR2 (18) := NULL;
g_program_unit := 'INSERT_INDEX_RENT_ROW';
|| ' Calling pn_index_leases_pkg.insert_row'
, 3);
pn_index_leases_pkg.insert_row
(x_rowid => l_rowid
, x_org_id => p_rent_index_rec.org_id
, x_index_lease_id => p_rent_index_rec.index_lease_id
, x_lease_id => p_rent_index_rec.lease_id
, x_index_id => p_rent_index_rec.index_id
, x_commencement_date => p_rent_index_rec.commencement_date
, x_termination_date => p_rent_index_rec.termination_date
, x_index_lease_number => p_rent_index_rec.index_lease_number
, x_last_update_date => NVL (p_rent_index_rec.last_update_date
, TRUNC(SYSDATE))
, x_last_updated_by => NVL (p_rent_index_rec.last_updated_by
, fnd_global.user_id)
, x_creation_date => NVL (p_rent_index_rec.creation_date, TRUNC(SYSDATE))
, x_created_by => NVL (p_rent_index_rec.created_by
, fnd_global.user_id)
, x_location_id => p_rent_index_rec.location_id
, x_term_template_id => p_rent_index_rec.term_template_id
, x_abstracted_by => p_rent_index_rec.abstracted_by
, x_assessment_date => p_rent_index_rec.assessment_date
, x_assessment_interval => p_rent_index_rec.assessment_interval
, x_spread_frequency => p_rent_index_rec.spread_frequency
, x_relationship_default => p_rent_index_rec.relationship_default
, x_basis_percent_default => p_rent_index_rec.basis_percent_default
, x_initial_basis => p_rent_index_rec.initial_basis
, x_base_index => p_rent_index_rec.base_index
, x_base_index_line_id => p_rent_index_rec.base_index_line_id
, x_index_finder_method => p_rent_index_rec.index_finder_method
, x_index_finder_months => p_rent_index_rec.index_finder_months
, x_negative_rent_type => p_rent_index_rec.negative_rent_type
, x_increase_on => p_rent_index_rec.increase_on
, x_basis_type => p_rent_index_rec.basis_type
, x_reference_period => p_rent_index_rec.reference_period
, x_base_year => p_rent_index_rec.base_year
, x_leased_area => p_rent_index_rec.leased_area
, x_rounding_flag => p_rent_index_rec.rounding_flag
, x_aggregation_flag => p_rent_index_rec.aggregation_flag
, x_gross_flag => NVL (p_rent_index_rec.gross_flag, 'N')
, x_last_update_login => NVL (p_rent_index_rec.last_update_login
, fnd_global.user_id)
, x_attribute_category => p_rent_index_rec.attribute_category
, x_attribute1 => p_rent_index_rec.attribute1
, x_attribute2 => p_rent_index_rec.attribute2
, x_attribute3 => p_rent_index_rec.attribute3
, x_attribute4 => p_rent_index_rec.attribute4
, x_attribute5 => p_rent_index_rec.attribute5
, x_attribute6 => p_rent_index_rec.attribute6
, x_attribute7 => p_rent_index_rec.attribute7
, x_attribute8 => p_rent_index_rec.attribute8
, x_attribute9 => p_rent_index_rec.attribute9
, x_attribute10 => p_rent_index_rec.attribute10
, x_attribute11 => p_rent_index_rec.attribute11
, x_attribute12 => p_rent_index_rec.attribute12
, x_attribute13 => p_rent_index_rec.attribute13
, x_attribute14 => p_rent_index_rec.attribute14
, x_attribute15 => p_rent_index_rec.attribute15
, x_agreement_category => p_rent_index_rec.agreement_category
, x_agreement_attribute1 => p_rent_index_rec.agreement_attribute1
, x_agreement_attribute2 => p_rent_index_rec.agreement_attribute2
, x_agreement_attribute3 => p_rent_index_rec.agreement_attribute3
, x_agreement_attribute4 => p_rent_index_rec.agreement_attribute4
, x_agreement_attribute5 => p_rent_index_rec.agreement_attribute5
, x_agreement_attribute6 => p_rent_index_rec.agreement_attribute6
, x_agreement_attribute7 => p_rent_index_rec.agreement_attribute7
, x_agreement_attribute8 => p_rent_index_rec.agreement_attribute8
, x_agreement_attribute9 => p_rent_index_rec.agreement_attribute9
, x_agreement_attribute10 => p_rent_index_rec.agreement_attribute10
, x_agreement_attribute11 => p_rent_index_rec.agreement_attribute11
, x_agreement_attribute12 => p_rent_index_rec.agreement_attribute12
, x_agreement_attribute13 => p_rent_index_rec.agreement_attribute13
, x_agreement_attribute14 => p_rent_index_rec.agreement_attribute14
, x_agreement_attribute15 => p_rent_index_rec.agreement_attribute15
, x_currency_code => p_rent_index_rec.currency_code
, x_carry_forward_flag => NVL (p_rent_index_rec.carry_forward_flag, 'N')
, x_retain_initial_basis_flag => p_rent_index_rec.retain_initial_basis_flag
, x_vr_nbp_flag => p_rent_index_rec.vr_nbp_flag
, x_index_multiplier => p_rent_index_rec.index_multiplier
, x_proration_rule => p_rent_index_rec.proration_rule
, x_proration_period_start_date => p_rent_index_rec.proration_period_start_date);
|| ' pn_index_leases_pkg.insert_row successful. index_lease_id:'|| p_rent_index_rec.index_lease_id
, 3);
END insert_index_rent_row;
SELECT index_lease_id
, lease_id
, index_id
, commencement_date
, termination_date
, index_lease_number
, location_id
, term_template_id
, abstracted_by
, assessment_date
, assessment_interval
, spread_frequency
, relationship_default
, basis_percent_default
, initial_basis
, base_index
, base_index_line_id
, index_finder_method
, index_finder_months
, negative_rent_type
, increase_on
, basis_type
, reference_period
, base_year
, leased_area
, rounding_flag
, last_update_date
, last_updated_by
, creation_date
, created_by
, last_update_login
, attribute_category
, attribute1
, attribute2
, attribute3
, attribute4
, attribute5
, attribute6
, attribute7
, attribute8
, attribute9
, attribute10
, attribute11
, attribute12
, attribute13
, attribute14
, attribute15
, agreement_category
, agreement_attribute1
, agreement_attribute2
, agreement_attribute3
, agreement_attribute4
, agreement_attribute5
, agreement_attribute6
, agreement_attribute7
, agreement_attribute8
, agreement_attribute9
, agreement_attribute10
, agreement_attribute11
, agreement_attribute12
, agreement_attribute13
, agreement_attribute14
, agreement_attribute15
, org_id
, aggregation_flag
, gross_flag
, currency_code
, carry_forward_flag
, retain_initial_basis_flag
, index_multiplier
, constraint_proration
, vr_nbp_flag
, proration_rule
, proration_period_start_date
FROM pn_index_leases_all
WHERE index_lease_id = p_index_lease_id;
PN_INDEX_LEASE_COMMON_PKG.update_location_for_ir_terms(l_rent_index_rec_old.index_lease_id,
l_rent_index_rec_old.location_id,
x_return_status);
fnd_message.set_token('ERR_MSG', 'Update location for IR terms failed with status: '||x_return_status);
PN_INDEX_LEASE_COMMON_PKG.update_location_for_ir_terms(l_rent_index_rec_old.index_lease_id,
l_rent_index_rec_old.location_id,
x_return_status);
fnd_message.set_token('ERR_MSG', 'Update location for IR terms failed with status: '||x_return_status);
SELECT currency_code
FROM gl_sets_of_books
WHERE set_of_books_id = p_set_of_books_id;
AND LTRIM (RTRIM (p_operation)) <> 'UPDATE_INDEX_RENT'
THEN
p_rent_index_rec.index_lease_number := NULL;
IF LTRIM (RTRIM (p_operation)) = 'UPDATE_INDEX_RENT'
THEN
pn_index_rent_pvt.DEBUG ( g_pkg_name
|| g_program_unit
|| ' - Before calling PN_INDEX_RENT_UTILS.GET_INDEX_LEASE_ID index_lease_id - '|| p_rent_index_rec.index_lease_id
, 3);
fnd_message.set_name('PN','PN_INDEX_UPDATE_REQD_DATA');
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT'
THEN
IF ( p_rent_index_rec.index_lease_number IS NOT NULL
AND p_rent_index_rec.index_lease_number <> pn_index_rent_utils.g_pn_miss_char)
THEN
IF l_index_number_profile = 'N'
THEN
--l_returnstatus := NULL;
IF LTRIM (RTRIM (p_operation)) <> 'UPDATE_INDEX_RENT'
THEN
p_rent_index_rec.reference_period := 'PREV_YEAR_PREV_CURRENT_CPI';
IF LTRIM (RTRIM (p_operation)) <> 'UPDATE_INDEX_RENT'
THEN
p_rent_index_rec.index_finder_method:='FINDER_DATE';
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT'
AND (p_rent_index_rec.relationship_default IS NULL OR p_rent_index_rec.relationship_default =pn_index_rent_utils.g_pn_miss_char)
THEN
p_rent_index_rec.relationship_default := 'INDEX_ONLY';
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT'
AND (p_rent_index_rec.negative_rent_type IS NULL OR p_rent_index_rec.negative_rent_type =pn_index_rent_utils.g_pn_miss_char)
THEN
p_rent_index_rec.negative_rent_type := 'IGNORE';
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT' -- Added by vivek on 22NOV2010
THEN
p_rent_index_rec.base_year := p_rent_index_rec.commencement_date;
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT' -- Added by vivek on 19NOV2010
THEN
p_rent_index_rec.basis_type := 'FIXED';
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT' -- Added by vivek on 19NOV2010
THEN
IF p_rent_index_rec.basis_type IS NULL
OR p_rent_index_rec.basis_type=pn_index_rent_utils.g_pn_miss_char
THEN
p_rent_index_rec.basis_type := 'COMPOUND';
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT' -- Added by vivek on 19NOV2010
THEN
p_rent_index_rec.basis_percent_default := NULL;
IF LTRIM (RTRIM (p_operation)) <>'UPDATE_INDEX_RENT' -- Added by vivek on 19NOV2010
THEN
p_rent_index_rec.base_year := NULL;
IF LTRIM (RTRIM (p_operation)) = 'UPDATE_INDEX_RENT'
THEN
IF p_rent_index_rec.index_lease_id IS NOT NULL
OR p_rent_index_rec.index_lease_id <> pn_lease_utils.g_pn_miss_num
THEN
pn_index_rent_pvt.DEBUG ( g_pkg_name
|| g_program_unit||
' - Calling get_changed_index_rent_rec after validate_index_rent_rec '
,3);
PROCEDURE update_constraint_row (
p_index_constraint_rec IN OUT NOCOPY index_constraint_rec
, p_rent_index_rec IN OUT NOCOPY rent_index_rec
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2)
IS
l_rowid VARCHAR2 (18) := NULL;
g_program_unit := 'UPDATE_CONSTRAINT_ROW';
' - Calling pn_index_lease_constraints_pkg.update_row for index_lease_id - '|| p_rent_index_rec.index_lease_id
,3);
pn_index_lease_constraints_pkg.update_row
(x_rowid => l_rowid
--, x_org_id => p_index_constraint_rec.org_id
, x_index_constraint_id => p_index_constraint_rec.index_constraint_id
, x_index_lease_id => p_rent_index_rec.index_lease_id
, x_scope => p_index_constraint_rec.SCOPE
, x_minimum_amount => p_index_constraint_rec.minimum_amount
, x_maximum_amount => p_index_constraint_rec.maximum_amount
, x_minimum_percent => p_index_constraint_rec.minimum_percent
, x_maximum_percent => p_index_constraint_rec.maximum_percent
, x_attribute_category => p_index_constraint_rec.attribute_category
, x_attribute1 => p_index_constraint_rec.attribute1
, x_attribute2 => p_index_constraint_rec.attribute2
, x_attribute3 => p_index_constraint_rec.attribute3
, x_attribute4 => p_index_constraint_rec.attribute4
, x_attribute5 => p_index_constraint_rec.attribute5
, x_attribute6 => p_index_constraint_rec.attribute6
, x_attribute7 => p_index_constraint_rec.attribute7
, x_attribute8 => p_index_constraint_rec.attribute8
, x_attribute9 => p_index_constraint_rec.attribute9
, x_attribute10 => p_index_constraint_rec.attribute10
, x_attribute11 => p_index_constraint_rec.attribute11
, x_attribute12 => p_index_constraint_rec.attribute12
, x_attribute13 => p_index_constraint_rec.attribute13
, x_attribute14 => p_index_constraint_rec.attribute14
, x_attribute15 => p_index_constraint_rec.attribute15
-- , x_creation_date => NVL(p_index_constraint_rec.last_update_date, TRUNC(SYSDATE))
-- , x_created_by => NVL(p_index_constraint_rec.created_by, fnd_global.user_id)
, x_last_update_date => NVL
(p_index_constraint_rec.last_update_date
, TRUNC(SYSDATE))
, x_last_updated_by => NVL
(p_index_constraint_rec.last_updated_by
, fnd_global.user_id)
, x_last_update_login => NVL
(p_index_constraint_rec.last_update_login
, fnd_global.user_id));
' - pn_index_lease_constraints_pkg.update_row successful. index_constraint_id - '||p_index_constraint_rec.index_constraint_id
,3);
END update_constraint_row;
PROCEDURE insert_index_constraint_row (
p_index_constraint_rec IN OUT NOCOPY index_constraint_rec
, p_rent_index_rec IN OUT NOCOPY rent_index_rec
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2)
IS
l_rowid VARCHAR2 (18) := NULL;
g_program_unit := 'INSERT_INDEX_CONSTRAINT_ROW';
' - Calling pn_index_lease_constraints_pkg.insert_row for index_constraint_id '
,3);
pn_index_lease_constraints_pkg.insert_row
(x_rowid => l_rowid
, x_org_id => p_index_constraint_rec.org_id
, x_index_constraint_id => p_index_constraint_rec.index_constraint_id
, x_index_lease_id => p_rent_index_rec.index_lease_id
, x_scope => p_index_constraint_rec.SCOPE
, x_minimum_amount => p_index_constraint_rec.minimum_amount
, x_maximum_amount => p_index_constraint_rec.maximum_amount
, x_minimum_percent => p_index_constraint_rec.minimum_percent
, x_maximum_percent => p_index_constraint_rec.maximum_percent
, x_attribute_category => p_index_constraint_rec.attribute_category
, x_attribute1 => p_index_constraint_rec.attribute1
, x_attribute2 => p_index_constraint_rec.attribute2
, x_attribute3 => p_index_constraint_rec.attribute3
, x_attribute4 => p_index_constraint_rec.attribute4
, x_attribute5 => p_index_constraint_rec.attribute5
, x_attribute6 => p_index_constraint_rec.attribute6
, x_attribute7 => p_index_constraint_rec.attribute7
, x_attribute8 => p_index_constraint_rec.attribute8
, x_attribute9 => p_index_constraint_rec.attribute9
, x_attribute10 => p_index_constraint_rec.attribute10
, x_attribute11 => p_index_constraint_rec.attribute11
, x_attribute12 => p_index_constraint_rec.attribute12
, x_attribute13 => p_index_constraint_rec.attribute13
, x_attribute14 => p_index_constraint_rec.attribute14
, x_attribute15 => p_index_constraint_rec.attribute15
, x_creation_date => NVL
(p_index_constraint_rec.last_update_date
, TRUNC(SYSDATE))
, x_created_by => NVL
(p_index_constraint_rec.created_by
, fnd_global.user_id)
, x_last_update_date => NVL
(p_index_constraint_rec.last_update_date
, TRUNC(SYSDATE))
, x_last_updated_by => NVL
(p_index_constraint_rec.last_updated_by
, fnd_global.user_id)
, x_last_update_login => NVL
(p_index_constraint_rec.last_update_login
, fnd_global.user_id));
' - pn_index_lease_constraints_pkg.insert_row successful.Index_constraint_id - '||p_index_constraint_rec.index_constraint_id
,3);
END insert_index_constraint_row;
SELECT index_constraint_id
, index_lease_id
, SCOPE
, minimum_amount
, maximum_amount
, minimum_percent
, maximum_percent
, last_update_date
, last_updated_by
, creation_date
, created_by
, last_update_login
, attribute_category
, attribute1
, attribute2
, attribute3
, attribute4
, attribute5
, attribute6
, attribute7
, attribute8
, attribute9
, attribute10
, attribute11
, attribute12
, attribute13
, attribute14
, attribute15
, org_id
FROM pn_index_lease_constraints_all
WHERE index_lease_id = p_rent_index_rec.index_lease_id
AND index_constraint_id = p_index_constraint_rec.index_constraint_id
AND org_id = p_rent_index_rec.org_id;
IF LTRIM (RTRIM (p_operation)) <> 'UPDATE_INDEX_RENT_CONSTRAINTS'
THEN
IF (x_return_status = fnd_api.g_ret_sts_success) AND p_validate=fnd_api.g_false
THEN
pn_index_rent_pvt.DEBUG(
g_pkg_name
|| g_program_unit
|| ' Calling insert_index_constraint_row from validate_index_constraint_tbl procedure'
, 3);
insert_index_constraint_row( p_index_constraint_rec => p_index_constraint_tbl(i)
, p_rent_index_rec => p_rent_index_rec
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data);
IF LTRIM(RTRIM (p_operation)) = 'UPDATE_INDEX_RENT_CONSTRAINTS'
THEN
IF ( p_index_constraint_tbl (i).index_constraint_id IS NOT NULL AND p_index_constraint_tbl (i).index_constraint_id <>pn_index_rent_utils.g_pn_miss_num)
THEN
pn_index_rent_pvt.DEBUG ( g_pkg_name
|| g_program_unit
|| ' Inside validate_index_constraint_tbl procedure calling get_changed_constraint_rec'
, 3);
|| ' Calling update_constraint_row from validate_index_constraint_tbl procedure'
, 3);
update_constraint_row (p_index_constraint_rec => p_index_constraint_tbl (i)
, p_rent_index_rec => p_rent_index_rec
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data);
|| ' Calling insert_index_constraint_row from validate_index_constraint_tbl procedure'
, 3);
insert_index_constraint_row( p_index_constraint_rec => p_index_constraint_tbl(i)
, p_rent_index_rec => p_rent_index_rec
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data);
fnd_message.set_token('ERR_MSG', 'Cannot update multiple Constraint records with the scope');
pn_index_rent_pvt.DEBUG (' Calling INSERT_INDEX_RENT_ROW procedure from main', 3);
|| ' Calling insert_index_rent_row procedure from main'
, 3);
|| ' Calling insert_index_rent_row procedure from main'
, 3);
insert_index_rent_row (p_rent_index_rec => p_rent_index_rec
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data);
PROCEDURE update_index_rent (
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2
, p_commit IN VARCHAR2
, p_validate IN VARCHAR2
, p_rent_index_rec IN OUT NOCOPY rent_index_rec
, p_index_constraint_tbl IN OUT NOCOPY index_constraint_tbl
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2)
IS
l_operation VARCHAR2 (30);
l_operation := 'UPDATE_INDEX_RENT';
|| ' Calling VALIDATE_INDEX_RENT_REC procedure from update main'
, 3);
|| ' Calling update_index_rent_row procedure from update main'
, 3);
update_index_rent_row (p_rent_index_rec => p_rent_index_rec
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data);
|| ' Calling validate_index_constraint_tbl procedure from update main'
, 3);
l_operation := 'UPDATE_INDEX_RENT_CONSTRAINTS';
END update_index_rent;