-----------------------------------------------------------------------------------------------------------------------------------------------------
--INSERE NOVAS APLICACOES DE PEDIDO TABLET EM ABAS
INSERT INTO ctl_aplicativo (
SELECT 'aba_vnd_pedido_tablet', 'Aba do Pedido Tablet', 'VND', 'U'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'aba_vnd_pedido_tablet') IS NULL LIMIT 1);

INSERT INTO ctl_aplicativo (
SELECT 'frm_vnd_pedido_tablet_dados', 'Pedido de Venda Auto-Peças - Tablet - Aba Dados', 'VND', 'U'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'frm_vnd_pedido_tablet_dados') IS NULL LIMIT 1);

INSERT INTO ctl_aplicativo (
SELECT 'frm_vnd_pedido_tablet_pedido', 'Pedido de Venda Auto-Peças - Tablet - Aba Pedido', 'VND', 'U'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'frm_vnd_pedido_tablet_pedido') IS NULL LIMIT 1);

INSERT INTO ctl_aplicativo (
SELECT 'frm_vnd_pedido_tablet_add', 'Pedido de Venda Auto-Peças - Tablet - Aba Add Itens', 'VND', 'U'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'frm_vnd_pedido_tablet_add') IS NULL LIMIT 1);

INSERT INTO ctl_aplicativo (
SELECT 'frm_vnd_pedido_tablet_itens', 'Pedido de Venda Auto-Peças - Tablet - Aba Exclui Itens Pedido', 'VND', 'U'
FROM ctl_aplicativo
WHERE aplinome = 'frm_bas_filial'
AND (SELECT aplinome FROM ctl_aplicativo WHERE aplinome = 'frm_vnd_pedido_tablet_itens') IS NULL LIMIT 1);
-----------------------------------------------------------------------------------------------------------------------------------------------------

-----------------------------------------------------------------------------------------------------------------------------------------------------
--DA ACESSO PARA NOVAS APLICACOES
INSERT INTO ctl_grupo_x_direito  (
SELECT grupousucod, 'frm_vnd_pedido_tablet_dados', 'T'
  FROM ctl_grupo_x_direito 
 WHERE grupousucod IN (SELECT grupousucod FROM ctl_grupo_x_direito  WHERE aplinome = 'frm_vnd_pedido_tablet')
   AND grupousucod NOT IN (SELECT grupousucod FROM ctl_grupo_x_direito  WHERE aplinome = 'frm_vnd_pedido_tablet_dados')
GROUP BY grupousucod);


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

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

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