Fórum Duvida de automatização no banco de dados Oracle #610973

]CREATE OR REPLACE TRIGGER TRG_INC_UPD_REG_G
BEFORE INSERT OR UPDATE
ON SANKHYA_TESTE.TGFPAR 
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
DECLARE
PRAGMA AUTONOMOUS_TRANSACTION;
V_REPRESENTANTE VARCHAR2(1);
V_CONTRIBUINTE VARCHAR2(1);
V_ESTADO NUMBER;

BEGIN
  SELECT AD_REPRESENTANTE INTO V_REPRESENTANTE FROM TGFPAR WHERE CODPARC =:NEW.CODPARC;
  SELECT CLASSIFICMS INTO V_CONTRIBUINTE FROM TGFPAR WHERE CODPARC =:NEW.CODPARC;
  SELECT UF.CODUF INTO V_ESTADO FROM TSICID CID, TSIUFS UF WHERE CID.UF=UF.CODUF AND CODCID IN 
  (SELECT CODCID FROM TGFPAR WHERE CODPARC =:NEW.CODPARC);
 
        --CLIENTES NÃO CONTRIBUINTES, NÃO REPRESENTANTE, REGIAO MINAS
   IF 
    (V_ESTADO = 2 AND V_CONTRIBUINTE NOT IN (''''C'''',''''I'''',''''T'''') AND V_REPRESENTANTE = ''''N'''')
   THEN	
      :NEW.CODREG := 170000000;
   END IF;
      
      --CLIENTES CONTRIBUINTES, NÃO REPRESENTANTE, REGIAO MINAS
   IF 
    (V_ESTADO = 2 AND V_CONTRIBUINTE  IN (''''C'''',''''I'''',''''T'''') AND V_REPRESENTANTE = ''''N'''')
   THEN
      :NEW.CODREG := 090000000;
   END IF;
END;

CREATE OR REPLACE TRIGGER TRG_INC_UPD_REG_G
BEFORE INSERT OR UPDATE
ON SANKHYA_TESTE.TGFPAR 
FOR EACH ROW
DECLARE
	V_REPRESENTANTE VARCHAR2(1);
	V_CONTRIBUINTE VARCHAR2(1);
	V_ESTADO NUMBER;
BEGIN
	V_REPRESENTANTE := :NEW.AD_REPRESENTANTE;
	V_CONTRIBUINTE := :NEW.CLASSIFICMS;

	SELECT UF.CODUF
	INTO V_ESTADO
	FROM TSICID CID
	INNER JOIN TSIUFS UF ON UF.CODUF = CID.UF
	WHERE CID.CODCID = :NEW.CODCID;

	--CLIENTES REGIAO MINAS
	IF (V_ESTADO = 2) THEN
		--CLIENTES NÃO CONTRIBUINTES, NÃO REPRESENTANTE
		IF (V_CONTRIBUINTE NOT IN ('C','I','T')) AND (V_REPRESENTANTE = 'N') THEN
			:NEW.CODREG := 170000000; // AQUI É NUMÉRICO MESMO?
		END IF;

		--CLIENTES CONTRIBUINTES, NÃO REPRESENTANTE
		IF (V_CONTRIBUINTE IN ('C','I','T')) AND (V_REPRESENTANTE = 'N')
		THEN
			:NEW.CODREG := 090000000;
		END IF;
	END IF;
END;