DBA Data[Home] [Help]

SYS.DBMS_PREUP dependencies on DBMS_ASSERT

Line 602: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

598: -- BEGIN dictionary_stats_recommend; END;
599: --
600:
601: check_stmt := 'BEGIN dbms_preup.'
602: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
603: || '_recommend; END;';
604:
605: BEGIN
606: EXECUTE IMMEDIATE check_stmt;

Line 703: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

699: return 'WARNING - CHECK ' || name || ' does not exist';
700: END IF;
701: idx := check_names(name).idx;
702: estatement := 'BEGIN :r1 := dbms_preup.'
703: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
704: || '_gethelp (:helpType); END;';
705: EXECUTE IMMEDIATE estatement
706: USING OUT rhelp, IN helpType;
707: return rhelp;

Line 3823: logDir := dbms_assert.enquote_literal(

3819: --
3820: IF INSTR(platform, 'WINDOWS') != 0 THEN
3821: -- Windows, use '\'
3822: useDir := RTRIM(useDir, '\'); -- Remove any trailing slashes
3823: logDir := dbms_assert.enquote_literal(
3824: useDir
3825: || '\cfgtoollogs\'
3826: || uniqueName
3827: || '\preupgrade\');

Line 3829: pdbLogDir := dbms_assert.enquote_literal(

3825: || '\cfgtoollogs\'
3826: || uniqueName
3827: || '\preupgrade\');
3828: rdbmsLogDir := homeDir || '\rdbms\log\';
3829: pdbLogDir := dbms_assert.enquote_literal(
3830: useDir
3831: || '\cfgtoollogs\'
3832: || uniqueName
3833: || '\preupgrade\pdbfiles\');

Line 3836: logDir := dbms_assert.enquote_literal (REPLACE (

3832: || uniqueName
3833: || '\preupgrade\pdbfiles\');
3834: ELSIF INSTR(platform, 'VMS') != 0 THEN
3835: -- VMS, use [] and .
3836: logDir := dbms_assert.enquote_literal (REPLACE (
3837: useDir
3838: || '[cfgtoollogs.'
3839: || uniqueName
3840: || '.preupgrade]', '][', '.'));

Line 3842: pdbLogDir := dbms_assert.enquote_literal (REPLACE (

3838: || '[cfgtoollogs.'
3839: || uniqueName
3840: || '.preupgrade]', '][', '.'));
3841: rdbmsLogDir := REPLACE(homeDir || '[rdbms.log]', '][', '.');
3842: pdbLogDir := dbms_assert.enquote_literal (REPLACE (
3843: useDir
3844: || '[cfgtoollogs.'
3845: || uniqueName
3846: || '.preupgrade'

Line 3851: logDir := dbms_assert.enquote_literal(

3847: || '.pdbfiles]', '][', '.'));
3848: ELSE
3849: -- Unix and z/OS, '/'
3850: useDir := RTRIM(useDir, '/'); -- Remove any trailing slashes
3851: logDir := dbms_assert.enquote_literal(
3852: useDir
3853: || '/cfgtoollogs/'
3854: || uniqueName
3855: || '/preupgrade/');

Line 3857: pdbLogDir := dbms_assert.enquote_literal(

3853: || '/cfgtoollogs/'
3854: || uniqueName
3855: || '/preupgrade/');
3856: rdbmsLogDir := homeDir || '/rdbms/log/';
3857: pdbLogDir := dbms_assert.enquote_literal(
3858: useDir
3859: || '/cfgtoollogs/'
3860: || uniqueName
3861: || '/preupgrade/pdbfiles/');

Line 3888: -- Because of the dbms_assert checks we know we are getting a string with

3884: END;
3885:
3886: IF javastatus = 1 THEN
3887: BEGIN
3888: -- Because of the dbms_assert checks we know we are getting a string with
3889: -- leading and trailing single quotes as the path. We need to remove those
3890: -- single quotes before using the passed path variable.
3891: EXECUTE IMMEDIATE '
3892: CREATE OR REPLACE AND COMPILE JAVA SOURCE NAMED "PreupCreateDir" AS

Line 3972: logDir := dbms_assert.enquote_literal(rdbmsLogDir);

3968: EXCEPTION
3969: WHEN JavaSessionCleared THEN clearJava := TRUE;
3970: WHEN OTHERS THEN
3971: -- note: what used to be "usingExistingDef = FALSE"
3972: logDir := dbms_assert.enquote_literal(rdbmsLogDir);
3973: END;
3974:
3975: IF clearJava THEN
3976: --

Line 4013: logDir := dbms_assert.enquote_literal(rdbmsLogDir);

4009: --
4010: -- We said where to create the dir, and it failed,
4011: -- try the rdbmdLogDir area
4012: -- note: what used to be "usingExistingDef = FALSE"
4013: logDir := dbms_assert.enquote_literal(rdbmsLogDir);
4014: ELSE
4015: --
4016: -- status = 4 = could not create the directory
4017: --

Line 4231: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4227: check_table(idx).fixup_failed := FALSE;
4228: check_table(idx).always_fail := FALSE;
4229:
4230: check_stmt := 'BEGIN :r1 := dbms_preup.'
4231: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4232: || '_check (:rtxt); END;';
4233:
4234: BEGIN
4235: EXECUTE IMMEDIATE check_stmt

Line 4344: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4340: -- BEGIN :r1 := purge_recyclebin_check(r_text); END;
4341: --
4342:
4343: check_stmt := 'BEGIN :r1 := dbms_preup.'
4344: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4345: || '_check (:rtxt); END;';
4346:
4347: BEGIN
4348: EXECUTE IMMEDIATE check_stmt

Line 4423: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4419: --
4420: -- BEGIN :r1 := purge_recyclebin_check(r_text); END;
4421: --
4422: check_stmt := 'BEGIN :r1 := dbms_preup.'
4423: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4424: || '_check (:rtxt); END;';
4425:
4426: BEGIN
4427: EXECUTE IMMEDIATE check_stmt

Line 4502: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4498: -- BEGIN :r1 := purge_recyclebin_fixup(r_text, r_sqlcode); END;
4499: --
4500:
4501: check_stmt := 'BEGIN :r1 := dbms_preup.'
4502: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4503: || '_fixup (:rtxt, :rsqlcode); END;';
4504:
4505: --
4506: -- No exception catching here, let the lower levels catch

Line 4596: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4592: -- BEGIN :r1 := purge_recyclebin_fixup(r_text, r_sqlcode); END;
4593: --
4594:
4595: check_stmt := 'BEGIN :r1 := dbms_preup.'
4596: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4597: || '_fixup (:rtxt, :rsqlcode); END;';
4598:
4599: --
4600: -- No exception catching here, let the lower levels catch

Line 4655: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)

4651: -- BEGIN :r1 := purge_recyclebin_fixup(r_text, r_sqlcode); END;
4652: --
4653:
4654: check_stmt := 'BEGIN :r1 := dbms_preup.'
4655: || dbms_assert.simple_sql_name(check_table(idx).f_name_prefix)
4656: || '_fixup (:rtxt, :rsqlcode); END;';
4657:
4658: --
4659: -- No exception catching here, let the lower levels catch

Line 9319: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||

9315: EXIT WHEN t_cursor%NOTFOUND;
9316: --
9317: -- Put quotes around the schema and table name
9318: --
9319: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||
9320: dbms_assert.enquote_name(t_tabname,FALSE);
9321: BEGIN
9322: EXECUTE IMMEDIATE 'ALTER TABLE ' || t_full_name
9323: || ' UPGRADE INCLUDING DATA';

Line 9320: dbms_assert.enquote_name(t_tabname,FALSE);

9316: --
9317: -- Put quotes around the schema and table name
9318: --
9319: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||
9320: dbms_assert.enquote_name(t_tabname,FALSE);
9321: BEGIN
9322: EXECUTE IMMEDIATE 'ALTER TABLE ' || t_full_name
9323: || ' UPGRADE INCLUDING DATA';
9324: EXCEPTION WHEN OTHERS THEN

Line 9505: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||

9501: EXIT WHEN t_cursor%NOTFOUND;
9502: --
9503: -- Put quotes around the schema and table name
9504: --
9505: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||
9506: dbms_assert.enquote_name(t_tabname,FALSE);
9507: BEGIN
9508: EXECUTE IMMEDIATE 'ALTER TABLE ' || t_full_name
9509: || ' UPGRADE INCLUDING DATA';

Line 9506: dbms_assert.enquote_name(t_tabname,FALSE);

9502: --
9503: -- Put quotes around the schema and table name
9504: --
9505: t_full_name := dbms_assert.enquote_name(t_schema, FALSE) || '.' ||
9506: dbms_assert.enquote_name(t_tabname,FALSE);
9507: BEGIN
9508: EXECUTE IMMEDIATE 'ALTER TABLE ' || t_full_name
9509: || ' UPGRADE INCLUDING DATA';
9510: EXCEPTION WHEN OTHERS THEN

Line 11553: my_components_list := my_components_list || dbms_assert.enquote_literal(cmp_info(i).cid);

11549: FOR i in 1..max_components LOOP
11550: if (i > 1) THEN
11551: my_components_list := my_components_list || ',';
11552: END IF;
11553: my_components_list := my_components_list || dbms_assert.enquote_literal(cmp_info(i).cid);
11554: END LOOP;
11555:
11556: select_stmt := 'SELECT cname FROM sys.registry$ WHERE namespace=' ||
11557: dbms_assert.enquote_literal('SERVER') ||

Line 11557: dbms_assert.enquote_literal('SERVER') ||

11553: my_components_list := my_components_list || dbms_assert.enquote_literal(cmp_info(i).cid);
11554: END LOOP;
11555:
11556: select_stmt := 'SELECT cname FROM sys.registry$ WHERE namespace=' ||
11557: dbms_assert.enquote_literal('SERVER') ||
11558: ' AND cid NOT IN (' ||
11559: my_components_list ||
11560: ')';
11561: OPEN not_my_comps_cursor FOR select_stmt;