INSERT INTO ctl_aplicativo (
SELECT 'cns_rlc_dup_pagar_x_agrupamento_estorno', 'Estorno Agrupamento Dup Pagar', 'RLC', 'C'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'cns_rlc_dup_pagar_x_agrupamento_estorno') IS NULL LIMIT 1);

INSERT INTO ctl_grupo_x_direito  (
SELECT grupousucod, 'cns_rlc_dup_pagar_x_agrupamento_estorno', 'T'
  FROM ctl_grupo_x_direito 
 WHERE grupousucod = 1
   AND grupousucod NOT IN (SELECT grupousucod FROM ctl_grupo_x_direito  WHERE aplinome = 'cns_rlc_dup_pagar_x_agrupamento_estorno')
GROUP BY grupousucod);



DELETE FROM ctl_menu_nivel WHERE codigo IN ( 6345  );
INSERT INTO ctl_menu_nivel VALUES ( 6345 , 'Estorno Agrupamento Dup Pagar', 9999, '','_self', 'cns_rlc_dup_pagar_x_agrupamento_estorno', 817 , 1);