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.3 2009/05/28 11:53:05 skotakar 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 883: CURSOR C IS SELECT rowid FROM GL_JE_LINES

879: X_Global_Attribute9 VARCHAR2,
880: X_Global_Attribute10 VARCHAR2,
881: X_Global_Attribute_Category VARCHAR2
882: ) IS
883: CURSOR C IS SELECT rowid FROM GL_JE_LINES
884: WHERE je_header_id = X_Je_Header_Id
885: AND je_line_num = X_Je_Line_Num;
886:
887: dummy RowId;

Line 902: INSERT INTO GL_JE_LINES (

898: X_Code_Combination_Id,
899: X_Last_Updated_By,
900: X_Last_Update_Login);
901:
902: INSERT INTO GL_JE_LINES (
903: je_header_id,
904: je_line_num,
905: last_update_date,
906: last_updated_by,

Line 1086: gl_je_lines_recon_pkg.insert_row(

1082: CLOSE C;
1083:
1084: -- Insert a reconciliation row if reconciliation is on
1085: IF (X_Recon_On_Flag = 'Y') THEN
1086: gl_je_lines_recon_pkg.insert_row(
1087: X_Rowid=>X_Recon_Rowid,
1088: X_Je_Header_Id=>X_Je_Header_id,
1089: X_Je_Line_Num=>X_Je_Line_Num,
1090: X_Ledger_Id=>X_Ledger_Id,

Line 1192: FROM GL_JE_LINES

1188: X_Global_Attribute_Category VARCHAR2
1189: ) IS
1190: CURSOR C IS
1191: SELECT *
1192: FROM GL_JE_LINES
1193: WHERE rowid = X_Rowid
1194: FOR UPDATE of Je_Header_Id NOWAIT;
1195: Recinfo C%ROWTYPE;
1196: BEGIN

Line 1442: gl_je_lines_recon_pkg.lock_row(

1438: AND (X_Global_Attribute_Category IS NULL)))
1439: ) then
1440:
1441: IF (X_Recon_Rowid IS NOT NULL) THEN
1442: gl_je_lines_recon_pkg.lock_row(
1443: X_RowId => X_Recon_Rowid,
1444: X_Je_Header_Id=>X_Je_Header_id,
1445: X_Je_Line_Num=>X_Je_Line_Num,
1446: X_Ledger_Id=>X_Ledger_Id,

Line 1562: UPDATE GL_JE_LINES

1558: X_Code_Combination_Id,
1559: X_Last_Updated_By,
1560: X_Last_Update_Login);
1561:
1562: UPDATE GL_JE_LINES
1563: SET
1564: je_header_id = X_Je_Header_Id,
1565: je_line_num = X_Je_Line_Num,
1566: last_update_date = X_Last_Update_Date,

Line 1656: gl_je_lines_recon_pkg.insert_row(

1652:
1653: -- If no row exists, insert one if reconciliation is now on
1654: IF (X_Recon_Rowid IS NULL) THEN
1655: IF (X_Recon_On_Flag = 'Y') THEN
1656: gl_je_lines_recon_pkg.insert_row(
1657: X_Rowid=>X_Recon_Rowid,
1658: X_Je_Header_Id=>X_Je_Header_id,
1659: X_Je_Line_Num=>X_Je_Line_Num,
1660: X_Ledger_Id=>X_Ledger_Id,

Line 1674: gl_je_lines_recon_pkg.update_row(

1670: -- If a row exists, update it if reconciliation is on. Delete it if
1671: -- reconciliation is off.
1672: ELSE
1673: IF (X_Recon_On_Flag = 'Y') THEN
1674: gl_je_lines_recon_pkg.update_row(
1675: X_Rowid=>X_Recon_Rowid,
1676: X_Je_Header_Id=>X_Je_Header_id,
1677: X_Je_Line_Num=>X_Je_Line_Num,
1678: X_Ledger_Id=>X_Ledger_Id,

Line 1687: gl_je_lines_recon_pkg.delete_row(

1683: X_Last_Update_Date=>X_Last_Update_Date,
1684: X_Last_Updated_By=>X_Last_Updated_By,
1685: X_Last_Update_Login=>X_Last_Update_Login);
1686: ELSE
1687: gl_je_lines_recon_pkg.delete_row(
1688: X_Rowid=>X_Recon_Rowid);
1689: X_Recon_Rowid := null;
1690: END IF;
1691: END IF;

Line 1698: FROM GL_JE_LINES

1694: PROCEDURE Delete_Row(X_Rowid VARCHAR2,
1695: X_Recon_Rowid VARCHAR2) IS
1696: CURSOR c_del_line (lv_row_id VARCHAR2 )IS
1697: SELECT je_line_num,je_header_id
1698: FROM GL_JE_LINES
1699: WHERE rowid = lv_row_id ;
1700:
1701: lv_header_id number;
1702: lv_line_num number;

Line 1708: DELETE FROM GL_JE_LINES

1704: OPEN c_del_line ( X_Rowid);
1705: FETCH c_del_line into lv_line_num , lv_header_id ;
1706: CLOSE c_del_line;
1707:
1708: DELETE FROM GL_JE_LINES
1709: WHERE rowid = X_Rowid;
1710:
1711: if (SQL%NOTFOUND) then
1712: Raise NO_DATA_FOUND;

Line 1720: gl_je_lines_recon_pkg.delete_row(

1716: GL_IMPORT_REFERENCES_PKG.delete_line (lv_header_id ,lv_line_num );
1717:
1718: -- Delete any reconciliation row
1719: IF (X_Recon_Rowid IS NOT NULL) THEN
1720: gl_je_lines_recon_pkg.delete_row(
1721: X_Rowid=>X_Recon_Rowid);
1722: END IF;
1723: END Delete_Row;
1724:

Line 1725: END GL_JE_LINES_PKG;

1721: X_Rowid=>X_Recon_Rowid);
1722: END IF;
1723: END Delete_Row;
1724:
1725: END GL_JE_LINES_PKG;