Всем привет, собсно сабж.
ТЗ в 7.7 сохраняется с помощью ЗначениеВФайл().
К инфостарту не отправлять.

А в яндекс можно отправлять?

(0)КомОбъект не работает для передачи в 8.х. Вообще для чего это нужно?

Прежде чем сюда писать и яндекс и гугл спросил

(0) а каков по вашему алгоритм работы такой функции?

(2) Комы не катят в данном случае, есть механизм.
Есть обмен доками между филиалами, работает схема переноса с помощью файлов

(5) не получишь ты его в 8. ошибка типов будет. делай через КД.

(5) ну наймите программиста. он вам сделает.

так это чо - доки хотим через ТЗ переносить?

V77Exp.ert предлагать?

(5) Хреновый механизм у вас. Общепринято обмениваться через XML...

(4) Пример: у меня есть функции преобразования из 8.2 в 7.7 таблицыЗначений

(7) Он есть, и им пользуются, а хреновый или не хреновый, другой вопрос

(7) Да вот все предлагают нанять, а нанимаем - одна вода

(9) Это не то..

(13) а здесь тебе что будет? не вода чтоли. щас на 300 постов ветку накарябаем.

(14) это то. так предлагать?

не пугай человека конверташкой )

(13) огласи бюджет и будут тебе программисты

(17) а меня, значит, можно всякими извращениями пугать? ;)

(15) ставлю на 1000 постов. Сегодня ж четверг все таки, а завтра пятница.

(19) ты уже опытный и привычный ) И не такое небось видел.

(20) до 200. не больше

(15) Полоска мож. побольше будет
(17) Конвертация - не то(не в данном случае)

(0) Нахрена это делать?
Кто придумал это извращение?
Используйте COM, XML, DBF и т.д. для интеграции баз.

Ты вообще представляешь как эта функция работают и что придется тащить вместе с этим файлом?
Это даже не смешно.

(21) любуюсь:

    ТЗ = Новый ТаблицаЗначений;
    ТЗ.Колонки.Добавить("Док");
    ТЗ.Колонки.Добавить("Период");
    ТЗ.Колонки.Добавить("Сумма");
    ТЗ.Колонки.Добавить("Приход");
    ТЗЗапр = Новый ТаблицаЗначений;
    ТЗЗапр=Результат.Выгрузить(); //два поля: Док и Период
    
    Для Каждого Стр Из ТЗЗапр Цикл
        СтрНов=ТЗ.Добавить();
        СтрНов.Док=Стр.Док;
        СтрНов.Период=Стр.Период;
    КонецЦикла;    
    
    ТЗ.Сортировать("Период,Док");
    ТЗ.Свернуть("Период,Док","Сумма,Приход");

(24) До меня работали, пару филиалов осталось на 7.7 и перенос нужен.

(24) ну у них уже все работало. теперь видимо восьмерка подключилась, а переделывать ломы.

(27) Ну да, ломы. Нахрена переделывать, 7.7 умирает

(25) я ж тока пообедал!

(28) это хорошо, что ты раньше 40го поста сказал

(0) Предположим ситуацию: Завели новую номенклатуру в 7.7, завели документ с ее участием, выгрузили через ТЗ в файл. Что теперь делать на этапе загрузки в 8-ку? Как найти товар, которого нету? Как правильно заполнить необходимые реквизиты в 8-ке?

(28) Убей ее до конца.
Уверяю, писать преобразователь будет дороже чем перевести 10 организаций с 7.7 на 8.

(32) J_j

(31) Момент номенклатуры, контрагентов решен по-другому, предположим, что все справочные данные синхронизированы по умолчанию

(32) ну кому как. мне проще преобразователь написать. полдня работы и 10 тыс дохода.

(35) Хы хы...
За пол дня?
При условии что конфигурации могут меняться?
Не верю!

(36) какие конфигурации. ТЗ же просто. В ТЗ то наверное простые типы. числа да строки

(0) (37) Правильно?

(37) Наивный :)

(0) уж если совсем по деревянному, через mxl сделать и все. Делов то.

(34) Тогда не парься. В 7.7 пишешь:
ТЗ.ВыбратьСтроки();
тф = СоздатьОбъект("Текст");
Пока ТЗ.ПолучитьСтроку() Цикл
СтрокаДляЗаписи=ТЗ.Первое+"$"+ТЗ.Второе...;
тф.Добавить(СтрокаДляЗаписи);
КонецЦикла
тф.Записать(тут_имя_файла);

В 8-ке

Текст = Новый ЧтениеТекста("d:\win.txt", КодировкаТекста.ANSI);
Стр = Текст.ПрочитатьСтроку();
Пока Стр <> Неопределено Цикл
    //тут разбор по символу разделителю, поиск нужного в бд
    //и заполнение документа
    Стр = Текст.ПрочитатьСтроку();
КонецЦикла;

(39) что наивного?

(41) )) это уж крайняк, но спасибо

Пардон за рекламку:
http://forum.infostart.ru/forum24/topic30688/
как вариант

ну нету меня там

(37) Х.з. специально в нашей конфе глянул. Обработки для синхронизации баз (по ОЛЕ), занимаю: первая - 3238 строк, вторая 2490 строк.
Я такое за полдня не напишу.

(42) Ну может и я наивный. Надеялся что ТС делает выгрузку не с примитивными типами. Иначе смысл?

(43)А какая разница какой файлик будет?

(48) повода пофлудить на мисте не будет.

(47) да и какая разница. пусть и не примитывные. текст он и есть текст.
всё равно автор скажет, что ему действительно нужно в 150 посте. пока флудим.

(0)Зачем именно тз?
Просто пиши в файл типа .cvs с полями поиска в 8 .
в 8 поднимаешь и ищешь по полям поиска что надо.
Но лучше бы КД настроил и не парился

(51)КД это сложно !

(46) Да причем тут OLE

(48) Так этот велосипед работает

(51) Ну работает уже механизм, добавить что бы из 8.2 бухи в филиалы 7.7 выгружали эти файлики, сейчас обмен уже идет в таком формате

(52) Не сложно! -> (55)

(55)Код в студию

(55) Измени формат

какой код? Яж его просил))

(59)Скока денег?

(57) Код 7.7 - ЗначениеВФайл(Путь, ТЗ);
        преобразование
     Код 8.2 - ЗначениеИзФайла(Файл);

(61) так выгружай не в формате 1с, а во внешнем и сам клепай тз в 8.

(61) http://infostart.ru/public/120686/

+(61)

Попытка
    ПолученноеЗначение = ЗначениеИзФайла(ИмяФайла);
    Если ТипЗнч(ПолученноеЗначение) = Тип("ТаблицаЗначений") Тогда
        // обработка значения
    ИначеЕсли ТипЗнч(ПолученноеЗначение) = Тип("ДеревоЗначений") Тогда
        // обработка значения
    Иначе // Формат файла не опознан
        Текст = "ru=""Невозможно загрузить список отчетов из указанного файла!
                       |Выберите другой файл."";"
           + " en=""Impossible to load list of reports from selected file!
                       |Select other file.""";
        Предупреждение(НСтр(Текст));
    КонецЕсли;
Исключение
    Текст = "ru=""Невозможно загрузить список отчетов из указанного файла!
         |Выберите другой файл."";"
       + " en=""Impossible to load list of reports from selected file!
         |Select other file.""";
    Предупреждение(НСтр(Текст));
КонецПопытки;

(62) Да это понятно все что и через КД можно и через XML, Через ком и т.д.

(55) Если филиалы хочешь оставить, как есть, заведи у себя семерочную базу, в нее загружай из филиала, а уже из нее в снеговика по своим алгоритмам - оле или через текст, или как душе угодно.

(64)  ПолученноеЗначение = ЗначениеИзФайла(ИмяФайла); не катит "неверный формат файла"

все ведь просто ) комконектором цепляешься к любой восьмерошной базе , в ней создаешь таблицу значений , заполняешь , сохраняешь типа Com.ЗначениеВФайл(Таблица_Созданная_В_Восьмерке)
ну или наоборот , при получении файла цепляешься к семерке и средствами семерки загружаешь таблицу  . профит ))))

(65) дурак ? значениевфайл, 3 параметр. прочитай про него

(68) а вот это мысля)

(0)
Если ТЗ выгружается в хитрый файл, но в приемнике еще нет функции по чтению ТЗ из этого файла, то ты же можешь просто переделать функцию выгрузки из ЗначениеВФайл() на что нибудь более удобоваримое на стороне приемника, например см. (41), (51).

(67)Код 7.7 - ЗначениеВФайл(Путь, ТЗ, 0);

(68)КомОбъект не катит читай (5)

(73) почему. он имел ввиду тянуть от туда данные. а так мы конвертим тз :)

(73) В таком варианте возможно получится

(73) читай (70) :)

(74)Нужна функция преобразования выгруженной ТЗ из 7.7 в 8.х

(77) ну так читаем файлик с помощью 7, в 8 загоняем в ее тз вот тебе и преобразование :)

(78)Я предлагал в (2)

(77) я и описал такую функцию ) создаешь подключение к семерке и ее средствами читаешь таблицу , попутно ведя запись того что прочитал :)

(80)А сразу читать в свою?

(81)Запарился

Есть круче вариант !!!! Можно написать правила в КД лезть через УниверсальныйОбменДаннымиXML в 7.7 и загружать оттуда данные !

(81) Ага, но не так развернуто как в (68)

Лана, пасиб, буду пробовать, не получится, через Комы сделаю

(72)Тоже не прокатила?

(86) попробуем)