support/oracle
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2026-03-12 20:23:15

Browse Source
This commit is contained in:
root
2026-03-12 21:23:47 +01:00
parent eab4b36eca
commit 93039b8489
3332 changed files with 699614 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

102
idev/wm_rollback_workspace.sql Normal file
View File

@@ -0,0 +1,102 @@
-- +----------------------------------------------------------------------------+
-- | Jeffrey M. Hunter |
-- | jhunter@idevelopment.info |
-- | www.idevelopment.info |
-- |----------------------------------------------------------------------------|
-- | Copyright (c) 1998-2012 Jeffrey M. Hunter. All rights reserved. |
-- |----------------------------------------------------------------------------|
-- | DATABASE : Oracle |
-- | FILE : wm_rollback_workspace.sql |
-- | CLASS : Workspace Manager |
-- | PURPOSE : This script will list all workspaces and which workspace is the |
-- | current workspace. You are then prompted for the name of a |
-- | workspace to rollback. This script discards all changes made in |
-- | the specified workspace to all tables. Any changes made in the |
-- | specified workspace since that workspace was created will be |
-- | rolled back and will be executed as an autonomous regular |
-- | transaction that will be committed when it finishes. |
-- | |
-- | Only leaf workspaces can be rolled back. That is, a workspace |
-- | cannot be rolled back if it has any descendant workspaces. |
-- | |
-- | Like the RemoveWorkspace procedure, Rollback Workspace deletes |
-- | the data in the workspace; however, unlike the RemoveWorkspace |
-- | procedure, RollbackWorkspace does not delete the Workspace |
-- | Manager workspace structure. |
-- | |
-- | While this procedure is executing, the specified workspace is |
-- | frozen in NO_ACCESS mode. |
-- | |
-- | An exception is raised if one or more of the following apply: |
-- | |
-- | [*] - workspace has any descendant workspaces. |
-- | [*] - workspace does not exist. |
-- | [*] - you do not have the privilege to roll back workspace |
-- | or any affected table. |
-- | |
-- | NOTE : As with any code, ensure to test this script in a development |
-- | environment before attempting to run it in production. |
-- +----------------------------------------------------------------------------+
SET TERMOUT OFF;
COLUMN current_instance NEW_VALUE current_instance NOPRINT;
SELECT rpad(sys_context('USERENV', 'INSTANCE_NAME'), 17) current_instance
FROM dual;
SET TERMOUT ON;
PROMPT
PROMPT +------------------------------------------------------------------------+
PROMPT | Report : Rollback Workspace |
PROMPT | Instance : &current_instance |
PROMPT +------------------------------------------------------------------------+
SET ECHO OFF
SET FEEDBACK 6
SET HEADING ON
SET LINESIZE 180
SET PAGESIZE 50000
SET TERMOUT ON
SET TIMING OFF
SET TRIMOUT ON
SET TRIMSPOOL ON
SET VERIFY OFF
CLEAR COLUMNS
CLEAR BREAKS
CLEAR COMPUTES
COLUMN current_workspace FORMAT a10 HEADING "Current"
COLUMN owner FORMAT a20 HEADING "Workspace Owner"
COLUMN workspace FORMAT a30 HEADING "Workspace Name"
COLUMN createtime FORMAT a20 HEADING "Create Time"
COLUMN freeze_status FORMAT a8 HEADING "Freeze|Status"
COLUMN freeze_mode FORMAT a20 HEADING "Freeze|Mode"
PROMPT
PROMPT +------------------------------------------------------------------------+
PROMPT | All Workspaces |
PROMPT +------------------------------------------------------------------------+
SELECT
CASE WHEN dbms_wm.getworkspace = workspace THEN ' *'
ELSE null
END AS current_workspace
, owner
, workspace
, TO_CHAR(createtime, 'DD-MON-YYYY HH24:MI:SS') createtime
, freeze_status
, freeze_mode
FROM
dba_workspaces
ORDER BY
owner
, workspace;
PROMPT
ACCEPT wm_rollback_workspace_name CHAR PROMPT 'Enter name of workspace to rollback: '
PROMPT
BEGIN
dbms_wm.rollbackworkspace('&wm_rollback_workspace_name', TRUE);
END;
/