/*$Id: iceb_prr.c,v 1.5 2013/05/17 14:58:36 sasa Exp $*/
/*20.09.2010	05.09.2010	Белых А.И.	iceb_prr.c
Проверка на возможность работать с подсистемой
*/
#include "iceb_libbuh.h"

extern int iceb_kod_podsystem;
int iceb_prr(GtkWidget *wpredok)
{
 return(iceb_prr(iceb_kod_podsystem,wpredok));

}
/****************************/
int iceb_prr(int podsystem,GtkWidget *wpredok)
{

char strsql[1024];
SQL_str row;
class SQLCURSOR cur;
char name_kol[32];
memset(name_kol,'\0',sizeof(name_kol));

switch(podsystem)
 {
  case ICEB_PS_GK:
   strcpy(name_kol,"gkd");
   break;

  case ICEB_PS_MU:
   strcpy(name_kol,"mud");
   break;

  case ICEB_PS_PD:
   strcpy(name_kol,"pdd");
   break;

  case ICEB_PS_ZP:
   strcpy(name_kol,"zpd");
   break;

  case ICEB_PS_UOS:
   strcpy(name_kol,"osd");
   break;

  case ICEB_PS_UU:
   strcpy(name_kol,"uud");
   break;

  case ICEB_PS_UKO:
   strcpy(name_kol,"kod");
   break;

  case ICEB_PS_UKR:
   strcpy(name_kol,"krd");
   break;

  case ICEB_PS_UPL:
   strcpy(name_kol,"pld");
   break;

  case ICEB_PS_RNN:
   strcpy(name_kol,"nnd");
   break;

  case ICEB_PS_UD:
   strcpy(name_kol,"udd");
   break;

  case ICEB_PS_ABD:
   return(0);
   break;

 };

if(name_kol[0] == '\0')
 {
  sprintf(strsql,"%s-%s",__FUNCTION__,gettext("Код подсистемы не определён!"));
  iceb_menu_soob(strsql,wpredok);
  return(1);

 }
  
sprintf(strsql,"select %s from icebuser where login='%s'",name_kol,iceb_u_getlogin());

if(iceb_sql_readkey(strsql,&row,&cur,wpredok) != 1)
 {
  sprintf(strsql,"%s\n%s\n%s %s",
  iceb_getnps(),
  gettext("У Вас нет разрешения для работы с этой подсистемой!"),
  gettext("Ненайден логин"),
  iceb_u_getlogin());

  iceb_menu_soob(strsql,wpredok);

  return(1);
  
 }
if(atoi(row[0]) == 1)
 {
  sprintf(strsql,"%s\n%s",
  iceb_getnps(),
  gettext("У Вас нет разрешения для работы с этой подсистемой!"));
  
  iceb_menu_soob(strsql,wpredok);
  return(1);
  
 }


return(0);



}
