DBA Data[Home] [Help]

SYS.DBMS_PREUP dependencies on DBMS_OUTPUT

Line 2928: -- use dbms_output (output files would not be opened)

2924: IS
2925: BEGIN
2926: --
2927: -- If the package isn't inited yet (output from init routines)
2928: -- use dbms_output (output files would not be opened)
2929: --
2930: IF p_package_inited = FALSE OR pOutputDest = c_output_terminal THEN
2931: dbms_output.put_line (line);
2932: ELSE

Line 2931: dbms_output.put_line (line);

2927: -- If the package isn't inited yet (output from init routines)
2928: -- use dbms_output (output files would not be opened)
2929: --
2930: IF p_package_inited = FALSE OR pOutputDest = c_output_terminal THEN
2931: dbms_output.put_line (line);
2932: ELSE
2933: UTL_FILE.PUT_LINE (pOutputUFT,line);
2934: END IF;
2935: END DisplayLine;

Line 2966: dbms_output.put_line (line);

2962: --
2963: PROCEDURE DisplayLinePL (line VARCHAR2)
2964: IS
2965: BEGIN
2966: dbms_output.put_line (line);
2967: END DisplayLinePL;
2968:
2969: FUNCTION CenterLine (line IN VARCHAR2) RETURN VARCHAR2
2970: IS

Line 2977: -- its wrapped around dbms_output.put_line (so text only)

2973: END CenterLine;
2974:
2975: --
2976: -- Put a line of text to output AND to passed file but
2977: -- its wrapped around dbms_output.put_line (so text only)
2978: -- intended to be dumped out while the pre/post fixup scripts
2979: -- are being run.
2980: -- If the line parameter contains single quote characters, they will be doubled
2981: -- here as needed for the script output.

Line 2988: DisplayLine (uft, 'dbms_output.put_line (''' || replace(line, q'!'!', q'!''!') || ''');');

2984: IS
2985: BEGIN
2986: DisplayLine(line);
2987: IF pOutputFixupScripts THEN
2988: DisplayLine (uft, 'dbms_output.put_line (''' || replace(line, q'!'!', q'!''!') || ''');');
2989: END IF;
2990: END DisplayLineBoth;
2991:
2992:

Line 3007: DisplayLine (uft, 'dbms_output.put_line ('''

3003: IS
3004: BEGIN
3005: DisplayLine('**********************************************************************');
3006: IF pOutputFixupScripts THEN
3007: DisplayLine (uft, 'dbms_output.put_line ('''
3008: || '**********************************************************************'
3009: || ''');');
3010: END IF;
3011: END DisplayBanner;

Line 3031: DisplayLine (uft, 'dbms_output.put_line ('''

3027: IS
3028: BEGIN
3029: DisplayLine(LPAD(line,35+(length(line)/2)+1));
3030: IF pOutputFixupScripts THEN
3031: DisplayLine (uft, 'dbms_output.put_line ('''
3032: || LPAD(line,35+(length(line)/2)+1)
3033: || ''');');
3034: END IF;
3035: END DisplayCenter;

Line 3038: -- Same as above, only use dbms_output.put_line only

3034: END IF;
3035: END DisplayCenter;
3036:
3037: --
3038: -- Same as above, only use dbms_output.put_line only
3039: -- Intended to be used by fixup routine to better control
3040: -- format.
3041: --
3042: PROCEDURE DisplayCenterPL (line IN VARCHAR2)

Line 3045: dbms_output.put_line(LPAD(line,35+(length(line)/2)+1));

3041: --
3042: PROCEDURE DisplayCenterPL (line IN VARCHAR2)
3043: IS
3044: BEGIN
3045: dbms_output.put_line(LPAD(line,35+(length(line)/2)+1));
3046: END DisplayCenterPL;
3047:
3048: PROCEDURE DisplayInformation (text varchar2)
3049: IS

Line 3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);

3184: pPostScriptFname := c_post_fixup_base || con_name || c_fixup_suffix;
3185: END IF;
3186:
3187: IF tracing_on_xxx THEN
3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);
3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);

Line 3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);

3185: END IF;
3186:
3187: IF tracing_on_xxx THEN
3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);
3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);
3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);

Line 3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);

3186:
3187: IF tracing_on_xxx THEN
3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);
3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);
3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);
3194: END IF;

Line 3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);

3187: IF tracing_on_xxx THEN
3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);
3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);
3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);
3194: END IF;
3195:

Line 3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);

3188: dbms_output.put_line('XXX finalDestLogFn : ' || finalDestLogFn);
3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);
3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);
3194: END IF;
3195:
3196: -- initialize: remove pdb text files in pdbfiles subdir

Line 3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);

3189: dbms_output.put_line('XXX finalDestPreScriptFn : '|| finalDestPreScriptFn);
3190: dbms_output.put_line('XXX finalDestPostScriptFn : '||finalDestPostScriptFn);
3191: dbms_output.put_line('XXX pOutputFName : ' || pOutputFName);
3192: dbms_output.put_line('XXX pPreScriptFname : ' || pPreScriptFname);
3193: dbms_output.put_line('XXX pPostScriptFname : ' || pPostScriptFname);
3194: END IF;
3195:
3196: -- initialize: remove pdb text files in pdbfiles subdir
3197: IF pConcatToMainFile THEN

Line 3243: dbms_output.put_line('XXX preupgrade log opened');

3239: -- preupgrade..log is also opened in write mode
3240: pOutputUFT :=
3241: UTL_FILE.FOPEN(pOutputLocation, pOutputFName, 'W', c_fopen_max_lsz);
3242: IF tracing_on_xxx = TRUE THEN
3243: dbms_output.put_line('XXX preupgrade log opened');
3244: dbms_output.put_line('XXX out dir obj ' || pOutputLocation);
3245: dbms_output.put_line('XXX pOutputFName ' || pOutputFName);
3246: END IF;
3247: ELSIF (pOutputType = c_output_xml) THEN

Line 3244: dbms_output.put_line('XXX out dir obj ' || pOutputLocation);

3240: pOutputUFT :=
3241: UTL_FILE.FOPEN(pOutputLocation, pOutputFName, 'W', c_fopen_max_lsz);
3242: IF tracing_on_xxx = TRUE THEN
3243: dbms_output.put_line('XXX preupgrade log opened');
3244: dbms_output.put_line('XXX out dir obj ' || pOutputLocation);
3245: dbms_output.put_line('XXX pOutputFName ' || pOutputFName);
3246: END IF;
3247: ELSIF (pOutputType = c_output_xml) THEN
3248: -- upgrade.xml is always opened in append mode

Line 3245: dbms_output.put_line('XXX pOutputFName ' || pOutputFName);

3241: UTL_FILE.FOPEN(pOutputLocation, pOutputFName, 'W', c_fopen_max_lsz);
3242: IF tracing_on_xxx = TRUE THEN
3243: dbms_output.put_line('XXX preupgrade log opened');
3244: dbms_output.put_line('XXX out dir obj ' || pOutputLocation);
3245: dbms_output.put_line('XXX pOutputFName ' || pOutputFName);
3246: END IF;
3247: ELSIF (pOutputType = c_output_xml) THEN
3248: -- upgrade.xml is always opened in append mode
3249: --

Line 3322: dbms_output.put_line('XXX in close_file');

3318: IS
3319: BEGIN
3320:
3321: IF tracing_on_xxx THEN
3322: dbms_output.put_line('XXX in close_file');
3323: END IF;
3324:
3325: IF pOutputDest = c_output_file THEN
3326: IF (UTL_FILE.IS_OPEN(pOutputUFT)) THEN

Line 3329: dbms_output.put_line('XXX close log file');

3325: IF pOutputDest = c_output_file THEN
3326: IF (UTL_FILE.IS_OPEN(pOutputUFT)) THEN
3327: UTL_FILE.FCLOSE(pOutputUFT);
3328: IF tracing_on_xxx THEN
3329: dbms_output.put_line('XXX close log file');
3330: END IF;
3331: END IF;
3332: pOutputDest := c_output_terminal;
3333:

Line 3337: dbms_output.put_line('XXX close preupgrade_fixups.sql');

3333:
3334: IF (UTL_FILE.IS_OPEN(pPreScriptUFT)) THEN
3335: UTL_FILE.FCLOSE(pPreScriptUFT);
3336: IF tracing_on_xxx THEN
3337: dbms_output.put_line('XXX close preupgrade_fixups.sql');
3338: END IF;
3339: END IF;
3340:
3341: IF (UTL_FILE.IS_OPEN(pPostScriptUFT)) THEN

Line 3344: dbms_output.put_line('XXX close postupgrade_fixups.sql');

3340:
3341: IF (UTL_FILE.IS_OPEN(pPostScriptUFT)) THEN
3342: UTL_FILE.FCLOSE(pPostScriptUFT);
3343: IF tracing_on_xxx THEN
3344: dbms_output.put_line('XXX close postupgrade_fixups.sql');
3345: END IF;
3346: END IF;
3347:
3348: IF tracing_on_xxx THEN

Line 3349: dbms_output.put_line('XXX in close_file');

3345: END IF;
3346: END IF;
3347:
3348: IF tracing_on_xxx THEN
3349: dbms_output.put_line('XXX in close_file');
3350: dbms_output.put_line('XXX pTextLogDir is ' || pTextLogDir);
3351: dbms_output.put_line('XXX pOutputFName is ' || pOutputFName);
3352: dbms_output.put_line('XXX pOutputLocation is ' || pOutputLocation);
3353: END IF;

Line 3350: dbms_output.put_line('XXX pTextLogDir is ' || pTextLogDir);

3346: END IF;
3347:
3348: IF tracing_on_xxx THEN
3349: dbms_output.put_line('XXX in close_file');
3350: dbms_output.put_line('XXX pTextLogDir is ' || pTextLogDir);
3351: dbms_output.put_line('XXX pOutputFName is ' || pOutputFName);
3352: dbms_output.put_line('XXX pOutputLocation is ' || pOutputLocation);
3353: END IF;
3354:

Line 3351: dbms_output.put_line('XXX pOutputFName is ' || pOutputFName);

3347:
3348: IF tracing_on_xxx THEN
3349: dbms_output.put_line('XXX in close_file');
3350: dbms_output.put_line('XXX pTextLogDir is ' || pTextLogDir);
3351: dbms_output.put_line('XXX pOutputFName is ' || pOutputFName);
3352: dbms_output.put_line('XXX pOutputLocation is ' || pOutputLocation);
3353: END IF;
3354:
3355: IF pOutputFixupScripts = FALSE AND pCreatedDirObj THEN

Line 3352: dbms_output.put_line('XXX pOutputLocation is ' || pOutputLocation);

3348: IF tracing_on_xxx THEN
3349: dbms_output.put_line('XXX in close_file');
3350: dbms_output.put_line('XXX pTextLogDir is ' || pTextLogDir);
3351: dbms_output.put_line('XXX pOutputFName is ' || pOutputFName);
3352: dbms_output.put_line('XXX pOutputLocation is ' || pOutputLocation);
3353: END IF;
3354:
3355: IF pOutputFixupScripts = FALSE AND pCreatedDirObj THEN
3356: --

Line 3424: dbms_output.put_line('XXX set_fixup_scripts: ON');

3420: RETURN;
3421: END IF;
3422:
3423: IF tracing_on_xxx THEN
3424: dbms_output.put_line('XXX set_fixup_scripts: ON');
3425: END IF;
3426:
3427: --
3428: -- Make sure a directory object exists

Line 3459: dbms_output.put_line('XXX opened file ' || pPreScriptFname);

3455: pPreScriptUFT := UTL_FILE.FOPEN(pOutputLocation, pPreScriptFname,
3456: 'W', c_fopen_max_lsz);
3457:
3458: IF tracing_on_xxx THEN
3459: dbms_output.put_line('XXX opened file ' || pPreScriptFname);
3460: END IF;
3461:
3462: EXCEPTION
3463: WHEN OTHERS THEN

Line 3482: dbms_output.put_line('XXX opened file ' || pPostScriptFname);

3478: UTL_FILE.FOPEN(pOutputLocation, pPostScriptFname, 'W',
3479: c_fopen_max_lsz);
3480:
3481: IF tracing_on_xxx THEN
3482: dbms_output.put_line('XXX opened file ' || pPostScriptFname);
3483: END IF;
3484:
3485: EXCEPTION
3486: WHEN OTHERS THEN

Line 3503: dbms_output.put_line('XXX preupgrade_fixup script opened');

3499: RETURN;
3500: END IF;
3501:
3502: IF tracing_on_xxx THEN
3503: dbms_output.put_line('XXX preupgrade_fixup script opened');
3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);

Line 3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);

3500: END IF;
3501:
3502: IF tracing_on_xxx THEN
3503: dbms_output.put_line('XXX preupgrade_fixup script opened');
3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);

Line 3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);

3501:
3502: IF tracing_on_xxx THEN
3503: dbms_output.put_line('XXX preupgrade_fixup script opened');
3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);
3509: END IF;

Line 3506: dbms_output.put_line('XXX postupgrade_fixup script opened');

3502: IF tracing_on_xxx THEN
3503: dbms_output.put_line('XXX preupgrade_fixup script opened');
3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);
3509: END IF;
3510:

Line 3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);

3503: dbms_output.put_line('XXX preupgrade_fixup script opened');
3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);
3509: END IF;
3510:
3511: EXECUTE IMMEDIATE 'SELECT TO_CHAR(SYSTIMESTAMP,''YYYY-MM-DD HH24:MI:SS '') FROM SYS.DUAL'

Line 3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);

3504: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3505: dbms_output.put_line('XXX pPreScriptFname ' || pPreScriptFname);
3506: dbms_output.put_line('XXX postupgrade_fixup script opened');
3507: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
3508: dbms_output.put_line('XXX pPostScriptFname ' || pPostScriptFname);
3509: END IF;
3510:
3511: EXECUTE IMMEDIATE 'SELECT TO_CHAR(SYSTIMESTAMP,''YYYY-MM-DD HH24:MI:SS '') FROM SYS.DUAL'
3512: INTO timeinfo;

Line 3560: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');

3556: -- the real work gets started.
3557: genline := 'Pre-Upgrade Fixup Script Generated on ' || timeinfo || ' Version: ' || c_version
3558: || ' Build: ' || c_build;
3559: DisplayLine (pPreScriptUFT, 'BEGIN');
3560: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3561: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''Beginning Pre-Upgrade Fixups...'');');
3562: genline := 'Executing in container ' || con_name;
3563: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3564: DisplayLine (pPreScriptUFT, 'END;');

Line 3561: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''Beginning Pre-Upgrade Fixups...'');');

3557: genline := 'Pre-Upgrade Fixup Script Generated on ' || timeinfo || ' Version: ' || c_version
3558: || ' Build: ' || c_build;
3559: DisplayLine (pPreScriptUFT, 'BEGIN');
3560: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3561: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''Beginning Pre-Upgrade Fixups...'');');
3562: genline := 'Executing in container ' || con_name;
3563: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3564: DisplayLine (pPreScriptUFT, 'END;');
3565: DisplayBlankLine (pPreScriptUFT);

Line 3563: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');

3559: DisplayLine (pPreScriptUFT, 'BEGIN');
3560: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3561: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''Beginning Pre-Upgrade Fixups...'');');
3562: genline := 'Executing in container ' || con_name;
3563: DisplayLine (pPreScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3564: DisplayLine (pPreScriptUFT, 'END;');
3565: DisplayBlankLine (pPreScriptUFT);
3566: DisplayLine (pPreScriptUFT, 'BEGIN');
3567: DisplayLine (pPreScriptUFT, 'dbms_preup.clear_run_flag(TRUE);');

Line 3604: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''' || genline || ''');');

3600: || ' Build: ' || c_build;
3601: -- In its own begin/end so the output gets out before
3602: -- the real work gets started.
3603: DisplayLine (pPostScriptUFT, 'BEGIN');
3604: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3605: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''Beginning Post-Upgrade Fixups...'');');
3606: DisplayLine (pPostScriptUFT, 'END;');
3607: DisplayBlankLine (pPostScriptUFT);
3608: DisplayLine (pPostScriptUFT, 'BEGIN');

Line 3605: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''Beginning Post-Upgrade Fixups...'');');

3601: -- In its own begin/end so the output gets out before
3602: -- the real work gets started.
3603: DisplayLine (pPostScriptUFT, 'BEGIN');
3604: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''' || genline || ''');');
3605: DisplayLine (pPostScriptUFT, 'dbms_output.put_line (''Beginning Post-Upgrade Fixups...'');');
3606: DisplayLine (pPostScriptUFT, 'END;');
3607: DisplayBlankLine (pPostScriptUFT);
3608: DisplayLine (pPostScriptUFT, 'BEGIN');
3609: DisplayLine (pPostScriptUFT, 'dbms_preup.clear_run_flag(FALSE);');

Line 3632: 'dbms_output.put_line (''**************** Pre-Upgrade Fixup Script Complete *********************'');');

3628: INTO timeinfo;
3629:
3630: DisplayLine (pPreScriptUFT, 'BEGIN');
3631: DisplayLine (pPreScriptUFT,
3632: 'dbms_output.put_line (''**************** Pre-Upgrade Fixup Script Complete *********************'');');
3633: DisplayLine (pPreScriptUFT, 'END;');
3634: DisplayBlankLine (pPreScriptUFT);
3635: -- end of prefixup steps for if container connected is same as con_name
3636: DisplayLine (pPreScriptUFT,'END IF;');

Line 3646: 'dbms_output.put_line (''*************** Post Upgrade Fixup Script Complete ********************'');');

3642: DisplayBlankLine (pPreScriptUFT);
3643:
3644: DisplayLine (pPostScriptUFT, 'BEGIN');
3645: DisplayLine (pPostScriptUFT,
3646: 'dbms_output.put_line (''*************** Post Upgrade Fixup Script Complete ********************'');');
3647: DisplayLine (pPostScriptUFT,'END;');
3648:
3649: IF tracing_on_xxx THEN
3650: dbms_output.put_line('XXX end post upgrade fixup file');

Line 3650: dbms_output.put_line('XXX end post upgrade fixup file');

3646: 'dbms_output.put_line (''*************** Post Upgrade Fixup Script Complete ********************'');');
3647: DisplayLine (pPostScriptUFT,'END;');
3648:
3649: IF tracing_on_xxx THEN
3650: dbms_output.put_line('XXX end post upgrade fixup file');
3651: END IF;
3652:
3653: DisplayBlankLine (pPostScriptUFT);
3654: -- end of prefixup steps for if container connected is same as con_name

Line 4082: dbms_output.put_line('XXX created directory object ' || c_pdb_dir_obj);

4078: BEGIN
4079: EXECUTE IMMEDIATE
4080: 'CREATE OR REPLACE DIRECTORY ' || c_pdb_dir_obj || ' AS ' || pdbLogDir ;
4081: IF tracing_on_xxx THEN
4082: dbms_output.put_line('XXX created directory object ' || c_pdb_dir_obj);
4083: END IF;
4084:
4085: EXECUTE IMMEDIATE
4086: 'GRANT READ, WRITE ON DIRECTORY ' || c_pdb_dir_obj || ' TO SYS';

Line 4088: dbms_output.put_line('XXX granted permissions to c_pdb_dir_obj');

4084:
4085: EXECUTE IMMEDIATE
4086: 'GRANT READ, WRITE ON DIRECTORY ' || c_pdb_dir_obj || ' TO SYS';
4087: IF tracing_on_xxx THEN
4088: dbms_output.put_line('XXX granted permissions to c_pdb_dir_obj');
4089: END IF;
4090:
4091: IF tracing_on_xxx THEN
4092: dbms_output.put_line('XXX pdb dir obj created');

Line 4092: dbms_output.put_line('XXX pdb dir obj created');

4088: dbms_output.put_line('XXX granted permissions to c_pdb_dir_obj');
4089: END IF;
4090:
4091: IF tracing_on_xxx THEN
4092: dbms_output.put_line('XXX pdb dir obj created');
4093: END IF;
4094:
4095: pCreatedPdbDirObj := TRUE; -- pdb dir obj created
4096: EXCEPTION

Line 4098: dbms_output.put_line('');

4094:
4095: pCreatedPdbDirObj := TRUE; -- pdb dir obj created
4096: EXCEPTION
4097: WHEN OTHERS THEN
4098: dbms_output.put_line('');
4099: dbms_output.put_line(
4100: 'Error when trying to create and/or grant permissions on ' ||
4101: 'directory object PDB_PREUPGRADE_DIR. ' ||
4102: 'Please fix the error before rerunning the preupgrade tool.');

Line 4099: dbms_output.put_line(

4095: pCreatedPdbDirObj := TRUE; -- pdb dir obj created
4096: EXCEPTION
4097: WHEN OTHERS THEN
4098: dbms_output.put_line('');
4099: dbms_output.put_line(
4100: 'Error when trying to create and/or grant permissions on ' ||
4101: 'directory object PDB_PREUPGRADE_DIR. ' ||
4102: 'Please fix the error before rerunning the preupgrade tool.');
4103: dbms_output.put_line('');

Line 4103: dbms_output.put_line('');

4099: dbms_output.put_line(
4100: 'Error when trying to create and/or grant permissions on ' ||
4101: 'directory object PDB_PREUPGRADE_DIR. ' ||
4102: 'Please fix the error before rerunning the preupgrade tool.');
4103: dbms_output.put_line('');
4104: RAISE_APPLICATION_ERROR(-20000, 'Error: ' || SQLERRM);
4105: END;
4106: END IF;
4107:

Line 4604: dbms_output.put_line ('------- ---------- Executing Fixup ------------ ----------');

4600: -- No exception catching here, let the lower levels catch
4601: -- and return the problems.
4602: --
4603:
4604: dbms_output.put_line ('------- ---------- Executing Fixup ------------ ----------');
4605: dbms_output.put_line ('------- ' || RPAD (check_table(idx).name, 40) || ' ----------');
4606:
4607: EXECUTE IMMEDIATE check_stmt
4608: USING OUT retval, IN OUT r_text, IN OUT r_sqlcode;

Line 4605: dbms_output.put_line ('------- ' || RPAD (check_table(idx).name, 40) || ' ----------');

4601: -- and return the problems.
4602: --
4603:
4604: dbms_output.put_line ('------- ---------- Executing Fixup ------------ ----------');
4605: dbms_output.put_line ('------- ' || RPAD (check_table(idx).name, 40) || ' ----------');
4606:
4607: EXECUTE IMMEDIATE check_stmt
4608: USING OUT retval, IN OUT r_text, IN OUT r_sqlcode;
4609:

Line 4620: dbms_output.put_line ('------- ------------ Fixup Succeeded ----------- ----------');

4616: --
4617: -- don't care about the return status
4618: --
4619: check_table(idx).fixup_failed := FALSE;
4620: dbms_output.put_line ('------- ------------ Fixup Succeeded ----------- ----------');
4621: dbms_output.put_line ('------- ------- Informational Text Returned ---- ----------');
4622: dbms_output.put_line (check_table(idx).result_text);
4623: dbms_output.put_line ('------- ---------------------------------------- ----------');
4624: END run_fixup_info;

Line 4621: dbms_output.put_line ('------- ------- Informational Text Returned ---- ----------');

4617: -- don't care about the return status
4618: --
4619: check_table(idx).fixup_failed := FALSE;
4620: dbms_output.put_line ('------- ------------ Fixup Succeeded ----------- ----------');
4621: dbms_output.put_line ('------- ------- Informational Text Returned ---- ----------');
4622: dbms_output.put_line (check_table(idx).result_text);
4623: dbms_output.put_line ('------- ---------------------------------------- ----------');
4624: END run_fixup_info;
4625:

Line 4622: dbms_output.put_line (check_table(idx).result_text);

4618: --
4619: check_table(idx).fixup_failed := FALSE;
4620: dbms_output.put_line ('------- ------------ Fixup Succeeded ----------- ----------');
4621: dbms_output.put_line ('------- ------- Informational Text Returned ---- ----------');
4622: dbms_output.put_line (check_table(idx).result_text);
4623: dbms_output.put_line ('------- ---------------------------------------- ----------');
4624: END run_fixup_info;
4625:
4626:

Line 4623: dbms_output.put_line ('------- ---------------------------------------- ----------');

4619: check_table(idx).fixup_failed := FALSE;
4620: dbms_output.put_line ('------- ------------ Fixup Succeeded ----------- ----------');
4621: dbms_output.put_line ('------- ------- Informational Text Returned ---- ----------');
4622: dbms_output.put_line (check_table(idx).result_text);
4623: dbms_output.put_line ('------- ---------------------------------------- ----------');
4624: END run_fixup_info;
4625:
4626:
4627: FUNCTION run_fixup (check_name VARCHAR2) RETURN check_record_t

Line 5514: dbms_output.put_line('');

5510:
5511: --
5512: -- header output to preupgrade.log, preupgrade..log, and upgrade.xml
5513: --
5514: dbms_output.put_line('');
5515: dbms_output.put_line('***************************************************************************');
5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');
5517: dbms_output.put_line('***************************************************************************');
5518: dbms_output.put_line('');

Line 5515: dbms_output.put_line('***************************************************************************');

5511: --
5512: -- header output to preupgrade.log, preupgrade..log, and upgrade.xml
5513: --
5514: dbms_output.put_line('');
5515: dbms_output.put_line('***************************************************************************');
5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');
5517: dbms_output.put_line('***************************************************************************');
5518: dbms_output.put_line('');
5519:

Line 5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');

5512: -- header output to preupgrade.log, preupgrade..log, and upgrade.xml
5513: --
5514: dbms_output.put_line('');
5515: dbms_output.put_line('***************************************************************************');
5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');
5517: dbms_output.put_line('***************************************************************************');
5518: dbms_output.put_line('');
5519:
5520:

Line 5517: dbms_output.put_line('***************************************************************************');

5513: --
5514: dbms_output.put_line('');
5515: dbms_output.put_line('***************************************************************************');
5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');
5517: dbms_output.put_line('***************************************************************************');
5518: dbms_output.put_line('');
5519:
5520:
5521: IF pOutputType = c_output_xml

Line 5518: dbms_output.put_line('');

5514: dbms_output.put_line('');
5515: dbms_output.put_line('***************************************************************************');
5516: dbms_output.put_line ('Executing Pre-Upgrade Checks in ' || dbms_preup.get_con_name || '...');
5517: dbms_output.put_line('***************************************************************************');
5518: dbms_output.put_line('');
5519:
5520:
5521: IF pOutputType = c_output_xml
5522: THEN

Line 12314: dbms_output.put_line('ORA' || SQLCODE ||

12310: EXCEPTION
12311: WHEN NO_DATA_FOUND THEN
12312: ret_val := 0;
12313: WHEN OTHERS THEN
12314: dbms_output.put_line('ORA' || SQLCODE ||
12315: ': Error in DEFAULT_RESOURCE_LIMITS check_stmt:');
12316: dbms_output.put_line(SQLERRM);
12317: END;
12318:

Line 12316: dbms_output.put_line(SQLERRM);

12312: ret_val := 0;
12313: WHEN OTHERS THEN
12314: dbms_output.put_line('ORA' || SQLCODE ||
12315: ': Error in DEFAULT_RESOURCE_LIMITS check_stmt:');
12316: dbms_output.put_line(SQLERRM);
12317: END;
12318:
12319: -- return success status if check returns a 0
12320: -- i.e., don't generate warning if ret_val is 0 and do generate warning

Line 12480: dbms_output.put_line(i.hidden_param_name || ' = ' ||

12476: DisplayLine(pOutputUFT,
12477: i.hidden_param_name || ' = ' || i.hidden_param_value);
12478: ELSE
12479: -- screen output
12480: dbms_output.put_line(i.hidden_param_name || ' = ' ||
12481: i.hidden_param_value);
12482: END IF;
12483: rowcount := rowcount + 1;
12484: END LOOP;

Line 12488: dbms_output.put_line(c_none_stmt);

12484: END LOOP;
12485:
12486: -- if no rows returned, then print "NONE found"
12487: IF (rowcount = 0) THEN
12488: dbms_output.put_line(c_none_stmt);
12489: END IF;
12490:
12491: -- for each event set, display its value
12492: ELSIF (param_type_to_display = 2) THEN

Line 12503: dbms_output.put_line(i.event_value);

12499: -- write to preupgrade.log
12500: DisplayLine(pOutputUFT, i.event_value);
12501: ELSE
12502: -- screen output
12503: dbms_output.put_line(i.event_value);
12504: END IF;
12505: rowcount := rowcount + 1;
12506: END LOOP;
12507:

Line 12510: dbms_output.put_line(c_none_stmt);

12506: END LOOP;
12507:
12508: -- if no rows returned, then print "NONE found"
12509: IF (rowcount = 0) THEN
12510: dbms_output.put_line(c_none_stmt);
12511: END IF;
12512: END IF;
12513:
12514: END parameters_display;

Line 12565: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line

12561: --
12562: IF pOutputFixupScripts THEN
12563: DisplayLine('');
12564: DisplayLine(pPreScriptUFT,'BEGIN');
12565: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12566: (' ******** Existing Hidden Parameters ********');!');
12567: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12568: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(1);');
12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

Line 12567: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12563: DisplayLine('');
12564: DisplayLine(pPreScriptUFT,'BEGIN');
12565: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12566: (' ******** Existing Hidden Parameters ********');!');
12567: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12568: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(1);');
12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12570: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12571: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');

Line 12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12565: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12566: (' ******** Existing Hidden Parameters ********');!');
12567: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12568: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(1);');
12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12570: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12571: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12572: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12573: DisplayLine(pPreScriptUFT, 'END;');

Line 12570: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line

12566: (' ******** Existing Hidden Parameters ********');!');
12567: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12568: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(1);');
12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12570: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12571: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12572: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12573: DisplayLine(pPreScriptUFT, 'END;');
12574: DisplayBlankLine(pPreScriptUFT);

Line 12572: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12568: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(1);');
12569: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12570: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12571: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12572: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12573: DisplayLine(pPreScriptUFT, 'END;');
12574: DisplayBlankLine(pPreScriptUFT);
12575: END IF;
12576: END IF; -- end of hidden_params_in_use

Line 12632: DisplayLine(pPreScriptUFT,q'!dbms_output.put_line (' ******** Existing Events ********');!');

12628: IF pOutputFixupScripts THEN
12629: DisplayLine('');
12630:
12631: DisplayLine(pPreScriptUFT, 'BEGIN');
12632: DisplayLine(pPreScriptUFT,q'!dbms_output.put_line (' ******** Existing Events ********');!');
12633: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12634: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(2);');
12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line

Line 12633: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12629: DisplayLine('');
12630:
12631: DisplayLine(pPreScriptUFT, 'BEGIN');
12632: DisplayLine(pPreScriptUFT,q'!dbms_output.put_line (' ******** Existing Events ********');!');
12633: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12634: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(2);');
12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12637: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');

Line 12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12631: DisplayLine(pPreScriptUFT, 'BEGIN');
12632: DisplayLine(pPreScriptUFT,q'!dbms_output.put_line (' ******** Existing Events ********');!');
12633: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12634: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(2);');
12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12637: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12638: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12639: DisplayLine(pPreScriptUFT, 'END;');

Line 12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line

12632: DisplayLine(pPreScriptUFT,q'!dbms_output.put_line (' ******** Existing Events ********');!');
12633: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12634: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(2);');
12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12637: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12638: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12639: DisplayLine(pPreScriptUFT, 'END;');
12640: DisplayBlankLine(pPreScriptUFT);

Line 12638: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');

12634: DisplayLine(pPreScriptUFT, 'dbms_preup.parameters_display(2);');
12635: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12636: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line
12637: ('^^^ MANUAL ACTION SUGGESTED ^^^');!');
12638: DisplayLine(pPreScriptUFT, q'!dbms_output.put_line ('');!');
12639: DisplayLine(pPreScriptUFT, 'END;');
12640: DisplayBlankLine(pPreScriptUFT);
12641: END IF;
12642: END IF; -- end of non_default_events

Line 12835: dbms_output.put_line('XXX in begin_log_preupg_action');

12831: PRAGMA AUTONOMOUS_TRANSACTION;
12832: sqlString varchar2(500); -- string to build sql stmt to execute
12833: BEGIN
12834: IF tracing_on_xxx THEN
12835: dbms_output.put_line('XXX in begin_log_preupg_action');
12836: END IF;
12837:
12838: -- only log upgrade entries into registry$log if db is opened for read write
12839: IF is_db_readonly = FALSE THEN

Line 12841: dbms_output.put_line('XXX readOnlyMode is 0') ;

12837:
12838: -- only log upgrade entries into registry$log if db is opened for read write
12839: IF is_db_readonly = FALSE THEN
12840: IF tracing_on_xxx THEN
12841: dbms_output.put_line('XXX readOnlyMode is 0') ;
12842: END IF;
12843:
12844: BEGIN
12845: sqlString :=

Line 12868: dbms_output.put_line('XXX in end_log_preupg_action');

12864: sqlString VARCHAR2(500); -- string to build sql stmt to execute
12865: BEGIN
12866:
12867: IF tracing_on_xxx THEN
12868: dbms_output.put_line('XXX in end_log_preupg_action');
12869: END IF;
12870:
12871: -- only log upgrade entries into registry$log if db is opened for read write
12872: IF is_db_readonly = FALSE THEN

Line 12874: dbms_output.put_line('XXX readOnlyMode is 0') ;

12870:
12871: -- only log upgrade entries into registry$log if db is opened for read write
12872: IF is_db_readonly = FALSE THEN
12873: IF tracing_on_xxx THEN
12874: dbms_output.put_line('XXX readOnlyMode is 0') ;
12875: END IF;
12876:
12877: BEGIN
12878: sqlString :=

Line 12950: dbms_output.put_line('XXX in write_pdb_file');

12946: invalidFileRename EXCEPTION;
12947: PRAGMA exception_init(invalidFileRename, -29292);
12948: BEGIN
12949: IF tracing_on_xxx THEN
12950: dbms_output.put_line('XXX in write_pdb_file');
12951: dbms_output.put_line('XXX pdbFileName is ' || pdbFileName);
12952: dbms_output.put_line('XXX destFileName is ' || destFileName);
12953: END IF;
12954:

Line 12951: dbms_output.put_line('XXX pdbFileName is ' || pdbFileName);

12947: PRAGMA exception_init(invalidFileRename, -29292);
12948: BEGIN
12949: IF tracing_on_xxx THEN
12950: dbms_output.put_line('XXX in write_pdb_file');
12951: dbms_output.put_line('XXX pdbFileName is ' || pdbFileName);
12952: dbms_output.put_line('XXX destFileName is ' || destFileName);
12953: END IF;
12954:
12955: -- Do not open the destination dest files unless write lock file is created.

Line 12952: dbms_output.put_line('XXX destFileName is ' || destFileName);

12948: BEGIN
12949: IF tracing_on_xxx THEN
12950: dbms_output.put_line('XXX in write_pdb_file');
12951: dbms_output.put_line('XXX pdbFileName is ' || pdbFileName);
12952: dbms_output.put_line('XXX destFileName is ' || destFileName);
12953: END IF;
12954:
12955: -- Do not open the destination dest files unless write lock file is created.
12956: -- Possible destination files if this db is a PDB : preupgrade.log,

Line 12971: dbms_output.put_line('XXX open pdb file for read only ' || pdbFileName);

12967: RAISE_APPLICATION_ERROR(-20000, 'Error: ' || SQLERRM);
12968: END;
12969:
12970: IF tracing_on_xxx THEN
12971: dbms_output.put_line('XXX open pdb file for read only ' || pdbFileName);
12972: END IF;
12973:
12974: -- for each line in the pdb file, append it to the final destination file
12975: line_num := 0;

Line 12990: dbms_output.put_line('XXX ' || line_num || ' lines copied from pdb file');

12986: END;
12987: END LOOP;
12988:
12989: IF tracing_on_xxx THEN
12990: dbms_output.put_line('XXX ' || line_num || ' lines copied from pdb file');
12991: END IF;
12992:
12993: -- clean up after concatenating pdb file to final destination file
12994: BEGIN

Line 13014: dbms_output.put_line('XXX moving pdb file ' || pdbFileName ||

13010: BEGIN
13011: UTL_FILE.FRENAME(c_dir_obj, pdbFileName,
13012: c_pdb_dir_obj, pdbFileName, TRUE);
13013: IF tracing_on_xxx THEN
13014: dbms_output.put_line('XXX moving pdb file ' || pdbFileName ||
13015: ' to pdbfiles subdirectory');
13016: END IF;
13017: EXCEPTION
13018: WHEN invalidFileRename THEN NULL;

Line 13044: dbms_output.put_line('XXX getting write lock file');

13040:
13041: BEGIN
13042:
13043: IF tracing_on_xxx THEN
13044: dbms_output.put_line('XXX getting write lock file');
13045: END IF;
13046:
13047: -- loop until a lock file is created or until max # of looping have been hit,
13048: -- whichever comes first

Line 13054: dbms_output.put_line('XXX write lock: wr_loops is ' || wr_loops);

13050: wr_loops := 0;
13051: WHILE (pGotWriteLock = FALSE AND wr_loops <= c_wrlock_max_waits)
13052: LOOP
13053: IF tracing_on_xxx THEN
13054: dbms_output.put_line('XXX write lock: wr_loops is ' || wr_loops);
13055: END IF;
13056:
13057: -- does the lock file for exclusive writes exist?
13058: UTL_FILE.FGETATTR(pOutputLocation, c_wrlock_fname, fileExist, fileSz,

Line 13070: dbms_output.put_line('XXX got write lock' );

13066: lockFilePtr := UTL_FILE.FOPEN(pOutputLocation, c_wrlock_fname, 'W');
13067: UTL_FILE.FCLOSE(lockFilePtr);
13068: pGotWriteLock := TRUE; -- got lock file
13069: IF tracing_on_xxx THEN
13070: dbms_output.put_line('XXX got write lock' );
13071: END IF;
13072: EXCEPTION
13073: WHEN OTHERS THEN
13074: pGotWriteLock := FALSE;

Line 13129: dbms_output.put_line('XXX pConcatToMainFile is FALSE');

13125: -- to the final destination file
13126: -- and no write lock to get
13127:
13128: IF tracing_on_xxx THEN
13129: dbms_output.put_line('XXX pConcatToMainFile is FALSE');
13130: END IF;
13131:
13132: RETURN; -- exit procedure
13133: ELSE

Line 13135: dbms_output.put_line('XXX pConcatToMainFile is TRUE');

13131:
13132: RETURN; -- exit procedure
13133: ELSE
13134: IF tracing_on_xxx THEN
13135: dbms_output.put_line('XXX pConcatToMainFile is TRUE');
13136: END IF;
13137: END IF; -- end of if pConcatToMainFile is TRUE
13138:
13139: -- this is the meat of concat-ing pdb files into main destination files

Line 13181: dbms_output.put_line('XXX removing write lock file');

13177: BEGIN
13178: UTL_FILE.FREMOVE(pOutputLocation, c_wrlock_fname);
13179: pGotWriteLock := FALSE;
13180: IF tracing_on_xxx THEN
13181: dbms_output.put_line('XXX removing write lock file');
13182: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
13183: dbms_output.put_line('XXX c_wrlock_fname ' || c_wrlock_fname);
13184: END IF;
13185: EXCEPTION

Line 13182: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);

13178: UTL_FILE.FREMOVE(pOutputLocation, c_wrlock_fname);
13179: pGotWriteLock := FALSE;
13180: IF tracing_on_xxx THEN
13181: dbms_output.put_line('XXX removing write lock file');
13182: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
13183: dbms_output.put_line('XXX c_wrlock_fname ' || c_wrlock_fname);
13184: END IF;
13185: EXCEPTION
13186: WHEN OTHERS THEN

Line 13183: dbms_output.put_line('XXX c_wrlock_fname ' || c_wrlock_fname);

13179: pGotWriteLock := FALSE;
13180: IF tracing_on_xxx THEN
13181: dbms_output.put_line('XXX removing write lock file');
13182: dbms_output.put_line('XXX pOutputLocation ' || pOutputLocation);
13183: dbms_output.put_line('XXX c_wrlock_fname ' || c_wrlock_fname);
13184: END IF;
13185: EXCEPTION
13186: WHEN OTHERS THEN
13187: dbms_output.put_line('');

Line 13187: dbms_output.put_line('');

13183: dbms_output.put_line('XXX c_wrlock_fname ' || c_wrlock_fname);
13184: END IF;
13185: EXCEPTION
13186: WHEN OTHERS THEN
13187: dbms_output.put_line('');
13188: dbms_output.put_line(
13189: 'Error when trying to remove write lock file. ' ||
13190: 'Please check that file ' || c_wrlock_fname || 'is not in ' ||
13191: pTextLogDir || ' before rerunning the preupgrade tool.');

Line 13188: dbms_output.put_line(

13184: END IF;
13185: EXCEPTION
13186: WHEN OTHERS THEN
13187: dbms_output.put_line('');
13188: dbms_output.put_line(
13189: 'Error when trying to remove write lock file. ' ||
13190: 'Please check that file ' || c_wrlock_fname || 'is not in ' ||
13191: pTextLogDir || ' before rerunning the preupgrade tool.');
13192: dbms_output.put_line('');

Line 13192: dbms_output.put_line('');

13188: dbms_output.put_line(
13189: 'Error when trying to remove write lock file. ' ||
13190: 'Please check that file ' || c_wrlock_fname || 'is not in ' ||
13191: pTextLogDir || ' before rerunning the preupgrade tool.');
13192: dbms_output.put_line('');
13193: RAISE_APPLICATION_ERROR(-20000, 'Error: ' || SQLERRM);
13194: END;
13195: END IF; -- end if pGotWriteLock = TRUE
13196:

Line 13258: dbms_output.put_line('XXX in end_preupgrd');

13254: IS
13255: BEGIN
13256:
13257: IF tracing_on_xxx THEN
13258: dbms_output.put_line('XXX in end_preupgrd');
13259: END IF;
13260:
13261: --
13262: -- display a msg that the preupgrade checks are done

Line 13264: dbms_output.put_line('');

13260:
13261: --
13262: -- display a msg that the preupgrade checks are done
13263: --
13264: dbms_output.put_line('');
13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');

Line 13265: dbms_output.put_line('***************************************************************************');

13261: --
13262: -- display a msg that the preupgrade checks are done
13263: --
13264: dbms_output.put_line('');
13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');
13269: dbms_output.put_line('***************************************************************************');

Line 13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');

13262: -- display a msg that the preupgrade checks are done
13263: --
13264: dbms_output.put_line('');
13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');
13269: dbms_output.put_line('***************************************************************************');
13270: DisplayLinePL('***************************************************************************');

Line 13267: dbms_output.put_line('***************************************************************************');

13263: --
13264: dbms_output.put_line('');
13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');
13269: dbms_output.put_line('***************************************************************************');
13270: DisplayLinePL('***************************************************************************');
13271:

Line 13268: dbms_output.put_line('');

13264: dbms_output.put_line('');
13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');
13269: dbms_output.put_line('***************************************************************************');
13270: DisplayLinePL('***************************************************************************');
13271:
13272: --

Line 13269: dbms_output.put_line('***************************************************************************');

13265: dbms_output.put_line('***************************************************************************');
13266: dbms_output.put_line ('Pre-Upgrade Checks in ' || dbms_preup.get_con_name || ' Completed.');
13267: dbms_output.put_line('***************************************************************************');
13268: dbms_output.put_line('');
13269: dbms_output.put_line('***************************************************************************');
13270: DisplayLinePL('***************************************************************************');
13271:
13272: --
13273: -- if db is NOT opened in read only mode, then log in registry$log that

Line 13287: dbms_output.put_line('XXX PDB_PREUPGRADE_DIR dropped');

13283: BEGIN
13284: EXECUTE IMMEDIATE 'DROP DIRECTORY :1' USING c_pdb_dir_obj;
13285: pCreatedPdbDirObj := FALSE;
13286: IF tracing_on_xxx THEN
13287: dbms_output.put_line('XXX PDB_PREUPGRADE_DIR dropped');
13288: END IF;
13289: EXCEPTION
13290: WHEN OTHERS THEN NULL;
13291: END;