set linesize 2000;
set pagesize 1000;
set long 9999999;
set ECHO off;
set FEED off;
set HEAD off;
set time off;
COLUMN DDL FORMAT a9999;
spool PAGAMENTO_CONTA_CORRENTE.bkp
exec dbms_metadata.set_transform_param(dbms_metadata.session_transform,'SQLTERMINATOR',true);
select dbms_metadata.get_ddl('TABLE','PAGAMENTO_CONTA_CORRENTE','TS') "DDL" from dual;
spool off
set FEED on;
set HEAD on;
set time on;
---------------------------------------------------------------------------------------

set lines 10000 pages 10000 long 99999999 longc 99999999 trimspool on echo on
spool P_CALC_BASE_INDIC_backup.txt
select dbms_metadata.get_ddl('PROCEDURE','P_CALC_BASE_INDIC','AESPROD') from dual; 
spool off;


Exec dbms_ddl.alter_compile ( 'PACKAGE BODY' ,'MAR_ITF_INTEGRACAO_FAT_RET_SAP','TS');


/* Reconstroi enterprise manager */
emca -config dbcontrol db -repos recreate