void CreateBookLst( MyBOOK* myBook )
{
  int i, j, k, fgui;
  int books_cnt=0;
  int elfs_cnt=0;
  int mask = ( (int)LastExtDB() )&0xF8000000;
  BOOK* book;
  UI_APP_SESSION* session;
  BOOK_LIST_ITEM* elem;
  
  SessoinListsFree( myBook );
  
  myBook->books_list = List_Create();
  myBook->elfs_list = List_Create();
  
  i = root_list_get_session_count();
  
  for ( j = 0; j < i; j++ )
  {
    elem=0;
    session = root_list_get_session( j );
    for ( k = 0; k < session->listbook->FirstFree; k++ )
    {
      book = (BOOK*) List_Get( session->listbook, k );
      if (!isBookmanDaemonBook(book))
      {
        if( (fgui = book->xguilist->guilist->FirstFree) || ( ((int)book->onClose)&0xF8000000 ) != mask )
        {
          if ( !isBookManager( book ) && !IsVolumeControllerBook( book ) && !IsRightNowBook( book ) && !isRSSTickerBook( book ))
          {
            char s[50];
            elem = new BOOK_LIST_ITEM;
            elem->book=book;
            if ( strcmp( book->xbook->name, "CUIDisplayableBook" ) )
            {
              char * bn =new char[strlen(book->xbook->name)+1];
              strcpy(bn,book->xbook->name);
              elem->book_name = bn;
            }
            else
            {
              StrID2Str( BookObj_GetSession(book)->name, s, MAXELEMS(s), 0 );
              char * bn =new char[strlen(s)+1];
              strcpy(bn,s);
              elem->book_name = bn;
            }
            elem->isGuiBook = fgui;
            
            int tmp = GetJavaName( book );
            if ( tmp )
            {
              delete(elem->book_name);
              StrID2Str( tmp, s, MAXELEMS(s), 0 );
              char * java_name =new char[strlen(s)+1];
              strcpy(java_name,s);
              elem->book_name = java_name;
            }
            if ( ElfInBookListEnabled && ( ((int)book->onClose)&0xF8000000 ) != mask )
            {
              if ( fgui )
              {
                List_InsertFirst( myBook->books_list, elem );
                books_cnt++;
              }
            }
            
            if ( ( ((int)book->onClose)&0xF8000000 ) == mask )
            {
              List_InsertFirst( myBook->books_list, elem );
              books_cnt++;
            }
            else
            {
              List_InsertFirst( myBook->elfs_list, elem );
              elfs_cnt++;
            }
          }
        }
      }
    }
  }
  myBook->blistcnt = books_cnt;
  myBook->elistcnt = elfs_cnt;
}