DBA Data[Home] [Help]

APPS.GL_JE_LINES_PKG dependencies on GL_JE_LINES

Line 1: PACKAGE BODY GL_JE_LINES_PKG as

1: PACKAGE BODY GL_JE_LINES_PKG as
2: /* $Header: glijelnb.pls 120.18.12010000.2 2008/11/13 22:00:28 sommukhe ship $ */
3:
4: --
5: -- PRIVATE VARIABLES

Line 28: FROM GL_JE_LINES jel

24: PROCEDURE check_unique(header_id NUMBER, line_num NUMBER,
25: row_id VARCHAR2) IS
26: CURSOR chk_duplicates is
27: SELECT 'Duplicate'
28: FROM GL_JE_LINES jel
29: WHERE jel.je_header_id = header_id
30: AND jel.je_line_num = line_num
31: AND ( row_id is null
32: OR jel.rowid <> row_id);

Line 51: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.check_unique');

47: WHEN app_exceptions.application_exception THEN
48: RAISE;
49: WHEN OTHERS THEN
50: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
51: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.check_unique');
52: RAISE;
53: END check_unique;
54:
55: PROCEDURE delete_lines(header_id NUMBER) IS

Line 58: DELETE gl_je_lines

54:
55: PROCEDURE delete_lines(header_id NUMBER) IS
56: BEGIN
57: -- Delete all of the lines in that header
58: DELETE gl_je_lines
59: WHERE je_header_id = header_id;
60:
61: -- Delete the reference lines if any.
62: GL_IMPORT_REFERENCES_PKG.delete_lines (header_id);

Line 69: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.delete_lines');

65: WHEN app_exceptions.application_exception THEN
66: RAISE;
67: WHEN OTHERS THEN
68: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
69: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.delete_lines');
70: RAISE;
71: END delete_lines;
72:
73: PROCEDURE update_lines(header_id NUMBER,

Line 140: UPDATE gl_je_lines

136: accounted_divisor := accounted_mau;
137: END IF;
138: END IF;
139:
140: UPDATE gl_je_lines
141: SET period_name = x_period_name,
142: effective_date = x_effective_date,
143: entered_dr = decode(conversion_numer_rate, -1, entered_dr,
144: round(entered_dr/entered_divisor)*entered_divisor),

Line 178: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.update_lines');

174:
175: EXCEPTION
176: WHEN OTHERS THEN
177: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
178: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.update_lines');
179: RAISE;
180: END update_lines;
181:
182: PROCEDURE calculate_totals( header_id NUMBER,

Line 193: FROM GL_JE_LINES jel

189: SELECT sum(nvl(entered_dr, 0)),
190: sum(nvl(entered_cr, 0)),
191: sum(nvl(accounted_dr, 0)),
192: sum(nvl(accounted_cr, 0))
193: FROM GL_JE_LINES jel
194: WHERE jel.je_header_id = header_id;
195: BEGIN
196: OPEN calc_totals;
197: FETCH calc_totals INTO running_total_dr, running_total_cr,

Line 211: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.calculate_totals');

207:
208: EXCEPTION
209: WHEN OTHERS THEN
210: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
211: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.calculate_totals');
212: RAISE;
213: END calculate_totals;
214:
215: FUNCTION header_has_stat(header_id NUMBER) RETURN BOOLEAN IS

Line 218: FROM GL_JE_LINES jel

214:
215: FUNCTION header_has_stat(header_id NUMBER) RETURN BOOLEAN IS
216: CURSOR has_stat is
217: SELECT stat_amount
218: FROM GL_JE_LINES jel
219: WHERE jel.je_header_id = header_id
220: AND stat_amount IS NOT NULL;
221: dummy NUMBER;
222: BEGIN

Line 236: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.header_has_stat');

232: RETURN(TRUE);
233: EXCEPTION
234: WHEN OTHERS THEN
235: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
236: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.header_has_stat');
237: RAISE;
238: END header_has_stat;
239:
240: FUNCTION header_has_tax(header_id NUMBER) RETURN BOOLEAN IS

Line 243: FROM GL_JE_LINES jel

239:
240: FUNCTION header_has_tax(header_id NUMBER) RETURN BOOLEAN IS
241: CURSOR has_tax is
242: SELECT 'Has tax'
243: FROM GL_JE_LINES jel
244: WHERE jel.je_header_id = header_id
245: AND tax_type_code IS NOT NULL;
246: dummy VARCHAR2(100);
247: BEGIN

Line 261: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.header_has_tax');

257: RETURN(TRUE);
258: EXCEPTION
259: WHEN OTHERS THEN
260: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
261: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.header_has_tax');
262: RAISE;
263: END header_has_tax;
264:
265: PROCEDURE populate_fields(x_ledger_id NUMBER,

Line 322: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');

318: );
319:
320: IF (temp_return_status = 'E') THEN
321: FND_MESSAGE.Set_Name('ZX', err_msg);
322: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');
323: -- APP_EXCEPTION.Raise_Exception;
324: ELSIF (temp_return_status = 'U') THEN
325: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
326: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');

Line 326: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');

322: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');
323: -- APP_EXCEPTION.Raise_Exception;
324: ELSIF (temp_return_status = 'U') THEN
325: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
326: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.populate_fields');
327: APP_EXCEPTION.Raise_Exception;
328: END IF;
329: END IF;
330:

Line 331: gl_je_lines_pkg.init_acct_dependencies(

327: APP_EXCEPTION.Raise_Exception;
328: END IF;
329: END IF;
330:
331: gl_je_lines_pkg.init_acct_dependencies(
332: x_ledger_id => x_ledger_id,
333: x_org_id => x_org_id,
334: x_coa_id => x_coa_id,
335: x_ccid => x_ccid,

Line 474: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');

470: );
471:
472: IF (dummy_return_status = 'E') THEN
473: FND_MESSAGE.Set_Name('ZX', err_msg);
474: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');
475: -- APP_EXCEPTION.Raise_Exception;
476: ELSIF (dummy_return_status = 'U') THEN
477: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
478: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');

Line 478: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');

474: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');
475: -- APP_EXCEPTION.Raise_Exception;
476: ELSIF (dummy_return_status = 'U') THEN
477: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
478: fnd_message.set_token('PROCEDURE', 'gl_je_lines_pkg.init_acct_dependencies');
479: APP_EXCEPTION.Raise_Exception;
480: END IF;
481:
482: -- Get the default rounding rule code and default include tax flag

Line 654: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');

650: temp_return_status, err_msg);
651:
652: IF (temp_return_status = 'E') THEN
653: FND_MESSAGE.Set_Name('ZX', err_msg);
654: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');
655: --APP_EXCEPTION.Raise_Exception;
656: ELSIF (temp_return_status = 'U') THEN
657: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
658: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');

Line 658: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');

654: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');
655: --APP_EXCEPTION.Raise_Exception;
656: ELSIF (temp_return_status = 'U') THEN
657: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
658: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_tax_code');
659: APP_EXCEPTION.Raise_Exception;
660: END IF;
661:
662: IF (output_type = 'I') THEN

Line 700: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');

696: );
697:
698: IF (temp_return_status = 'E') THEN
699: FND_MESSAGE.Set_Name('ZX', err_msg);
700: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');
701: --APP_EXCEPTION.Raise_Exception;
702: ELSIF (temp_return_status = 'U') THEN
703: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
704: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');

Line 704: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');

700: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');
701: --APP_EXCEPTION.Raise_Exception;
702: ELSIF (temp_return_status = 'U') THEN
703: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
704: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_rounding_rule');
705: APP_EXCEPTION.Raise_Exception;
706: END IF;
707:
708: IF default_rounding_rule_code IS NOT NULL THEN

Line 765: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');

761: err_msg);
762:
763: IF (temp_return_status = 'E') THEN
764: FND_MESSAGE.Set_Name('ZX', err_msg);
765: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');
766: -- APP_EXCEPTION.Raise_Exception;
767: ELSIF (temp_return_status = 'U') THEN
768: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
769: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');

Line 769: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');

765: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');
766: -- APP_EXCEPTION.Raise_Exception;
767: ELSIF (temp_return_status = 'U') THEN
768: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
769: fnd_message.set_token('FUNCTION', 'gl_je_lines_pkg.default_includes_tax');
770: APP_EXCEPTION.Raise_Exception;
771: END IF;
772:
773: IF temp_includes_tax_flag IS NOT NULL THEN

Line 872: CURSOR C IS SELECT rowid FROM GL_JE_LINES

868: X_Tax_Line_Flag VARCHAR2,
869: X_Tax_Group_Id NUMBER,
870: X_Third_Party_Id VARCHAR2
871: ) IS
872: CURSOR C IS SELECT rowid FROM GL_JE_LINES
873: WHERE je_header_id = X_Je_Header_Id
874: AND je_line_num = X_Je_Line_Num;
875:
876: dummy RowId;

Line 891: INSERT INTO GL_JE_LINES (

887: X_Code_Combination_Id,
888: X_Last_Updated_By,
889: X_Last_Update_Login);
890:
891: INSERT INTO GL_JE_LINES (
892: je_header_id,
893: je_line_num,
894: last_update_date,
895: last_updated_by,

Line 1053: gl_je_lines_recon_pkg.insert_row(

1049: CLOSE C;
1050:
1051: -- Insert a reconciliation row if reconciliation is on
1052: IF (X_Recon_On_Flag = 'Y') THEN
1053: gl_je_lines_recon_pkg.insert_row(
1054: X_Rowid=>X_Recon_Rowid,
1055: X_Je_Header_Id=>X_Je_Header_id,
1056: X_Je_Line_Num=>X_Je_Line_Num,
1057: X_Ledger_Id=>X_Ledger_Id,

Line 1148: FROM GL_JE_LINES

1144: X_Third_Party_Id VARCHAR2
1145: ) IS
1146: CURSOR C IS
1147: SELECT *
1148: FROM GL_JE_LINES
1149: WHERE rowid = X_Rowid
1150: FOR UPDATE of Je_Header_Id NOWAIT;
1151: Recinfo C%ROWTYPE;
1152: BEGIN

Line 1364: gl_je_lines_recon_pkg.lock_row(

1360: AND (X_Third_Party_Id IS NULL)))
1361: ) then
1362:
1363: IF (X_Recon_Rowid IS NOT NULL) THEN
1364: gl_je_lines_recon_pkg.lock_row(
1365: X_RowId => X_Recon_Rowid,
1366: X_Je_Header_Id=>X_Je_Header_id,
1367: X_Je_Line_Num=>X_Je_Line_Num,
1368: X_Ledger_Id=>X_Ledger_Id,

Line 1472: UPDATE GL_JE_LINES

1468: X_Code_Combination_Id,
1469: X_Last_Updated_By,
1470: X_Last_Update_Login);
1471:
1472: UPDATE GL_JE_LINES
1473: SET
1474: je_header_id = X_Je_Header_Id,
1475: je_line_num = X_Je_Line_Num,
1476: last_update_date = X_Last_Update_Date,

Line 1555: gl_je_lines_recon_pkg.insert_row(

1551:
1552: -- If no row exists, insert one if reconciliation is now on
1553: IF (X_Recon_Rowid IS NULL) THEN
1554: IF (X_Recon_On_Flag = 'Y') THEN
1555: gl_je_lines_recon_pkg.insert_row(
1556: X_Rowid=>X_Recon_Rowid,
1557: X_Je_Header_Id=>X_Je_Header_id,
1558: X_Je_Line_Num=>X_Je_Line_Num,
1559: X_Ledger_Id=>X_Ledger_Id,

Line 1573: gl_je_lines_recon_pkg.update_row(

1569: -- If a row exists, update it if reconciliation is on. Delete it if
1570: -- reconciliation is off.
1571: ELSE
1572: IF (X_Recon_On_Flag = 'Y') THEN
1573: gl_je_lines_recon_pkg.update_row(
1574: X_Rowid=>X_Recon_Rowid,
1575: X_Je_Header_Id=>X_Je_Header_id,
1576: X_Je_Line_Num=>X_Je_Line_Num,
1577: X_Ledger_Id=>X_Ledger_Id,

Line 1586: gl_je_lines_recon_pkg.delete_row(

1582: X_Last_Update_Date=>X_Last_Update_Date,
1583: X_Last_Updated_By=>X_Last_Updated_By,
1584: X_Last_Update_Login=>X_Last_Update_Login);
1585: ELSE
1586: gl_je_lines_recon_pkg.delete_row(
1587: X_Rowid=>X_Recon_Rowid);
1588: X_Recon_Rowid := null;
1589: END IF;
1590: END IF;

Line 1597: FROM GL_JE_LINES

1593: PROCEDURE Delete_Row(X_Rowid VARCHAR2,
1594: X_Recon_Rowid VARCHAR2) IS
1595: CURSOR c_del_line (lv_row_id VARCHAR2 )IS
1596: SELECT je_line_num,je_header_id
1597: FROM GL_JE_LINES
1598: WHERE rowid = lv_row_id ;
1599:
1600: lv_header_id number;
1601: lv_line_num number;

Line 1607: DELETE FROM GL_JE_LINES

1603: OPEN c_del_line ( X_Rowid);
1604: FETCH c_del_line into lv_line_num , lv_header_id ;
1605: CLOSE c_del_line;
1606:
1607: DELETE FROM GL_JE_LINES
1608: WHERE rowid = X_Rowid;
1609:
1610: if (SQL%NOTFOUND) then
1611: Raise NO_DATA_FOUND;

Line 1619: gl_je_lines_recon_pkg.delete_row(

1615: GL_IMPORT_REFERENCES_PKG.delete_line (lv_header_id ,lv_line_num );
1616:
1617: -- Delete any reconciliation row
1618: IF (X_Recon_Rowid IS NOT NULL) THEN
1619: gl_je_lines_recon_pkg.delete_row(
1620: X_Rowid=>X_Recon_Rowid);
1621: END IF;
1622: END Delete_Row;
1623:

Line 1624: END GL_JE_LINES_PKG;

1620: X_Rowid=>X_Recon_Rowid);
1621: END IF;
1622: END Delete_Row;
1623:
1624: END GL_JE_LINES_PKG;