[Home] [Help]
1: PACKAGE BODY IGW_PROP_RATES_TBH AS
2: -- $Header: igwtprtb.pls 115.5 2002/11/15 00:44:47 ashkumar ship $
3:
4: procedure INSERT_ROW (
5: p_proposal_id NUMBER
16: ,x_return_status OUT NOCOPY VARCHAR2) IS
17:
18: cursor c_rates is
19: select rowid
20: from igw_prop_rates
21: where proposal_id = p_proposal_id
22: and version_id = p_version_id
23: and rate_class_id = p_rate_class_id
24: and rate_type_id = p_rate_type_id
32:
33: begin
34: x_return_status := FND_API.G_RET_STS_SUCCESS;
35:
36: insert into igw_prop_rates(
37: proposal_id
38: ,version_id
39: ,rate_class_id
40: ,rate_type_id
108: l_row_id ROWID := p_rowid;
109:
110: CURSOR get_row_id IS
111: select rowid
112: from igw_prop_rates
113: where proposal_id = p_proposal_id
114: and version_id = p_version_id
115: and rate_class_id = p_rate_class_id
116: and rate_type_id = p_rate_type_id
126: FETCH get_row_id INTO l_row_id;
127: CLOSE get_row_id;
128: END IF;
129:
130: update igw_prop_rates
131: set applicable_rate = p_applicable_rate
132: where rowid = l_row_id;
133: --and record_version_number = p_record_version_number;
134:
166:
167:
168: CURSOR get_row_id IS
169: select rowid
170: from igw_prop_rates
171: where proposal_id = p_proposal_id
172: and version_id = p_version_id
173: and rate_class_id = p_rate_class_id
174: and rate_type_id = p_rate_type_id
185: FETCH get_row_id INTO l_row_id;
186: CLOSE get_row_id;
187: END IF;
188:
189: delete from igw_prop_rates
190: where rowid = l_row_id;
191: --and record_version_number = p_record_version_number;
192:
193: if (sql%notfound) then
204: RAISE;
205: end DELETE_ROW;
206:
207:
208: END IGW_PROP_RATES_TBH;