Список форумов forum.rasskazovo.ru forum.rasskazovo.ru
Форум Городского Портала
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

Про 1С

 
Начать новую тему   Ответить на тему    Список форумов forum.rasskazovo.ru -> Компьютеры / Оргтехника
Предыдущая тема :: Следующая тема  
Автор Сообщение
romnik
Старожил


Зарегистрирован: 17.03.2005
Сообщения: 141
Откуда: Рассказово

СообщениеДобавлено: Ср 30 Мар 2005 12:29    Заголовок сообщения: Про 1С Ответить с цитатой

Народ, кто здесь на форуме в 1C чуть-чуть соображает? Помощь нужна в написании одной простенькой обработки.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
BES_com
Абориген


Зарегистрирован: 13.11.2004
Сообщения: 627
Откуда: Местный

СообщениеДобавлено: Ср 30 Мар 2005 16:09    Заголовок сообщения: Ответить с цитатой

forum.mista.ru там много спецов, но с глупыми вопросами лучше не суваться к ним - обласкают.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
romnik
Старожил


Зарегистрирован: 17.03.2005
Сообщения: 141
Откуда: Рассказово

СообщениеДобавлено: Чт 31 Мар 2005 07:00    Заголовок сообщения: Ответить с цитатой

Я вообще то типа к тебе и обращался(проскакивала инфа что ты с 1С занимаешся). А вопрос у меня как раз и глупый: как из строчной части документа вывести данные в DBF таблицу?Вот
пример кода который нужно доработать:

Процедура Выгрузить_в_DBF()
ДБФ=СоздатьОбъект("XBase");
ДБФ.ДобавитьПоле("NPD","S",6,0);
ДБФ.ДобавитьИндекс("NPD","NPD",0,1,"");
ДБФ.СоздатьФайл(КаталогВременныхФайлов()+"1cv7.dbf",КаталогВременныхФайлов()+"1cv7.cdx");
Выбратьстроки();
Пока Выбратьстроки()=1 Цикл
СТР=КоличествоСтрок()-1;
Пока СТР>0 Цикл
ДБФ.Добавить();
ДБФ.NPD=нпд;
ДБФ.Записать();
СТР=СТР-1;
КонецЦикла;
КонецЦикла;
ДБФ.ЗакрытьФайл();
КонецПроцедуры

Мне нужно чтобы реквизит табличной части "нпд" записывался в таблицу. Строк в табличной части несколько. Так вот вопрос как организовать перебор табличной части дока с записью в DBF ?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Гость






СообщениеДобавлено: Чт 31 Мар 2005 09:02    Заголовок сообщения: Ответить с цитатой

Если файл ДБФ создается нормально, то:

Выбратьстроки();
Пока Выбратьстроки()=1 Цикл
ДБФ.Добавить();
ДБФ.NPD=нпд;
ДБФ.Записать();
КонецЦикла;
Вернуться к началу
BES_com
Абориген


Зарегистрирован: 13.11.2004
Сообщения: 627
Откуда: Местный

СообщениеДобавлено: Чт 31 Мар 2005 09:04    Заголовок сообщения: Ответить с цитатой

Забыл подписаться.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
romnik
Старожил


Зарегистрирован: 17.03.2005
Сообщения: 141
Откуда: Рассказово

СообщениеДобавлено: Чт 31 Мар 2005 09:51    Заголовок сообщения: Ответить с цитатой

не не работает. Цикл не завершается остановить можно только по ESC
DBF появляется но строчки все пустые. Где закавыка?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
romnik
Старожил


Зарегистрирован: 17.03.2005
Сообщения: 141
Откуда: Рассказово

СообщениеДобавлено: Ср 13 Апр 2005 06:58    Заголовок сообщения: Ответить с цитатой

Можт кому интересно:
Нужно было написать

Выбратьстроки();
Пока Получитьстроку()>0 Цикл
ДБФ.Добавить();
ДБФ.NPD=нпд;
ДБФ.Записать();
КонецЦикла;

Сразу и не догадался, что ВыбратьСтроки и ПолучитьСтроку это две большие разницы...
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов forum.rasskazovo.ru -> Компьютеры / Оргтехника Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
You can attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group
Русская поддержка phpBB