APPS.GL_CONSOLIDATION_PKG dependencies on GL_CONSOLIDATION

Line 1: PACKAGE BODY GL_CONSOLIDATION_PKG as

1: PACKAGE BODY GL_CONSOLIDATION_PKG as
2: /* $Header: glicostb.pls 120.13 2005/05/05 01:06:18 kvora ship $ */
3: --
4: -- PRIVATE FUNCTIONS
5: --

Line 66: CURSOR C IS SELECT rowid FROM gl_consolidation

62: X_Summarize_Lines_Flag VARCHAR2,
63: X_Run_Posting_Flag VARCHAR2,
64: X_Security_Flag VARCHAR2
65: ) IS
66: CURSOR C IS SELECT rowid FROM gl_consolidation
67: WHERE consolidation_id = X_Consolidation_Id;
68: BEGIN
69:
70: -- Check that from and to ledgers have same funcional currency

Line 75: INSERT INTO gl_consolidation(

71: if (X_Method = 'T') then
72: Check_Same_Currency(X_To_Ledger_Id, X_From_Ledger_Id);
73: end if;
74:
75: INSERT INTO gl_consolidation(
76: consolidation_id,
77: name,
78: coa_mapping_id,
79: last_update_date,

Line 165: FROM gl_consolidation

161: X_Security_Flag VARCHAR2
162: ) IS
163: CURSOR C IS
164: SELECT *
165: FROM gl_consolidation
166: WHERE rowid = X_Rowid
167: FOR UPDATE of Consolidation_Id NOWAIT;
168: Recinfo C%ROWTYPE;
169: BEGIN

Line 275: UPDATE gl_consolidation

271: if (X_Method = 'T') then
272: Check_Same_Currency(X_To_Ledger_Id, X_From_Ledger_Id);
273: end if;
274:
275: UPDATE gl_consolidation
276: SET
277:
278: consolidation_id = X_Consolidation_Id,
279: name = X_Name,

Line 314: DELETE FROM gl_consolidation

310:
311: PROCEDURE Delete_Row(X_Rowid VARCHAR2, X_Consolidation_Id NUMBER) IS
312: BEGIN
313:
314: DELETE FROM gl_consolidation
315: WHERE rowid = X_Rowid;
316:
317: if (SQL%NOTFOUND) then
318: RAISE NO_DATA_FOUND;

Line 326: FROM GL_CONSOLIDATION glc

322: PROCEDURE Check_Unique_Name(X_Rowid VARCHAR2,
323: X_Name VARCHAR2) IS
324: CURSOR check_dups IS
325: SELECT 1
326: FROM GL_CONSOLIDATION glc
327: WHERE glc.name = X_Name
328: AND ( X_Rowid is NULL
329: OR glc.rowid <> X_Rowid);
330:

Line 350: FROM GL_CONSOLIDATION glc

346: PROCEDURE Check_Unique(X_Rowid VARCHAR2,
347: X_Consolidation_Id NUMBER) IS
348: CURSOR C2 IS
349: SELECT 1
350: FROM GL_CONSOLIDATION glc
351: WHERE glc.consolidation_id = X_Consolidation_Id
352: AND ( X_Rowid is NULL
353: OR glc.rowid <> X_Rowid);
354:

Line 364: fnd_message.set_token('TAB_S','GL_CONSOLIDATION_S');

360:
361: IF C2%FOUND THEN
362: CLOSE C2;
363: fnd_message.set_name('SQLGL','GL_DUP_UNIQUE_ID');
364: fnd_message.set_token('TAB_S','GL_CONSOLIDATION_S');
365: app_exception.raise_exception;
366: END IF;
367:
368: CLOSE C2;

Line 402: FROM GL_CONSOLIDATION_HISTORY COH

398: SELECT 'Y'
399: FROM DUAL
400: WHERE EXISTS
401: ( SELECT 'Mapping has been run atleast once'
402: FROM GL_CONSOLIDATION_HISTORY COH
403: WHERE COH.consolidation_id = X_Consolidation_Id
404: );
405:
406: BEGIN

Line 419: END GL_CONSOLIDATION_PKG;

415:
416: CLOSE C4;
417: END Check_Mapping_Run;
418:
419: END GL_CONSOLIDATION_PKG;