The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Charge_Details(
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_object_version_number OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
p_login_id IN NUMBER := NULL,
p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC
) AS
BEGIN
Update_Charge_Details
(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_object_version_number => x_object_version_number,
x_msg_data => x_msg_data,
p_resp_appl_id => p_resp_appl_id,
p_resp_id => p_resp_id,
p_user_id => p_user_id,
p_login_id => p_login_id,
p_transaction_control => p_transaction_control,
p_Charges_Rec => p_Charges_Rec,
p_update_cost_detail => 'N'
);
Public Procedure Body Update_Charge_Details
**************************************************/
PROCEDURE Update_Charge_Details(
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_object_version_number OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
--x_estimate_detail_id OUT NOCOPY NUMBER,
--x_line_number OUT NOCOPY NUMBER,
p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
--p_login_id IN NUMBER := FND_API.G_MISS_NUM,
p_login_id IN NUMBER := NULL,
p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC,
p_update_cost_detail IN VARCHAR2 --service costing
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Charge_Details' ;
SAVEPOINT Update_Charge_Details_PUB ;
, 'p_update_cost_detail: ' || p_update_cost_detail
);
CS_Charge_Details_PVT.Update_Charge_Details
(
p_api_version => 1.0 ,
p_init_msg_list => FND_API.G_FALSE ,
p_commit => p_commit ,
p_validation_level => p_validation_level,
x_return_status => l_return_status ,
x_msg_count => x_msg_count ,
x_object_version_number => x_object_version_number,
x_msg_data => x_msg_data ,
p_resp_appl_id => l_resp_appl_id ,
p_resp_id => l_resp_id ,
p_user_id => l_user_id ,
p_login_id => l_login_id ,
p_transaction_control => p_transaction_control ,
p_EST_DETAIL_rec => p_Charges_Rec
) ;
ROLLBACK TO Update_Charge_Details_PUB;
ROLLBACK TO Update_Charge_Details_PUB;
ROLLBACK TO Update_Charge_Details_PUB;
'Before call To cost Update Pvt API ' ||'l_return_status :'||l_return_status||'p_Charges_Rec.estimate_Detail_id :'||p_Charges_Rec.estimate_Detail_id
);
and p_update_cost_detail ='Y'
and p_Charges_Rec.estimate_Detail_id IS NOT NULL then
-- Standard Start of API Savepoint
IF FND_API.To_Boolean( p_transaction_control ) THEN
SAVEPOINT Update_Charge_Cost_Details_PUB ;
CS_COST_DETAILS_PVT.UPDATE_COST_DETAILS
(
p_api_version => 1.0 ,
p_init_msg_list => p_init_msg_list ,
p_commit => p_commit ,
p_validation_level => FND_API.G_VALID_LEVEL_NONE,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_object_version_number => x_object_version_number,
x_msg_data => x_msg_data,
p_resp_appl_id => l_resp_appl_id,
p_resp_id => l_resp_id,
p_user_id => l_user_id,
p_login_id => l_login_id,
p_transaction_control => p_transaction_control,
p_Cost_Rec => l_cost_rec
);
'After call To cost Update Pvt API ' ||'l_return_status :'||l_return_status
);
ROLLBACK TO Update_Charge_Cost_Details_PUB;
ROLLBACK TO Update_Charge_Cost_Details_PUB;
ROLLBACK TO Update_Charge_Cost_Details_PUB;
END Update_Charge_Details; -- End of Procedure Update Charge Details
Procedure Delete_Charge_Details
(
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_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
p_estimate_detail_id IN NUMBER := NULL
)
AS
BEGIN
Delete_Charge_Details
(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_transaction_control => p_transaction_control,
p_estimate_detail_id => p_estimate_detail_id,
p_delete_cost_detail => 'N'
);
Public Procedure Body Delete_Charge_Details
**************************************************/
Procedure Delete_Charge_Details
(
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_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
p_estimate_detail_id IN NUMBER := NULL,
p_delete_cost_detail IN VARCHAR2--new parameter for service costing
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Charge_Details' ;
SAVEPOINT Delete_Charge_Details_PUB ;
, 'p_delete_cost_detail:' || p_delete_cost_detail
);
, 'Before callin Charges Delete Pvt API'
);
CS_CHARGE_DETAILS_PVT.DELETE_CHARGE_DETAILS
(
p_api_version => 1.0 ,
p_init_msg_list => FND_API.G_FALSE,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_transaction_control => p_transaction_control,
p_estimate_detail_id => p_estimate_detail_id
) ;
, 'After callin Charges Delete Pvt API: '||l_return_status||x_msg_data
);
ROLLBACK TO Delete_Charge_Details_PUB;
ROLLBACK TO Delete_Charge_Details_PUB;
ROLLBACK TO Delete_Charge_Details_PUB;
SAVEPOINT Delete_Charge_Cost_Details_PUB ;
select cost_id
into l_cost_id
from cs_cost_details csd
where csd.estimate_Detail_id = p_estimate_detail_id;
, 'Before callin Cost Delete Pvt API:l_cost_id : '||l_cost_id
);
CS_COST_DETAILS_PVT.DELETE_COST_DETAILS
(
p_api_version => 1.0 ,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => FND_API.G_VALID_LEVEL_NONE,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_transaction_control => p_transaction_control,
p_cost_id => l_cost_id
);
, 'After callin Cost Delete Pvt API:l_cost_id : '||l_return_status
);
ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
END Delete_Charge_Details; -- End of Procedure Delete Charge Details