APPS.IGI_RPI_UPDATE_LINES_C_PKG dependencies on IGI_RPI_UPDATE_LINES

Line 1: PACKAGE BODY IGI_RPI_UPDATE_LINES_C_PKG as

1: PACKAGE BODY IGI_RPI_UPDATE_LINES_C_PKG as
2: --- $Header: igiruplb.pls 120.4.12000000.1 2007/08/31 05:54:07 mbremkum ship $
3:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5:

Line 31: CURSOR C IS SELECT rowid FROM igi_rpi_update_lines

27: X_Last_Updated_By NUMBER,
28: X_Last_Update_Date DATE,
29: X_Last_Update_Login NUMBER
30: ) IS
31: CURSOR C IS SELECT rowid FROM igi_rpi_update_lines
32: WHERE run_id = X_run_id
33: and item_id = X_item_id
34: and standing_charge_id is null;
35: BEGIN

Line 38: INSERT INTO igi_rpi_update_lines (

34: and standing_charge_id is null;
35: BEGIN
36:
37:
38: INSERT INTO igi_rpi_update_lines (
39: run_id,
40: item_id,
41: price,
42: effective_date,

Line 96: FROM igi_rpi_update_lines

92: X_select_flag VARCHAR2
93: ) IS
94: CURSOR C IS
95: SELECT *
96: FROM igi_rpi_update_lines
97: WHERE rowid = X_Rowid
98: FOR UPDATE of run_id NOWAIT;
99: Recinfo C%ROWTYPE;
100: BEGIN

Line 108: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_update_lines_c_pkg.lock_row.Msg1',FALSE);

104: CLOSE C;
105: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
106: --Bug 3199481 (start)
107: If (l_unexp_level >= l_debug_level) then
108: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_update_lines_c_pkg.lock_row.Msg1',FALSE);
109: End if;
110: --Bug 3199481 (end)
111: APP_EXCEPTION.Raise_Exception;
112: end if;

Line 143: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_update_lines_c_pkg.lock_row.Msg2',FALSE);

139: else
140: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
141: --Bug 3199481 (start)
142: If (l_unexp_level >= l_debug_level) then
143: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_update_lines_c_pkg.lock_row.Msg2',FALSE);
144: End if;
145: --Bug 3199481 (end)
146: APP_EXCEPTION.Raise_Exception;
147: end if;

Line 167: UPDATE igi_rpi_update_lines

163: X_Last_Update_Date DATE,
164: X_Last_Update_Login NUMBER
165: ) IS
166: BEGIN
167: UPDATE igi_rpi_update_lines
168: SET
169: run_id = X_run_id,
170: item_id = X_item_id,
171: price = X_price,

Line 191: DELETE FROM igi_rpi_update_lines

187: END Update_Row;
188:
189: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
190: BEGIN
191: DELETE FROM igi_rpi_update_lines
192: WHERE rowid = X_Rowid;
193:
194: if (SQL%NOTFOUND) then
195: Raise NO_DATA_FOUND;

Line 200: END IGI_RPI_UPDATE_LINES_C_PKG;

196: end if;
197: END Delete_Row;
198:
199:
200: END IGI_RPI_UPDATE_LINES_C_PKG;