ALTER TABLE PARASUPRI ADD IDUTDADOPERENVEMAIL_TMP VARCHAR2(1)
/
BEGIN
  FOR C_PARASUPRI IN (SELECT CDFILIAL, IDUTDADOPERENVEMAIL
                        FROM PARASUPRI
                       WHERE IDUTDADOPERENVEMAIL IN ('S', 'N'))
  LOOP
    UPDATE PARASUPRI 
       SET IDUTDADOPERENVEMAIL_TMP = C_PARASUPRI.IDUTDADOPERENVEMAIL
     WHERE CDFILIAL = C_PARASUPRI.CDFILIAL;
  END LOOP;
  COMMIT;
END;
/
ALTER TABLE PARASUPRI DROP COLUMN IDUTDADOPERENVEMAIL
/
ALTER TABLE PARASUPRI ADD IDUTDADOPERENVEMAIL VARCHAR2(50) NULL
/
ALTER TABLE PARASUPRI ADD CONSTRAINT CKC_IDUTDADOPERENVEMAIL CHECK (IDUTDADOPERENVEMAIL IN ('LOGIN_FILIAL_REMETENTE_FILIAL', 'LOGIN_FILIAL_REMETENTE_OPER', 'LOGIN_OPER_REMETENTE_OPER'))
/
BEGIN
  FOR C_PARASUPRI IN (SELECT CDFILIAL, IDUTDADOPERENVEMAIL_TMP
                        FROM PARASUPRI)
  LOOP
    IF C_PARASUPRI.IDUTDADOPERENVEMAIL_TMP = 'N' THEN
      UPDATE PARASUPRI 
         SET IDUTDADOPERENVEMAIL = 'LOGIN_FILIAL_REMETENTE_OPER'
       WHERE CDFILIAL = C_PARASUPRI.CDFILIAL;
    ELSIF C_PARASUPRI.IDUTDADOPERENVEMAIL_TMP = 'S' THEN
      UPDATE PARASUPRI 
         SET IDUTDADOPERENVEMAIL = 'LOGIN_OPER_REMETENTE_OPER'
       WHERE CDFILIAL = C_PARASUPRI.CDFILIAL;
    END IF;
  END LOOP;
  COMMIT;
END;
/
ALTER TABLE PARASUPRI DROP COLUMN IDUTDADOPERENVEMAIL_TMP