Autor Tópico: Acesso a usuario por grupos - RESOLVIDO  (Lida 4210 vezes)

Jean Matos

  • Expert
  • *****
  • Mensagens: 956
    • Gestão de Construtoras
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #15 Online: Agosto 28, 2013, 08:13:08 pm »
Sequer logou...
Sc - 6.xxx , 7.xxx e V8
Windows Server 2008 Enterpriser 64 bits
SqlServer 2008 Express 64 bits
Sistema Integrado de Gestão de Construtoras]WaveTOR - Sistema Integrado de Gestão de Construtoras
Teófilo Otoni - MG
(33)8824-2775

Almeida

  • Expert
  • *****
  • Mensagens: 610
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #16 Online: Agosto 28, 2013, 08:20:25 pm »
Sequer logou...

tente esse então:
Código: [Selecionar]
sc_reset_apl_status();
sc_reset_apl_conf();

$sql = "SELECT
      app_name,
      priv_access,
      priv_insert,
      priv_delete,
      priv_update,
      priv_export,
      priv_print
         FROM dbo.sec_groups_apps
         WHERE group_id IN
             (SELECT
             group_id
         FROM
             dbo.sec_users_groups
         WHERE
             login = '". [usr_login] ."')";
     
sc_select(rs, $sql);

if ({rs} !== false)
{
   while (!$rs->EOF)
   {
      if($rs->fields[1] == 'Y')
      {
          sc_apl_status($rs->fields[0], 'on');
      }

  if(has_priv($rs->fields[2]) == "on"){
  sc_apl_conf($rs->fields[0], 'insert', "on");
  }
  if(has_priv($rs->fields[3]) == "on"){
  sc_apl_conf($rs->fields[0], 'delete', "on");
  }
  if(has_priv($rs->fields[4]) == "on"){
          sc_apl_conf($rs->fields[0], 'update', "on");
  }
      //export
  if(has_priv($rs->fields[5]) == "on"){
  $export_permission = 'btn_display_'. has_priv($rs->fields[5]);
  sc_apl_conf($rs->fields[0], $export_permission, 'xls');
  sc_apl_conf($rs->fields[0], $export_permission, 'word');
  sc_apl_conf($rs->fields[0], $export_permission, 'pdf');
  sc_apl_conf($rs->fields[0], $export_permission, 'xml');
  sc_apl_conf($rs->fields[0], $export_permission, 'csv');
  sc_apl_conf($rs->fields[0], $export_permission, 'rtf');
   }
      //export
      if(has_priv($rs->fields[6]) == "on"){
         $export_permission = 'btn_display_'. has_priv($rs->fields[6]);
         sc_apl_conf($rs->fields[0], $export_permission, 'print');
  }

      $rs->MoveNext();   
   }
   $rs->Close();
   if(sc_logged({login})):
      sc_log_add('login', {lang_login_ok});
      sc_user_logout('logged_user', 'logout', 'Login');
      sc_redir('menu_obras');   
   endif;
}

Att.
Eliezer Almeida
eliezeralmeidago@hotmail.com
www.infotecsoft.com.br - Modernidade e Eficiência

Jean Matos

  • Expert
  • *****
  • Mensagens: 956
    • Gestão de Construtoras
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #17 Online: Agosto 29, 2013, 10:12:59 am »
Sequer logou...

tente esse então:
Código: [Selecionar]
sc_reset_apl_status();
sc_reset_apl_conf();

$sql = "SELECT
      app_name,
      priv_access,
      priv_insert,
      priv_delete,
      priv_update,
      priv_export,
      priv_print
         FROM dbo.sec_groups_apps
         WHERE group_id IN
             (SELECT
             group_id
         FROM
             dbo.sec_users_groups
         WHERE
             login = '". [usr_login] ."')";
     
sc_select(rs, $sql);

if ({rs} !== false)
{
   while (!$rs->EOF)
   {
      if($rs->fields[1] == 'Y')
      {
          sc_apl_status($rs->fields[0], 'on');
      }

  if(has_priv($rs->fields[2]) == "on"){
  sc_apl_conf($rs->fields[0], 'insert', "on");
  }
  if(has_priv($rs->fields[3]) == "on"){
  sc_apl_conf($rs->fields[0], 'delete', "on");
  }
  if(has_priv($rs->fields[4]) == "on"){
          sc_apl_conf($rs->fields[0], 'update', "on");
  }
      //export
  if(has_priv($rs->fields[5]) == "on"){
  $export_permission = 'btn_display_'. has_priv($rs->fields[5]);
  sc_apl_conf($rs->fields[0], $export_permission, 'xls');
  sc_apl_conf($rs->fields[0], $export_permission, 'word');
  sc_apl_conf($rs->fields[0], $export_permission, 'pdf');
  sc_apl_conf($rs->fields[0], $export_permission, 'xml');
  sc_apl_conf($rs->fields[0], $export_permission, 'csv');
  sc_apl_conf($rs->fields[0], $export_permission, 'rtf');
   }
      //export
      if(has_priv($rs->fields[6]) == "on"){
         $export_permission = 'btn_display_'. has_priv($rs->fields[6]);
         sc_apl_conf($rs->fields[0], $export_permission, 'print');
  }

      $rs->MoveNext();   
   }
   $rs->Close();
   if(sc_logged({login})):
      sc_log_add('login', {lang_login_ok});
      sc_user_logout('logged_user', 'logout', 'Login');
      sc_redir('menu_obras');   
   endif;
}
Mas foi justamente esse que tentei..
o que mandei é o que funciona...mas apenas com 1 grupo...
Sc - 6.xxx , 7.xxx e V8
Windows Server 2008 Enterpriser 64 bits
SqlServer 2008 Express 64 bits
Sistema Integrado de Gestão de Construtoras]WaveTOR - Sistema Integrado de Gestão de Construtoras
Teófilo Otoni - MG
(33)8824-2775

Almeida

  • Expert
  • *****
  • Mensagens: 610
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #18 Online: Agosto 29, 2013, 10:36:14 am »
Verifiquei o código está ok, não encontrei prbolema..
Coloca em modo debug e tira o sc_redir do final do código, vamos ver se vai apresentar algum erro.

Att.
Eliezer Almeida
eliezeralmeidago@hotmail.com
www.infotecsoft.com.br - Modernidade e Eficiência

dellapiazza

  • Intermediário
  • ***
  • Mensagens: 172
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #19 Online: Agosto 29, 2013, 10:59:23 am »
Meu código esta igual e está funcionando com vários grupos.
André Della Piazza
SC 8.1 / Win Server 2008 R2 / SQL Server 2014 Express

Jean Matos

  • Expert
  • *****
  • Mensagens: 956
    • Gestão de Construtoras
    • Email
Re:Acesso a usuario por grupos - RESOLVIDO
« Responder #20 Online: Setembro 06, 2013, 10:26:21 am »
Verifiquei o código está ok, não encontrei prbolema..
Coloca em modo debug e tira o sc_redir do final do código, vamos ver se vai apresentar algum erro.

Brother, vacilei aqui.. quando coloquei no modo debug ví que esqueci de adequar meu Select SQL,,...
funfou agora..

Obrigado
Sc - 6.xxx , 7.xxx e V8
Windows Server 2008 Enterpriser 64 bits
SqlServer 2008 Express 64 bits
Sistema Integrado de Gestão de Construtoras]WaveTOR - Sistema Integrado de Gestão de Construtoras
Teófilo Otoni - MG
(33)8824-2775