ГНЦ ИФВЭ
ОУ У-70
Система Управления комплекса У-70  

Распределенная База Данных реального времени ССУДА

Функции общего назначения (вариант для UNIX)

Пример

Программа вывода всех текстов словаря БД номер 2 на экран может выглядеть следующим образом:

static char buf[600];
static short i,j,l;

main()
  {
   if(i=inidbl(2)) pr_err(i,"DB2");
   if(!(i=dirdbl())) pr_err(i,"DIRDBL");
   printf("number of texts = %d\n",i);
   for(j=1;j<=i;j++)
     {
      if(!(l=txrdbl(buf,sizeof(buf)-1,j))) continue;
      buf[l]=0;
      printf("%d. %s\n",j,buf);
     }
  }
pr_err(i,s)
 short i;
 char *s;

  {
   printf("%s --> %x\n",s,i);
   exit(0);
  }

Автор © Воеводин В.П.