The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_ctr_properties_tbl.DELETE;
l_counter_relationships_tbl.DELETE;
l_ctr_derived_filters_tbl.DELETE;
l_counter_associations_tbl.DELETE;
l_ctr_property_readings_tbl.DELETE;
SELECT object_version_number
INTO l_object_version_number
FROM CSI_COUNTERS_B
WHERE counter_id = x_new_meter_id;
'==================== Calling CSI_COUNTER_PUB.update_counter ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
CSI_COUNTER_PUB.update_counter(p_api_version,
l_init_msg_list,
l_commit,
l_validation_level,
l_counter_instance_rec,
l_ctr_properties_tbl,
l_counter_relationships_tbl,
l_ctr_derived_filters_tbl,
l_counter_associations_tbl,
x_return_status,
x_msg_count,
x_msg_data);
'==================== Returning from CSI_COUNTER_PUB.update_counter ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
procedure update_meter
(
p_api_version IN Number,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT nocopy VARCHAR2,
x_msg_count OUT nocopy NUMBER,
x_msg_data OUT nocopy VARCHAR2,
p_meter_id IN number,
p_meter_name IN varchar DEFAULT NULL,
p_meter_uom IN varchar DEFAULT NULL,
p_METER_TYPE IN Number default NULL,
p_VALUE_CHANGE_DIR IN Number default NULL,
p_USED_IN_SCHEDULING IN VARCHAR2 default NULL,
p_USER_DEFINED_RATE IN NUMBER default null,
p_USE_PAST_READING IN Number default null,
p_DESCRIPTION IN VARCHAR2 default null,
p_FROM_EFFECTIVE_DATE IN DATE default null,
p_TO_EFFECTIVE_DATE IN DATE default null,
p_source_meter_id IN Number DEFAULT NULL,
p_factor IN NUMBER DEFAULT NULL,
p_relationship_start_date IN DATE default null,
p_ATTRIBUTE_CATEGORY IN VARCHAR2 default null,
p_ATTRIBUTE1 IN VARCHAR2 default null,
p_ATTRIBUTE2 IN VARCHAR2 default null,
p_ATTRIBUTE3 IN VARCHAR2 default null,
p_ATTRIBUTE4 IN VARCHAR2 default null,
p_ATTRIBUTE5 IN VARCHAR2 default null,
p_ATTRIBUTE6 IN VARCHAR2 default null,
p_ATTRIBUTE7 IN VARCHAR2 default null,
p_ATTRIBUTE8 IN VARCHAR2 default null,
p_ATTRIBUTE9 IN VARCHAR2 default null,
p_ATTRIBUTE10 IN VARCHAR2 default null,
p_ATTRIBUTE11 IN VARCHAR2 default null,
p_ATTRIBUTE12 IN VARCHAR2 default null,
p_ATTRIBUTE13 IN VARCHAR2 default null,
p_ATTRIBUTE14 IN VARCHAR2 default null,
p_ATTRIBUTE15 IN VARCHAR2 default null,
p_ATTRIBUTE16 IN VARCHAR2 default null,
p_ATTRIBUTE17 IN VARCHAR2 default null,
p_ATTRIBUTE18 IN VARCHAR2 default null,
p_ATTRIBUTE19 IN VARCHAR2 default null,
p_ATTRIBUTE20 IN VARCHAR2 default null,
p_ATTRIBUTE21 IN VARCHAR2 default null,
p_ATTRIBUTE22 IN VARCHAR2 default null,
p_ATTRIBUTE23 IN VARCHAR2 default null,
p_ATTRIBUTE24 IN VARCHAR2 default null,
p_ATTRIBUTE25 IN VARCHAR2 default null,
p_ATTRIBUTE26 IN VARCHAR2 default null,
p_ATTRIBUTE27 IN VARCHAR2 default null,
p_ATTRIBUTE28 IN VARCHAR2 default null,
p_ATTRIBUTE29 IN VARCHAR2 default null,
p_ATTRIBUTE30 IN VARCHAR2 default null,
p_TMPL_FLAG IN VARCHAR2 default 'N',
p_SOURCE_TMPL_ID IN Number default NULL,
P_EAM_REQUIRED_FLAG IN VARCHAR2 default 'N',
p_from_eam IN varchar2 default null
)
is
l_api_name CONSTANT VARCHAR2(30) := 'update_meter';
SAVEPOINT update_meter_pub;
'==================== Entered EAM_METER_PUB.update_meter ====================');
l_ctr_properties_tbl.DELETE;
l_counter_relationships_tbl.DELETE;
l_ctr_derived_filters_tbl.DELETE;
l_ctr_property_readings_tbl.DELETE;
l_counter_associations_tbl.DELETE;
SELECT object_version_number
INTO l_object_version_number
FROM CSI_COUNTERS_B
WHERE counter_id = p_meter_id;
select eam_required_flag into l_prev_required_flag
from csi_counters_b
where counter_id = p_meter_id;
select primary_failure_flag into l_primary_flag
from csi_counter_associations
where counter_id = p_meter_id;
select source_counter_id,relationship_id,factor,object_version_number
into l_prev_source_counter_id,l_prev_relationship_id,l_previous_factor,l_object_version_number
from csi_counter_relationships
where object_counter_id = p_meter_id and active_end_date is null;
-- When source counter is changed .. End date the old one and insert a new one
l_counter_relationships_tbl(1).object_version_number := l_object_version_number;
l_counter_relationships_tbl.delete;
'==================== Calling CSI_COUNTER_PUB.update_counter ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
CSI_COUNTER_PUB.update_counter(p_api_version,
l_init_msg_list,
l_commit,
l_validation_level,
l_counter_instance_rec,
l_ctr_properties_tbl,
l_counter_relationships_tbl,
l_ctr_derived_filters_tbl,
l_counter_associations_tbl,
x_return_status,
x_msg_count,
x_msg_data);
'==================== Returning from CSI_COUNTER_PUB.update_counter ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
SELECT object_version_number
INTO l_object_version_number
FROM CSI_COUNTER_TEMPLATE_B
WHERE counter_id = p_meter_id;
'==================== Calling csi_counter_template_pub.update_counter_template ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
csi_counter_template_pub.update_counter_template(p_api_version,
l_commit,
l_init_msg_list,
l_validation_level,
l_counter_template_rec,
l_ctr_item_associations_tbl,
l_ctr_property_template_tbl,
l_counter_relationships_tbl,
l_ctr_derived_filters_tbl,
x_return_status,
x_msg_count,
x_msg_data);
'==================== Returning from csi_counter_template_pub.update_counter_template ===================='
||'x_return_status:'||x_return_status
||' x_msg_count:'||x_msg_count
||'x_msg_data:'||x_msg_data);
'==================== Exiting EAM_METER_PUB.update_meter ====================');
ROLLBACK TO update_meter_pub;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO update_meter_pub');
'===================EAM_METER_PUB.update_meter: EXPECTED ERROR======='||
'==================== Calling FND_MSG_PUB.get ====================');
ROLLBACK TO update_meter_pub;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO update_meter_pub');
'===================EAM_METER_PUB.update_meter: UNEXPECTED ERROR======='||
'==================== Calling FND_MSG_PUB.get ====================');
ROLLBACK TO update_meter_pub;
FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO update_meter_pub');
'===================EAM_METER_PUB.update_meter: OTHERS ERROR=======');
end update_meter;