Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Oracle [игнор отключен] [закрыт для гостей] / Прописать v_Column_Name :=[Значение] в declare..end / 12 сообщений из 12, страница 1 из 1
19.10.2018, 16:22
    #39720049
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
Подскажите, что делаю не так

Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
DECLARE
  type t_string IS TABLE OF VARCHAR2(50);
  t_table_name t_string        := t_string('MST_DOX_STAGE');

  type t_column IS TABLE OF  t_string;
  t_columns_name t_column        := t_column( 
                                t_string('AGREEMENT_TEMPLATE', 'VARCHAR2(100 CHAR) DEFAULT ''Unknown'' NOT NULL' )
								t_string('REMEDIATION_REG_TYPE', 'VARCHAR2(4 CHAR)')
                                );
  
  V_TABLE_OWNER      VARCHAR2(100) := 'MOUSETRAP';
  v_table_name       VARCHAR2(100);
  v_Column_Name      VARCHAR2(100);
  v_type_Name         VARCHAR2(100);
  v_alter_table_stmt VARCHAR2(3000);
  v_cnt              NUMBER;
  v_sel_qry          VARCHAR2(1000);
BEGIN
  FOR i IN 1..t_table_name.count
  LOOP
    v_table_name := t_table_name(i);
    v_sel_qry    := 'SELECT COUNT(TABLE_NAME) FROM ALL_TABLES WHERE OWNER = :tblowner AND TABLE_NAME = :tblname';
    EXECUTE IMMEDIATE v_sel_qry INTO v_cnt USING v_Table_Owner,v_Table_Name;
    
    IF v_cnt = 1 THEN
      
    
    /*ADDING COLUMN*/
        FOR i IN 1..t_columns_name.count LOOP    
            v_Column_Name := t_columns_name(i)(1);
            v_type_Name   := t_columns_name(i)(2);
            v_sel_qry     := 'SELECT COUNT(COLUMN_NAME) FROM ALL_TAB_COLUMNS WHERE OWNER = :tblowner AND TABLE_NAME = :tblname AND COLUMN_NAME = :colname';
            EXECUTE IMMEDIATE v_sel_qry INTO v_cnt USING v_Table_Owner,v_Table_Name, v_Column_Name;
            IF v_cnt              = 0 THEN
			
			IF v_Column_Name := 'AGREEMENT_TEMPLATE' 
			THEN
			v_alter_table_stmt := 'ALTER TABLE ' || v_table_owner || '.' || v_table_name || ' ADD ('||v_Column_Name||' ' || v_type_Name ||' )';
            EXECUTE IMMEDIATE v_alter_table_stmt;
			END IF;


		
			IF v_Column_Name := 'REMEDIATION_REG_TYPE'
			THEN			
			v_alter_table_stmt := 'ALTER TABLE ' || v_table_owner || '.' || v_table_name || ' MODIFY ('||v_Column_Name||' DEFAULT NULL )';
			EXECUTE IMMEDIATE v_alter_table_stmt;
			END IF;

				
				DBMS_OUTPUT.PUT_LINE('Table '|| v_Table_Owner||'.'||v_Table_Name||' column '|| v_Column_Name || ' type ' || v_type_Name || ' added');
            END IF;
        END LOOP;
      /*ADDING COLUMN*/
      
    
    ELSE
      DBMS_OUTPUT.PUT_LINE('Table '|| v_Table_Owner||'.'||v_Table_Name||' not exists');
    END IF;
  END LOOP;
END;
/
...
Рейтинг: 0 / 0
19.10.2018, 16:23
    #39720050
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
ORA-06550: line 8, column 9:
PLS-00103: Encountered the symbol "T_STRING" when expecting one of the following:
...
Рейтинг: 0 / 0
19.10.2018, 16:25
    #39720051
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu,
Добавил ,
Теперь другая ошибка
Error report:
ORA-06550: line 36, column 21:
PLS-00103: Encountered the symbol "=" when expecting one of the following:
. ( * @ % & = - + < / > at in is mod remainder not rem then
<an exponent (**)> <> or != or ~= >= <= <> and or like like2
like4 likec between || multiset member submultiset
...
Рейтинг: 0 / 0
19.10.2018, 16:27
    #39720056
Elic
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu
Код: plsql
1.
IF v_Column_Name :=

Что за поток сознания?

http://www.bugtraq.ru/forum/faq/general/smart-questions.html] RTFM
...
Рейтинг: 0 / 0
19.10.2018, 16:30
    #39720061
MaximaXXL
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu,

???
Код: plsql
1.
IF v_Column_Name := 
...
Рейтинг: 0 / 0
19.10.2018, 16:33
    #39720065
MaximaXXL
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu,

Про запятуху забыл
Код: plsql
1.
2.
3.
4.
  t_columns_name t_column        := t_column( 
                                t_string('AGREEMENT_TEMPLATE', 'VARCHAR2(100 CHAR) DEFAULT ''Unknown'' NOT NULL' ),
								t_string('REMEDIATION_REG_TYPE', 'VARCHAR2(4 CHAR)')
                                );
...
Рейтинг: 0 / 0
19.10.2018, 16:35
    #39720067
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
Не получается прописать коректно условие в цикле,
v_Column_Name - название колонки из таблицы t_table_name

В зависимости от названия колонки выполняет различные ALTER'ы
...
Рейтинг: 0 / 0
19.10.2018, 16:36
    #39720068
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
MaximaXXL,
Поставил уже. все равно вылетает
...
Рейтинг: 0 / 0
19.10.2018, 16:38
    #39720070
MaximaXXL
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu,

в IF может присваивать в Java и в Си помоему
в PL/SQL - низя
в IF делайте ПРОВЕРКУ а не присвоение
...
Рейтинг: 0 / 0
19.10.2018, 16:45
    #39720078
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
IF v_cnt  = 0 and t_columns_name(i)(1) = 'AGREEMENT_TEMPLATE' THEN
			v_alter_table_stmt01 := 'ALTER TABLE ' || v_table_owner || '.' || v_table_name || ' ADD ('||v_Column_Name||' ' || v_type_Name ||' )';
            EXECUTE IMMEDIATE v_alter_table_stmt01;
			ELSE 
			DBMS_OUTPUT.PUT_LINE('1');
			END IF;

			IF v_cnt = 0 and t_columns_name(i)(2) = 'REMEDIATION_REG_TYPE'
			THEN			
			v_alter_table_stmt02 := 'ALTER TABLE ' || v_table_owner || '.' || v_table_name || ' MODIFY ('||v_Column_Name||' DEFAULT NULL )';
			EXECUTE IMMEDIATE v_alter_table_stmt02;
			ELSE 
			DBMS_OUTPUT.PUT_LINE('2');
			END IF;
...
Рейтинг: 0 / 0
19.10.2018, 16:45
    #39720080
x17.mstu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
Вот так вроде заработало
...
Рейтинг: 0 / 0
19.10.2018, 16:54
    #39720089
-2-
-2-
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прописать v_Column_Name :=[Значение] в declare..end
x17.mstu,

Длязанафига динамический sql под селекты. Да и имена полей для ddl все равно захардкожены в ifах, посему, неумелые синтаксические потуги с коллекциями можно упростить до непосредственно одного ddl, ну пусть двух при ddl-бардаке в бд.
...
Рейтинг: 0 / 0
Форумы / Oracle [игнор отключен] [закрыт для гостей] / Прописать v_Column_Name :=[Значение] в declare..end / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]