Вопрос № 102238: Добрый день эксперты.
У меня вот такая проблемка.
Есть база на 7-ке, Торговля переписанная очень сильно - далеко ушла от стандартной.
Сечас фирма купила 8.0 "Управление торговлей для Украины" и в нее необходимо перенести следующ...Вопрос № 102300: Здравствуйте, очередной вопрос
Возможно ли в 1С создать текстовый файл для выгрузки с разными названиями причем названия должны быть типа "НомерДоговора.Раширение" т.е в каждом файле будет одна строка данных.
Если возможно то ...
Вопрос № 102.238
Добрый день эксперты.
У меня вот такая проблемка.
Есть база на 7-ке, Торговля переписанная очень сильно - далеко ушла от стандартной.
Сечас фирма купила 8.0 "Управление торговлей для Украины" и в нее необходимо перенести следующие данные: Все товары из спр.Товары и их остатки.
Я написал небольшую обработку которая выгружает в текстовый файл данные, а вот написать загрузку в 80 не могу.
Прошу вашей помощи. Подскажите, какой текст обработки должен быть для загрузки из текстового файла данных в 8-ку.
Пожалуйста приложите текст обрабатывающий файл и загружающий данные.
Заранее большое спасибо за помощь.
Приложение:
Отправлен: 16.09.2007, 17:46
Вопрос задал: CERBER (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 11)
Отвечает: Яна
Здравствуйте, CERBER!
Рекомендую выгрузить в xml и почитать в синтакс-помощнике в 8.0 про функции для работы с xml.
Ответ отправила: Яна (статус: Студент)
Ответ отправлен: 16.09.2007, 18:06 Оценка за ответ: 3 Комментарий оценки: Спасибо за совет, но дело в том, что я не знаю как это делается, я раньше никогда не писал выгрузки и загрузки ни в какой стандарт, вот под руки попалась выгрузка и загрузка для 77 я по ее примеру написал выгрузку в текстовый файл а вот загрузку не могу. Если есть примеры пришлите на CERBER_2000@List.ru буду очень благодарен.
Вопрос № 102.300
Здравствуйте, очередной вопрос
Возможно ли в 1С создать текстовый файл для выгрузки с разными названиями причем названия должны быть типа "НомерДоговора.Раширение" т.е в каждом файле будет одна строка данных.
Если возможно то как?
Заранее спасибо!
Отправлен: 17.09.2007, 10:56
Вопрос задал: Diamondes (статус: Посетитель)
Всего ответов: 7 Мини-форум вопроса >>> (сообщений: 4)
Записать(<?>);
Синтаксис:
Записать(<ИмяФайла>)
Назначение:
Записать текст в файл с указанным именем.
Параметры:
<ИмяФайла> - строка с именем файла.
Ответ отправил: Dmitry Stashenko (статус: 10-ый класс)
Ответ отправлен: 17.09.2007, 11:10 Оценка за ответ: 4 Комментарий оценки: Спасибо за совет конечно хотя и не полностью
Отвечает: Маргарита
Здравствуйте, Diamondes!
Конечно же можно. Например так:
1. Создаем таблицу;
2. Задаем имя файла;
3. Записываем нужную строку в таблицу;
4. Выводим секцию таблицы;
5. записываем в файл.
Удачи!
Приложение:
Ответ отправила: Маргарита (статус: 1-ый класс)
Ответ отправлен: 17.09.2007, 11:13
Отвечает: DERL.KG
Здравствуйте, Diamondes!
Конечно можно:
Т = СоздатьОбъект("Текст");
Т.ДобавитьСтроку("тут вставляем что нужно");
Т.Записать("C:1Сфайл1.txt");
Ответ отправил: DERL.KG (статус: 5-ый класс)
Ответ отправлен: 17.09.2007, 11:42
Отвечает: Сергей
Здравствуйте, Diamondes!
Вот пример как создать, то что вы хотели, (сохранение документа в формате Word)
Цикл //перебор нужных договоров
// теперь создаем документ
Попытка
Word = СоздатьОбъект("Word.Application");
Исключение
Предупреждение("Чего-то не получается");
возврат;
КонецПопытки;
Word.Documents.Add();
Word.Selection.TypeText(ДанныеПоДоговору); // или что вы хотели выгрузить
ПутьКФайлу = "C:" + НомерДоговора; // на диске с создается документ Word с именем НомерДоговора
Word.SaveAs(ПутьКФайлу);
// где Путк файлу
КонецЦикла
а как текстовый файл создается вам вроде уже объяснили
если что не ясно пишите...
Ответ отправил: Сергей (статус: 10-ый класс)
Ответ отправлен: 17.09.2007, 12:59 Оценка за ответ: 3 Комментарий оценки: Не понятно к чему тут Word. поэтому за старания
Отвечает: Pycuk
Здравствуйте, Diamondes
Тхт=СоздатьОбъект("Текст");
Док=СоздатьОбъект ("Документ.НужныйДокумент");
Док.ВыбратьДокументы();
Пока Док.ПолучитьДокумент()=1 цикл
// Далее условие по которому необходимо отбирать документы которые надо
// записать в текстовый файл. Я в качестве примера выбираю все непровиденные а
// после записи в текстовый файл провожу.
Если Док.Проведен()=0 тогда
Стр="";
Тхт="";
ИмяФайла=Строка("A:"+СокрЛП(Док.НомерДоговора)+"."+СокрЛП(Док.Раширение));
//Расширение в даном случае это поле ввода расположеное на форме документа
// Предположим что нужно записать следующие реквезиты документа:
// Фамилия, Имя, Отчество
// Но чем раздилять реквезиты ведь в них могут быть пробелы и тогда при
// загрузке из этого файла получится непонятно что. Я выбрал символ |
// Запись будет выглядеть так: Иванов|Иван|Иванович
Стр=Строка(СокрЛП(Док.Фамилия)+"|"+СокрЛП(Док.Имя)+"|"+СокрЛП(Док.Отчество);
Тхт.ДобавитьСтроку(Стр);
Тхт.Записать(ИмяФайла);
Док.Провести();
КонецЕсли;
КонецЦикла;
// В Приложении пример без коминтариев
Приложение:
Ответ отправил: Pycuk (статус: 1-ый класс)
Ответ отправлен: 17.09.2007, 14:41 Оценка за ответ: 5 Комментарий оценки: Спасибо за полный ответ
Отвечает: Владимир (1С)
Здравствуйте, Diamondes!
Да, это обычная выгрузка накладной в файл, имя файла программно сформировать из названия документа. Тоекст обработки в приложении, на форму поместите диалог выбора периода (поля типа Дата НачДата и КонДата), кнопке Сформировать пропишите формулу Сформировать().
Готовую обработку можно скачать с http://mbload.com/3375293 (6 кб), доступен до 2007-10-17 15:03:34.
Успехов! Владимир.
Приложение:
Ответ отправил: Владимир (1С) (статус: 4-ый класс)
Ответ отправлен: 17.09.2007, 15:07 Оценка за ответ: 5 Комментарий оценки: Спасибо!
Отвечает: Иванов Алексей Владимирович
Здравствуйте, Diamondes!
Можно. И, к примеру в версии 7.7, делается это при помощи объекта "Текст", у которого есть методы "ДобавитьСтроку(<Строка>)" и "Записать(<ИмяФайла>)".
Т. е. в вашем случае это будет конструкция вида:
.....
Т = СоздатьОбъект("Текст");
Т.ДобавитьСтроку(СтрокаДанных);
Т.Записать("C:" + Строка(НомерДоговора) + "." + Расширение);
.....
