/*******************************************
   Перем НомерСтроки,НомерСтрочки;
Процедура Выполнить()
           ТабЗн=СоздатьОбъект("ТаблицаЗначений");
   //ТабЗн.НоваяКолонка("ДатаДок");
//    ТабЗн.НоваяКолонка("УНН");
   ТабЗн.НоваяКолонка("С");
//    ТабЗн.НоваяКолонка("Плат");
   
    ИмяФайла="";
   КаталогФайла=КаталогИБ()+"D:\4\";
   Т=СоздатьОбъект("Текст");
   Т.КодоваяСтраница(0);
   ФС.ВыбратьФайл(0,ИмяФайла,КаталогФайла,"Выберите пачку","Все файлы (*.*)|*.*",,);

   Попытка
       Т.Открыть(КаталогФайла+ИмяФайла);      
       Сообщить("Файл открыт");
   Исключение  
       Сообщить("Файл не открыт!");
   КонецПопытки;
         Для Z=1 по Т.КоличествоСтрок() Цикл
    Состояние("Номер обрабатываемой строки: "+НомерСтроки);
       НашаСтрока=Т.ПолучитьСтроку(НомерСтрочки);
       Если (Лев(НашаСтрока,1)="[") ИЛИ (Лев(НашаСтрока,1)="*") Тогда
           Продолжить;
       КонецЕсли;
           Если Найти(НашаСтрока,"Sum=")<>0 Тогда
       ТабЗн.НоваяСтрока();
   
           ТабЗн.С=Сред(НашаСтрока,9,СтрДлина(НашаСтрока)-9);
           Продолжить;
       КонецЕсли;
   КонецЦикла;
    ДБФ=СоздатьОбъект("XBase");
   
    ДБФ.ДобавитьПоле("Suma_",1,16,0);
     ДБФ.ОткрытьФайл("d:\1\r.dbf");
     Если ДБФ.Открыта()=1 тогда
         Предупреждение ("Открыта");

   
   
    ДБФ.Добавить();
    ДБФ.Suma_=ТабЗн.С;---------Не соответствие типов!
    ДБФ.Записать();
    КонецЕсли;
КонецПроцедуры

Число(ТабЗн.С)?

ДобавитьПоле (<Название>,<Тип>,<Длина>,<Точность>)

где дабавить число

либо так:
           ТабЗн.С=Число(Сред(НашаСтрока,9,СтрДлина(НашаСтрока)-9));

либо так:
    ДБФ.Suma_=Число(ТабЗн.С);

ДБФ.ДобавитьПоле("Suma_","N",16,0);
.................
ДБФ.Suma_ = 0+ТабЗн.С;