DBA Data[Home] [Help]

APPS.GL_JE_BATCHES_PKG dependencies on GL_JE_BATCHES

Line 1: PACKAGE BODY gl_je_batches_pkg AS

1: PACKAGE BODY gl_je_batches_pkg AS
2: /* $Header: glijebab.pls 120.17.12020000.4 2012/10/11 09:24:11 degoel ship $ */
3:
4: --
5: -- PUBLIC FUNCTIONS

Line 16: FROM GL_JE_BATCHES jeb

12: per_type VARCHAR2,
13: row_id VARCHAR2) IS
14: CURSOR chk_duplicates is
15: SELECT 'Duplicate'
16: FROM GL_JE_BATCHES jeb
17: WHERE jeb.name = batch_name
18: AND jeb.default_period_name = period_name
19: AND jeb.chart_of_accounts_id = coa_id
20: AND jeb.period_set_name = cal_name

Line 42: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.check_unique');

38: WHEN app_exceptions.application_exception THEN
39: RAISE;
40: WHEN OTHERS THEN
41: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
42: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.check_unique');
43: RAISE;
44: END check_unique;
45:
46: FUNCTION get_unique_id RETURN NUMBER IS

Line 48: SELECT gl_je_batches_s.NEXTVAL

44: END check_unique;
45:
46: FUNCTION get_unique_id RETURN NUMBER IS
47: CURSOR get_new_id IS
48: SELECT gl_je_batches_s.NEXTVAL
49: FROM dual;
50: new_id number;
51: BEGIN
52: OPEN get_new_id;

Line 61: fnd_message.set_token('SEQUENCE', 'GL_JE_BATCHES_S');

57: return(new_id);
58: ELSE
59: CLOSE get_new_id;
60: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
61: fnd_message.set_token('SEQUENCE', 'GL_JE_BATCHES_S');
62: app_exception.raise_exception;
63: END IF;
64:
65: EXCEPTION

Line 70: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.get_unique_id');

66: WHEN app_exceptions.application_exception THEN
67: RAISE;
68: WHEN OTHERS THEN
69: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
70: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.get_unique_id');
71: RAISE;
72: END get_unique_id;
73:
74:

Line 101: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.has_lines');

97: WHEN app_exceptions.application_exception THEN
98: RAISE;
99: WHEN OTHERS THEN
100: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
101: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.has_lines');
102: RAISE;
103: END has_lines;
104:
105:

Line 136: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.needs_approval');

132: WHEN app_exceptions.application_exception THEN
133: RAISE;
134: WHEN OTHERS THEN
135: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
136: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.needs_approval');
137: RAISE;
138: END needs_approval;
139:
140: FUNCTION needs_tax(batch_id NUMBER) RETURN BOOLEAN IS

Line 168: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.needs_tax');

164: WHEN app_exceptions.application_exception THEN
165: RAISE;
166: WHEN OTHERS THEN
167: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
168: fnd_message.set_token('PROCEDURE', 'gl_je_batches_pkg.needs_tax');
169: RAISE;
170: END needs_tax;
171:
172:

Line 291: CURSOR C IS SELECT rowid FROM GL_JE_BATCHES

287: X_Last_Updated_By NUMBER,
288: X_Last_Update_Login NUMBER
289: ) IS
290:
291: CURSOR C IS SELECT rowid FROM GL_JE_BATCHES
292: WHERE je_batch_id = X_Je_Batch_Id;
293:
294: has_je VARCHAR2(1);
295: BEGIN

Line 318: INSERT INTO GL_JE_BATCHES(

314: fnd_message.set_name('SQLGL', 'GL_JE_BATCH_W_NO_JOURNALS');
315: app_exception.raise_exception;
316: END IF;
317:
318: INSERT INTO GL_JE_BATCHES(
319: je_batch_id,
320: name,
321: chart_of_accounts_id,
322: period_set_name,

Line 417: FROM GL_JE_BATCHES

413: X_Verify_Request_Completed VARCHAR2
414: ) IS
415: CURSOR C IS
416: SELECT *
417: FROM GL_JE_BATCHES
418: WHERE rowid = X_Rowid
419: FOR UPDATE of Je_Batch_Id NOWAIT;
420: Recinfo C%ROWTYPE;
421: dev_request_phase VARCHAR2(30);

Line 599: FROM gl_je_batches

595: -- refetch the approval status
596: IF (Update_Approval_Stat_Flag = 'Y') THEN
597: SELECT approval_status_code
598: INTO X_Approval_Status_Code
599: FROM gl_je_batches
600: WHERE rowid = X_RowId;
601:
602: -- If a journal has been deleted, we may need to reset the
603: -- approval required flag. Check.

Line 610: IF (gl_je_batches_pkg.needs_approval(X_Je_Batch_Id)) THEN

606: -- posted or approved, but check anyway.
607: IF ( (X_status <> 'P')
608: AND (X_Approval_Status_Code <> 'A')
609: ) THEN
610: IF (gl_je_batches_pkg.needs_approval(X_Je_Batch_Id)) THEN
611: IF (X_Approval_Status_Code = 'Z') THEN
612: X_Approval_Status_Code := 'R';
613: END IF;
614: ELSE

Line 632: UPDATE GL_JE_BATCHES

628:
629: -- To prevent conflicts where the same user is updating multiple headers
630: -- from the same batch, only update the status verified if you are
631: -- updating it to 'N'.
632: UPDATE GL_JE_BATCHES
633: SET
634: je_batch_id = X_Je_Batch_Id,
635: name = X_Name,
636: chart_of_accounts_id = X_Chart_of_Accounts_id,

Line 740: CURSOR C IS SELECT rowid FROM GL_JE_BATCHES

736: X_Global_Attribute18 VARCHAR2,
737: X_Global_Attribute19 VARCHAR2,
738: X_Global_Attribute20 VARCHAR2
739: ) IS
740: CURSOR C IS SELECT rowid FROM GL_JE_BATCHES
741:
742: WHERE je_batch_id = X_Je_Batch_Id;
743: has_je VARCHAR2(1);
744: BEGIN

Line 767: INSERT INTO GL_JE_BATCHES(

763: fnd_message.set_name('SQLGL', 'GL_JE_BATCH_W_NO_JOURNALS');
764: app_exception.raise_exception;
765: END IF;
766:
767: INSERT INTO GL_JE_BATCHES(
768: je_batch_id,
769: last_update_date,
770: last_updated_by,
771: name,

Line 985: FROM GL_JE_BATCHES

981: X_Global_Attribute20 VARCHAR2
982: ) IS
983: CURSOR C IS
984: SELECT *
985: FROM GL_JE_BATCHES
986: WHERE rowid = X_Rowid
987: FOR UPDATE of Je_Batch_Id NOWAIT;
988: Recinfo C%ROWTYPE;
989: dev_request_phase VARCHAR2(30);

Line 1327: FROM gl_je_batches

1323: -- refetch the approval status
1324: IF (Update_Approval_Stat_Flag = 'Y') THEN
1325: SELECT approval_status_code
1326: INTO X_Approval_Status_Code
1327: FROM gl_je_batches
1328: WHERE rowid = X_RowId;
1329:
1330: -- If a journal has been deleted, we may need to reset the
1331: -- approval required flag. Check.

Line 1338: IF (gl_je_batches_pkg.needs_approval(X_Je_Batch_Id)) THEN

1334: -- posted or approved, but check anyway.
1335: IF ( (X_status <> 'P')
1336: AND (X_Approval_Status_Code <> 'A')
1337: ) THEN
1338: IF (gl_je_batches_pkg.needs_approval(X_Je_Batch_Id)) THEN
1339: IF (X_Approval_Status_Code = 'Z') THEN
1340: X_Approval_Status_Code := 'R';
1341: END IF;
1342: ELSE

Line 1348: UPDATE GL_JE_BATCHES

1344: END IF;
1345: END IF;
1346: END IF;
1347:
1348: UPDATE GL_JE_BATCHES
1349: SET
1350:
1351: je_batch_id = X_Je_Batch_Id,
1352: last_update_date = X_Last_Update_Date,

Line 1432: FROM gl_je_headers gh, gl_je_batches gb

1428: dev_request_phase VARCHAR2(30);
1429:
1430: CURSOR get_child IS
1431: SELECT gb.rowid,gb.je_batch_id
1432: FROM gl_je_headers gh, gl_je_batches gb
1433: WHERE gb.je_batch_id = gh.je_batch_id
1434: AND gh.parent_je_header_id IN
1435: (select je_header_id
1436: from gl_je_headers

Line 1451: FROM gl_je_batches

1447: status,
1448: request_id
1449: INTO bc_status, approval_status,
1450: batch_status, request_id
1451: FROM gl_je_batches
1452: WHERE rowid = X_Rowid;
1453:
1454: -- Check if we are in the process of reserving funds for
1455: -- this batch

Line 1516: gl_je_batches_pkg.Delete_Row(l_rowid,l_je_batch_id);

1512: LOOP
1513: FETCH get_child INTO l_rowid,l_je_batch_id;
1514: EXIT WHEN get_child%NOTFOUND;
1515:
1516: gl_je_batches_pkg.Delete_Row(l_rowid,l_je_batch_id);
1517:
1518: END LOOP;
1519: CLOSE get_child;
1520:

Line 1525: DELETE FROM GL_JE_BATCHES

1521: -- Delete the journals
1522: gl_je_headers_pkg.delete_headers(X_Je_Batch_Id);
1523:
1524: -- Delete the batches
1525: DELETE FROM GL_JE_BATCHES
1526: WHERE rowid = X_Rowid;
1527:
1528:
1529: EXCEPTION

Line 1534: END gl_je_batches_pkg;

1530: WHEN NO_DATA_FOUND THEN
1531: null;
1532: END Delete_Row;
1533:
1534: END gl_je_batches_pkg;