/*$Id: xudgods.c,v 5.1 2012-11-29 09:48:57 sasa Exp $*/
/*16.11.2012	16.11.2012	Белых А.И.	xudgods.c
Получение списка годов за которые введена информация
*/

#include "buhg.h"
void xudgods()
{
char strsql[512];
SQL_str row;
class SQLCURSOR cur;
int kolstr=0;
int kolstr1=0;
short d,m,g;
short god=0;

clear();
printw("%s\n",gettext("Список годов за которые введены документы"));
GDITE();

sprintf(strsql,"select distinct datd from Uddok");
if((kolstr=cur.make_cursor(&bd,strsql)) < 0)
 {
  iceb_t_msql_error(&bd,gettext("Ошибка создания курсора !"),strsql);
  return;
 }

if(kolstr == 0)
 {
  printw("%s\n",gettext("Не найдено ни одной записи !"));
 }

while(cur.read_cursor(&row) != 0)
 {
  strzag(LINES-1,0,kolstr,++kolstr1);
  iceb_tu_rsdat(&d,&m,&g,row[0],2);
  if(god != g)
   {
    printw("%d\n",g);
    god=g;
   }
 }
OSTANOV();
}
