130: END IF;
131:
132:
133: l_last_update_date := sysdate;
134: l_last_updated_by := xla_environment_pkg.g_usr_id;
135: l_last_update_login := xla_environment_pkg.g_login_id;
136:
137:
138: --
131:
132:
133: l_last_update_date := sysdate;
134: l_last_updated_by := xla_environment_pkg.g_usr_id;
135: l_last_update_login := xla_environment_pkg.g_login_id;
136:
137:
138: --
139: -- UPDATE - p_process_mode = NULL
862: END IF;
863:
864: l_creation_date := sysdate;
865: l_last_update_date := sysdate;
866: l_created_by := xla_environment_pkg.g_usr_id;
867: l_last_updated_by := xla_environment_pkg.g_usr_id;
868: l_last_update_login := xla_environment_pkg.g_login_id;
869:
870: xla_tb_definition_pvt.insert_row
863:
864: l_creation_date := sysdate;
865: l_last_update_date := sysdate;
866: l_created_by := xla_environment_pkg.g_usr_id;
867: l_last_updated_by := xla_environment_pkg.g_usr_id;
868: l_last_update_login := xla_environment_pkg.g_login_id;
869:
870: xla_tb_definition_pvt.insert_row
871: (p_rowid => l_rowid
864: l_creation_date := sysdate;
865: l_last_update_date := sysdate;
866: l_created_by := xla_environment_pkg.g_usr_id;
867: l_last_updated_by := xla_environment_pkg.g_usr_id;
868: l_last_update_login := xla_environment_pkg.g_login_id;
869:
870: xla_tb_definition_pvt.insert_row
871: (p_rowid => l_rowid
872: ,p_definition_code => p_definition_rec.definition_code
938: END IF;
939:
940: l_creation_date := sysdate;
941: l_last_update_date := sysdate;
942: l_created_by := xla_environment_pkg.g_usr_id;
943: l_last_updated_by := xla_environment_pkg.g_usr_id;
944: l_last_update_login := xla_environment_pkg.g_login_id;
945:
946: INSERT INTO xla_tb_defn_je_sources
939:
940: l_creation_date := sysdate;
941: l_last_update_date := sysdate;
942: l_created_by := xla_environment_pkg.g_usr_id;
943: l_last_updated_by := xla_environment_pkg.g_usr_id;
944: l_last_update_login := xla_environment_pkg.g_login_id;
945:
946: INSERT INTO xla_tb_defn_je_sources
947: (definition_code
940: l_creation_date := sysdate;
941: l_last_update_date := sysdate;
942: l_created_by := xla_environment_pkg.g_usr_id;
943: l_last_updated_by := xla_environment_pkg.g_usr_id;
944: l_last_update_login := xla_environment_pkg.g_login_id;
945:
946: INSERT INTO xla_tb_defn_je_sources
947: (definition_code
948: ,je_source_name
1022: END IF;
1023:
1024: l_creation_date := sysdate;
1025: l_last_update_date := sysdate;
1026: l_created_by := xla_environment_pkg.g_usr_id;
1027: l_last_updated_by := xla_environment_pkg.g_usr_id;
1028: l_last_update_login := xla_environment_pkg.g_login_id;
1029:
1030: --
1023:
1024: l_creation_date := sysdate;
1025: l_last_update_date := sysdate;
1026: l_created_by := xla_environment_pkg.g_usr_id;
1027: l_last_updated_by := xla_environment_pkg.g_usr_id;
1028: l_last_update_login := xla_environment_pkg.g_login_id;
1029:
1030: --
1031: -- As record elements (e.g. p_balance_tbl(i).balance_date) is not allowed
1024: l_creation_date := sysdate;
1025: l_last_update_date := sysdate;
1026: l_created_by := xla_environment_pkg.g_usr_id;
1027: l_last_updated_by := xla_environment_pkg.g_usr_id;
1028: l_last_update_login := xla_environment_pkg.g_login_id;
1029:
1030: --
1031: -- As record elements (e.g. p_balance_tbl(i).balance_date) is not allowed
1032: -- in forall statements, reassgin parameters to local variables
1124: END IF;
1125:
1126: l_creation_date := sysdate;
1127: l_last_update_date := sysdate;
1128: l_created_by := xla_environment_pkg.g_usr_id;
1129: l_last_updated_by := xla_environment_pkg.g_usr_id;
1130: l_last_update_login := xla_environment_pkg.g_login_id;
1131:
1132: SELECT object_version_number
1125:
1126: l_creation_date := sysdate;
1127: l_last_update_date := sysdate;
1128: l_created_by := xla_environment_pkg.g_usr_id;
1129: l_last_updated_by := xla_environment_pkg.g_usr_id;
1130: l_last_update_login := xla_environment_pkg.g_login_id;
1131:
1132: SELECT object_version_number
1133: ,NVL(p_definition_rec.ledger_id,ledger_id)
1126: l_creation_date := sysdate;
1127: l_last_update_date := sysdate;
1128: l_created_by := xla_environment_pkg.g_usr_id;
1129: l_last_updated_by := xla_environment_pkg.g_usr_id;
1130: l_last_update_login := xla_environment_pkg.g_login_id;
1131:
1132: SELECT object_version_number
1133: ,NVL(p_definition_rec.ledger_id,ledger_id)
1134: ,enabled_flag
1227: END IF;
1228:
1229:
1230: l_last_update_date := sysdate;
1231: l_last_updated_by := xla_environment_pkg.g_usr_id;
1232: l_last_update_login := xla_environment_pkg.g_login_id;
1233:
1234: SELECT COUNT(1)
1235: INTO l_db_cnt
1228:
1229:
1230: l_last_update_date := sysdate;
1231: l_last_updated_by := xla_environment_pkg.g_usr_id;
1232: l_last_update_login := xla_environment_pkg.g_login_id;
1233:
1234: SELECT COUNT(1)
1235: INTO l_db_cnt
1236: FROM xla_subledgers xs
1298:
1299: END IF;
1300:
1301: l_last_update_date := sysdate;
1302: l_last_updated_by := xla_environment_pkg.g_usr_id;
1303: l_last_update_login := xla_environment_pkg.g_login_id;
1304:
1305: MERGE INTO xla_tb_defn_details dt
1306: USING (SELECT code_combination_id
1299: END IF;
1300:
1301: l_last_update_date := sysdate;
1302: l_last_updated_by := xla_environment_pkg.g_usr_id;
1303: l_last_update_login := xla_environment_pkg.g_login_id;
1304:
1305: MERGE INTO xla_tb_defn_details dt
1306: USING (SELECT code_combination_id
1307: ,balance_date
1412: ,1
1413: ,5000
1414: ,1
1415: ,SYSDATE
1416: ,xla_environment_pkg.g_usr_id
1417: ,SYSDATE
1418: ,xla_environment_pkg.g_usr_id
1419: ,xla_environment_pkg.g_login_id
1420: );
1414: ,1
1415: ,SYSDATE
1416: ,xla_environment_pkg.g_usr_id
1417: ,SYSDATE
1418: ,xla_environment_pkg.g_usr_id
1419: ,xla_environment_pkg.g_login_id
1420: );
1421: WHEN OTHERS THEN
1422: RAISE;
1415: ,SYSDATE
1416: ,xla_environment_pkg.g_usr_id
1417: ,SYSDATE
1418: ,xla_environment_pkg.g_usr_id
1419: ,xla_environment_pkg.g_login_id
1420: );
1421: WHEN OTHERS THEN
1422: RAISE;
1423:
1697: END IF;
1698:
1699:
1700:
1701: xla_environment_pkg.refresh;
1702:
1703: g_mode := NVL(p_mode,'C_CREATE_MODE');
1704:
1705: l_definition_rec.definition_code := p_definition_code;
1855: ,'###'
1856: ,'###'
1857: ,'###'
1858: ,SYSDATE
1859: ,xla_environment_pkg.g_Usr_Id
1860: ,SYSDATE
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1857: ,'###'
1858: ,SYSDATE
1859: ,xla_environment_pkg.g_Usr_Id
1860: ,SYSDATE
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1864: ,xla_environment_pkg.g_Prog_Appl_Id
1865: ,xla_environment_pkg.g_Prog_Id
1858: ,SYSDATE
1859: ,xla_environment_pkg.g_Usr_Id
1860: ,SYSDATE
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1864: ,xla_environment_pkg.g_Prog_Appl_Id
1865: ,xla_environment_pkg.g_Prog_Id
1866: ,SYSDATE
1859: ,xla_environment_pkg.g_Usr_Id
1860: ,SYSDATE
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1864: ,xla_environment_pkg.g_Prog_Appl_Id
1865: ,xla_environment_pkg.g_Prog_Id
1866: ,SYSDATE
1867: FROM xla_subledgers xsu,
1860: ,SYSDATE
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1864: ,xla_environment_pkg.g_Prog_Appl_Id
1865: ,xla_environment_pkg.g_Prog_Id
1866: ,SYSDATE
1867: FROM xla_subledgers xsu,
1868: xla_tb_defn_je_sources xjs,
1861: ,xla_environment_pkg.g_Usr_Id
1862: ,xla_environment_pkg.g_Login_Id
1863: ,xla_environment_pkg.g_req_Id
1864: ,xla_environment_pkg.g_Prog_Appl_Id
1865: ,xla_environment_pkg.g_Prog_Id
1866: ,SYSDATE
1867: FROM xla_subledgers xsu,
1868: xla_tb_defn_je_sources xjs,
1869: xla_event_class_attrs xeca
1980: l_schema VARCHAR2(30);
1981:
1982: l_count NUMBER;
1983:
1984: l_usr_id NUMBER := xla_environment_pkg.g_Usr_Id;
1985: l_login_id NUMBER := xla_environment_pkg.g_Login_Id;
1986: l_req_id NUMBER := xla_environment_pkg.g_req_Id;
1987: l_prog_appl_id NUMBER := xla_environment_pkg.g_Prog_Appl_Id;
1988: l_prog_id NUMBER := xla_environment_pkg.g_Prog_Id;
1981:
1982: l_count NUMBER;
1983:
1984: l_usr_id NUMBER := xla_environment_pkg.g_Usr_Id;
1985: l_login_id NUMBER := xla_environment_pkg.g_Login_Id;
1986: l_req_id NUMBER := xla_environment_pkg.g_req_Id;
1987: l_prog_appl_id NUMBER := xla_environment_pkg.g_Prog_Appl_Id;
1988: l_prog_id NUMBER := xla_environment_pkg.g_Prog_Id;
1989:
1982: l_count NUMBER;
1983:
1984: l_usr_id NUMBER := xla_environment_pkg.g_Usr_Id;
1985: l_login_id NUMBER := xla_environment_pkg.g_Login_Id;
1986: l_req_id NUMBER := xla_environment_pkg.g_req_Id;
1987: l_prog_appl_id NUMBER := xla_environment_pkg.g_Prog_Appl_Id;
1988: l_prog_id NUMBER := xla_environment_pkg.g_Prog_Id;
1989:
1990: BEGIN
1983:
1984: l_usr_id NUMBER := xla_environment_pkg.g_Usr_Id;
1985: l_login_id NUMBER := xla_environment_pkg.g_Login_Id;
1986: l_req_id NUMBER := xla_environment_pkg.g_req_Id;
1987: l_prog_appl_id NUMBER := xla_environment_pkg.g_Prog_Appl_Id;
1988: l_prog_id NUMBER := xla_environment_pkg.g_Prog_Id;
1989:
1990: BEGIN
1991: IF g_log_enabled THEN
1984: l_usr_id NUMBER := xla_environment_pkg.g_Usr_Id;
1985: l_login_id NUMBER := xla_environment_pkg.g_Login_Id;
1986: l_req_id NUMBER := xla_environment_pkg.g_req_Id;
1987: l_prog_appl_id NUMBER := xla_environment_pkg.g_Prog_Appl_Id;
1988: l_prog_id NUMBER := xla_environment_pkg.g_Prog_Id;
1989:
1990: BEGIN
1991: IF g_log_enabled THEN
1992: l_log_module := C_DEFAULT_MODULE||'.create_ap_balances';
2400: ,p_balance_side_code
2401: ,'FLEXFIELD'
2402: ,'NEW'
2403: ,sysdate
2404: ,xla_environment_pkg.g_Usr_Id
2405: ,sysdate
2406: ,xla_environment_pkg.g_Usr_Id
2407: ,xla_environment_pkg.g_login_Id
2408: ,xla_environment_pkg.g_Prog_Appl_Id
2402: ,'NEW'
2403: ,sysdate
2404: ,xla_environment_pkg.g_Usr_Id
2405: ,sysdate
2406: ,xla_environment_pkg.g_Usr_Id
2407: ,xla_environment_pkg.g_login_Id
2408: ,xla_environment_pkg.g_Prog_Appl_Id
2409: ,xla_environment_pkg.g_Usr_Id
2410: ,sysdate
2403: ,sysdate
2404: ,xla_environment_pkg.g_Usr_Id
2405: ,sysdate
2406: ,xla_environment_pkg.g_Usr_Id
2407: ,xla_environment_pkg.g_login_Id
2408: ,xla_environment_pkg.g_Prog_Appl_Id
2409: ,xla_environment_pkg.g_Usr_Id
2410: ,sysdate
2411: ,'S');
2404: ,xla_environment_pkg.g_Usr_Id
2405: ,sysdate
2406: ,xla_environment_pkg.g_Usr_Id
2407: ,xla_environment_pkg.g_login_Id
2408: ,xla_environment_pkg.g_Prog_Appl_Id
2409: ,xla_environment_pkg.g_Usr_Id
2410: ,sysdate
2411: ,'S');
2412:
2405: ,sysdate
2406: ,xla_environment_pkg.g_Usr_Id
2407: ,xla_environment_pkg.g_login_Id
2408: ,xla_environment_pkg.g_Prog_Appl_Id
2409: ,xla_environment_pkg.g_Usr_Id
2410: ,sysdate
2411: ,'S');
2412:
2413: IF (C_LEVEL_STATEMENT>= g_log_level) THEN
2431: VALUES (l_array_defn_code(i)
2432: ,p_je_source_name
2433: ,1
2434: ,sysdate
2435: ,xla_environment_pkg.g_Usr_Id
2436: ,sysdate
2437: ,xla_environment_pkg.g_Usr_Id
2438: ,xla_environment_pkg.g_login_Id
2439: ,'S');
2433: ,1
2434: ,sysdate
2435: ,xla_environment_pkg.g_Usr_Id
2436: ,sysdate
2437: ,xla_environment_pkg.g_Usr_Id
2438: ,xla_environment_pkg.g_login_Id
2439: ,'S');
2440:
2441: IF (C_LEVEL_STATEMENT>= g_log_level) THEN
2434: ,sysdate
2435: ,xla_environment_pkg.g_Usr_Id
2436: ,sysdate
2437: ,xla_environment_pkg.g_Usr_Id
2438: ,xla_environment_pkg.g_login_Id
2439: ,'S');
2440:
2441: IF (C_LEVEL_STATEMENT>= g_log_level) THEN
2442: trace
2461: ,1
2462: ,5000
2463: ,1
2464: ,SYSDATE
2465: ,xla_environment_pkg.g_usr_id
2466: ,SYSDATE
2467: ,xla_environment_pkg.g_usr_id
2468: ,xla_environment_pkg.g_login_id
2469: FROM xla_tb_balances_gt xtb
2463: ,1
2464: ,SYSDATE
2465: ,xla_environment_pkg.g_usr_id
2466: ,SYSDATE
2467: ,xla_environment_pkg.g_usr_id
2468: ,xla_environment_pkg.g_login_id
2469: FROM xla_tb_balances_gt xtb
2470: WHERE NOT EXISTS
2471: (SELECT 1
2464: ,SYSDATE
2465: ,xla_environment_pkg.g_usr_id
2466: ,SYSDATE
2467: ,xla_environment_pkg.g_usr_id
2468: ,xla_environment_pkg.g_login_id
2469: FROM xla_tb_balances_gt xtb
2470: WHERE NOT EXISTS
2471: (SELECT 1
2472: FROM XLA_GL_LEDGERS
2496: SELECT DISTINCT
2497: definition_code
2498: ,definition_name
2499: ,definition_desc
2500: ,xla_environment_pkg.g_Usr_Id
2501: ,sysdate
2502: ,xla_environment_pkg.g_Usr_Id
2503: ,sysdate
2504: ,xla_environment_pkg.g_login_Id
2498: ,definition_name
2499: ,definition_desc
2500: ,xla_environment_pkg.g_Usr_Id
2501: ,sysdate
2502: ,xla_environment_pkg.g_Usr_Id
2503: ,sysdate
2504: ,xla_environment_pkg.g_login_Id
2505: ,l.language_code
2506: ,userenv('LANG')
2500: ,xla_environment_pkg.g_Usr_Id
2501: ,sysdate
2502: ,xla_environment_pkg.g_Usr_Id
2503: ,sysdate
2504: ,xla_environment_pkg.g_login_Id
2505: ,l.language_code
2506: ,userenv('LANG')
2507: FROM fnd_languages l
2508: ,xla_tb_balances_gt tb
2551: ,owner_code
2552: ,NULL -- balance_date
2553: ,NULL -- balance_amount
2554: ,sysdate
2555: ,xla_environment_pkg.g_Usr_Id
2556: ,sysdate
2557: ,xla_environment_pkg.g_Usr_Id
2558: ,xla_environment_pkg.g_login_Id)
2559: INTO xla_tb_def_seg_ranges
2553: ,NULL -- balance_amount
2554: ,sysdate
2555: ,xla_environment_pkg.g_Usr_Id
2556: ,sysdate
2557: ,xla_environment_pkg.g_Usr_Id
2558: ,xla_environment_pkg.g_login_Id)
2559: INTO xla_tb_def_seg_ranges
2560: (definition_code
2561: ,line_num
2554: ,sysdate
2555: ,xla_environment_pkg.g_Usr_Id
2556: ,sysdate
2557: ,xla_environment_pkg.g_Usr_Id
2558: ,xla_environment_pkg.g_login_Id)
2559: INTO xla_tb_def_seg_ranges
2560: (definition_code
2561: ,line_num
2562: ,balance_date
2884: ,p_level => C_LEVEL_PROCEDURE
2885: ,p_module => l_log_module);
2886: END IF;
2887:
2888: xla_environment_pkg.refresh;
2889:
2890: IF NOT validate_je_source
2891: (p_je_source_name => p_je_source_name)
2892: THEN