DBA Data[Home] [Help]

APPS.IGI_ITR_CHARGE_LINES_PKG dependencies on IGI_ITR_CHARGE_LINES

Line 1: PACKAGE BODY IGI_ITR_CHARGE_LINES_PKG as

1: PACKAGE BODY IGI_ITR_CHARGE_LINES_PKG as
2: -- $Header: igiitrtb.pls 120.5.12000000.1 2007/09/12 10:32:50 mbremkum ship $
3: --
4:
5:

Line 57: FROM igi_itr_charge_lines

53: X_Last_Updated_By NUMBER
54: ) IS
55:
56: CURSOR C IS SELECT rowid
57: FROM igi_itr_charge_lines
58: WHERE it_service_line_id = X_It_Service_Line_Id;
59:
60: CURSOR C2 IS SELECT igi_itr_charge_lines_s.nextval FROM sys.dual;
61:

Line 60: CURSOR C2 IS SELECT igi_itr_charge_lines_s.nextval FROM sys.dual;

56: CURSOR C IS SELECT rowid
57: FROM igi_itr_charge_lines
58: WHERE it_service_line_id = X_It_Service_Line_Id;
59:
60: CURSOR C2 IS SELECT igi_itr_charge_lines_s.nextval FROM sys.dual;
61:
62: BEGIN
63:
64: IF X_It_Service_Line_Id is null THEN

Line 71: INSERT INTO igi_itr_charge_lines(

67: CLOSE C2;
68: END IF;
69:
70:
71: INSERT INTO igi_itr_charge_lines(
72: it_service_line_id
73: ,it_header_id
74: ,it_line_num
75: ,set_of_books_id

Line 201: FROM igi_itr_charge_lines

197:
198:
199: CURSOR C IS
200: SELECT *
201: FROM igi_itr_charge_lines
202: WHERE rowid = X_Rowid
203: FOR UPDATE of it_service_line_id NOWAIT;
204:
205: Recinfo C%ROWTYPE;

Line 216: FND_LOG.MESSAGE(l_excep_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.lock_row.msg1', FALSE);

212: IF (C%NOTFOUND) THEN
213: CLOSE C;
214: fnd_message.set_name('FND','FORM_RECORD_DELETED');
215: IF( l_excep_level >= l_debug_level) THEN
216: FND_LOG.MESSAGE(l_excep_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.lock_row.msg1', FALSE);
217: END IF;
218: app_exception.raise_exception;
219: END IF;
220: CLOSE C;

Line 312: FND_LOG.MESSAGE(l_excep_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.lock_row.msg2', FALSE);

308: return;
309: ELSE
310: fnd_message.set_name('FND','FORM_RECORD_CHANGED');
311: IF( l_excep_level >= l_debug_level) THEN
312: FND_LOG.MESSAGE(l_excep_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.lock_row.msg2', FALSE);
313: END IF;
314: APP_EXCEPTION.raise_exception;
315: END IF;
316:

Line 361: UPDATE igi_itr_charge_lines

357: X_Last_Updated_By NUMBER
358: ) IS
359: BEGIN
360:
361: UPDATE igi_itr_charge_lines
362: SET
363: it_service_line_id = X_It_Service_Line_Id,
364: it_header_id = X_It_Header_Id,
365: it_line_num = X_It_Line_Num,

Line 411: DELETE FROM igi_itr_charge_lines

407:
408:
409: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
410: BEGIN
411: DELETE FROM igi_itr_charge_lines
412: WHERE rowid = X_Rowid;
413:
414: IF (SQL%NOTFOUND) THEN
415: raise NO_DATA_FOUND;

Line 427: FROM igi_itr_charge_lines cl

423: x_it_header_id NUMBER) IS
424:
425: CURSOR c_dup IS
426: SELECT 'Duplicate'
427: FROM igi_itr_charge_lines cl
428: WHERE cl.it_line_num = x_it_line_num
429: AND cl.it_header_id = x_it_header_id
430: AND (x_rowid IS NULL
431: OR

Line 445: FND_LOG.MESSAGE(l_error_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.check_unique.msg3', FALSE);

441: IF c_dup%FOUND THEN
442: CLOSE c_dup;
443: fnd_message.set_name('IGI','IGI_ITR_DPL_LINE_NO');
444: IF( l_error_level >= l_debug_level) THEN
445: FND_LOG.MESSAGE(l_error_level,'igi.plsql.igiitrtb.IGI_ITR_CHARGE_LINES_PKG.check_unique.msg3', FALSE);
446: END IF;
447: app_exception.raise_exception;
448: END IF;
449:

Line 461: DELETE FROM igi_itr_charge_lines

457: -- to delete all service lines before deleting the charge header
458: PROCEDURE delete_lines(X_It_Header_Id NUMBER) IS
459: BEGIN
460:
461: DELETE FROM igi_itr_charge_lines
462: WHERE it_header_id = X_It_Header_Id;
463:
464:
465: END delete_lines;

Line 469: END IGI_ITR_CHARGE_LINES_PKG;

465: END delete_lines;
466: -- OPSF(I) ITR Bug 1764441 22-May-2001 S Brewer End(1)
467:
468:
469: END IGI_ITR_CHARGE_LINES_PKG;