MINI MINI MANI MO

Rem    BEGIN SQL_FILE_METADATA
Rem    SQL_SOURCE_FILE: javavm/install/jvmdwgrd.sql
Rem    SQL_SHIPPED_FILE: javavm/install/jvmdwgrd.sql
Rem    SQL_PHASE: DOWNGRADE
Rem    SQL_STARTUP_MODE: UPGRADE
Rem    SQL_IGNORABLE_ERRORS: NONE
Rem    END SQL_FILE_METADATA


variable jvmudaction varchar2(30)
execute :jvmudaction := 'DOWNGRADE';

variable jvmdownto varchar2(30)
execute select prv_version into :jvmdownto from registry$ where cid='CATPROC';

select 'JVMDOWNTO is '||:jvmdownto,initjvmaux.registrystatus,:jvmudaction from dual;

variable jvmpatchset varchar2(30)

call initjvmaux.startaction('DOWNGRADE_TO_'||:jvmdownto);

rem If downgrade specific changes not handled by jvmrm need to be introduced
rem they should go here conditionalized in terms of
rem initjvmaux.compare_releases(:jvmdownto, 'nn.mm') tests similar to those
rem done in jvmrm

variable jvmrmaction varchar2(30)
execute :jvmrmaction := 'DOWNGRADE';
@@jvmrm

@@udjvmrm