DBA Data[Home] [Help]

APPS.GL_FLATTEN_LEDGER_SEG_VALS dependencies on GL_FLATTEN_SETUP_DATA

Line 40: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

36:
37:
38: -- Cleaning GL_LEDGER_SEGMENT_VALUES before processing
39:
40: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
41: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
42: TOKEN_NUM => 2,
43: T1 =>'ROUTINE',
44: V1 =>

Line 61: WHERE CHART_OF_ACCOUNTS_ID = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);

57: WHERE STATUS_CODE = l_status_flag
58: AND LEDGER_ID IN
59: (SELECT LEDGER_ID
60: FROM GL_LEDGERS
61: WHERE CHART_OF_ACCOUNTS_ID = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);
62:
63: L_Number_Of_Rows := SQL%ROWCOUNT;
64: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0119',
65: TOKEN_NUM =>2,

Line 72: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

68: T2 =>'TABLE',
69: V2 =>'GL_LEDGER_SEGMENT_VALUES');
70:
71:
72: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
73: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
74: TOKEN_NUM => 2,
75: T1 =>'ROUTINE',
76: V1 =>

Line 90: WHERE chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);

86: WHERE status_code = 'D'
87: AND ledger_id IN
88: (SELECT ledger_id
89: FROM GL_LEDGERS
90: WHERE chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);
91:
92: L_Number_Of_Rows := SQL%ROWCOUNT;
93: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',
94: TOKEN_NUM =>2,

Line 104: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

100: FND_CONCURRENT.AF_COMMIT; -- COMMIT Point
101:
102: -- Update Start_Date/End_Date In GL_LEDGER_SEGMENT_VALUES
103:
104: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
105: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
106: TOKEN_NUM => 2,
107: T1 =>'ROUTINE',
108: V1 =>

Line 126: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

122: (SELECT GLLNSV2.RECORD_ID
123: FROM GL_LEDGERS GLL,
124: GL_LEDGER_NORM_SEG_VALS GLLNSV2
125: WHERE GLL.CHART_OF_ACCOUNTS_ID =
126: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
127: AND GLLNSV2.STATUS_CODE = 'U'
128: AND GLLNSV2.REQUEST_ID =
129: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
130: AND GLLNSV2.LEDGER_ID = GLL.LEDGER_ID);

Line 129: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

125: WHERE GLL.CHART_OF_ACCOUNTS_ID =
126: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
127: AND GLLNSV2.STATUS_CODE = 'U'
128: AND GLLNSV2.REQUEST_ID =
129: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
130: AND GLLNSV2.LEDGER_ID = GLL.LEDGER_ID);
131:
132: L_Number_Of_Rows := SQL%ROWCOUNT;
133: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',

Line 142: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

138: V2 =>'GL_LEDGER_SEGMENT_VALUES');
139:
140: -- Marking outdated records in GL_LEDGER_SEGMENT_VALUES for delete.
141:
142: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
143: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
144: TOKEN_NUM => 2,
145: T1 =>'ROUTINE',
146: V1 =>

Line 161: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

157: (SELECT RECORD_ID
158: FROM GL_LEDGERS GLL,
159: GL_LEDGER_NORM_SEG_VALS GLLNSV
160: WHERE GLL.CHART_OF_ACCOUNTS_ID =
161: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
162: AND GLLNSV.STATUS_CODE = 'D'
163: AND GLLNSV.LEDGER_ID = GLL.LEDGER_ID);
164:
165: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 180: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

176: -- The following statement inserts a record into GL_LEDGER_SEGMENT_VALUES
177: -- table for every new record in GL_LEDGER_NORM_SEG_VALS with
178: -- status_code 'I' and segment_value_type_code of 'S'.
179:
180: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
181: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
182: TOKEN_NUM => 2,
183: T1 =>'ROUTINE',
184: V1 =>

Line 204: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

200: END_DATE)
201: (SELECT GLLNSV.LEDGER_ID, GLLNSV.SEGMENT_TYPE_CODE,
202: GLLNSV.SEGMENT_VALUE, 'I', GLLNSV.RECORD_ID,
203: SYSDATE,
204: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
205: SYSDATE,
206: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
207: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
208: GLLNSV.START_DATE, GLLNSV.END_DATE

Line 206: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

202: GLLNSV.SEGMENT_VALUE, 'I', GLLNSV.RECORD_ID,
203: SYSDATE,
204: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
205: SYSDATE,
206: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
207: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
208: GLLNSV.START_DATE, GLLNSV.END_DATE
209: FROM GL_LEDGERS GLL,
210: GL_LEDGER_NORM_SEG_VALS GLLNSV

Line 207: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,

203: SYSDATE,
204: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
205: SYSDATE,
206: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
207: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
208: GLLNSV.START_DATE, GLLNSV.END_DATE
209: FROM GL_LEDGERS GLL,
210: GL_LEDGER_NORM_SEG_VALS GLLNSV
211: WHERE GLL.CHART_OF_ACCOUNTS_ID =

Line 212: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

208: GLLNSV.START_DATE, GLLNSV.END_DATE
209: FROM GL_LEDGERS GLL,
210: GL_LEDGER_NORM_SEG_VALS GLLNSV
211: WHERE GLL.CHART_OF_ACCOUNTS_ID =
212: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
213: AND GLLNSV.LEDGER_ID = GLL.LEDGER_ID
214: AND GLLNSV.STATUS_CODE = 'I'
215: AND GLL.IMPLICIT_ACCESS_SET_ID IS NOT NULL
216: AND GLLNSV.REQUEST_ID =

Line 217: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

213: AND GLLNSV.LEDGER_ID = GLL.LEDGER_ID
214: AND GLLNSV.STATUS_CODE = 'I'
215: AND GLL.IMPLICIT_ACCESS_SET_ID IS NOT NULL
216: AND GLLNSV.REQUEST_ID =
217: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
218: AND GLLNSV.SEGMENT_VALUE_TYPE_CODE = 'S');
219:
220:
221: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 234: If (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

230: -- The following statement inserts a record into GL_LEDGER_SEGMENT_VALUES
231: -- table for every new record in GL_LEDGER_NORM_SEG_VALS with
232: -- status_code 'I' and segment_value_type_code of 'C'.
233:
234: If (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
235: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
236: TOKEN_NUM => 2,
237: T1 =>'ROUTINE',
238: V1 =>

Line 251: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR

247: END IF;
248:
249: -- Obtain a shared Lock on balancing and management value set ids
250:
251: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR
252: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV')THEN
253:
254: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
255: GL_MESSAGE.Write_Log(msg_name => 'SHRD0181',

Line 252: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV')THEN

248:
249: -- Obtain a shared Lock on balancing and management value set ids
250:
251: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR
252: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV')THEN
253:
254: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
255: GL_MESSAGE.Write_Log(msg_name => 'SHRD0181',
256: token_num => 3,

Line 254: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

250:
251: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR
252: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV')THEN
253:
254: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
255: GL_MESSAGE.Write_Log(msg_name => 'SHRD0181',
256: token_num => 3,
257: t1 => 'ROUTINE',
258: v1 =>

Line 264: TO_CHAR(GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id));

260: t2 => 'VARIABLE',
261: v2 => 'GLSTFL_Bal_Vs_Id',
262: t3 => 'VALUE',
263: v3 =>
264: TO_CHAR(GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id));
265:
266: GL_MESSAGE.Write_Log(msg_name => 'SHRD0181',
267: token_num => 3,
268: t1 => 'ROUTINE',

Line 275: TO_CHAR(GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id));

271: t2 => 'VARIABLE',
272: v2 => 'GLSTFL_Mgt_Vs_Id',
273: t3 => 'VALUE',
274: v3 =>
275: TO_CHAR(GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id));
276: END IF;
277:
278: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
279: GL_MESSAGE.Write_Log

Line 278: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

274: v3 =>
275: TO_CHAR(GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id));
276: END IF;
277:
278: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
279: GL_MESSAGE.Write_Log
280: (msg_name => 'SHRD0180',
281: token_num => 2,
282: t1 => 'ROUTINE',

Line 288: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock

284: t2 => 'ACTION',
285: v2 => 'Obtain shared lock on balancing segment...');
286: END IF;
287:
288: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
289: (X_Param_Type => 'V',
290: X_Param_Id =>
291: GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id,
292: X_Lock_Mode => 4, -- SHARED mode

Line 291: GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id,

287:
288: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
289: (X_Param_Type => 'V',
290: X_Param_Id =>
291: GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id,
292: X_Lock_Mode => 4, -- SHARED mode
293: X_Keep_Looping => TRUE,
294: X_Max_Trys => 5);
295:

Line 300: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

296: IF (NOT ret_val) THEN
297: RAISE GLSTFL_fatal_err;
298: END IF;
299:
300: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
301: GL_MESSAGE.Write_Log
302: (msg_name => 'SHRD0180',
303: token_num => 2,
304: t1 => 'ROUTINE',

Line 313: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id <>

309:
310: -- If mgt_vs_id is different from bal_vs_id, obtain SHARED lock for
311: -- management segment Value set id
312:
313: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id <>
314: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id) THEN
315:
316: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
317: (X_Param_Type => 'V',

Line 314: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id) THEN

310: -- If mgt_vs_id is different from bal_vs_id, obtain SHARED lock for
311: -- management segment Value set id
312:
313: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id <>
314: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id) THEN
315:
316: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
317: (X_Param_Type => 'V',
318: X_Param_Id =>

Line 316: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock

312:
313: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Bal_Vs_Id <>
314: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id) THEN
315:
316: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
317: (X_Param_Type => 'V',
318: X_Param_Id =>
319: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id,
320: X_Lock_Mode => 4, -- SHARED mode

Line 319: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id,

315:
316: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
317: (X_Param_Type => 'V',
318: X_Param_Id =>
319: GL_FLATTEN_SETUP_DATA.GLSTFL_Mgt_Vs_Id,
320: X_Lock_Mode => 4, -- SHARED mode
321: X_Keep_Looping => TRUE,
322: X_Max_Trys => 5);
323:

Line 332: -- These locks will be released in GL_FLATTEN_SETUP_DATA.Main()package

328: END IF;
329:
330: END IF; -- End for operation mode 'VH'
331:
332: -- These locks will be released in GL_FLATTEN_SETUP_DATA.Main()package
333: -- after successfull completion of the clean up routines.
334:
335: INSERT INTO GL_LEDGER_SEGMENT_VALUES
336: (LEDGER_ID, SEGMENT_TYPE_CODE,SEGMENT_VALUE, STATUS_CODE,

Line 343: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

339: END_DATE)
340: (SELECT GLLNSV.LEDGER_ID, GLLNSV.SEGMENT_TYPE_CODE,
341: GLSVH.CHILD_FLEX_VALUE, 'I', GLLNSV.RECORD_ID,
342: SYSDATE,
343: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
344: SYSDATE,
345: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
346: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
347: GLLNSV.START_DATE, GLLNSV.END_DATE

Line 345: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

341: GLSVH.CHILD_FLEX_VALUE, 'I', GLLNSV.RECORD_ID,
342: SYSDATE,
343: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
344: SYSDATE,
345: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
346: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
347: GLLNSV.START_DATE, GLLNSV.END_DATE
348: FROM GL_LEDGERS GLL,
349: GL_LEDGER_NORM_SEG_VALS GLLNSV,

Line 346: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,

342: SYSDATE,
343: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
344: SYSDATE,
345: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
346: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
347: GLLNSV.START_DATE, GLLNSV.END_DATE
348: FROM GL_LEDGERS GLL,
349: GL_LEDGER_NORM_SEG_VALS GLLNSV,
350: GL_SEG_VAL_HIERARCHIES GLSVH

Line 352: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

348: FROM GL_LEDGERS GLL,
349: GL_LEDGER_NORM_SEG_VALS GLLNSV,
350: GL_SEG_VAL_HIERARCHIES GLSVH
351: WHERE GLL.CHART_OF_ACCOUNTS_ID =
352: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
353: AND GLLNSV.LEDGER_ID = GLL.LEDGER_ID
354: AND GLLNSV.STATUS_CODE = 'I'
355: AND GLLNSV.REQUEST_ID =
356: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

Line 356: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

352: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
353: AND GLLNSV.LEDGER_ID = GLL.LEDGER_ID
354: AND GLLNSV.STATUS_CODE = 'I'
355: AND GLLNSV.REQUEST_ID =
356: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
357: AND GLLNSV.SEGMENT_VALUE_TYPE_CODE = 'C'
358: AND GLSVH.FLEX_VALUE_SET_ID =
359: DECODE(GLLNSV.SEGMENT_TYPE_CODE,
360: 'B',GLL.BAL_SEG_VALUE_SET_ID,

Line 386: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

382: -- Update and delete of these rows will be taken care by the original
383: -- logic in FIX_BY_COA() of this package.
384:
385:
386: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
387: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
388: TOKEN_NUM => 2,
389: T1 =>'ROUTINE',
390: V1 =>

Line 408: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

404: END_DATE)
405: (SELECT glr.target_ledger_id,gllsv.segment_type_code,
406: gllsv.segment_value, 'I', gllsv.parent_record_id,
407: sysdate,
408: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
409: sysdate,
410: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
411: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
412: gllsv.start_date, gllsv.end_date

Line 410: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

406: gllsv.segment_value, 'I', gllsv.parent_record_id,
407: sysdate,
408: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
409: sysdate,
410: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
411: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
412: gllsv.start_date, gllsv.end_date
413: FROM GL_LEDGERS gll
414: ,GL_LEDGER_RELATIONSHIPS glr

Line 411: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,

407: sysdate,
408: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
409: sysdate,
410: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
411: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
412: gllsv.start_date, gllsv.end_date
413: FROM GL_LEDGERS gll
414: ,GL_LEDGER_RELATIONSHIPS glr
415: ,GL_LEDGER_SEGMENT_VALUES gllsv

Line 417: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

413: FROM GL_LEDGERS gll
414: ,GL_LEDGER_RELATIONSHIPS glr
415: ,GL_LEDGER_SEGMENT_VALUES gllsv
416: WHERE gll.chart_of_accounts_id =
417: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
418: AND (gll.bal_seg_value_option_code = 'I' OR
419: gll.mgt_seg_value_option_code = 'I')
420: AND gll.alc_ledger_type_code = 'TARGET'
421: AND glr.target_ledger_id = gll.ledger_id

Line 541: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

537: WHERE EXISTS
538: (SELECT 1
539: FROM GL_LEDGERS GLL
540: WHERE GLL.BAL_SEG_VALUE_SET_ID =
541: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
542: OR GLL.MGT_SEG_VALUE_SET_ID =
543: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
544: AND ROWNUM = 1);
545:

Line 543: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

539: FROM GL_LEDGERS GLL
540: WHERE GLL.BAL_SEG_VALUE_SET_ID =
541: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
542: OR GLL.MGT_SEG_VALUE_SET_ID =
543: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
544: AND ROWNUM = 1);
545:
546: EXCEPTION
547:

Line 569: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

565: ELSE
566:
567: -- Cleaning GL_LEDGER_SEGMENT_VALUES before processing
568:
569: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
570: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
571: TOKEN_NUM => 2,
572: T1 =>'ROUTINE',
573: V1 =>

Line 589: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

585: AND LEDGER_ID IN
586: (SELECT LEDGER_ID
587: FROM GL_LEDGERS
588: WHERE BAL_SEG_VALUE_SET_ID =
589: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
590: OR MGT_SEG_VALUE_SET_ID =
591: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
592:
593: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 591: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);

587: FROM GL_LEDGERS
588: WHERE BAL_SEG_VALUE_SET_ID =
589: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
590: OR MGT_SEG_VALUE_SET_ID =
591: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
592:
593: L_Number_Of_Rows := SQL%ROWCOUNT;
594: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0119',
595: TOKEN_NUM =>2,

Line 603: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

599: V2 =>'GL_LEDGER_SEGMENT_VALUES');
600:
601: -- Cleaning GL_LEDGER_SEGMENT_VALUES before processing
602:
603: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
604: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
605: TOKEN_NUM => 2,
606: T1 =>'ROUTINE',
607: V1 =>

Line 622: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

618: AND LEDGER_ID IN
619: (SELECT LEDGER_ID
620: FROM GL_LEDGERS
621: WHERE BAL_SEG_VALUE_SET_ID =
622: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
623: OR MGT_SEG_VALUE_SET_ID =
624: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
625:
626:

Line 624: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);

620: FROM GL_LEDGERS
621: WHERE BAL_SEG_VALUE_SET_ID =
622: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
623: OR MGT_SEG_VALUE_SET_ID =
624: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
625:
626:
627: L_Number_Of_Rows := SQL%ROWCOUNT;
628: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',

Line 640: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

636:
637: -- Marking Parent-Child segment value mappings in
638: -- GL_LEDGER_SEGMENT_VALUES for delete
639:
640: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
641: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
642: TOKEN_NUM => 2,
643: T1 =>'ROUTINE',
644: V1 =>

Line 663: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

659: FROM GL_SEG_VAL_HIERARCHIES GLSVH,
660: GL_LEDGER_NORM_SEG_VALS GLLNSV,
661: GL_LEDGERS GLL
662: WHERE GLSVH.FLEX_VALUE_SET_ID =
663: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
664: AND GLSVH.STATUS_CODE = 'D'
665: AND GLLNSV.SEGMENT_VALUE_TYPE_CODE = 'C'
666: AND GLLNSV.STATUS_CODE IS NULL
667: AND GLLNSV.SEGMENT_VALUE =

Line 672: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

668: GLSVH.PARENT_FLEX_VALUE
669: AND GLL.LEDGER_ID = GLLNSV.LEDGER_ID
670: AND (
671: ( GLL.BAL_SEG_VALUE_SET_ID =
672: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
673: AND GLLNSV.SEGMENT_TYPE_CODE = 'B')
674: OR
675: ( GLL.MGT_SEG_VALUE_SET_ID =
676: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

Line 676: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

672: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
673: AND GLLNSV.SEGMENT_TYPE_CODE = 'B')
674: OR
675: ( GLL.MGT_SEG_VALUE_SET_ID =
676: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
677: AND GLLNSV.SEGMENT_TYPE_CODE = 'M')));
678:
679: L_Number_Of_Rows := SQL%ROWCOUNT;
680: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',

Line 692: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN

688:
689: -- Inserting New Parent-Child segment value mappings into
690: -- GL_LEDGER_SEGMENT_VALUES.
691:
692: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_DEBUG) THEN
693:
694: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0180',
695: TOKEN_NUM => 2,
696: T1 =>'ROUTINE',

Line 715: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

711: END_DATE)
712: (SELECT GLLNSV.LEDGER_ID, GLLNSV.SEGMENT_TYPE_CODE,
713: GLSVH.CHILD_FLEX_VALUE, 'I', GLLNSV.RECORD_ID,
714: SYSDATE,
715: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
716: SYSDATE,
717: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
718: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
719: GLLNSV.START_DATE, GLLNSV.END_DATE

Line 717: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

713: GLSVH.CHILD_FLEX_VALUE, 'I', GLLNSV.RECORD_ID,
714: SYSDATE,
715: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
716: SYSDATE,
717: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
718: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
719: GLLNSV.START_DATE, GLLNSV.END_DATE
720: FROM GL_SEG_VAL_HIERARCHIES GLSVH,
721: GL_LEDGER_NORM_SEG_VALS GLLNSV,

Line 718: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,

714: SYSDATE,
715: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
716: SYSDATE,
717: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
718: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID,
719: GLLNSV.START_DATE, GLLNSV.END_DATE
720: FROM GL_SEG_VAL_HIERARCHIES GLSVH,
721: GL_LEDGER_NORM_SEG_VALS GLLNSV,
722: GL_LEDGERS GLL

Line 724: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

720: FROM GL_SEG_VAL_HIERARCHIES GLSVH,
721: GL_LEDGER_NORM_SEG_VALS GLLNSV,
722: GL_LEDGERS GLL
723: WHERE GLSVH.FLEX_VALUE_SET_ID =
724: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
725: AND GLSVH.STATUS_CODE = 'I'
726: AND GLLNSV.SEGMENT_VALUE_TYPE_CODE = 'C'
727: AND GLLNSV.STATUS_CODE IS NULL
728: AND GLLNSV.SEGMENT_VALUE = GLSVH.PARENT_FLEX_VALUE

Line 732: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

728: AND GLLNSV.SEGMENT_VALUE = GLSVH.PARENT_FLEX_VALUE
729: AND GLL.LEDGER_ID = GLLNSV.LEDGER_ID
730: AND (
731: (GLL.BAL_SEG_VALUE_SET_ID =
732: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
733: AND GLLNSV.SEGMENT_TYPE_CODE = 'B')
734: OR
735: (GLL.MGT_SEG_VALUE_SET_ID =
736: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

Line 736: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

732: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
733: AND GLLNSV.SEGMENT_TYPE_CODE = 'B')
734: OR
735: (GLL.MGT_SEG_VALUE_SET_ID =
736: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
737: AND GLLNSV.SEGMENT_TYPE_CODE = 'M')));
738:
739:
740: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 826: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

822: -- Bug 8265487 -- Should update STATUS_CODE only for completed ledgers
823: UPDATE GL_LEDGER_NORM_SEG_VALS
824: SET STATUS_CODE = NULL, request_id = NULL
825: WHERE STATUS_CODE IN ( 'I','U')
826: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
827: AND LEDGER_ID IN (SELECT LEDGER_ID FROM GL_LEDGERS
828: WHERE CHART_OF_ACCOUNTS_ID = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
829: AND IMPLICIT_ACCESS_SET_ID IS NOT NULL);
830:

Line 828: WHERE CHART_OF_ACCOUNTS_ID = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

824: SET STATUS_CODE = NULL, request_id = NULL
825: WHERE STATUS_CODE IN ( 'I','U')
826: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
827: AND LEDGER_ID IN (SELECT LEDGER_ID FROM GL_LEDGERS
828: WHERE CHART_OF_ACCOUNTS_ID = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
829: AND IMPLICIT_ACCESS_SET_ID IS NOT NULL);
830:
831:
832: /* AND LEDGER_ID IN

Line 836: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID); */

832: /* AND LEDGER_ID IN
833: (SELECT LEDGER_ID
834: FROM GL_LEDGERS
835: WHERE CHART_OF_ACCOUNTS_ID =
836: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID); */
837:
838: L_Number_Of_Rows := SQL%ROWCOUNT;
839: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',
840: TOKEN_NUM =>2,

Line 855: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);

851: AND LEDGER_ID IN
852: (SELECT LEDGER_ID
853: FROM GL_LEDGERS
854: WHERE CHART_OF_ACCOUNTS_ID =
855: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);
856:
857: L_Number_Of_Rows := SQL%ROWCOUNT;
858: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',
859: TOKEN_NUM =>2,

Line 876: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);

872: AND LEDGER_ID IN
873: (SELECT LEDGER_ID
874: FROM GL_LEDGERS
875: WHERE CHART_OF_ACCOUNTS_ID =
876: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);
877:
878: L_Number_Of_Rows := SQL%ROWCOUNT;
879: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0119',
880: TOKEN_NUM => 2,

Line 894: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);

890: AND LEDGER_ID IN
891: (SELECT LEDGER_ID
892: FROM GL_LEDGERS
893: WHERE CHART_OF_ACCOUNTS_ID =
894: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID);
895:
896: L_Number_Of_Rows := SQL%ROWCOUNT;
897: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0119',
898: TOKEN_NUM => 2,

Line 958: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

954: AND LEDGER_ID IN
955: (SELECT LEDGER_ID
956: FROM GL_LEDGERS
957: WHERE BAL_SEG_VALUE_SET_ID =
958: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
959: OR MGT_SEG_VALUE_SET_ID =
960: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
961:
962: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 960: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);

956: FROM GL_LEDGERS
957: WHERE BAL_SEG_VALUE_SET_ID =
958: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
959: OR MGT_SEG_VALUE_SET_ID =
960: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
961:
962: L_Number_Of_Rows := SQL%ROWCOUNT;
963: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0118',
964: TOKEN_NUM =>2,

Line 977: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

973: AND LEDGER_ID IN
974: (SELECT LEDGER_ID
975: FROM GL_LEDGERS
976: WHERE BAL_SEG_VALUE_SET_ID =
977: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
978: OR MGT_SEG_VALUE_SET_ID =
979: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
980:
981: L_Number_Of_Rows := SQL%ROWCOUNT;

Line 979: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);

975: FROM GL_LEDGERS
976: WHERE BAL_SEG_VALUE_SET_ID =
977: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
978: OR MGT_SEG_VALUE_SET_ID =
979: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID);
980:
981: L_Number_Of_Rows := SQL%ROWCOUNT;
982: GL_MESSAGE.Write_Log(MSG_NAME =>'SHRD0119',
983: TOKEN_NUM => 2,

Line 1042: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR

1038:
1039: GL_MESSAGE.FUNC_ENT(FUNC_NAME =>
1040: 'GL_FLATTEN_LEDGER_SEG_VALS.Error_Check');
1041:
1042: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR
1043: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV') THEN
1044:
1045: -- Separate PL/SQL block for opearation Mode 'VH'
1046:

Line 1043: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV') THEN

1039: GL_MESSAGE.FUNC_ENT(FUNC_NAME =>
1040: 'GL_FLATTEN_LEDGER_SEG_VALS.Error_Check');
1041:
1042: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'VH') OR
1043: (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'LV') THEN
1044:
1045: -- Separate PL/SQL block for opearation Mode 'VH'
1046:
1047: DECLARE

Line 1055: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1051: FROM GL_LEDGERS GLL,
1052: GL_LEDGER_SEGMENT_VALUES GLLSV1,
1053: GL_LEDGER_SEGMENT_VALUES GLLSV2
1054: WHERE GLL.CHART_OF_ACCOUNTS_ID =
1055: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1056: AND GLLSV1.LEDGER_ID = GLL.LEDGER_ID
1057: AND GLLSV1.LEDGER_ID = GLLSV2.LEDGER_ID
1058: AND GLLSV1.SEGMENT_TYPE_CODE = GLLSV2.SEGMENT_TYPE_CODE
1059: AND NVL(GLLSV1.STATUS_CODE,'X') <>'D'

Line 1127: IF ((GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'FF')

1123: END; -- VH mode opearation PL/SQL block ends
1124:
1125: END IF; -- VH Opearation mode If control block ends here.
1126:
1127: IF ((GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'FF')
1128: OR (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH')) THEN
1129:
1130: DECLARE
1131:

Line 1128: OR (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH')) THEN

1124:
1125: END IF; -- VH Opearation mode If control block ends here.
1126:
1127: IF ((GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'FF')
1128: OR (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH')) THEN
1129:
1130: DECLARE
1131:
1132: CURSOR Cursor_SH_Ledger IS

Line 1138: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

1134: FROM GL_LEDGERS GLL,
1135: GL_LEDGER_SEGMENT_VALUES GLLSV1,
1136: GL_LEDGER_SEGMENT_VALUES GLLSV2
1137: WHERE ( GLL.BAL_SEG_VALUE_SET_ID =
1138: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
1139: OR GLL.MGT_SEG_VALUE_SET_ID =
1140: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)
1141: AND GLLSV1.LEDGER_ID = GLL.LEDGER_ID
1142: AND GLLSV1.LEDGER_ID = GLLSV2.LEDGER_ID

Line 1140: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)

1136: GL_LEDGER_SEGMENT_VALUES GLLSV2
1137: WHERE ( GLL.BAL_SEG_VALUE_SET_ID =
1138: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
1139: OR GLL.MGT_SEG_VALUE_SET_ID =
1140: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)
1141: AND GLLSV1.LEDGER_ID = GLL.LEDGER_ID
1142: AND GLLSV1.LEDGER_ID = GLLSV2.LEDGER_ID
1143: AND GLLSV1.SEGMENT_TYPE_CODE = GLLSV2.SEGMENT_TYPE_CODE
1144: AND NVL(GLLSV1.STATUS_CODE,'X') <>'D'