The following lines contain the word 'select', 'insert', 'update' or 'delete':
'Operation Id of the Operation that is being updated .....' || l_oper_id
);
'Invalid DML Operation is specified....DML Operation should be Update'
);
--pdoki added condition to check if the DML operation is Delete for Bug# 6435925
IF ( p_x_oper_resource_tbl(i).dml_operation <> 'D' ) THEN
l_x_rt_oper_cost_rec.RT_OPER_RESOURCE_ID := p_x_oper_resource_tbl(i).RT_OPER_RESOURCE_ID ;
LAST_UPDATE_DATE DATE,
LAST_UPDATED_BY NUMBER(15),
CREATION_DATE DATE,
CREATED_BY NUMBER(15),
LAST_UPDATE_LOGIN NUMBER(15),
ASO_RESOURCE_ID NUMBER,
ASO_RESOURCE_NAME VARCHAR2(30),
RESOURCE_TYPE_ID NUMBER,
RESOURCE_TYPE VARCHAR2(80),
QUANTITY NUMBER,
DURATION NUMBER,
ACTIVITY_ID NUMBER,
ACTIVITY VARCHAR2(10),
COST_BASIS_ID NUMBER,
COST_BASIS VARCHAR2(80),
SCHEDULED_TYPE_ID NUMBER,
SCHEDULED_TYPE VARCHAR2(80),
AUTOCHARGE_TYPE_ID NUMBER,
AUTOCHARGE_TYPE VARCHAR2(80),
STANDARD_RATE_FLAG NUMBER,
STANDARD_RATE VARCHAR2(80),
ATTRIBUTE_CATEGORY VARCHAR2(30),
ATTRIBUTE1 VARCHAR2(150),
ATTRIBUTE2 VARCHAR2(150),
ATTRIBUTE3 VARCHAR2(150),
ATTRIBUTE4 VARCHAR2(150),
ATTRIBUTE5 VARCHAR2(150),
ATTRIBUTE6 VARCHAR2(150),
ATTRIBUTE7 VARCHAR2(150),
ATTRIBUTE8 VARCHAR2(150),
ATTRIBUTE9 VARCHAR2(150),
ATTRIBUTE10 VARCHAR2(150),
ATTRIBUTE11 VARCHAR2(150),
ATTRIBUTE12 VARCHAR2(150),
ATTRIBUTE13 VARCHAR2(150),
ATTRIBUTE14 VARCHAR2(150),
ATTRIBUTE15 VARCHAR2(150),
DML_OPERATION VARCHAR2(1)
);
PROCEDURE Delete_Operation
(
-- standard IN params
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,
p_default IN VARCHAR2 :=FND_API.G_FALSE,
p_module_type IN VARCHAR2 :=NULL,
-- standard OUT params
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
-- procedure params
p_oper_id IN NUMBER,
p_oper_number IN VARCHAR2,
p_oper_revision IN NUMBER,
p_oper_object_version IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_OPERATION';
SAVEPOINT delete_operation_pub;
'Before calling the private API AHL_RM_OPERATION_PVT.delete_operation.....'
);
'Operation Id of the Operation that is being deleted .....' || l_oper_id
);
AHL_RM_OPERATION_PVT.delete_operation
(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_default => p_default,
p_module_type => p_module_type,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_operation_id => l_oper_id ,
p_object_version_number => p_oper_object_version
);
Rollback to delete_operation_pub;
Rollback to delete_operation_pub;
Rollback to delete_operation_pub;
p_procedure_name => 'DELETE_OPERATION',
p_error_text => SQLERRM);
END Delete_Operation;
SELECT RESOURCE_ID
from AHL_RESOURCES
where name = c_resource_name;
SELECT rt_oper_resource_id
from AHL_RT_OPER_RESOURCES
where
object_ID = c_operation_id
and aso_resource_id = c_resource_id;
'Operation Id of the Operation that is being updated .....' || l_operation_id
);