4

Recebo o seguinte erro :

  [Err] ORA-06550: line 7, column 2:
  PLS-00103: Encountered the symbol "CREATE" when expecting one of the following:

Pois estou usando um create sequence dentro do meu BEGIN com ; e / mas não resolveu o error.

 DECLARE 
 v_idMax NUMBER(19,0);

BEGIN
   select max(ID_PROD_PRECO_CUSTO_EMPRESA) INTO v_idMax from 
                           ERP.EST_PROD_PRECO_CUSTO_EMPRESA;

linha 7  create sequence P_P_C_E_seq  start with v_idMax increment by 1;

create or replace trigger PROD_INSERT
before insert on ERP.EST_PROD_PRECO_CUSTO_EMPRESA
for each row
begin
        select P_P_C_E_seq.nextval into :new.ID_PROD_PRECO_CUSTO_EMPRESA from dual;
end;

  FOR V_FUNC IN
    (SELECT  prod.ID_PRODUTO FROM ERP.EST_PRODUTO prod
                INNER JOIN ERP.EST_PROD_PRECO_CUSTO_EMPRESA prodEmp on prodEmp.ID_PRODUTO = prod.ID_PRODUTO
                GROUP BY  prod.ID_PRODUTO
                HAVING COUNT(prodEmp.ID_PRODUTO) !=83) 
  LOOP

            FOR V_FUNC_EMPRESA IN (SELECT DISTINCT emp.ID_EMPRESA FROM ERP.CF_EMPRESA emp
                                            WHERE EMP.ID_EMPRESA NOT IN (select emp.id_empresa FROM ERP.EST_PROD_PRECO_CUSTO_EMPRESA prd
                                            INNER JOIN ERP.EST_PRODUTO prod ON prod.ID_PRODUTO = prd.ID_PRODUTO
                                            INNER JOIN ERP.CF_EMPRESA emp ON prd.ID_EMPRESA = emp.ID_EMPRESA
                                            WHERE prod.ID_PRODUTO = V_FUNC.ID_PRODUTO)
                                            AND EMP.ID_EMPRESA != 110)

                    LOOP
                                INSERT 
                                            INTO EST_PROD_PRECO_CUSTO_EMPRESA 
                                                    (
                                                                                            ID_PRODUTO, 
                                                                                            ID_EMPRESA,
                                                                            CUSTO_OPERACIONAL,
                                                                                 OUTRAS_DESPESAS, 
                                                            PERCENTUAL_OUTRAS_DESPESAS, 
                                                                                         PRECO_CUSTO, 
                                                                             PRECO_CUSTO_FINAL, 
                                                                             PRECO_CUSTO_MEDIO, 
                                                                            TOTAL_OUTROS_CUSTOS,
                                                        OUTROS_CUSTOS_ULTIMA_ENTRADA,
                                                                                                        UUID, 
                                                                        DATA_ULTIMO_REAJUSTE
                                                    )
                                    VALUES
                                        (
                                                        V_FUNC.ID_PRODUTO, 
                                                        V_FUNC_EMPRESA.ID_EMPRESA, 
                                                                0,
                                                                0, 
                                                                0,
                                                                0, 
                                                                0,
                                                                0,
                                                                0, 
                                                                0, 
                                        random_uuid(),
                                                    SYSDATE
                                        )

                        ;

            END LOOP;

  END LOOP;

  drop sequence P_P_C_E_seq 
  drop trigger PROD_INSERT
END;

2 Respostas 2

4

Não é possível realizar operações ddl diretamente em um bloco plsql. A unica maneira de executar este tipo de operação seria utilizando o recurso execute immediate . Ex:

begin
  Execute Immediate 'create or replace trigger PROD_INSERT' ...
end;
4
  • tipo comecei a estudar PL/SQL ontem então vou perguntar umas duvidas. Posso fazer um Begin para cada Execute dentro do mesmo DECLARE ? como: begin Execute Immediate 'create sequence P_P_C_E_seq start' ... end; / begin Execute Immediate 'create or replace trigger PROD_INSERT' ... end; 13/09/2018 às 14:34
  • 2
    apenas complementando na documentação diz o seguinte " Only dynamic SQL can execute the following types of statements within PL/SQL program units: Data definition language (DDL) statements such as CREATE, DROP, GRANT, and REVOKE Session control language (SCL) statements such as ALTER SESSION and SET ROLE " docs.oracle.com/cd/B19306_01/B14251_01/adfns_dynamic_sql.htm 13/09/2018 às 14:47
  • @GuilhermeOliveira, respondendo a pergunta que você fez na resposta (é melhor exclui-la depois ou replicara aqui nos comentários). Infelizmente só é possível passar parâmetros no execute immediate para operações dml e plsql (Pesquisar por "using" caso queira saber mais sobre parâmetors no excute immediate). No seu caso você pode usar um replace no seu script. Ex: EXECUTE IMMEDIATE replace('create sequence P_P_C_E_seq start with :v_idMax increment by 1', ':v_idMax', to_char(v_idMax));
    – Confundir
    13/09/2018 às 18:30
  • Cara eu consegui utilizando || EX: EXECUTE IMMEDIATE 'create sequence P_P_C_E_seq start with ' || (v_idMax + 1) ; 13/09/2018 às 19:16
1

SOLUÇAO, vlw a todos

DECLARE 
 v_idMax NUMBER(19,0); -- variavel para guardar o ultimo id do banco

BEGIN

  EXECUTE IMMEDIATE 'select max(ID_PROD_PRECO_CUSTO_EMPRESA) from ERP.EST_PROD_PRECO_CUSTO_EMPRESA' INTO v_idMax;
--select max(ID_PROD_PRECO_CUSTO_EMPRESA)   INTO v_idMax from ERP.EST_PROD_PRECO_CUSTO_EMPRESA;

  EXECUTE IMMEDIATE 'create sequence P_P_C_E_seq  start with ' || (v_idMax + 1) ; --||v_idMax ; --INCREMENT BY padrao 1 || A primeira referencia to P_P_C_E_seq.nextval e == v_idMax apos que comeca a adiconar id novo

  EXECUTE IMMEDIATE 'create or replace trigger PROD_INSERT
                                        before insert on ERP.EST_PROD_PRECO_CUSTO_EMPRESA
                                        for each row
                                        begin
                                                select P_P_C_E_seq.nextval into :new.ID_PROD_PRECO_CUSTO_EMPRESA from dual;
                                        end;'; -- trigger para imcrementar o id automaticamente a cada insert


  FOR V_FUNC IN
    (SELECT  prod.ID_PRODUTO FROM ERP.EST_PRODUTO prod
                INNER JOIN ERP.EST_PROD_PRECO_CUSTO_EMPRESA prodEmp on prodEmp.ID_PRODUTO = prod.ID_PRODUTO
                WHERE prod.ID_ADMINISTRACAO = 298
                GROUP BY  prod.ID_PRODUTO
                HAVING COUNT(prodEmp.ID_PRODUTO) !=83) --Numero atual de empresas na hiper festa 12/09/2018
  LOOP

            FOR V_FUNC_EMPRESA IN (SELECT DISTINCT emp.ID_EMPRESA FROM ERP.CF_EMPRESA emp
                                            WHERE EMP.ID_EMPRESA NOT IN (select emp.id_empresa FROM ERP.EST_PROD_PRECO_CUSTO_EMPRESA prd
                                            INNER JOIN ERP.EST_PRODUTO prod ON prod.ID_PRODUTO = prd.ID_PRODUTO
                                            INNER JOIN ERP.CF_EMPRESA emp ON prd.ID_EMPRESA = emp.ID_EMPRESA
                                            WHERE prod.ID_PRODUTO = V_FUNC.ID_PRODUTO) -- tras as empresas do produto que não possuem vinculo na tabela EST_PROD_PRECO_CUSTO_EMPRESA
                                            AND EMP.ID_ADMINISTRACAO = 298) -- empresa inativa da hiper id 110

                    LOOP
                                INSERT 
                                            INTO EST_PROD_PRECO_CUSTO_EMPRESA 
                                                    (
                                                                                            ID_PRODUTO, 
                                                                                            ID_EMPRESA,
                                                                            CUSTO_OPERACIONAL,
                                                                                 OUTRAS_DESPESAS, 
                                                            PERCENTUAL_OUTRAS_DESPESAS, 
                                                                                         PRECO_CUSTO, 
                                                                             PRECO_CUSTO_FINAL, 
                                                                             PRECO_CUSTO_MEDIO, 
                                                                            TOTAL_OUTROS_CUSTOS,
                                                        OUTROS_CUSTOS_ULTIMA_ENTRADA,
                                                                                                        UUID, 
                                                                        DATA_ULTIMO_REAJUSTE
                                                    )
                                    VALUES
                                        (
                                                        V_FUNC.ID_PRODUTO, 
                                                        V_FUNC_EMPRESA.ID_EMPRESA, 
                                                                0,
                                                                0, 
                                                                0,
                                                                0, 
                                                                0,
                                                                0,
                                                                0, 
                                                                0, 
                                        random_uuid(), -- FUNCAO JA CADASTRADA
                                                    SYSDATE -- DATA ATUAL
                                        )

                        ;

            END LOOP;

  END LOOP;

  EXECUTE IMMEDIATE 'drop sequence P_P_C_E_seq'; 
  EXECUTE IMMEDIATE 'drop trigger PROD_INSERT';
END;

Se você usa Hibernate use a própria sequence do Hibernate para não perde a sequencia quando for salvar algo no projeto.

HIBERNATE_SEQUENCE

--User sequence do HIBERNATE_SEQUENCE
-- EXECUTE IMMEDIATE 'select max(ID_PROD_PRECO_CUSTO_EMPRESA) from ERP.EST_PROD_PRECO_CUSTO_EMPRESA' INTO v_idMax;
--select max(ID_PROD_PRECO_CUSTO_EMPRESA)   INTO v_idMax from ERP.EST_PROD_PRECO_CUSTO_EMPRESA;

--EXECUTE IMMEDIATE 'create sequence P_P_C_E_seq  start with ' || (v_idMax + 1) ; --||v_idMax ; --INCREMENT BY padrao 1 || A primeira referencia to P_P_C_E_seq.nextval e == v_idMax apos que comeca a adiconar id novo

EXECUTE IMMEDIATE 'create or replace trigger PROD_INSERT
                                        before insert on ERP.EST_PROD_PRECO_CUSTO_EMPRESA
                                        for each row
                                        begin
                                                select HIBERNATE_SEQUENCE.nextval into :new.ID_PROD_PRECO_CUSTO_EMPRESA from dual;
                                        end;'; -- trigger para imcrementar o id automaticamente a cada insert

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .