DBA Data[Home] [Help]

APPS.GL_FLATTEN_ACCESS_SETS dependencies on GL_FLATTEN_SETUP_DATA

Line 92: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

88:
89: -- Clean up GL_ACCESS_SET_NORM_ASSIGN
90: -- for any unprocessed data left over from previous failed run
91:
92: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
93: GL_MESSAGE.Write_Log
94: (msg_name => 'SHRD0180',
95: token_num => 2,
96: t1 => 'ROUTINE',

Line 109: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

105: AND access_set_id IN
106: (SELECT access_set_id
107: FROM GL_ACCESS_SETS
108: WHERE chart_of_accounts_id =
109: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
110: AND automatically_created_flag = 'Y');
111:
112: row_count := SQL%ROWCOUNT;
113: GL_MESSAGE.Write_Log(msg_name => 'SHRD0119',

Line 121: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

117: t2 => 'TABLE',
118: v2 => 'GL_ACCESS_SET_NORM_ASSIGN');
119: row_count := 0;
120:
121: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
122: GL_MESSAGE.Write_Log
123: (msg_name => 'SHRD0180',
124: token_num => 2,
125: t1 => 'ROUTINE',

Line 139: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

135: AND access_set_id IN
136: (SELECT access_set_id
137: FROM GL_ACCESS_SETS
138: WHERE chart_of_accounts_id =
139: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
140: AND automatically_created_flag = 'Y');
141:
142: row_count := SQL%ROWCOUNT;
143: GL_MESSAGE.Write_Log(msg_name => 'SHRD0118',

Line 247: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

243:
244: GL_MESSAGE.Func_Ent
245: (func_name => 'GL_FLATTEN_ACCESS_SETS.Fix_Norm_Table');
246:
247: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
248: GL_MESSAGE.Write_Log
249: (msg_name => 'SHRD0180',
250: token_num => 2,
251: t1 => 'ROUTINE',

Line 268: SYSDATE, GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

264: creation_date, created_by, request_id, segment_value,
265: start_date, end_date, link_id)
266: (SELECT gll.implicit_access_set_id, glr.target_ledger_id, 'Y',
267: 'S', 'B', 'I', GL_ACCESS_SET_NORM_ASSIGN_S.nextval,
268: SYSDATE, GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
269: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
270: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
271: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID,
272: NULL, NULL, NULL, NULL

Line 269: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

265: start_date, end_date, link_id)
266: (SELECT gll.implicit_access_set_id, glr.target_ledger_id, 'Y',
267: 'S', 'B', 'I', GL_ACCESS_SET_NORM_ASSIGN_S.nextval,
268: SYSDATE, GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
269: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
270: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
271: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID,
272: NULL, NULL, NULL, NULL
273: FROM GL_LEDGERS gll,

Line 270: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

266: (SELECT gll.implicit_access_set_id, glr.target_ledger_id, 'Y',
267: 'S', 'B', 'I', GL_ACCESS_SET_NORM_ASSIGN_S.nextval,
268: SYSDATE, GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
269: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
270: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
271: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID,
272: NULL, NULL, NULL, NULL
273: FROM GL_LEDGERS gll,
274: GL_LEDGER_RELATIONSHIPS glr

Line 271: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID,

267: 'S', 'B', 'I', GL_ACCESS_SET_NORM_ASSIGN_S.nextval,
268: SYSDATE, GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
269: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
270: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
271: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID,
272: NULL, NULL, NULL, NULL
273: FROM GL_LEDGERS gll,
274: GL_LEDGER_RELATIONSHIPS glr
275: WHERE gll.chart_of_accounts_id =

Line 276: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

272: NULL, NULL, NULL, NULL
273: FROM GL_LEDGERS gll,
274: GL_LEDGER_RELATIONSHIPS glr
275: WHERE gll.chart_of_accounts_id =
276: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
277: AND gll.object_type_code = 'L'
278: AND gll.implicit_access_set_id <>-1
279: AND glr.source_ledger_id = gll.ledger_id
280: AND glr.target_ledger_category_code IN ( 'ALC',

Line 376: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN

372: (func_name => 'GL_FLATTEN_ACCESS_SETS.Fix_Flattened_Table');
373:
374: -- For modes LH, LS, VS and AS, obtain shared lock on both balancing
375: -- and management segments.
376: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN
377: ('VH', 'LH', 'LS', 'AS', 'VS')) THEN
378:
379: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
380: GL_MESSAGE.Write_Log

Line 379: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

375: -- and management segments.
376: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN
377: ('VH', 'LH', 'LS', 'AS', 'VS')) THEN
378:
379: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
380: GL_MESSAGE.Write_Log
381: (msg_name => 'SHRD0180',
382: token_num => 2,
383: t1 => 'ROUTINE',

Line 389: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock

385: t2 => 'ACTION',
386: v2 => 'Obtain shared lock on balancing segment...');
387: END IF;
388:
389: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
390: (X_Param_Type => 'V',
391: X_Param_Id =>
392: GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID,
393: X_Lock_Mode => 4, -- SHARED mode

Line 392: GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID,

388:
389: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
390: (X_Param_Type => 'V',
391: X_Param_Id =>
392: GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID,
393: X_Lock_Mode => 4, -- SHARED mode
394: X_Keep_Looping => TRUE,
395: X_Max_Trys => 5);
396:

Line 404: /* IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>

400:
401: -- Obtain the second lock iff bal_vs_id <> mgt_vs_id
402:
403: -- Now the Management segment value set is optional.
404: /* IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
405: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN */
406:
407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:

Line 405: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN */

401: -- Obtain the second lock iff bal_vs_id <> mgt_vs_id
402:
403: -- Now the Management segment value set is optional.
404: /* IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
405: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN */
406:
407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:
409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>

Line 407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN

403: -- Now the Management segment value set is optional.
404: /* IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
405: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN */
406:
407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:
409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
410: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN
411: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

Line 409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>

405: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN */
406:
407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:
409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
410: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN
411: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
412: GL_MESSAGE.Write_Log
413: (msg_name => 'SHRD0180',

Line 410: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN

406:
407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:
409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
410: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN
411: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
412: GL_MESSAGE.Write_Log
413: (msg_name => 'SHRD0180',
414: token_num => 2,

Line 411: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

407: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID IS NOT NULL) THEN
408:
409: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_BAL_VS_ID <>
410: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID) THEN
411: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
412: GL_MESSAGE.Write_Log
413: (msg_name => 'SHRD0180',
414: token_num => 2,
415: t1 => 'ROUTINE',

Line 421: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock

417: t2 => 'ACTION',
418: v2 => 'Obtain shared lock on management segment...');
419: END IF;
420:
421: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
422: (X_Param_Type => 'V',
423: X_Param_Id =>
424: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID,
425: X_Lock_Mode => 4, -- SHARED mode

Line 424: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID,

420:
421: ret_val := GL_FLATTEN_SETUP_DATA.Request_Lock
422: (X_Param_Type => 'V',
423: X_Param_Id =>
424: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID,
425: X_Lock_Mode => 4, -- SHARED mode
426: X_Keep_Looping => TRUE,
427: X_Max_Trys => 5);
428:

Line 445: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

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',
448: token_num => 2,
449: t1 => 'ROUTINE',

Line 475: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE NOT IN ('LH', 'VH')) THEN

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
474: -- LH and VH
475: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE NOT IN ('LH', 'VH')) THEN
476: ret_val := GL_FLATTEN_ACCESS_SETS.Enable_Record;
477:
478: IF (NOT ret_val) THEN
479: RAISE GLSTFL_fatal_err;

Line 483: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

479: RAISE GLSTFL_fatal_err;
480: END IF;
481: END IF;
482:
483: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
484:
485: BEGIN
486: SELECT count(*)
487: INTO row_count

Line 507: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

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,
511: t1 => 'ROUTINE',

Line 523: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

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,
522: glasai.access_privilege_code, glasai.parent_record_id, SYSDATE,
523: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
524: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
525: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
526: glasai.start_date, glasai.end_date
527: FROM GL_ACCESS_SET_ASSIGN_INT glasai

Line 524: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

520: creation_date, created_by, start_date, end_date)
521: (SELECT glasai.access_set_id, glasai.ledger_id, glasai.segment_value,
522: glasai.access_privilege_code, glasai.parent_record_id, SYSDATE,
523: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
524: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
525: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
526: glasai.start_date, glasai.end_date
527: FROM GL_ACCESS_SET_ASSIGN_INT glasai
528: WHERE glasai.status_code = 'I'

Line 525: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

521: (SELECT glasai.access_set_id, glasai.ledger_id, glasai.segment_value,
522: glasai.access_privilege_code, glasai.parent_record_id, SYSDATE,
523: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
524: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
525: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
526: glasai.start_date, glasai.end_date
527: FROM GL_ACCESS_SET_ASSIGN_INT glasai
528: WHERE glasai.status_code = 'I'
529: AND NOT EXISTS

Line 558: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE in ('LH', 'SH', 'FF', 'VH')) THEN

554:
555:
556: -- Check if a particular ledger/segment value have overlapping effective
557: -- dates for management hierarchies
558: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE in ('LH', 'SH', 'FF', 'VH')) THEN
559: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
560: GL_MESSAGE.Write_Log
561: (msg_name => 'SHRD0180',
562: token_num => 2,

Line 559: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

555:
556: -- Check if a particular ledger/segment value have overlapping effective
557: -- dates for management hierarchies
558: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE in ('LH', 'SH', 'FF', 'VH')) THEN
559: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
560: GL_MESSAGE.Write_Log
561: (msg_name => 'SHRD0180',
562: token_num => 2,
563: t1 => 'ROUTINE',

Line 582: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID

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)
585: AND glas.automatically_created_flag = 'Y'
586: AND glas.security_segment_code = 'M'

Line 584: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)

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)
585: AND glas.automatically_created_flag = 'Y'
586: AND glas.security_segment_code = 'M'
587: AND glasai.access_set_id = glas.access_set_id
588: AND glasa1.access_set_id = glasai.access_set_id

Line 629: GL_FLATTEN_SETUP_DATA.GLSTFL_MGT_VS_ID

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 =
631: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)
632: AND glas.automatically_created_flag = 'Y'
633: AND glas.security_segment_code = 'M'

Line 631: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)

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 =
631: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID)
632: AND glas.automatically_created_flag = 'Y'
633: AND glas.security_segment_code = 'M'
634: AND glasai.access_set_id = glas.access_set_id
635: AND glasa1.access_set_id = glasai.access_set_id

Line 751: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

747:
748: GL_MESSAGE.Func_Ent
749: (func_name => 'GL_FLATTEN_ACCESS_SETS.Populate_Temp_Table');
750:
751: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
752: GL_MESSAGE.Write_Log
753: (msg_name => 'SHRD0180',
754: token_num => 2,
755: t1 => 'ROUTINE',

Line 762: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('SH', 'FF')) THEN

758: v2 => 'Checking if further processing is needed ' ||
759: 'based on mode of operation...');
760: END IF;
761:
762: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('SH', 'FF')) THEN
763:
764: -- Check if there are new values added to the value set and
765: -- there are access sets associated with this value set with
766: -- segment_value_type_code of 'A'

Line 777: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

773: WHERE EXISTS
774: (SELECT 1
775: FROM GL_SEG_VAL_HIERARCHIES glsvh
776: WHERE glsvh.flex_value_set_id =
777: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
778: AND glsvh.parent_flex_value = 'T'
779: AND glsvh.status_code = 'I');
780:
781: -- Performance bug 4861665 fix.

Line 792: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

788: (SELECT 1
789: FROM GL_ACCESS_SETS glas,
790: GL_ACCESS_SET_NORM_ASSIGN glasna
791: WHERE glas.secured_seg_value_set_id =
792: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
793: AND glas.security_segment_code <> 'F'
794: AND glasna.access_set_id = glas.access_set_id
795: AND glasna.all_segment_value_flag = 'Y');
796: END IF;

Line 802: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN

798: WHEN NO_DATA_FOUND THEN
799: sh_ff_all_val_changed := SQL%FOUND;
800: END;
801:
802: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN
803:
804: -- Check if any access set assignment contains the changed
805: -- ledger set.
806: BEGIN

Line 821: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

817: GL_LEDGERS gll
818: WHERE gllsa.status_code IN ('I', 'D')
819: AND gll.ledger_id = gllsa.ledger_set_id
820: AND gll.chart_of_accounts_id =
821: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
822: AND gll.object_type_code = 'S'
823: AND gll.automatically_created_flag = 'N'));
824: EXCEPTION
825: WHEN NO_DATA_FOUND THEN

Line 829: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN

825: WHEN NO_DATA_FOUND THEN
826: cont_processing := SQL%FOUND;
827: END;
828:
829: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
830:
831: -- There are 3 checks we have to do here to determine what
832: -- statements should be run for further processing.
833: -- 1) If changes occurred in full ledger type access sets or

Line 848: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

844: (SELECT 1
845: FROM GL_ACCESS_SETS glas,
846: GL_ACCESS_SET_NORM_ASSIGN glasna
847: WHERE glas.chart_of_accounts_id =
848: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
849: AND glas.automatically_created_flag = 'N'
850: AND glasna.access_set_id = glas.access_set_id
851: AND glasna.request_id =
852: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

Line 852: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

848: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
849: AND glas.automatically_created_flag = 'N'
850: AND glasna.access_set_id = glas.access_set_id
851: AND glasna.request_id =
852: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
853: AND glasna.status_code IN ('I', 'D', 'U')
854: AND ( ( glasna.all_segment_value_flag = 'N'
855: AND glasna.segment_value_type_code = 'S')
856: OR (glas.security_segment_code = 'F')));

Line 871: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

867: (SELECT 1
868: FROM GL_ACCESS_SETS glas,
869: GL_ACCESS_SET_NORM_ASSIGN glasna
870: WHERE glas.chart_of_accounts_id =
871: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
872: AND glas.automatically_created_flag = 'N'
873: AND glasna.access_set_id = glas.access_set_id
874: AND glasna.request_id =
875: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

Line 875: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

871: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
872: AND glas.automatically_created_flag = 'N'
873: AND glasna.access_set_id = glas.access_set_id
874: AND glasna.request_id =
875: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
876: AND glasna.status_code IN ('I', 'D', 'U')
877: AND glasna.segment_value_type_code = 'C');
878:
879: EXCEPTION

Line 893: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

889: (SELECT 1
890: FROM GL_ACCESS_SETS glas,
891: GL_ACCESS_SET_NORM_ASSIGN glasna
892: WHERE glas.chart_of_accounts_id =
893: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
894: AND glas.automatically_created_flag = 'N'
895: AND glas.security_segment_code <> 'F'
896: AND glasna.access_set_id = glas.access_set_id
897: AND glasna.request_id =

Line 898: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

894: AND glas.automatically_created_flag = 'N'
895: AND glas.security_segment_code <> 'F'
896: AND glasna.access_set_id = glas.access_set_id
897: AND glasna.request_id =
898: GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
899: AND glasna.status_code IN ('I', 'D', 'U')
900: AND glasna.all_segment_value_flag = 'Y');
901: EXCEPTION
902: WHEN NO_DATA_FOUND THEN

Line 913: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

909: END IF;
910:
911: IF (cont_processing) THEN
912:
913: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
914: GL_MESSAGE.Write_Log
915: (msg_name => 'FLAT0017',
916: token_num => 1,
917: t1 => 'OP_MODE',

Line 918: v1 => GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE);

914: GL_MESSAGE.Write_Log
915: (msg_name => 'FLAT0017',
916: token_num => 1,
917: t1 => 'OP_MODE',
918: v1 => GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE);
919: END IF;
920:
921: -- Since changes related to access sets are found, start
922: -- populating GL_ACCESS_SET_ASSIGN_INT for various modes

Line 925: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('FF', 'SH')) THEN

921: -- Since changes related to access sets are found, start
922: -- populating GL_ACCESS_SET_ASSIGN_INT for various modes
923: -- of operation.
924:
925: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('FF', 'SH')) THEN
926:
927: row_count := 0;
928:
929: -- This statement process all segment value hierarchy changes,

Line 932: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH') THEN

928:
929: -- This statement process all segment value hierarchy changes,
930: -- thus it will be run in mode SH only. It is not relevant to
931: -- mode FF.
932: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH') THEN
933:
934: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
935: GL_MESSAGE.Write_Log
936: (msg_name => 'SHRD0180',

Line 934: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

930: -- thus it will be run in mode SH only. It is not relevant to
931: -- mode FF.
932: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'SH') THEN
933:
934: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
935: GL_MESSAGE.Write_Log
936: (msg_name => 'SHRD0180',
937: token_num => 2,
938: t1 => 'ROUTINE',

Line 955: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

951: DECODE(gllsa.ledger_id,
952: NULL, glasna.ledger_id, gllsa.ledger_id),
953: glsvh.child_flex_value, glasna.access_privilege_code,
954: glsvh.status_code, glasna.record_id, SYSDATE,
955: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
956: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
957: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
958: glasna.start_date, glasna.end_date
959: FROM GL_SEG_VAL_HIERARCHIES glsvh,

Line 956: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

952: NULL, glasna.ledger_id, gllsa.ledger_id),
953: glsvh.child_flex_value, glasna.access_privilege_code,
954: glsvh.status_code, glasna.record_id, SYSDATE,
955: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
956: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
957: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
958: glasna.start_date, glasna.end_date
959: FROM GL_SEG_VAL_HIERARCHIES glsvh,
960: GL_ACCESS_SETS glas,

Line 957: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

953: glsvh.child_flex_value, glasna.access_privilege_code,
954: glsvh.status_code, glasna.record_id, SYSDATE,
955: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
956: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
957: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
958: glasna.start_date, glasna.end_date
959: FROM GL_SEG_VAL_HIERARCHIES glsvh,
960: GL_ACCESS_SETS glas,
961: GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 963: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

959: FROM GL_SEG_VAL_HIERARCHIES glsvh,
960: GL_ACCESS_SETS glas,
961: GL_ACCESS_SET_NORM_ASSIGN glasna,
962: GL_LEDGER_SET_ASSIGNMENTS gllsa
963: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
964: AND glsvh.status_code in ('I', 'D')
965: AND glas.security_segment_code <> 'F'
966: AND glas.secured_seg_value_set_id =
967: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

Line 967: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

963: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
964: AND glsvh.status_code in ('I', 'D')
965: AND glas.security_segment_code <> 'F'
966: AND glas.secured_seg_value_set_id =
967: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
968: AND glasna.access_set_id = glas.access_set_id
969: AND glasna.all_segment_value_flag = 'N'
970: AND glasna.segment_value_type_code = 'C'
971: AND glasna.segment_value = glsvh.parent_flex_value

Line 1002: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

998: -- set with all_segment_value_flag of 'Y', run this statement
999: -- to add in the new segment values to the assignments.
1000: IF (sh_ff_all_val_changed) THEN
1001:
1002: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1003: GL_MESSAGE.Write_Log
1004: (msg_name => 'SHRD0180',
1005: token_num => 2,
1006: t1 => 'ROUTINE',

Line 1023: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1019: DECODE(gllsa.ledger_id,
1020: NULL, glasna.ledger_id, gllsa.ledger_id),
1021: glsvh.child_flex_value, glasna.access_privilege_code,
1022: 'I', glasna.record_id, SYSDATE,
1023: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1024: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1025: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1026: glasna.start_date, glasna.end_date
1027: FROM GL_SEG_VAL_HIERARCHIES glsvh,

Line 1024: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1020: NULL, glasna.ledger_id, gllsa.ledger_id),
1021: glsvh.child_flex_value, glasna.access_privilege_code,
1022: 'I', glasna.record_id, SYSDATE,
1023: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1024: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1025: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1026: glasna.start_date, glasna.end_date
1027: FROM GL_SEG_VAL_HIERARCHIES glsvh,
1028: GL_ACCESS_SETS glas,

Line 1025: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1021: glsvh.child_flex_value, glasna.access_privilege_code,
1022: 'I', glasna.record_id, SYSDATE,
1023: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1024: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1025: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1026: glasna.start_date, glasna.end_date
1027: FROM GL_SEG_VAL_HIERARCHIES glsvh,
1028: GL_ACCESS_SETS glas,
1029: GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1031: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

1027: FROM GL_SEG_VAL_HIERARCHIES glsvh,
1028: GL_ACCESS_SETS glas,
1029: GL_ACCESS_SET_NORM_ASSIGN glasna,
1030: GL_LEDGER_SET_ASSIGNMENTS gllsa
1031: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
1032: AND glsvh.parent_flex_value = 'T'
1033: AND glsvh.status_code = 'I'
1034: AND glas.secured_seg_value_set_id =
1035: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

Line 1035: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID

1031: WHERE glsvh.flex_value_set_id = GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
1032: AND glsvh.parent_flex_value = 'T'
1033: AND glsvh.status_code = 'I'
1034: AND glas.secured_seg_value_set_id =
1035: GL_FLATTEN_SETUP_DATA.GLSTFL_VS_ID
1036: AND glas.security_segment_code <> 'F'
1037: AND glasna.access_set_id = glas.access_set_id
1038: AND glasna.all_segment_value_flag = 'Y'
1039: AND NVL(glasna.status_code, 'X') <> 'I'

Line 1054: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN

1050: row_count := 0;
1051:
1052: END IF; -- IF (sh_ff_all_val_changed)...
1053:
1054: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1055:
1056: row_count := 0;
1057:
1058: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

Line 1058: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1054: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1055:
1056: row_count := 0;
1057:
1058: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1059: GL_MESSAGE.Write_Log
1060: (msg_name => 'SHRD0180',
1061: token_num => 2,
1062: t1 => 'ROUTINE',

Line 1080: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1076: last_update_login, creation_date, created_by, start_date, end_date)
1077: (SELECT glasna.access_set_id, glasna.ledger_id,
1078: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1079: glasna.status_code, glasna.record_id, SYSDATE,
1080: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1081: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1082: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1083: glasna.start_date, glasna.end_date
1084: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1081: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1077: (SELECT glasna.access_set_id, glasna.ledger_id,
1078: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1079: glasna.status_code, glasna.record_id, SYSDATE,
1080: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1081: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1082: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1083: glasna.start_date, glasna.end_date
1084: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1085: GL_LEDGERS gll

Line 1082: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1078: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1079: glasna.status_code, glasna.record_id, SYSDATE,
1080: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1081: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1082: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1083: glasna.start_date, glasna.end_date
1084: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1085: GL_LEDGERS gll
1086: WHERE glasna.status_code IN ('I')

Line 1087: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1083: glasna.start_date, glasna.end_date
1084: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1085: GL_LEDGERS gll
1086: WHERE glasna.status_code IN ('I')
1087: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1088: AND gll.implicit_access_set_id = glasna.access_set_id
1089: AND gll.chart_of_accounts_id =
1090: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1091: AND gll.object_type_code = 'L');

Line 1090: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1086: WHERE glasna.status_code IN ('I')
1087: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1088: AND gll.implicit_access_set_id = glasna.access_set_id
1089: AND gll.chart_of_accounts_id =
1090: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1091: AND gll.object_type_code = 'L');
1092:
1093:
1094:

Line 1105: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN

1101: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1102: row_count := 0;
1103:
1104:
1105: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN
1106:
1107: -- This section will process access set changes due to changes
1108: -- in the explicit ledger sets, as well as any changes that affect
1109: -- the implicit access set tied to these ledger sets.

Line 1113: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1109: -- the implicit access set tied to these ledger sets.
1110:
1111: row_count := 0;
1112:
1113: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1114: GL_MESSAGE.Write_Log
1115: (msg_name => 'SHRD0180',
1116: token_num => 2,
1117: t1 => 'ROUTINE',

Line 1138: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1134: last_update_login, creation_date, created_by, start_date, end_date)
1135: (SELECT glasna.access_set_id, gllsa.ledger_id,
1136: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1137: gllsa.status_code, glasna.record_id, SYSDATE,
1138: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1139: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1140: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1141: glasna.start_date, glasna.end_date
1142: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1139: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1135: (SELECT glasna.access_set_id, gllsa.ledger_id,
1136: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1137: gllsa.status_code, glasna.record_id, SYSDATE,
1138: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1139: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1140: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1141: glasna.start_date, glasna.end_date
1142: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1143: GL_LEDGERS gll,

Line 1140: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1136: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1137: gllsa.status_code, glasna.record_id, SYSDATE,
1138: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1139: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1140: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1141: glasna.start_date, glasna.end_date
1142: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1143: GL_LEDGERS gll,
1144: GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1148: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1144: GL_ACCESS_SET_NORM_ASSIGN glasna,
1145: GL_ACCESS_SETS glas
1146: WHERE gllsa.status_code IN ('I', 'D')
1147: AND gll.ledger_id = gllsa.ledger_set_id
1148: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1149: AND gll.object_type_code = 'S'
1150: AND gll.automatically_created_flag = 'N'
1151: AND glasna.ledger_id = gllsa.ledger_set_id
1152: AND NVL(glasna.status_code, 'X') NOT IN ('I', 'U')

Line 1167: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1163: t2 => 'TABLE',
1164: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1165: row_count := 0;
1166:
1167: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1168: GL_MESSAGE.Write_Log
1169: (msg_name => 'SHRD0180',
1170: token_num => 2,
1171: t1 => 'ROUTINE',

Line 1187: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1183: last_update_login, creation_date, created_by, start_date, end_date)
1184: (SELECT glasna.access_set_id, gllsa.ledger_id,
1185: glsvh.child_flex_value, glasna.access_privilege_code,
1186: gllsa.status_code, glasna.record_id, SYSDATE,
1187: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1188: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1189: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1190: glasna.start_date, glasna.end_date
1191: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1188: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1184: (SELECT glasna.access_set_id, gllsa.ledger_id,
1185: glsvh.child_flex_value, glasna.access_privilege_code,
1186: gllsa.status_code, glasna.record_id, SYSDATE,
1187: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1188: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1189: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1190: glasna.start_date, glasna.end_date
1191: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1192: GL_LEDGERS gll,

Line 1189: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1185: glsvh.child_flex_value, glasna.access_privilege_code,
1186: gllsa.status_code, glasna.record_id, SYSDATE,
1187: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1188: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1189: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1190: glasna.start_date, glasna.end_date
1191: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1192: GL_LEDGERS gll,
1193: GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1198: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1194: GL_ACCESS_SETS glas,
1195: GL_SEG_VAL_HIERARCHIES glsvh
1196: WHERE gllsa.status_code IN ('I', 'D')
1197: AND gll.ledger_id = gllsa.ledger_set_id
1198: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1199: AND gll.object_type_code = 'S'
1200: AND gll.automatically_created_flag = 'N'
1201: AND glasna.ledger_id = gllsa.ledger_set_id
1202: AND glasna.all_segment_value_flag = 'Y'

Line 1219: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1215: t2 => 'TABLE',
1216: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1217: row_count := 0;
1218:
1219: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1220: GL_MESSAGE.Write_Log
1221: (msg_name => 'SHRD0180',
1222: token_num => 2,
1223: t1 => 'ROUTINE',

Line 1239: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1235: last_update_login, creation_date, created_by, start_date, end_date)
1236: (SELECT glasna.access_set_id, gllsa.ledger_id,
1237: glsvh.child_flex_value, glasna.access_privilege_code,
1238: gllsa.status_code, glasna.record_id, SYSDATE,
1239: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1240: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1241: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1242: glasna.start_date, glasna.end_date
1243: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1240: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1236: (SELECT glasna.access_set_id, gllsa.ledger_id,
1237: glsvh.child_flex_value, glasna.access_privilege_code,
1238: gllsa.status_code, glasna.record_id, SYSDATE,
1239: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1240: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1241: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1242: glasna.start_date, glasna.end_date
1243: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1244: GL_LEDGERS gll,

Line 1241: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1237: glsvh.child_flex_value, glasna.access_privilege_code,
1238: gllsa.status_code, glasna.record_id, SYSDATE,
1239: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1240: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1241: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1242: glasna.start_date, glasna.end_date
1243: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1244: GL_LEDGERS gll,
1245: GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1250: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1246: GL_ACCESS_SETS glas,
1247: GL_SEG_VAL_HIERARCHIES glsvh
1248: WHERE gllsa.status_code IN ('I', 'D')
1249: AND gll.ledger_id = gllsa.ledger_set_id
1250: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1251: AND gll.object_type_code = 'S'
1252: AND gll.automatically_created_flag = 'N'
1253: AND glasna.ledger_id = gllsa.ledger_set_id
1254: AND glasna.all_segment_value_flag = 'N'

Line 1272: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1268: t2 => 'TABLE',
1269: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1270: row_count := 0;
1271:
1272: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1273: GL_MESSAGE.Write_Log
1274: (msg_name => 'SHRD0180',
1275: token_num => 2,
1276: t1 => 'ROUTINE',

Line 1292: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1288: last_update_login, creation_date, created_by, start_date, end_date)
1289: (SELECT glasna.access_set_id, gllsa.ledger_id,
1290: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1291: gllsa.status_code, glasna.record_id, SYSDATE,
1292: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1293: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1294: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1295: glasna.start_date, glasna.end_date
1296: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1293: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1289: (SELECT glasna.access_set_id, gllsa.ledger_id,
1290: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1291: gllsa.status_code, glasna.record_id, SYSDATE,
1292: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1293: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1294: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1295: glasna.start_date, glasna.end_date
1296: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1297: GL_LEDGERS gll,

Line 1294: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1290: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1291: gllsa.status_code, glasna.record_id, SYSDATE,
1292: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1293: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1294: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1295: glasna.start_date, glasna.end_date
1296: FROM GL_LEDGER_SET_ASSIGNMENTS gllsa,
1297: GL_LEDGERS gll,
1298: GL_ACCESS_SET_NORM_ASSIGN glasna

Line 1301: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1297: GL_LEDGERS gll,
1298: GL_ACCESS_SET_NORM_ASSIGN glasna
1299: WHERE gllsa.status_code IN ('I', 'D')
1300: AND gll.ledger_id = gllsa.ledger_set_id
1301: AND gll.chart_of_accounts_id = GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1302: AND gll.automatically_created_flag = 'N'
1303: AND gll.object_type_code = 'S'
1304: AND glasna.access_set_id = gll.implicit_access_set_id
1305: AND glasna.ledger_id = gllsa.ledger_set_id

Line 1307: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID);

1303: AND gll.object_type_code = 'S'
1304: AND glasna.access_set_id = gll.implicit_access_set_id
1305: AND glasna.ledger_id = gllsa.ledger_set_id
1306: AND glasna.status_code = 'I'
1307: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID);
1308:
1309: row_count := SQL%ROWCOUNT;
1310: GL_MESSAGE.Write_Log(msg_name => 'SHRD0117',
1311: token_num => 2,

Line 1318: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN

1314: t2 => 'TABLE',
1315: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1316: row_count := 0;
1317:
1318: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
1319:
1320: -- This section will process changes in explicit access sets.
1321: -- Different statement will be run depending on the type
1322: -- of changes occurred as indicated by the checks earlier.

Line 1328: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1324: row_count := 0;
1325:
1326: IF (as_single_val_changed) THEN
1327:
1328: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1329: GL_MESSAGE.Write_Log
1330: (msg_name => 'SHRD0180',
1331: token_num => 2,
1332: t1 => 'ROUTINE',

Line 1351: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1347: DECODE(gllsa.ledger_id,
1348: NULL, glasna.ledger_id, gllsa.ledger_id),
1349: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1350: glasna.status_code, glasna.record_id, SYSDATE,
1351: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1352: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1353: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1354: glasna.start_date, glasna.end_date
1355: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1352: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1348: NULL, glasna.ledger_id, gllsa.ledger_id),
1349: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1350: glasna.status_code, glasna.record_id, SYSDATE,
1351: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1352: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1353: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1354: glasna.start_date, glasna.end_date
1355: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1356: GL_ACCESS_SETS glas,

Line 1353: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1349: NVL(glasna.segment_value, '-1'), glasna.access_privilege_code,
1350: glasna.status_code, glasna.record_id, SYSDATE,
1351: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1352: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1353: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1354: glasna.start_date, glasna.end_date
1355: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1356: GL_ACCESS_SETS glas,
1357: GL_LEDGER_SET_ASSIGNMENTS gllsa

Line 1359: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1355: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1356: GL_ACCESS_SETS glas,
1357: GL_LEDGER_SET_ASSIGNMENTS gllsa
1358: WHERE glasna.status_code IN ('I', 'D')
1359: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1360: AND glas.access_set_id = glasna.access_set_id
1361: AND glas.chart_of_accounts_id =
1362: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1363: AND glas.automatically_created_flag = 'N'

Line 1362: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1358: WHERE glasna.status_code IN ('I', 'D')
1359: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1360: AND glas.access_set_id = glasna.access_set_id
1361: AND glas.chart_of_accounts_id =
1362: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1363: AND glas.automatically_created_flag = 'N'
1364: AND ( ( glasna.all_segment_value_flag = 'N'
1365: AND glasna.segment_value_type_code = 'S')
1366: OR glas.security_segment_code = 'F')

Line 1383: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1379: END IF; -- IF (as_single_val_changed) ...
1380:
1381: IF (as_all_val_changed) THEN
1382:
1383: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1384: GL_MESSAGE.Write_Log
1385: (msg_name => 'SHRD0180',
1386: token_num => 2,
1387: t1 => 'ROUTINE',

Line 1405: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1401: DECODE(gllsa.ledger_id,
1402: NULL, glasna.ledger_id, gllsa.ledger_id),
1403: glsvh.child_flex_value, glasna.access_privilege_code,
1404: glasna.status_code, glasna.record_id, SYSDATE,
1405: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1406: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1407: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1408: glasna.start_date, glasna.end_date
1409: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1406: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1402: NULL, glasna.ledger_id, gllsa.ledger_id),
1403: glsvh.child_flex_value, glasna.access_privilege_code,
1404: glasna.status_code, glasna.record_id, SYSDATE,
1405: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1406: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1407: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1408: glasna.start_date, glasna.end_date
1409: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1410: GL_ACCESS_SETS glas,

Line 1407: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1403: glsvh.child_flex_value, glasna.access_privilege_code,
1404: glasna.status_code, glasna.record_id, SYSDATE,
1405: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1406: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1407: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1408: glasna.start_date, glasna.end_date
1409: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1410: GL_ACCESS_SETS glas,
1411: GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1414: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1410: GL_ACCESS_SETS glas,
1411: GL_LEDGER_SET_ASSIGNMENTS gllsa,
1412: GL_SEG_VAL_HIERARCHIES glsvh
1413: WHERE glasna.status_code IN ('I', 'D', 'U')
1414: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1415: AND glasna.all_segment_value_flag = 'Y'
1416: AND glas.access_set_id = glasna.access_set_id
1417: AND glas.chart_of_accounts_id =
1418: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

Line 1418: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1414: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1415: AND glasna.all_segment_value_flag = 'Y'
1416: AND glas.access_set_id = glasna.access_set_id
1417: AND glas.chart_of_accounts_id =
1418: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1419: AND glas.automatically_created_flag = 'N'
1420: AND glas.security_segment_code <> 'F'
1421: AND gllsa.ledger_set_id(+) = glasna.ledger_id
1422: AND NVL(gllsa.status_code(+), 'X') <> 'I'

Line 1439: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1435: END IF; -- IF (as_all_val_changed) ...
1436:
1437: IF (as_parent_val_changed) THEN
1438:
1439: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1440: GL_MESSAGE.Write_Log
1441: (msg_name => 'SHRD0180',
1442: token_num => 2,
1443: t1 => 'ROUTINE',

Line 1461: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1457: DECODE(gllsa.ledger_id,
1458: NULL, glasna.ledger_id, gllsa.ledger_id),
1459: glsvh.child_flex_value, glasna.access_privilege_code,
1460: glasna.status_code, glasna.record_id, SYSDATE,
1461: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1462: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1463: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1464: glasna.start_date, glasna.end_date
1465: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,

Line 1462: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,

1458: NULL, glasna.ledger_id, gllsa.ledger_id),
1459: glsvh.child_flex_value, glasna.access_privilege_code,
1460: glasna.status_code, glasna.record_id, SYSDATE,
1461: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1462: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1463: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1464: glasna.start_date, glasna.end_date
1465: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1466: GL_ACCESS_SETS glas,

Line 1463: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,

1459: glsvh.child_flex_value, glasna.access_privilege_code,
1460: glasna.status_code, glasna.record_id, SYSDATE,
1461: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1462: GL_FLATTEN_SETUP_DATA.GLSTFL_LOGIN_ID, SYSDATE,
1463: GL_FLATTEN_SETUP_DATA.GLSTFL_USER_ID,
1464: glasna.start_date, glasna.end_date
1465: FROM GL_ACCESS_SET_NORM_ASSIGN glasna,
1466: GL_ACCESS_SETS glas,
1467: GL_LEDGER_SET_ASSIGNMENTS gllsa,

Line 1470: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1466: GL_ACCESS_SETS glas,
1467: GL_LEDGER_SET_ASSIGNMENTS gllsa,
1468: GL_SEG_VAL_HIERARCHIES glsvh
1469: WHERE glasna.status_code IN ('I', 'D', 'U')
1470: AND glasna.request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1471: AND glasna.all_segment_value_flag = 'N'
1472: AND glasna.segment_value_type_code = 'C'
1473: AND glas.access_set_id = glasna.access_set_id
1474: AND glas.chart_of_accounts_id =

Line 1475: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1471: AND glasna.all_segment_value_flag = 'N'
1472: AND glasna.segment_value_type_code = 'C'
1473: AND glas.access_set_id = glasna.access_set_id
1474: AND glas.chart_of_accounts_id =
1475: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1476: AND glas.automatically_created_flag = 'N'
1477: AND glas.security_segment_code <> 'F'
1478: AND gllsa.ledger_set_id(+) = glasna.ledger_id
1479: AND NVL(gllsa.status_code(+), 'X') <> 'I'

Line 1498: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1494: END IF; -- IF (...OP_MODE IN ('SH', 'FF')) THEN ...
1495:
1496: ELSE
1497:
1498: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1499: GL_MESSAGE.Write_Log
1500: (msg_name => 'FLAT0017',
1501: token_num => 1,
1502: t1 => 'OP_MODE',

Line 1503: v1 => GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE);

1499: GL_MESSAGE.Write_Log
1500: (msg_name => 'FLAT0017',
1501: token_num => 1,
1502: t1 => 'OP_MODE',
1503: v1 => GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE);
1504: END IF;
1505:
1506: END IF; -- IF (cont_processing...) THEN ...
1507:

Line 1595: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1591: -- implicit or not, since only explicit access sets will ever
1592: -- have records with a negative access_set_id. This is because
1593: -- for implicit access sets they should never have more than
1594: -- 1 record for each access set/ledger/segment value combination.
1595: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1596: GL_MESSAGE.Write_Log
1597: (msg_name => 'SHRD0180',
1598: token_num => 2,
1599: t1 => 'ROUTINE',

Line 1641: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1637: -- smallest rowid and disable all other records.
1638: -- This statement will only update records if the first
1639: -- statement does not enable any record, since otherwise
1640: -- it will never pass the outer join test.
1641: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1642: GL_MESSAGE.Write_Log
1643: (msg_name => 'SHRD0180',
1644: token_num => 2,
1645: t1 => 'ROUTINE',

Line 1685: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

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
1687: (msg_name => 'SHRD0180',
1688: token_num => 2,
1689: t1 => 'ROUTINE',

Line 1726: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1722: v2 => 'GL_ACCESS_SET_ASSIGN_INT');
1723: row_count := 0;
1724:
1725:
1726: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1727: GL_MESSAGE.Write_Log
1728: (msg_name => 'SHRD0180',
1729: token_num => 2,
1730: t1 => 'ROUTINE',

Line 1757: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1753:
1754: IF (curr_as_id IS NOT NULL) THEN
1755:
1756: /*
1757: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1758: GL_MESSAGE.Write_Log
1759: (msg_name => 'FLAT0020',
1760: token_num => 3,
1761: t1 => 'AS_ID',

Line 1803: ** IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1799: END IF;
1800: END LOOP;
1801:
1802: /*
1803: ** IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1804: ** GL_MESSAGE.Write_Log
1805: ** (msg_name => 'FLAT0020',
1806: ** token_num => 1,
1807: ** t1 => 'NUM',

Line 1828: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

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
1830: (msg_name => 'SHRD0180',
1831: token_num => 2,
1832: t1 => 'ROUTINE',

Line 1902: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1898:
1899: -- Run the following statements using the right parameters
1900: -- to clean up GL_ACCESS_SET_NORM_ASSIGN
1901:
1902: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1903: GL_MESSAGE.Write_Log
1904: (msg_name => 'SHRD0180',
1905: token_num => 2,
1906: t1 => 'ROUTINE',

Line 1912: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN

1908: t2 => 'ACTION',
1909: v2 => 'Deleting records from GL_ACCESS_SET_NORM_ASSIGN...');
1910: END IF;
1911:
1912: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
1913:
1914: DELETE from GL_ACCESS_SET_NORM_ASSIGN
1915: WHERE status_code = 'D'
1916: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

Line 1916: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1912: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
1913:
1914: DELETE from GL_ACCESS_SET_NORM_ASSIGN
1915: WHERE status_code = 'D'
1916: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1917: AND access_set_id IN
1918: (SELECT access_set_id
1919: FROM GL_ACCESS_SETS
1920: WHERE chart_of_accounts_id =

Line 1921: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1917: AND access_set_id IN
1918: (SELECT access_set_id
1919: FROM GL_ACCESS_SETS
1920: WHERE chart_of_accounts_id =
1921: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1922: AND automatically_created_flag = 'N');
1923:
1924: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1925:

Line 1924: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN

1920: WHERE chart_of_accounts_id =
1921: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1922: AND automatically_created_flag = 'N');
1923:
1924: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1925:
1926: DELETE from GL_ACCESS_SET_NORM_ASSIGN
1927: WHERE status_code = 'D'
1928: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

Line 1928: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1924: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1925:
1926: DELETE from GL_ACCESS_SET_NORM_ASSIGN
1927: WHERE status_code = 'D'
1928: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1929: AND access_set_id IN
1930: (SELECT implicit_access_set_id
1931: FROM GL_LEDGERS
1932: WHERE chart_of_accounts_id =

Line 1933: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1929: AND access_set_id IN
1930: (SELECT implicit_access_set_id
1931: FROM GL_LEDGERS
1932: WHERE chart_of_accounts_id =
1933: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1934: AND object_type_code = 'L');
1935:
1936: END IF;
1937:

Line 1947: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN

1943: t2 => 'TABLE',
1944: v2 => 'GL_ACCESS_SET_NORM_ASSIGN');
1945: row_count := 0;
1946:
1947: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_Debug) THEN
1948: GL_MESSAGE.Write_Log
1949: (msg_name => 'SHRD0180',
1950: token_num => 2,
1951: t1 => 'ROUTINE',

Line 1957: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN

1953: t2 => 'ACTION',
1954: v2 => 'Updating records in GL_ACCESS_SET_NORM_ASSIGN...');
1955: END IF;
1956:
1957: IF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LS', 'VS')) THEN
1958:
1959: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1960: SET status_code = NULL, request_id = NULL
1961: WHERE status_code IN ('I', 'U')

Line 1962: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1958:
1959: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1960: SET status_code = NULL, request_id = NULL
1961: WHERE status_code IN ('I', 'U')
1962: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1963: AND access_set_id IN
1964: (SELECT implicit_access_set_id
1965: FROM GL_LEDGERS
1966: WHERE chart_of_accounts_id =

Line 1967: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1963: AND access_set_id IN
1964: (SELECT implicit_access_set_id
1965: FROM GL_LEDGERS
1966: WHERE chart_of_accounts_id =
1967: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1968: AND object_type_code = 'S');
1969:
1970: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
1971:

Line 1970: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN

1966: WHERE chart_of_accounts_id =
1967: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1968: AND object_type_code = 'S');
1969:
1970: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE = 'AS') THEN
1971:
1972: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1973: SET status_code = NULL, request_id = NULL
1974: WHERE status_code IN ('I', 'U')

Line 1975: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1971:
1972: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1973: SET status_code = NULL, request_id = NULL
1974: WHERE status_code IN ('I', 'U')
1975: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1976: AND access_set_id IN
1977: (SELECT access_set_id
1978: FROM GL_ACCESS_SETS
1979: WHERE chart_of_accounts_id =

Line 1980: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1976: AND access_set_id IN
1977: (SELECT access_set_id
1978: FROM GL_ACCESS_SETS
1979: WHERE chart_of_accounts_id =
1980: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1981: AND automatically_created_flag = 'N');
1982:
1983: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1984:

Line 1983: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN

1979: WHERE chart_of_accounts_id =
1980: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1981: AND automatically_created_flag = 'N');
1982:
1983: ELSIF (GL_FLATTEN_SETUP_DATA.GLSTFL_OP_MODE IN ('LH', 'VH')) THEN
1984:
1985: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1986: SET status_code = NULL, request_id = NULL
1987: WHERE status_code IN ('I', 'U')

Line 1988: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID

1984:
1985: UPDATE GL_ACCESS_SET_NORM_ASSIGN
1986: SET status_code = NULL, request_id = NULL
1987: WHERE status_code IN ('I', 'U')
1988: AND request_id = GL_FLATTEN_SETUP_DATA.GLSTFL_REQ_ID
1989: AND access_set_id IN
1990: (SELECT implicit_access_set_id
1991: FROM GL_LEDGERS
1992: WHERE chart_of_accounts_id =

Line 1993: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID

1989: AND access_set_id IN
1990: (SELECT implicit_access_set_id
1991: FROM GL_LEDGERS
1992: WHERE chart_of_accounts_id =
1993: GL_FLATTEN_SETUP_DATA.GLSTFL_COA_ID
1994: AND object_type_code = 'L');
1995:
1996: END IF;
1997: