Ответ: Импорт данных из текстового файла в формате 2003,2004 гг
Пишу так(на языке 1С), но при записи в ДБФ файл ругается
Если Доходы.КоличествоСтрок()>16 Тогда ДоходыСтрок="№1"+chr(13)+chr(10);
Для вапр=1 по Доходы.КоличествоСтрок() Цикл
Если вапр<>Доходы.КоличествоСтрок() Тогда
ДоходыСтрок=ДоходыСтрок+Строка(Месяц[вапр])+","+Строка(КодДохода[вапр])+","+Строка(СуммаДохода[вапр])+","+Строка(КодВычетаПоДоходу[вапр])+Строка(СуммаВычетаПоДоходу[вапр])+chr(13)+chr(10);
Иначе
ДоходыСтрок=ДоходыСтрок+Строка(Месяц[вапр])+","+Строка(КодДохода[вапр])+","+Строка(СуммаДохода[вапр])+","+Строка(КодВычетаПоДоходу[вапр])+Строка(СуммаВычетаПоДоходу[вапр]); КонецЕсли;
КонецЦИкла;
Сообщить(ДоходыСтрок);
ДБФ.memo_dox='T';
ДБФ.str_memo=ДоходыСтрок;
КонецЕсли;
Спасибо.
Пишу так(на языке 1С), но при записи в ДБФ файл ругается
Если Доходы.КоличествоСтрок()>16 Тогда ДоходыСтрок="№1"+chr(13)+chr(10);
Для вапр=1 по Доходы.КоличествоСтрок() Цикл
Если вапр<>Доходы.КоличествоСтрок() Тогда
ДоходыСтрок=ДоходыСтрок+Строка(Месяц[вапр])+","+Строка(КодДохода[вапр])+","+Строка(СуммаДохода[вапр])+","+Строка(КодВычетаПоДоходу[вапр])+Строка(СуммаВычетаПоДоходу[вапр])+chr(13)+chr(10);
Иначе
ДоходыСтрок=ДоходыСтрок+Строка(Месяц[вапр])+","+Строка(КодДохода[вапр])+","+Строка(СуммаДохода[вапр])+","+Строка(КодВычетаПоДоходу[вапр])+Строка(СуммаВычетаПоДоходу[вапр]); КонецЕсли;
КонецЦИкла;
Сообщить(ДоходыСтрок);
ДБФ.memo_dox='T';
ДБФ.str_memo=ДоходыСтрок;
КонецЕсли;
Спасибо.
Комментарий