[Logo] Форум ПАРУС
Обновление с версии 8.5.6.1 от 09.02.2016 до более свежих не идёт!  XML
Индекс форума » 8.хх PL/SQL
Автор Сообщение
WLAD_M
Новичок

Зарегистрирован: 11.03.2016 10:20:11
Сообщений: 11
Оффлайн

Версия 8.5.6.1 от 09.02.2016 ХОЗРАСЧЁТ.
1-С этой версии - 8.5.6.1 от 09.02.2016 пытаюсь обновиться до 8.5.6.1 от 16.05.2016 .
Обновление с ошибкой:
====================
/* --------------------------------------------------------------- */
/* Object Name: BLK_INCOMECLASS_BUDGELM_INIT */
/* Object Type: BAUPDBLOCK */
/* Инициализация новых дескрипторов бюджетной классификации доходов */
/*
-- BLK_INCOMECLASS_BUDGELM_INIT */
declare
nCOMPANY PKG_STD.tREF;
sCODE PKG_STD.tSTRING;
sCODE_EX PKG_STD.tSTRING;
sNAME PKG_STD.tSTRING;
nBUDGELM PKG_STD.tREF;
nBGINCGRP PKG_STD.tREF;
begin
/* проверка выполненности блока */
if ( PKG_SYSTEM_INIT.BLOCK_EXECUTED('BLK_INCOMECLASS_BUDGELM_INIT') is not null ) then
return;
end if;

execute immediate 'alter table BUDGELM disable all triggers';
execute immediate 'alter table BGINCGRP disable all triggers';
execute immediate 'alter table INCOMECLASS disable all triggers';

/* Инициализация элементов бюджета */
for rec in
(
select RN
from VERSIONS
where UNITCODE = 'BudgetElements'
)
loop
P_BUDGELM_BASE_INIT( rec.RN );
end loop;

/* Инициализация групп подвида доходов */
for rec in
(
select RN
from VERSIONS
where UNITCODE = 'BudgetIncomeSubspGroups'
)
loop
P_BGINCGRP_BASE_INIT( rec.RN );
end loop;

/* Коррекция бюджетной классификации доходов */
for rec in
(
select VERSION, RN, INCELEMENT, GOVPROG
from INCOMECLASS
where ( INCELEMENT <> 0 or GOVPROG is not null )
)
loop
FIND_COMPANY_BY_VERSION( rec.VERSION, 'IncomeBudgetClassification', nCOMPANY );

/* Коррекция элемента бюджета */
if ( rec.INCELEMENT <> 0 ) then
/* мнемокод элемента бюджета */
sCODE := lpad(to_char(rec.INCELEMENT),2,'0');
/* поиск элемента бюджета */
FIND_BUDGELM_CODE( 1, 1, nCOMPANY, sCODE, nBUDGELM );
/* добавление элемента бюджета */
if ( nBUDGELM is null ) then
P_BUDGELM_BASE_INSERT( nCOMPANY, sCODE, sCODE, sCODE, 1, null, null, nBUDGELM );
end if;
end if;

/* Коррекция группы подвида доходов */
if ( rec.GOVPROG is not null ) then
begin
select CODE, CODE_EX, NAME
into sCODE, sCODE_EX, sNAME
from GOVPROG
where RN = rec.GOVPROG;
exception
when NO_DATA_FOUND then
PKG_MSG.RECORD_NOT_FOUND( rec.GOVPROG,'GovernmentPrograms' );
end;

/* поиск группы подвида доходов */
FIND_BGINCGRP_CODE( 1, 1, nCOMPANY, sCODE, nBGINCGRP );
if ( nBGINCGRP is null ) then
FIND_BGINCGRP_CODE( 1, 1, nCOMPANY, sCODE_EX, nBGINCGRP );
end if;
/* добавление группы подвида доходов */
if ( nBGINCGRP is null ) then
P_BGINCGRP_BASE_INSERT( nCOMPANY, sCODE, sCODE_EX, sNAME, 1, null, null, nBGINCGRP );
end if;
end if;

/* исправление */
update INCOMECLASS
set INCELEMENT = 0,
BUDGELM = nBUDGELM,
GOVPROG = null,
BGINCGRP = nBGINCGRP
where RN = rec.RN;
end loop;

execute immediate 'alter table BUDGELM enable all triggers';
execute immediate 'alter table BGINCGRP enable all triggers';
execute immediate 'alter table INCOMECLASS enable all triggers';

/* регистрация выполненного блока */
PKG_SYSTEM_INIT.EXECUTED_BLOCK( 'BLK_INCOMECLASS_BUDGELM_INIT' );
exception
when OTHERS then
execute immediate 'alter table BUDGELM enable all triggers';
execute immediate 'alter table BGINCGRP enable all triggers';
execute immediate 'alter table INCOMECLASS enable all triggers';
raise;
end;


ORA-06550: line 48, column 33:
PL/SQL: ORA-00904: "GOVPROG": invalid identifier
ORA-06550: line 46, column 5:
PL/SQL: SQL Statement ignored
ORA-06550: line 51, column 30:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550: line 51, column 5:
PL/SQL: Statement ignored
ORA-06550: line 54, column 10:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550: line 54, column 5:
PL/SQL: Statement ignored
ORA-06550: line 66, column 10:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550:
===================================

2-Пытаюсь обновиться до самой свежей версии от 05.10.2016
обновляется без ошибок , но при попытке зайти после обновления сообщение об ошибке:
Спецификация лицензии "НА0878-3" содержит неизвестное приложение "SEPersons".

И сразу после обновления смотрю sqldeveloper-ом не валидные объекты, их 29 штук,
не компилятся по причине несоответствия кол-ва пар-в и их типов в вызываемых
процедурах и функциях разных пакетов. Возможно они и не нужны.
Что делать как обновиться до самой свежей версии. И как обновляться поэтапно (по хронологии версий) или можно сразу на самую последнюю, хотя при этом ошибка с лицензией.

Заранее благодарен за поимание и участие.




FEDOROV_F_F
Пользователь

Зарегистрирован: 06.11.2012 00:16:57
Сообщений: 999
Оффлайн

WLAD_M wrote:Версия 8.5.6.1 от 09.02.2016 ХОЗРАСЧЁТ.
1-С этой версии - 8.5.6.1 от 09.02.2016 пытаюсь обновиться до 8.5.6.1 от 16.05.2016 .
Обновление с ошибкой:
====================
/* --------------------------------------------------------------- */
/* Object Name: BLK_INCOMECLASS_BUDGELM_INIT */
/* Object Type: BAUPDBLOCK */
/* Инициализация новых дескрипторов бюджетной классификации доходов */
/*
-- BLK_INCOMECLASS_BUDGELM_INIT */
declare
nCOMPANY PKG_STD.tREF;
sCODE PKG_STD.tSTRING;
sCODE_EX PKG_STD.tSTRING;
sNAME PKG_STD.tSTRING;
nBUDGELM PKG_STD.tREF;
nBGINCGRP PKG_STD.tREF;
begin
/* проверка выполненности блока */
if ( PKG_SYSTEM_INIT.BLOCK_EXECUTED('BLK_INCOMECLASS_BUDGELM_INIT') is not null ) then
return;
end if;

execute immediate 'alter table BUDGELM disable all triggers';
execute immediate 'alter table BGINCGRP disable all triggers';
execute immediate 'alter table INCOMECLASS disable all triggers';

/* Инициализация элементов бюджета */
for rec in
(
select RN
from VERSIONS
where UNITCODE = 'BudgetElements'
)
loop
P_BUDGELM_BASE_INIT( rec.RN );
end loop;

/* Инициализация групп подвида доходов */
for rec in
(
select RN
from VERSIONS
where UNITCODE = 'BudgetIncomeSubspGroups'
)
loop
P_BGINCGRP_BASE_INIT( rec.RN );
end loop;

/* Коррекция бюджетной классификации доходов */
for rec in
(
select VERSION, RN, INCELEMENT, GOVPROG
from INCOMECLASS
where ( INCELEMENT <> 0 or GOVPROG is not null )
)
loop
FIND_COMPANY_BY_VERSION( rec.VERSION, 'IncomeBudgetClassification', nCOMPANY );

/* Коррекция элемента бюджета */
if ( rec.INCELEMENT <> 0 ) then
/* мнемокод элемента бюджета */
sCODE := lpad(to_char(rec.INCELEMENT),2,'0');
/* поиск элемента бюджета */
FIND_BUDGELM_CODE( 1, 1, nCOMPANY, sCODE, nBUDGELM );
/* добавление элемента бюджета */
if ( nBUDGELM is null ) then
P_BUDGELM_BASE_INSERT( nCOMPANY, sCODE, sCODE, sCODE, 1, null, null, nBUDGELM );
end if;
end if;

/* Коррекция группы подвида доходов */
if ( rec.GOVPROG is not null ) then
begin
select CODE, CODE_EX, NAME
into sCODE, sCODE_EX, sNAME
from GOVPROG
where RN = rec.GOVPROG;
exception
when NO_DATA_FOUND then
PKG_MSG.RECORD_NOT_FOUND( rec.GOVPROG,'GovernmentPrograms' );
end;

/* поиск группы подвида доходов */
FIND_BGINCGRP_CODE( 1, 1, nCOMPANY, sCODE, nBGINCGRP );
if ( nBGINCGRP is null ) then
FIND_BGINCGRP_CODE( 1, 1, nCOMPANY, sCODE_EX, nBGINCGRP );
end if;
/* добавление группы подвида доходов */
if ( nBGINCGRP is null ) then
P_BGINCGRP_BASE_INSERT( nCOMPANY, sCODE, sCODE_EX, sNAME, 1, null, null, nBGINCGRP );
end if;
end if;

/* исправление */
update INCOMECLASS
set INCELEMENT = 0,
BUDGELM = nBUDGELM,
GOVPROG = null,
BGINCGRP = nBGINCGRP
where RN = rec.RN;
end loop;

execute immediate 'alter table BUDGELM enable all triggers';
execute immediate 'alter table BGINCGRP enable all triggers';
execute immediate 'alter table INCOMECLASS enable all triggers';

/* регистрация выполненного блока */
PKG_SYSTEM_INIT.EXECUTED_BLOCK( 'BLK_INCOMECLASS_BUDGELM_INIT' );
exception
when OTHERS then
execute immediate 'alter table BUDGELM enable all triggers';
execute immediate 'alter table BGINCGRP enable all triggers';
execute immediate 'alter table INCOMECLASS enable all triggers';
raise;
end;


ORA-06550: line 48, column 33:
PL/SQL: ORA-00904: "GOVPROG": invalid identifier
ORA-06550: line 46, column 5:
PL/SQL: SQL Statement ignored
ORA-06550: line 51, column 30:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550: line 51, column 5:
PL/SQL: Statement ignored
ORA-06550: line 54, column 10:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550: line 54, column 5:
PL/SQL: Statement ignored
ORA-06550: line 66, column 10:
PLS-00364: loop index variable 'REC' use is invalid
ORA-06550:
===================================

2-Пытаюсь обновиться до самой свежей версии от 05.10.2016
обновляется без ошибок , но при попытке зайти после обновления сообщение об ошибке:
Спецификация лицензии "НА0878-3" содержит неизвестное приложение "SEPersons".

И сразу после обновления смотрю sqldeveloper-ом не валидные объекты, их 29 штук,
не компилятся по причине несоответствия кол-ва пар-в и их типов в вызываемых
процедурах и функциях разных пакетов. Возможно они и не нужны.
Что делать как обновиться до самой свежей версии. И как обновляться поэтапно (по хронологии версий) или можно сразу на самую последнюю, хотя при этом ошибка с лицензией.

Заранее благодарен за поимание и участие.





И для чего это писать во всех темах????
[Email]
 
Индекс форума » 8.хх PL/SQL
Перейти: