Re: ad & txk 9 upgrade

Posted by Adhrushta on
URL: http://erman-arslan-s-oracle-forum.124.s1.nabble.com/ad-txk-9-upgrade-tp2945p2971.html

REM *=======================================================================+
REM |  Copyright (c) 2005, 2016  Oracle and/or its affiliates.              |
REM |  All rights reserved.                                                 |
REM |  Version 12.0.0                                                       |
REM +=======================================================================+
REM | $Header: adsysapp2.sql 120.4.12020000.9 2016/12/20 16:01:46 jwsmith ship $
REM |
REM dbdrv: sql admin top ~FILE none none none sqlplus_driver &phase=first \
REM dbdrv: checkfile:nocheck &systempwd
REM |
REM | FILENAME
REM |   adsysapp2.sql
REM |
REM | DESCRIPTION
REM |   SQL script to create Oracle E-Business Suite packages and other objects
REM |   in the SYSTEM schema.
REM |
REM |   Must be run prior to installing/upgrading Oracle E-Business Suite  
REM |
REM | ARGUMENTS
REM |   You must pass the SYSTEM password as an argument to this script.
REM |
REM | NOTES
REM |   Before you run this script, make sure that:
REM |   - The database is running
REM |   - You are pointing to the right database
REM |     (Check ORACLE_HOME, ORACLE_SID/TWO_TASK settings)
REM |   - No one else is using the database
REM |
REM +=========================================================================+

set verify off

WHENEVER SQLERROR EXIT FAILURE ROLLBACK;
WHENEVER OSERROR  EXIT FAILURE ROLLBACK;


spool adsysapp2.lst

connect SYSTEM/&&1
show user

set head off
set feed off
select '--- adsysapp2 started at '||
        to_char(sysdate,'DD-MM-YYYY HH24:MI:SS')||' ---' from sys.dual;
set head on
set feed on

prompt
prompt Dropping packages no longer used in Release 11.5 and 12.0
prompt

whenever sqlerror continue

drop package bb_dist;
drop package ak_mls;
drop package ak_org;
drop package ak_org_private;
drop package ak_org_data;
drop package ad_mcurr;

whenever sqlerror exit failure rollback

prompt
prompt Creating package specifications...
prompt

REM
REM Create AD_APPS_PRIVATE, AD_DDL, AD_INST, AD_MCURR,
REM AD_MLS package specifications
REM

prompt
prompt --- Creating AD_APPS_PRIVATE package header (AD common PL/SQL routines)

@adaprs.pls

prompt --- Creating AD_DDL package header (Runtime DDL Support)

@adddls.pls

prompt --- Creating AD_INST package header (AutoUpgrade Server-Side Support)

@adinsts.pls

prompt --- Creating AD_MLS package header (Multi-Lingual Support)

@admlss.pls

prompt --- Creating AD_COMPILE package header

@adcmps.pls

prompt --- Creating AD_INVOKER package header

@adinvsps.pls

prompt --- Creating AD_CLONE_UTILS package header

@adclutls.pls

prompt
prompt Creating package bodies...
prompt

REM
REM Create AD_APPS_PRIVATE, AD_DDL, AD_INST, AD_MCURR,
REM AD_MLS package bodies
REM

prompt
prompt --- Creating AD_APPS_PRIVATE package body

@adaprb.pls

prompt --- Creating AD_DDL package body

@adddlb.pls

prompt --- Creating AD_INST package body

@adinstb.pls

prompt --- Creating AD_MLS package body

@admlsb.pls

prompt --- Creating AD_COMPILE package body

@adcmpb.pls

prompt --- Creating AD_INVOKER package body

@adinvspb.pls

prompt --- Creating AD_CLONE_UTILS package body

@adclutlb.pls


REM We need this synonym because we want to run odf from apps and apps
REM must have the ability to create grants by calling this package.

prompt
prompt --- create public synonyms for ad_inst and ad_ddl

declare
cursor ddls is
select 'create or replace public synonym '||list.synname||
       ' for system.'||list.synname as text
from   (select trim(t.column_value) synname
        from   xmltable(('"AD_DDL","AD_INST"')) t) list
where  not exists (select null from dba_synonyms where
                   synonym_name = list.synname and owner='PUBLIC'
                   and table_name=synonym_name and table_owner='SYSTEM');
begin
  for ddl in ddls
  loop
    execute immediate ddl.text;
  end loop;
end;
/

prompt

set head off
set feed off
select '--- adsysapp2 completed at '||
        to_char(sysdate,'DD-MM-YYYY HH24:MI:SS')||' ---' from sys.dual;
set head on
set feed on

prompt

spool off

commit;
exit;