DBA Data[Home] [Help]

APPS.GL_FLATTEN_ACCESS_SETS dependencies on GL_ACCESS_SET_ASSIGNMENTS

Line 14: -- Fix_Flattened_Table to maintain GL_ACCESS_SET_ASSIGNMENTS.

10:
11: -- This is the routine that processes changes in explicit ledger
12: -- sets. All changes in GL_ACCESS_SET_NORM_ASSIGN are done
13: -- through the form, so this routine only needs to call
14: -- Fix_Flattened_Table to maintain GL_ACCESS_SET_ASSIGNMENTS.
15: -- There is no need to clean up data before processing since
16: -- changes to GL_ACCESS_SET_ASSIGNMENTS will not be committed
17: -- until everything is done.
18:

Line 16: -- changes to GL_ACCESS_SET_ASSIGNMENTS will not be committed

12: -- sets. All changes in GL_ACCESS_SET_NORM_ASSIGN are done
13: -- through the form, so this routine only needs to call
14: -- Fix_Flattened_Table to maintain GL_ACCESS_SET_ASSIGNMENTS.
15: -- There is no need to clean up data before processing since
16: -- changes to GL_ACCESS_SET_ASSIGNMENTS will not be committed
17: -- until everything is done.
18:
19: GL_MESSAGE.Func_Ent
20: (func_name => 'GL_FLATTEN_ACCESS_SETS.Fix_Explicit_Sets');

Line 22: -- Call Fix_Flattened_Table to maintain GL_ACCESS_SET_ASSIGNMENTS.

18:
19: GL_MESSAGE.Func_Ent
20: (func_name => 'GL_FLATTEN_ACCESS_SETS.Fix_Explicit_Sets');
21:
22: -- Call Fix_Flattened_Table to maintain GL_ACCESS_SET_ASSIGNMENTS.
23: ret_val := GL_FLATTEN_ACCESS_SETS.Fix_Flattened_Table;
24:
25: IF (NOT ret_val) THEN
26: RAISE GLSTFL_fatal_err;

Line 80: -- up GL_ACCESS_SET_ASSIGNMENTS since no changes should be

76: -- hierarchies.
77: -- The basic flow is as follows:
78: -- 1) Clean up GL_ACCESS_SET_NORM_ASSIGN for all implicit acces sets
79: -- within the chart of accounts. There is no need to clean
80: -- up GL_ACCESS_SET_ASSIGNMENTS since no changes should be
81: -- committed there unless everything has been completed.
82: -- 2) Call routine Fix_Norm_Table to maintain GL_ACCESS_SET_NORM_ASSIGN.
83: -- 3) Call routine Fix_Flattened_Table to maintain
84: -- GL_ACCESS_SET_ASSIGNMENTS.

Line 84: -- GL_ACCESS_SET_ASSIGNMENTS.

80: -- up GL_ACCESS_SET_ASSIGNMENTS since no changes should be
81: -- committed there unless everything has been completed.
82: -- 2) Call routine Fix_Norm_Table to maintain GL_ACCESS_SET_NORM_ASSIGN.
83: -- 3) Call routine Fix_Flattened_Table to maintain
84: -- GL_ACCESS_SET_ASSIGNMENTS.
85:
86: GL_MESSAGE.Func_Ent
87: (func_name => 'GL_FLATTEN_ACCESS_SETS.Fix_Implicit_Sets');
88:

Line 352: -- GL_ACCESS_SET_ASSIGNMENTS.

348: -- This routine will call Populate_Temp_Table to process
349: -- all changes to access sets and populate GL_ACCESS_SET_ASSIGN_INT.
350: -- After determining which access set assignments should be
351: -- effective, all final data will be populated back to
352: -- GL_ACCESS_SET_ASSIGNMENTS.
353: -- Here is the sequence of events:
354: -- 1) For modes VH, LH, LS and AS, obtain a shared lock on both
355: -- the balancing and the management segments.
356: -- 2) Call Populate_Temp_Table to populate data into

Line 358: -- 3) Delete records from GL_ACCESS_SET_ASSIGNMENTS based on

354: -- 1) For modes VH, LH, LS and AS, obtain a shared lock on both
355: -- the balancing and the management segments.
356: -- 2) Call Populate_Temp_Table to populate data into
357: -- GL_ACCESS_SET_ASSIGN_INT
358: -- 3) Delete records from GL_ACCESS_SET_ASSIGNMENTS based on
359: -- GL_ACCESS_SET_ASSIGN_INT
360: -- 4) Call Enable_Record to enable/disable correct assignments in
361: -- GL_ACCESS_SET_ASSIGNMENTS.
362: -- 5) Insert new records into GL_ACCESS_SET_ASSIGNMENTS

Line 361: -- GL_ACCESS_SET_ASSIGNMENTS.

357: -- GL_ACCESS_SET_ASSIGN_INT
358: -- 3) Delete records from GL_ACCESS_SET_ASSIGNMENTS based on
359: -- GL_ACCESS_SET_ASSIGN_INT
360: -- 4) Call Enable_Record to enable/disable correct assignments in
361: -- GL_ACCESS_SET_ASSIGNMENTS.
362: -- 5) Insert new records into GL_ACCESS_SET_ASSIGNMENTS
363: -- 6) For modes LH and VH, update records in GL_ACCESS_SET_ASSIGNMENTS.
364: --*** Step 6 is no longer required since we do not have ledger hierarchies
365: --*** and no updated records.

Line 362: -- 5) Insert new records into GL_ACCESS_SET_ASSIGNMENTS

358: -- 3) Delete records from GL_ACCESS_SET_ASSIGNMENTS based on
359: -- GL_ACCESS_SET_ASSIGN_INT
360: -- 4) Call Enable_Record to enable/disable correct assignments in
361: -- GL_ACCESS_SET_ASSIGNMENTS.
362: -- 5) Insert new records into GL_ACCESS_SET_ASSIGNMENTS
363: -- 6) For modes LH and VH, update records in GL_ACCESS_SET_ASSIGNMENTS.
364: --*** Step 6 is no longer required since we do not have ledger hierarchies
365: --*** and no updated records.
366: -- 7) For modes LH, VH, SH and FF, check if there are overlapping date

Line 363: -- 6) For modes LH and VH, update records in GL_ACCESS_SET_ASSIGNMENTS.

359: -- GL_ACCESS_SET_ASSIGN_INT
360: -- 4) Call Enable_Record to enable/disable correct assignments in
361: -- GL_ACCESS_SET_ASSIGNMENTS.
362: -- 5) Insert new records into GL_ACCESS_SET_ASSIGNMENTS
363: -- 6) For modes LH and VH, update records in GL_ACCESS_SET_ASSIGNMENTS.
364: --*** Step 6 is no longer required since we do not have ledger hierarchies
365: --*** and no updated records.
366: -- 7) For modes LH, VH, SH and FF, check if there are overlapping date
367: -- ranges for a particular ledger/segment value assignment in

Line 443: -- Delete records from GL_ACCESS_SET_ASSIGNMENTS based on

439: IF (NOT ret_val) THEN
440: RAISE GLSTFL_fatal_err;
441: END IF;
442:
443: -- Delete records from GL_ACCESS_SET_ASSIGNMENTS based on
444: -- GL_ACCESS_SET_ASSIGN_INT
445: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
446: GL_MESSAGE.Write_Log
447: (msg_name => 'SHRD0180',

Line 452: v2 => 'Deleting records from GL_ACCESS_SET_ASSIGNMENTS...');

448: token_num => 2,
449: t1 => 'ROUTINE',
450: v1 => 'Fix_Flattened_Table()',
451: t2 => 'ACTION',
452: v2 => 'Deleting records from GL_ACCESS_SET_ASSIGNMENTS...');
453: END IF;
454:
455: DELETE from GL_ACCESS_SET_ASSIGNMENTS glasa
456: WHERE (ABS(glasa.access_set_id), glasa.ledger_id,

Line 455: DELETE from GL_ACCESS_SET_ASSIGNMENTS glasa

451: t2 => 'ACTION',
452: v2 => 'Deleting records from GL_ACCESS_SET_ASSIGNMENTS...');
453: END IF;
454:
455: DELETE from GL_ACCESS_SET_ASSIGNMENTS glasa
456: WHERE (ABS(glasa.access_set_id), glasa.ledger_id,
457: glasa.segment_value, glasa.parent_record_id) IN
458: (SELECT glasai.access_set_id, glasai.ledger_id,
459: glasai.segment_value, glasai.parent_record_id

Line 469: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');

465: token_num => 2,
466: t1 => 'NUM',
467: v1 => TO_CHAR(row_count),
468: t2 => 'TABLE',
469: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
470: row_count :=0;
471:
472: -- Here only call Enable_Record when not processing implicit access
473: -- sets ONLY. This means that the routine will NOT be called in modes

Line 506: -- Insert new records into GL_ACCESS_SET_ASSIGNMENTS

502:
503: row_count := 0;
504: END IF;
505:
506: -- Insert new records into GL_ACCESS_SET_ASSIGNMENTS
507: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
508: GL_MESSAGE.Write_Log
509: (msg_name => 'SHRD0180',
510: token_num => 2,

Line 514: v2 => 'Inserting records into GL_ACCESS_SET_ASSIGNMENTS...');

510: token_num => 2,
511: t1 => 'ROUTINE',
512: v1 => 'Fix_Flattened_Table()',
513: t2 => 'ACTION',
514: v2 => 'Inserting records into GL_ACCESS_SET_ASSIGNMENTS...');
515: END IF;
516:
517: INSERT into GL_ACCESS_SET_ASSIGNMENTS
518: (access_set_id, ledger_id, segment_value, access_privilege_code,

Line 517: INSERT into GL_ACCESS_SET_ASSIGNMENTS

513: t2 => 'ACTION',
514: v2 => 'Inserting records into GL_ACCESS_SET_ASSIGNMENTS...');
515: END IF;
516:
517: INSERT into GL_ACCESS_SET_ASSIGNMENTS
518: (access_set_id, ledger_id, segment_value, access_privilege_code,
519: parent_record_id, last_update_date, last_updated_by, last_update_login,
520: creation_date, created_by, start_date, end_date)
521: (SELECT glasai.access_set_id, glasai.ledger_id, glasai.segment_value,

Line 531: FROM GL_ACCESS_SET_ASSIGNMENTS glasa

527: FROM GL_ACCESS_SET_ASSIGN_INT glasai
528: WHERE glasai.status_code = 'I'
529: AND NOT EXISTS
530: (SELECT 1
531: FROM GL_ACCESS_SET_ASSIGNMENTS glasa
532: WHERE ( glasa.access_set_id = glasai.access_set_id
533: OR glasa.access_set_id = -glasai.access_set_id)
534: AND glasa.parent_record_id = glasai.parent_record_id
535: AND glasa.ledger_id = glasai.ledger_id

Line 552: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');

548: token_num => 2,
549: t1 => 'NUM',
550: v1 => TO_CHAR(row_count),
551: t2 => 'TABLE',
552: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
553: row_count :=0;
554:
555:
556: -- Check if a particular ledger/segment value have overlapping effective

Line 579: GL_ACCESS_SET_ASSIGNMENTS glasa1,

575: SELECT 1
576: INTO row_count
577: FROM GL_ACCESS_SETS glas,
578: GL_ACCESS_SET_ASSIGN_INT glasai,
579: GL_ACCESS_SET_ASSIGNMENTS glasa1,
580: GL_ACCESS_SET_ASSIGNMENTS glasa2
581: WHERE ( glas.secured_seg_value_set_id =
582: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID
583: OR glas.secured_seg_value_set_id =

Line 580: GL_ACCESS_SET_ASSIGNMENTS glasa2

576: INTO row_count
577: FROM GL_ACCESS_SETS glas,
578: GL_ACCESS_SET_ASSIGN_INT glasai,
579: GL_ACCESS_SET_ASSIGNMENTS glasa1,
580: GL_ACCESS_SET_ASSIGNMENTS glasa2
581: WHERE ( glas.secured_seg_value_set_id =
582: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID
583: OR glas.secured_seg_value_set_id =
584: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)

Line 625: GL_ACCESS_SET_ASSIGNMENTS glasa1,

621: CURSOR overlap_dates_cursor IS
622: SELECT distinct glas.name, gll.name, glasa1.segment_value
623: FROM GL_ACCESS_SETS glas,
624: GL_ACCESS_SET_ASSIGN_INT glasai,
625: GL_ACCESS_SET_ASSIGNMENTS glasa1,
626: GL_ACCESS_SET_ASSIGNMENTS glasa2,
627: GL_LEDGERS gll
628: WHERE ( glas.secured_seg_value_set_id =
629: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID

Line 626: GL_ACCESS_SET_ASSIGNMENTS glasa2,

622: SELECT distinct glas.name, gll.name, glasa1.segment_value
623: FROM GL_ACCESS_SETS glas,
624: GL_ACCESS_SET_ASSIGN_INT glasai,
625: GL_ACCESS_SET_ASSIGNMENTS glasa1,
626: GL_ACCESS_SET_ASSIGNMENTS glasa2,
627: GL_LEDGERS gll
628: WHERE ( glas.secured_seg_value_set_id =
629: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID
630: OR glas.secured_seg_value_set_id =

Line 1571: -- 1) Enable records in GL_ACCESS_SET_ASSIGNMENTS since the

1567: -- access sets should guarantee that there will only be one
1568: -- record for each date range, in which case the record should
1569: -- always be enabled.
1570: -- The sequence of events is as follows:
1571: -- 1) Enable records in GL_ACCESS_SET_ASSIGNMENTS since the
1572: -- effective record might be deleted.
1573: -- 2) Disable records in GL_ACCESS_SET_ASSIGN_INT based on effective
1574: -- records in GL_ACCESS_SET_ASSIGNMENTS.
1575: -- 3) Pick the record in GL_ACCESS_SET_ASSIGN_INT having the greatest

Line 1574: -- records in GL_ACCESS_SET_ASSIGNMENTS.

1570: -- The sequence of events is as follows:
1571: -- 1) Enable records in GL_ACCESS_SET_ASSIGNMENTS since the
1572: -- effective record might be deleted.
1573: -- 2) Disable records in GL_ACCESS_SET_ASSIGN_INT based on effective
1574: -- records in GL_ACCESS_SET_ASSIGNMENTS.
1575: -- 3) Pick the record in GL_ACCESS_SET_ASSIGN_INT having the greatest
1576: -- access code with the smallest rowid, then disable all other records.
1577: -- 4) Disable records in GL_ACCESS_SET_ASSIGNMENTS if there exists an
1578: -- effective record in GL_ACCESS_SET_ASSIGN_INT that has a higher

Line 1577: -- 4) Disable records in GL_ACCESS_SET_ASSIGNMENTS if there exists an

1573: -- 2) Disable records in GL_ACCESS_SET_ASSIGN_INT based on effective
1574: -- records in GL_ACCESS_SET_ASSIGNMENTS.
1575: -- 3) Pick the record in GL_ACCESS_SET_ASSIGN_INT having the greatest
1576: -- access code with the smallest rowid, then disable all other records.
1577: -- 4) Disable records in GL_ACCESS_SET_ASSIGNMENTS if there exists an
1578: -- effective record in GL_ACCESS_SET_ASSIGN_INT that has a higher
1579: -- access privilege.
1580:
1581: GL_MESSAGE.Func_Ent

Line 1603: 'GL_ACCESS_SET_ASSIGNMENTS with access ' ||

1599: t1 => 'ROUTINE',
1600: v1 => 'Enable_Record()',
1601: t2 => 'ACTION',
1602: v2 => 'Searching for disabled records in ' ||
1603: 'GL_ACCESS_SET_ASSIGNMENTS with access ' ||
1604: 'privilege B which has the smallest ' ||
1605: 'rowid, then enable this record...');
1606: END IF;
1607:

Line 1608: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa1

1604: 'privilege B which has the smallest ' ||
1605: 'rowid, then enable this record...');
1606: END IF;
1607:
1608: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa1
1609: SET glasa1.access_set_id = -glasa1.access_set_id
1610: WHERE glasa1.rowid IN
1611: (SELECT MIN(glasa2.rowid)
1612: FROM GL_ACCESS_SET_ASSIGN_INT glasai,

Line 1613: GL_ACCESS_SET_ASSIGNMENTS glasa2,

1609: SET glasa1.access_set_id = -glasa1.access_set_id
1610: WHERE glasa1.rowid IN
1611: (SELECT MIN(glasa2.rowid)
1612: FROM GL_ACCESS_SET_ASSIGN_INT glasai,
1613: GL_ACCESS_SET_ASSIGNMENTS glasa2,
1614: GL_ACCESS_SET_ASSIGNMENTS glasa3
1615: WHERE glasai.status_code = 'D'
1616: AND glasa2.access_set_id = -glasai.access_set_id
1617: AND glasa2.ledger_id = glasai.ledger_id

Line 1614: GL_ACCESS_SET_ASSIGNMENTS glasa3

1610: WHERE glasa1.rowid IN
1611: (SELECT MIN(glasa2.rowid)
1612: FROM GL_ACCESS_SET_ASSIGN_INT glasai,
1613: GL_ACCESS_SET_ASSIGNMENTS glasa2,
1614: GL_ACCESS_SET_ASSIGNMENTS glasa3
1615: WHERE glasai.status_code = 'D'
1616: AND glasa2.access_set_id = -glasai.access_set_id
1617: AND glasa2.ledger_id = glasai.ledger_id
1618: AND glasa2.segment_value = glasai.segment_value

Line 1633: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');

1629: token_num => 2,
1630: t1 => 'NUM',
1631: v1 => TO_CHAR(row_count),
1632: t2 => 'TABLE',
1633: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
1634: row_count := 0;
1635:
1636: -- Then, pick a record with access_privilege of R having the
1637: -- smallest rowid and disable all other records.

Line 1649: 'GL_ACCESS_SET_ASSIGNMENTS to enable ' ||

1645: t1 => 'ROUTINE',
1646: v1 => 'Enable_Record()',
1647: t2 => 'ACTION',
1648: v2 => 'Updating records in ' ||
1649: 'GL_ACCESS_SET_ASSIGNMENTS to enable ' ||
1650: 'access assignments using the smallest ' ||
1651: 'rowid with access privilege R...');
1652: END IF;
1653:

Line 1654: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa1

1650: 'access assignments using the smallest ' ||
1651: 'rowid with access privilege R...');
1652: END IF;
1653:
1654: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa1
1655: SET glasa1.access_set_id = -glasa1.access_set_id
1656: WHERE glasa1.rowid IN
1657: (SELECT MIN(glasa2.rowid)
1658: FROM GL_ACCESS_SET_ASSIGN_INT glasai,

Line 1659: GL_ACCESS_SET_ASSIGNMENTS glasa2,

1655: SET glasa1.access_set_id = -glasa1.access_set_id
1656: WHERE glasa1.rowid IN
1657: (SELECT MIN(glasa2.rowid)
1658: FROM GL_ACCESS_SET_ASSIGN_INT glasai,
1659: GL_ACCESS_SET_ASSIGNMENTS glasa2,
1660: GL_ACCESS_SET_ASSIGNMENTS glasa3
1661: WHERE glasai.status_code = 'D'
1662: AND glasa2.access_set_id = -glasai.access_set_id
1663: AND glasa2.ledger_id = glasai.ledger_id

Line 1660: GL_ACCESS_SET_ASSIGNMENTS glasa3

1656: WHERE glasa1.rowid IN
1657: (SELECT MIN(glasa2.rowid)
1658: FROM GL_ACCESS_SET_ASSIGN_INT glasai,
1659: GL_ACCESS_SET_ASSIGNMENTS glasa2,
1660: GL_ACCESS_SET_ASSIGNMENTS glasa3
1661: WHERE glasai.status_code = 'D'
1662: AND glasa2.access_set_id = -glasai.access_set_id
1663: AND glasa2.ledger_id = glasai.ledger_id
1664: AND glasa2.segment_value = glasai.segment_value

Line 1679: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');

1675: token_num => 2,
1676: t1 => 'NUM',
1677: v1 => TO_CHAR(row_count),
1678: t2 => 'TABLE',
1679: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
1680: row_count := 0;
1681:
1682: -- Check if there exists a record in GL_ACCESS_SET_ASSIGNMENTS
1683: -- that has a higher or equal access privilege. If so, disable the

Line 1682: -- Check if there exists a record in GL_ACCESS_SET_ASSIGNMENTS

1678: t2 => 'TABLE',
1679: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
1680: row_count := 0;
1681:
1682: -- Check if there exists a record in GL_ACCESS_SET_ASSIGNMENTS
1683: -- that has a higher or equal access privilege. If so, disable the
1684: -- corresponding record(s) in GL_ACCESS_SET_ASSIGN_INT.
1685: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1686: GL_MESSAGE.Write_Log

Line 1694: 'GL_ACCESS_SET_ASSIGNMENTS to disable ' ||

1690: v1 => 'Enable_Record()',
1691: t2 => 'ACTION',
1692: v2 => 'Updating records in ' ||
1693: 'GL_ACCESS_SET_ASSIGN_INT based on ' ||
1694: 'GL_ACCESS_SET_ASSIGNMENTS to disable ' ||
1695: 'access assignments...');
1696: END IF;
1697:
1698: UPDATE GL_ACCESS_SET_ASSIGN_INT glasai1

Line 1704: GL_ACCESS_SET_ASSIGNMENTS glasa

1700: WHERE glasai1.rowid IN
1701: (SELECT glasai2.rowid
1702: FROM GL_ACCESS_SET_ASSIGN_INT glasai2,
1703: GL_ACCESS_SETS glas,
1704: GL_ACCESS_SET_ASSIGNMENTS glasa
1705: WHERE glasai2.status_code = 'I'
1706: AND glasai2.access_set_id > 0
1707: AND glas.access_set_id = glasai2.access_set_id
1708: AND glas.automatically_created_flag = 'N'

Line 1822: -- that the enabled record in GL_ACCESS_SET_ASSIGNMENTS has

1818:
1819: CLOSE dup_access_assign_cursor;
1820:
1821: -- Here the only conflict that needs to be resolve is
1822: -- that the enabled record in GL_ACCESS_SET_ASSIGNMENTS has
1823: -- access privilege of R, while the enabled record in
1824: -- GL_ACCESS_SET_ASSIGN_INT has access privilege of B.
1825: -- In this case, the record in GL_ACCESS_SET_ASSIGNMENTS will
1826: -- be disabled.

Line 1825: -- In this case, the record in GL_ACCESS_SET_ASSIGNMENTS will

1821: -- Here the only conflict that needs to be resolve is
1822: -- that the enabled record in GL_ACCESS_SET_ASSIGNMENTS has
1823: -- access privilege of R, while the enabled record in
1824: -- GL_ACCESS_SET_ASSIGN_INT has access privilege of B.
1825: -- In this case, the record in GL_ACCESS_SET_ASSIGNMENTS will
1826: -- be disabled.
1827:
1828: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1829: GL_MESSAGE.Write_Log

Line 1836: 'GL_ACCESS_SET_ASSIGNMENTS to disable ' ||

1832: t1 => 'ROUTINE',
1833: v1 => 'Enable_Record()',
1834: t2 => 'ACTION',
1835: v2 => 'Updating records in ' ||
1836: 'GL_ACCESS_SET_ASSIGNMENTS to disable ' ||
1837: 'those with access privilege R if there ' ||
1838: 'exists a record in GL_ACCESS_SET_ASSIGN_INT '||
1839: 'with access privilege of B...');
1840: END IF;

Line 1842: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa

1838: 'exists a record in GL_ACCESS_SET_ASSIGN_INT '||
1839: 'with access privilege of B...');
1840: END IF;
1841:
1842: UPDATE GL_ACCESS_SET_ASSIGNMENTS glasa
1843: SET glasa.access_set_id = -glasa.access_set_id
1844: WHERE glasa.access_privilege_code = 'R'
1845: AND glasa.access_set_id > 0
1846: AND (glasa.access_set_id, glasa.ledger_id,

Line 1865: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');

1861: token_num => 2,
1862: t1 => 'NUM',
1863: v1 => TO_CHAR(row_count),
1864: t2 => 'TABLE',
1865: v2 => 'GL_ACCESS_SET_ASSIGNMENTS');
1866: row_count := 0;
1867:
1868: GL_MESSAGE.Func_Succ
1869: (func_name => 'GL_FLATTEN_ACCESS_SETS.Enable_Record');