N
а ты нам много денег принес?
Неа, просто может чем подскажите
Size: a a a
2020 November 16
G
по ораклу бесплатно? мы что тебе том?
N
шарят, а что
В лс могу объяснить
A
Неа, просто может чем подскажите
ну может как только ты сформулируешь запрос
G
еще и в личке
A
в личку переходить не будем, тут говори
N
Ок
A
за личку 1000р
G
приватные консультации всегда стоят денег
G
50 баксов/час стандартно, не демпингуй
A
50 баксов/час стандартно, не демпингуй
ок )
A
Ок
шо ок-то? ))) вопросов нет значит?
N
шо ок-то? ))) вопросов нет значит?
Секунду, тут кое-что меняю
A
эт правильно, эт хорошо )) ещё вариант, который мне нравится - "читаю в гугле сам как решить" )
N
Как в Бегин засунуть матвьюху?
DECLARE
l_Cnt_Del NUMBER;
BEGIN
Dbms_Mview.Refresh('SH_TEST_SH_TEST_VIEW_MV', Atomic_Refresh => FALSE);
Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_MV',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => FALSE,
No_Invalidate => FALSE);
INSERT —+ append
INTO SH_TEST_SH_TEST_VIEW_HISTORY
SELECT cvh.cust_id,cvh.calc_date,cvh.cust_name,cvh.cust_sys_code
FROM SH_TEST_SH_TEST_View_Mv ;
DELETE FROM SH_TEST_SH_TEST_VIEW_HISTORY Cvh
WHERE Cvh.Calc_Date < Trunc(SYSDATE) - 14;
l_Cnt_Del := SQL%ROWCOUNT;
COMMIT;
IF l_Cnt_Del > 0 THEN
EXECUTE IMMEDIATE 'alter table SH_TEST_SH_TEST_VIEW_HISTORY shrink space cascade';
EXECUTE IMMEDIATE 'alter index SH_TEST_VIEW_HISTORY_D rebuild';
END IF;
Sys.Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_HISTORY',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => TRUE,
No_Invalidate => FALSE);
END;
DECLARE
l_Cnt_Del NUMBER;
BEGIN
Dbms_Mview.Refresh('SH_TEST_SH_TEST_VIEW_MV', Atomic_Refresh => FALSE);
Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_MV',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => FALSE,
No_Invalidate => FALSE);
INSERT —+ append
INTO SH_TEST_SH_TEST_VIEW_HISTORY
SELECT cvh.cust_id,cvh.calc_date,cvh.cust_name,cvh.cust_sys_code
FROM SH_TEST_SH_TEST_View_Mv ;
DELETE FROM SH_TEST_SH_TEST_VIEW_HISTORY Cvh
WHERE Cvh.Calc_Date < Trunc(SYSDATE) - 14;
l_Cnt_Del := SQL%ROWCOUNT;
COMMIT;
IF l_Cnt_Del > 0 THEN
EXECUTE IMMEDIATE 'alter table SH_TEST_SH_TEST_VIEW_HISTORY shrink space cascade';
EXECUTE IMMEDIATE 'alter index SH_TEST_VIEW_HISTORY_D rebuild';
END IF;
Sys.Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_HISTORY',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => TRUE,
No_Invalidate => FALSE);
END;
A
Как в Бегин засунуть матвьюху?
DECLARE
l_Cnt_Del NUMBER;
BEGIN
Dbms_Mview.Refresh('SH_TEST_SH_TEST_VIEW_MV', Atomic_Refresh => FALSE);
Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_MV',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => FALSE,
No_Invalidate => FALSE);
INSERT —+ append
INTO SH_TEST_SH_TEST_VIEW_HISTORY
SELECT cvh.cust_id,cvh.calc_date,cvh.cust_name,cvh.cust_sys_code
FROM SH_TEST_SH_TEST_View_Mv ;
DELETE FROM SH_TEST_SH_TEST_VIEW_HISTORY Cvh
WHERE Cvh.Calc_Date < Trunc(SYSDATE) - 14;
l_Cnt_Del := SQL%ROWCOUNT;
COMMIT;
IF l_Cnt_Del > 0 THEN
EXECUTE IMMEDIATE 'alter table SH_TEST_SH_TEST_VIEW_HISTORY shrink space cascade';
EXECUTE IMMEDIATE 'alter index SH_TEST_VIEW_HISTORY_D rebuild';
END IF;
Sys.Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_HISTORY',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => TRUE,
No_Invalidate => FALSE);
END;
DECLARE
l_Cnt_Del NUMBER;
BEGIN
Dbms_Mview.Refresh('SH_TEST_SH_TEST_VIEW_MV', Atomic_Refresh => FALSE);
Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_MV',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => FALSE,
No_Invalidate => FALSE);
INSERT —+ append
INTO SH_TEST_SH_TEST_VIEW_HISTORY
SELECT cvh.cust_id,cvh.calc_date,cvh.cust_name,cvh.cust_sys_code
FROM SH_TEST_SH_TEST_View_Mv ;
DELETE FROM SH_TEST_SH_TEST_VIEW_HISTORY Cvh
WHERE Cvh.Calc_Date < Trunc(SYSDATE) - 14;
l_Cnt_Del := SQL%ROWCOUNT;
COMMIT;
IF l_Cnt_Del > 0 THEN
EXECUTE IMMEDIATE 'alter table SH_TEST_SH_TEST_VIEW_HISTORY shrink space cascade';
EXECUTE IMMEDIATE 'alter index SH_TEST_VIEW_HISTORY_D rebuild';
END IF;
Sys.Dbms_Stats.Gather_Table_Stats(Ownname => 'SH_TEST',
Tabname => 'SH_TEST_VIEW_HISTORY',
Estimate_Percent => 10,
Method_Opt => 'FOR ALL COLUMNS SIZE 1',
Degree => 4,
Cascade => TRUE,
No_Invalidate => FALSE);
END;
что значит засунуть? ) какая задача-то?
N
Задача в том, чтобы найти в этом скрипте ошибки и все, больше никаких объяснений не было, некоторые уже поправил, но скрипт для материализованного представления, тоже надо написать мне, по этому и вопрос, как засунуть его в Бегин или можно иначе ?
N
Просто стоп в голове поймал
A
чтобы найти ошибки и переписать, нужно понять что этот скрипт делает, как он используется и нужно ли это всё вообще ))) может ошибка в факте наличия скрипта этого и можно сделать иначе...
A
точно рекомендую посмотреть на картину в целом и какую задачу этот скрипт решает... если есть ошибки - то какие ошибки, если нужно улучшить - то по каким параметрам