DBA Data[Home] [Help]

APPS.BSC_APPS dependencies on BSC_APPS

Line 1: PACKAGE BODY BSC_APPS AS

1: PACKAGE BODY BSC_APPS AS
2: /* $Header: BSCAPPSB.pls 120.4 2006/04/18 16:40:35 arsantha noship $ */
3: /*===========================================================================+
4: | Copyright (c) 1999 Oracle Corporation |
5: | Redwood Shores, California, USA |

Line 173: x_source => 'BSC_APPS.Apps_Initialize_VB',

169:
170: EXCEPTION
171: WHEN OTHERS THEN
172: BSC_MESSAGE.Add(x_message => SQLERRM,
173: x_source => 'BSC_APPS.Apps_Initialize_VB',
174: x_mode => 'I');
175: COMMIT;
176:
177: END Apps_Initialize_VB;

Line 220: bsc_apps_short_name,

216: BEGIN
217:
218: IF apps_env THEN
219: AD_DDL.Do_DDL(fnd_apps_schema,
220: bsc_apps_short_name,
221: x_statement_type,
222: x_statement,
223: x_object_name);
224: ELSE

Line 239: x_bsc_apps_short_name IN VARCHAR2

235: x_statement IN VARCHAR2,
236: x_statement_type IN INTEGER := 0,
237: x_object_name IN VARCHAR2 := NULL,
238: x_fnd_apps_schema IN VARCHAR2,
239: x_bsc_apps_short_name IN VARCHAR2
240: ) IS
241: PRAGMA AUTONOMOUS_TRANSACTION;
242: BEGIN
243:

Line 245: x_bsc_apps_short_name,

241: PRAGMA AUTONOMOUS_TRANSACTION;
242: BEGIN
243:
244: AD_DDL.Do_DDL(x_fnd_apps_schema,
245: x_bsc_apps_short_name,
246: x_statement_type,
247: x_statement,
248: x_object_name);
249:

Line 268: x_source => 'BSC_APPS.Do_DDL_VB',

264:
265: EXCEPTION
266: WHEN OTHERS THEN
267: BSC_MESSAGE.Add(x_message => SQLERRM,
268: x_source => 'BSC_APPS.Do_DDL_VB',
269: x_mode => 'I');
270: COMMIT;
271:
272: END Do_DDL_VB;

Line 551: x_source => 'BSC_APPS.Get_Request_Status_VB',

547: -- type 30 h_phase, type 31 h_status
548: -- type 32 h_dev_phase, type 33 h_dev_status, type 34 h_message
549: IF h_phase IS NOT NULL THEN
550: BSC_MESSAGE.Add(x_message => h_phase,
551: x_source => 'BSC_APPS.Get_Request_Status_VB',
552: x_type => 30,
553: x_mode => 'I');
554: END IF;
555:

Line 558: x_source => 'BSC_APPS.Get_Request_Status_VB',

554: END IF;
555:
556: IF h_status IS NOT NULL THEN
557: BSC_MESSAGE.Add(x_message => h_status,
558: x_source => 'BSC_APPS.Get_Request_Status_VB',
559: x_type => 31,
560: x_mode => 'I');
561: END IF;
562:

Line 565: x_source => 'BSC_APPS.Get_Request_Status_VB',

561: END IF;
562:
563: IF h_dev_phase IS NOT NULL THEN
564: BSC_MESSAGE.Add(x_message => h_dev_phase,
565: x_source => 'BSC_APPS.Get_Request_Status_VB',
566: x_type => 32,
567: x_mode => 'I');
568: END IF;
569:

Line 572: x_source => 'BSC_APPS.Get_Request_Status_VB',

568: END IF;
569:
570: IF h_dev_status IS NOT NULL THEN
571: BSC_MESSAGE.Add(x_message => h_dev_status,
572: x_source => 'BSC_APPS.Get_Request_Status_VB',
573: x_type => 33,
574: x_mode => 'I');
575: END IF;
576:

Line 579: x_source => 'BSC_APPS.Get_Request_Status_VB',

575: END IF;
576:
577: IF h_message IS NOT NULL THEN
578: BSC_MESSAGE.Add(x_message => h_message,
579: x_source => 'BSC_APPS.Get_Request_Status_VB',
580: x_type => 34,
581: x_mode => 'I');
582: END IF;
583:

Line 591: x_source => 'BSC_APPS.Get_Request_Status_VB',

587:
588: EXCEPTION
589: WHEN OTHERS THEN
590: BSC_MESSAGE.Add(x_message => SQLERRM,
591: x_source => 'BSC_APPS.Get_Request_Status_VB',
592: x_mode => 'I');
593: COMMIT;
594: END Get_Request_Status_VB;
595:

Line 672: x_product_short_name => bsc_apps_short_name,

668: END IF;
669: IF l_tablespace_type = dimension_table_tbs_type THEN
670: IF dimension_table_tbs_name IS NULL THEN
671: AD_TSPACE_UTIL.get_tablespace_name(
672: x_product_short_name => bsc_apps_short_name,
673: x_tablespace_type => 'TRANSACTION_TABLES',
674: x_validate_ts_exists => 'N',
675: x_ts_exists => h_ts_exists,
676: x_tablespace => dimension_table_tbs_name);

Line 683: x_product_short_name => bsc_apps_short_name,

679:
680: ELSIF l_tablespace_type = dimension_index_tbs_type THEN
681: IF dimension_index_tbs_name IS NULL THEN
682: AD_TSPACE_UTIL.get_tablespace_name(
683: x_product_short_name => bsc_apps_short_name,
684: x_tablespace_type => 'TRANSACTION_INDEXES',
685: x_validate_ts_exists => 'N',
686: x_ts_exists => h_ts_exists,
687: x_tablespace => dimension_index_tbs_name);

Line 694: x_product_short_name => bsc_apps_short_name,

690:
691: ELSIF l_tablespace_type = input_table_tbs_type THEN
692: IF input_table_tbs_name IS NULL THEN
693: AD_TSPACE_UTIL.get_tablespace_name(
694: x_product_short_name => bsc_apps_short_name,
695: x_tablespace_type => 'INTERFACE',
696: x_validate_ts_exists => 'N',
697: x_ts_exists => h_ts_exists,
698: x_tablespace => input_table_tbs_name);

Line 705: x_product_short_name => bsc_apps_short_name,

701:
702: ELSIF l_tablespace_type = input_index_tbs_type THEN
703: IF input_index_tbs_name IS NULL THEN
704: AD_TSPACE_UTIL.get_tablespace_name(
705: x_product_short_name => bsc_apps_short_name,
706: x_tablespace_type => 'INTERFACE',
707: x_validate_ts_exists => 'N',
708: x_ts_exists => h_ts_exists,
709: x_tablespace => input_index_tbs_name);

Line 716: x_product_short_name => bsc_apps_short_name,

712:
713: ELSIF l_tablespace_type = base_table_tbs_type THEN
714: IF base_table_tbs_name IS NULL THEN
715: AD_TSPACE_UTIL.get_tablespace_name(
716: x_product_short_name => bsc_apps_short_name,
717: x_tablespace_type => 'SUMMARY',
718: x_validate_ts_exists => 'N',
719: x_ts_exists => h_ts_exists,
720: x_tablespace => base_table_tbs_name);

Line 727: x_product_short_name => bsc_apps_short_name,

723:
724: ELSIF l_tablespace_type = base_index_tbs_type THEN
725: IF base_index_tbs_name IS NULL THEN
726: AD_TSPACE_UTIL.get_tablespace_name(
727: x_product_short_name => bsc_apps_short_name,
728: x_tablespace_type => 'SUMMARY',
729: x_validate_ts_exists => 'N',
730: x_ts_exists => h_ts_exists,
731: x_tablespace => base_index_tbs_name);

Line 738: x_product_short_name => bsc_apps_short_name,

734:
735: ELSIF l_tablespace_type = summary_table_tbs_type THEN
736: IF summary_table_tbs_name IS NULL THEN
737: AD_TSPACE_UTIL.get_tablespace_name(
738: x_product_short_name => bsc_apps_short_name,
739: x_tablespace_type => 'SUMMARY',
740: x_validate_ts_exists => 'N',
741: x_ts_exists => h_ts_exists,
742: x_tablespace => summary_table_tbs_name);

Line 749: x_product_short_name => bsc_apps_short_name,

745:
746: ELSIF l_tablespace_type = summary_index_tbs_type THEN
747: IF summary_index_tbs_name IS NULL THEN
748: AD_TSPACE_UTIL.get_tablespace_name(
749: x_product_short_name => bsc_apps_short_name,
750: x_tablespace_type => 'SUMMARY',
751: x_validate_ts_exists => 'N',
752: x_ts_exists => h_ts_exists,
753: x_tablespace => summary_index_tbs_name);

Line 760: x_product_short_name => bsc_apps_short_name,

756:
757: ELSIF l_tablespace_type = other_table_tbs_type THEN
758: IF other_table_tbs_name IS NULL THEN
759: AD_TSPACE_UTIL.get_tablespace_name(
760: x_product_short_name => bsc_apps_short_name,
761: x_tablespace_type => 'TRANSACTION_TABLES',
762: x_validate_ts_exists => 'N',
763: x_ts_exists => h_ts_exists,
764: x_tablespace => other_table_tbs_name);

Line 771: x_product_short_name => bsc_apps_short_name,

767:
768: ELSIF l_tablespace_type = other_index_tbs_type THEN
769: IF other_index_tbs_name IS NULL THEN
770: AD_TSPACE_UTIL.get_tablespace_name(
771: x_product_short_name => bsc_apps_short_name,
772: x_tablespace_type => 'TRANSACTION_INDEXES',
773: x_validate_ts_exists => 'N',
774: x_ts_exists => h_ts_exists,
775: x_tablespace => other_index_tbs_name);

Line 782: x_product_short_name => bsc_apps_short_name,

778:
779: ELSE
780: -- use TRANSACTION_TABLES
781: AD_TSPACE_UTIL.get_tablespace_name(
782: x_product_short_name => bsc_apps_short_name,
783: x_tablespace_type => 'TRANSACTION_TABLES',
784: x_validate_ts_exists => 'N',
785: x_ts_exists => h_ts_exists,
786: x_tablespace => h_tbs_name);

Line 821: x_bsc_apps_short_name IN VARCHAR2

817: PROCEDURE Execute_DDL_Stmts_AT(
818: x_array_ddl_stmts IN t_array_ddl_stmts,
819: x_num_ddl_stmts IN NUMBER,
820: x_fnd_apps_schema IN VARCHAR2,
821: x_bsc_apps_short_name IN VARCHAR2
822: ) IS
823:
824: h_i NUMBER;
825:

Line 832: x_bsc_apps_short_name);

828: Do_DDL_AT(x_array_ddl_stmts(h_i).sql_stmt,
829: x_array_ddl_stmts(h_i).stmt_type,
830: x_array_ddl_stmts(h_i).object_name,
831: x_fnd_apps_schema,
832: x_bsc_apps_short_name);
833: END LOOP;
834: END Execute_DDL_Stmts_AT;
835:
836:

Line 888: | PROCEDURE Init_Bsc_Apps

884: END Init_Big_In_Cond_Table;
885:
886:
887: /*===========================================================================+
888: | PROCEDURE Init_Bsc_Apps
889: +============================================================================*/
890: PROCEDURE Init_Bsc_Apps IS
891:
892: CURSOR c_apps_table IS

Line 890: PROCEDURE Init_Bsc_Apps IS

886:
887: /*===========================================================================+
888: | PROCEDURE Init_Bsc_Apps
889: +============================================================================*/
890: PROCEDURE Init_Bsc_Apps IS
891:
892: CURSOR c_apps_table IS
893: SELECT
894: object_name

Line 929: --Init bsc_apps_short_name and bsc_apps_schema (Just for APPS environment)

925: apps_env := FALSE;
926: END IF;
927: CLOSE c_apps_table;
928:
929: --Init bsc_apps_short_name and bsc_apps_schema (Just for APPS environment)
930: IF apps_env THEN
931: bsc_appl_id := 271;
932: bsc_apps_short_name := 'BSC';
933: h_x := FND_INSTALLATION.Get_App_Info(bsc_apps_short_name, h_status, h_industry, bsc_apps_schema);

Line 932: bsc_apps_short_name := 'BSC';

928:
929: --Init bsc_apps_short_name and bsc_apps_schema (Just for APPS environment)
930: IF apps_env THEN
931: bsc_appl_id := 271;
932: bsc_apps_short_name := 'BSC';
933: h_x := FND_INSTALLATION.Get_App_Info(bsc_apps_short_name, h_status, h_industry, bsc_apps_schema);
934:
935: fnd_apps_short_name := 'FND';
936: h_x := FND_INSTALLATION.Get_App_Info(fnd_apps_short_name, h_status, h_industry, fnd_apps_schema);

Line 933: h_x := FND_INSTALLATION.Get_App_Info(bsc_apps_short_name, h_status, h_industry, bsc_apps_schema);

929: --Init bsc_apps_short_name and bsc_apps_schema (Just for APPS environment)
930: IF apps_env THEN
931: bsc_appl_id := 271;
932: bsc_apps_short_name := 'BSC';
933: h_x := FND_INSTALLATION.Get_App_Info(bsc_apps_short_name, h_status, h_industry, bsc_apps_schema);
934:
935: fnd_apps_short_name := 'FND';
936: h_x := FND_INSTALLATION.Get_App_Info(fnd_apps_short_name, h_status, h_industry, fnd_apps_schema);
937: END IF;

Line 980: h_sql := 'SELECT user_id FROM bsc_apps_users WHERE user_name = ''BSCADMIN''';

976: END IF;
977: CLOSE cv;
978: ELSE
979: -- personal version
980: h_sql := 'SELECT user_id FROM bsc_apps_users WHERE user_name = ''BSCADMIN''';
981: OPEN cv FOR h_sql;
982: FETCH cv INTO apps_user_id;
983: IF cv%NOTFOUND THEN
984: apps_user_id := -1;

Line 1007: END Init_Bsc_Apps;

1003: END IF;
1004: END IF;
1005: CLOSE cv;
1006:
1007: END Init_Bsc_Apps;
1008:
1009:
1010: /*===========================================================================+
1011: | FUNCTION Init_Log_File

Line 1241: h_request_id := FND_REQUEST.Submit_Request(application => bsc_apps_short_name,

1237:
1238: h_request_id := 0;
1239:
1240: IF UPPER(x_program) = 'BSCLOADER' THEN
1241: h_request_id := FND_REQUEST.Submit_Request(application => bsc_apps_short_name,
1242: program => x_program,
1243: description => NULL,
1244: start_time => x_start_time,
1245: sub_request => FALSE,

Line 1251: h_request_id := FND_REQUEST.Submit_Request(application => bsc_apps_short_name,

1247: argument2 => x_argument2,
1248: argument3 => x_argument3);
1249:
1250: ELSIF UPPER(x_program) = 'BSC_MIGRATION_PROC' THEN
1251: h_request_id := FND_REQUEST.Submit_Request(application => bsc_apps_short_name,
1252: program => x_program,
1253: description => NULL,
1254: start_time => x_start_time,
1255: sub_request => FALSE,

Line 1271: x_source => 'BSC_APPS.Submit_Request_VB',

1267: -- Insert the request_id in BSC_MESSAGE_LOGS table (type = 3, information) to VB program
1268: -- be able to get it.
1269:
1270: BSC_MESSAGE.Add(x_message => h_request_id,
1271: x_source => 'BSC_APPS.Submit_Request_VB',
1272: x_type => 3,
1273: x_mode => 'I');
1274: COMMIT;
1275:

Line 1279: x_source => 'BSC_APPS.Submit_Request_VB',

1275:
1276: EXCEPTION
1277: WHEN e_request_error THEN
1278: BSC_MESSAGE.Add(x_message => Get_Message('BSC_SUBMMITREQ_FAILED'),
1279: x_source => 'BSC_APPS.Submit_Request_VB',
1280: x_mode => 'I');
1281: COMMIT;
1282:
1283: WHEN OTHERS THEN

Line 1285: x_source => 'BSC_APPS.Submit_Request_VB',

1281: COMMIT;
1282:
1283: WHEN OTHERS THEN
1284: BSC_MESSAGE.Add(x_message => SQLERRM,
1285: x_source => 'BSC_APPS.Submit_Request_VB',
1286: x_mode => 'I');
1287: COMMIT;
1288:
1289: END Submit_Request_VB;

Line 1306: AND owner = upper(bsc_apps_schema);

1302:
1303: CURSOR get_index_apps IS
1304: SELECT index_name FROM ALL_INDEXES
1305: WHERE index_name = upper(x_index)
1306: AND owner = upper(bsc_apps_schema);
1307:
1308: h_idx VARCHAR2(30);
1309:
1310: BEGIN

Line 1349: AND owner = upper(bsc_apps_schema);

1345:
1346: CURSOR get_table_apps IS
1347: SELECT table_name FROM ALL_TABLES
1348: WHERE table_name = upper(x_table)
1349: AND owner = upper(bsc_apps_schema);
1350:
1351: h_tbl VARCHAR2(30);
1352:
1353: BEGIN

Line 1441: x_source => 'BSC_APPS.Wait_For_Request_VB',

1437:
1438: EXCEPTION
1439: WHEN e_wait_error THEN
1440: BSC_MESSAGE.Add(x_message => Get_Message('BSC_WAITREQ_FAILED'),
1441: x_source => 'BSC_APPS.Wait_For_Request_VB',
1442: x_mode => 'I');
1443: COMMIT;
1444:
1445: WHEN OTHERS THEN

Line 1447: x_source => 'BSC_APPS.Wait_For_Request_VB',

1443: COMMIT;
1444:
1445: WHEN OTHERS THEN
1446: BSC_MESSAGE.Add(x_message => SQLERRM,
1447: x_source => 'BSC_APPS.Wait_For_Request_VB',
1448: x_mode => 'I');
1449: COMMIT;
1450: END Wait_For_Request_VB;
1451:

Line 1756: x_Statements_Tbl IN BSC_APPS.Autonomous_Statements_Tbl_Type

1752: | Autonomous Transaction.
1753: | Fixed Bug #3541933
1754: +============================================================================*/
1755: PROCEDURE Do_DDL_AT(
1756: x_Statements_Tbl IN BSC_APPS.Autonomous_Statements_Tbl_Type
1757: ) IS
1758: PRAGMA AUTONOMOUS_TRANSACTION;
1759: BEGIN
1760: FOR i IN 0..(x_Statements_Tbl.COUNT-1) LOOP

Line 1765: ( Applsys_Schema => NVL(x_Statements_Tbl(i).x_Fnd_Apps_Schema, BSC_APPS.Fnd_Apps_Schema)

1761: IF ((x_Statements_Tbl(i).x_statement_type IS NULL) OR (x_Statements_Tbl(i).x_Object_Name IS NULL)) THEN
1762: EXECUTE IMMEDIATE x_Statements_Tbl(i).x_statement;
1763: ELSE
1764: AD_DDL.Do_DDL
1765: ( Applsys_Schema => NVL(x_Statements_Tbl(i).x_Fnd_Apps_Schema, BSC_APPS.Fnd_Apps_Schema)
1766: , Application_Short_Name => NVL(x_Statements_Tbl(i).x_Bsc_Apps_Short_Name, BSC_APPS.Bsc_Apps_Short_Name)
1767: , Statement_Type => x_Statements_Tbl(i).x_Statement_Type
1768: , Statement => x_Statements_Tbl(i).x_Statement
1769: , Object_Name => x_Statements_Tbl(i).x_Object_Name

Line 1766: , Application_Short_Name => NVL(x_Statements_Tbl(i).x_Bsc_Apps_Short_Name, BSC_APPS.Bsc_Apps_Short_Name)

1762: EXECUTE IMMEDIATE x_Statements_Tbl(i).x_statement;
1763: ELSE
1764: AD_DDL.Do_DDL
1765: ( Applsys_Schema => NVL(x_Statements_Tbl(i).x_Fnd_Apps_Schema, BSC_APPS.Fnd_Apps_Schema)
1766: , Application_Short_Name => NVL(x_Statements_Tbl(i).x_Bsc_Apps_Short_Name, BSC_APPS.Bsc_Apps_Short_Name)
1767: , Statement_Type => x_Statements_Tbl(i).x_Statement_Type
1768: , Statement => x_Statements_Tbl(i).x_Statement
1769: , Object_Name => x_Statements_Tbl(i).x_Object_Name
1770: );

Line 1813: FND_MESSAGE.SET_TOKEN(l_Token_Name, BSC_APPS.Get_Lookup_Value(l_Lookup_Type, l_Lookup_Code), TRUE);

1809: )) LOOP
1810: IF ((l_Lookup_Type IS NULL) OR (UPPER(l_Lookup_Type) = 'NULL')) THEN
1811: FND_MESSAGE.SET_TOKEN(l_Token_Name, l_Lookup_Code);
1812: ELSE
1813: FND_MESSAGE.SET_TOKEN(l_Token_Name, BSC_APPS.Get_Lookup_Value(l_Lookup_Type, l_Lookup_Code), TRUE);
1814: END IF;
1815: END LOOP;
1816: END IF;
1817:

Line 1828: END BSC_APPS;

1824: );
1825: RETURN l_msg_data;
1826: END Get_Bsc_Message;
1827:
1828: END BSC_APPS;