rem
rem This script can be used to display the current status of the Control
rem Center Service.
rem 
rem A Control Center Service provides access to the deployment and execution
rem features of an OWB Repository and one must be available in order to enable
rem the deployment and execution features,
rem
rem This service is either Available or Unavailable and this script can be
rem used to display it's status.
rem
rem USAGE
rem Logon as the OWB Repository Owner (OWBSYS) or
rem WorkspaceOwner or WorkspaceUser with Administration privilege
rem    
rem    @<OWB-HOME>/owb/rtp/sql/show_service.sql
rem
rem This script will display
rem     "Available"     if the Control Center service is up and Available
rem     "Not Available" if the Control Center service is Not Available
rem
rem Please use the scripts start_service.sql and stop_service.sql to start or
rem stop the service respectively

set serveroutput on;
set role OWB_USER;

declare
  l_available number(22);

begin
  l_available := wb_rt_script_util.show_service;  
  if l_available <> 0
  then
    dbms_output.put_line('Available');
    dbms_output.put_line(owbsys.wb_rt_script_util.service_status);
  else
    dbms_output.put_line('Not Available');
  end if;

end;
/