Solução:

Executar SQL no Banco de Dados:

CREATE OR REPLACE PROCEDURE prSequenceMovDocumentoInsumo AUTHID CURRENT_USER AS sComandoCreateSequence VARCHAR2(4000); nAcaoDDLSequence NUMBER(1) := 1; nUltimoMovDocumento NUMBER(15) := 1; BEGIN SELECT CAST(NVL(MAX(REGEXP_REPLACE(MOV_DOCUMENTO, '[^[:digit:]$]')), 0) + 1 AS NUMBER(15)) AS ULTIMO_MOV_DOCUMENTO INTO nUltimoMovDocumento FROM DUAL, PROMOVPRODUTO; SELECT DECODE(COUNT(*), 0, 0, 1) AS ACAO INTO nAcaoDDLSequence FROM USER_SEQUENCES WHERE SEQUENCE_NAME = 'SEQ_MOV_DOCUMENTO_INS_TIPO2'; sComandoCreateSequence := 'create sequence SEQ_MOV_DOCUMENTO_INS_TIPO2 ' ' minvalue ' nUltimoMovDocumento ' maxvalue 999999999999999 ' ' start with ' nUltimoMovDocumento ' increment by 1 ' ' nocache ' ' cycle ' || ' order'; IF (nAcaoDDLSequence = 1) THEN EXECUTE IMMEDIATE 'drop sequence SEQ_MOV_DOCUMENTO_INS_TIPO2'; END IF; EXECUTE IMMEDIATE sComandoCreateSequence; END prSequenceMovDocumentoInsumo; / CALL prSequenceMovDocumentoInsumo(); / ALTER TABLE PROCONFIG ADD CON_TIPOSEQMOVDOCINS CHAR(1) DEFAULT 'P'; COMMENT ON COLUMN PROCONFIG.CON_TIPOSEQMOVDOCINS IS 'Define o Tipo do Sequenciamento do Documento na Movimentação de Insumo Tipo 2. P=Padrão (último+1), S=Sequence (Oracle)'; ALTER TABLE PROCONFIGLOG ADD CON_TIPOSEQMOVDOCINS CHAR(1);