[Home] [Help]
1: PACKAGE BODY IGW_PROP_RATES_PVT AS
2: -- $Header: igwvprtb.pls 115.5 2002/11/15 00:44:31 ashkumar ship $
3:
4: procedure PROCESS_PROP_RATES
5: (p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
22: ,x_msg_data OUT NOCOPY VARCHAR2) IS
23:
24: cursor c_rates is
25: select rowid
26: from igw_prop_rates
27: where proposal_id = p_proposal_id
28: and version_id = p_version_id
29: and rate_class_id = p_rate_class_id
30: and rate_type_id = p_rate_type_id
51: if (NOT FND_API.TO_BOOLEAN (p_validate_only)) then
52: open c_rates;
53: fetch c_rates into p_rowid;
54: if (c_rates%notfound) then
55: igw_prop_rates_tbh.insert_row(
56: p_proposal_id => p_proposal_id
57: ,p_version_id => p_version_id
58: ,p_rate_class_id => p_rate_class_id
59: ,p_rate_type_id => p_rate_type_id
67: ,x_return_status => l_return_status);
68:
69: x_return_status := l_return_status;
70: else
71: igw_prop_rates_tbh.update_row(
72: p_proposal_id => p_proposal_id
73: ,p_version_id => p_version_id
74: ,p_rate_class_id => p_rate_class_id
75: ,p_rate_type_id => p_rate_type_id