Помогите, пожалуйста, найти обработку для выгрузки расходных накладных в формате mmo (отпуск медпрепаратов в аптеку). Конфигурация 1С 7.7 "Бухгалтерский учет" 278-ой релиз.

Делал загрузку файлов mmo из ликиса, выгрузку не приходилось. Для загрузки файлы прекрасно обрабатываются как ДБФ. Может реализация выгрузки в ДБФ с последующим изменением расширения поможет, но я не проверял.

З.Ы. Когда реализовывал загрузку файлов из Ликиса, то от одной фирмы приходили файлы в каждой строке которых в поле коментариев было "ММО придумали те кто неосилил ХМЛ"

))

Могу поделится только примером (как выгрузки, так и загрузки)- самописка у меня, Вам придется допиливать.

VasilyKushnir, теме почти год

+ к прыдыдущему: область применения похожа - работаю на аптечной базе - выгрузка естественно на аптеки.

Не обратил на дату внимания...

Хоть теме и год, но немогли бы вы выложить примерчик или скинуть мне на мыло testuser666[dog]mail[dot]ru

Добрый день! Помогите пожалуйста выгрузить расходные накладные с 1С 7.7 в формате ММО! Аптека не принимает товар!!

Добрый день! Может быть, это будет Вам полезно?

Раз = Симв(9); //разделитель   
                
    Текст = СоздатьОбъект("Текст");
    Текст.ДобавитьСтроку("РАСХОДНАЯ_НАКЛАДНАЯ"+Раз+СокрЛП(Фирма.ЕГРПОУ)+Раз+СокрЛП(Контрагент.ЕГРПОУ)+Раз+"версия_3");
    Текст.ДобавитьСтроку(НомерНакл+Раз+СокрЛП(ДатаДок)+Раз+НомерНакл+Раз+СокрЛП(Фирма.ПолнНаименование)+Раз +СокрЛП(Фирма.СчетПоУмолчанию.БанкНазвание)
+Раз+СокрЛП(Фирма.СчетПоУмолчанию.БанкСчет)+Раз+СокрЛП(Фирма.СчетПоУмолчанию.БанкМФО)+Раз+СокрЛП(Фирма.Телефоны)+Раз+СокрЛП(Фирма.ПочтовыйАдрес)+Раз+""+Раз+""+Раз+Итог("СуммаБезНДС")+Раз+Итог("СуммаСНДС")+Раз+""+Раз+"1"+Раз+"1"+Раз+"2");
    Текст.ДобавитьСтроку("");
    ВыбратьСтроки();
    Пока ПолучитьСтроку()=1 Цикл     
            Гр = Товар.НоменклатурнаяГруппа;
        Текст.ДобавитьСтроку(СокрЛП(Товар.Код)+Раз+СокрЛП(Товар.ПолнНаименование)+Раз+СокрЛП(Гр.Код)+Раз+СокрЛП(Гр.Наименование)+
            Раз+""+Раз+""+Раз+""+Раз+""+Раз+"20"+Раз+""+Раз+"*"+Раз+""+Раз+""+Раз+""+Раз+
            СокрЛП(Единица)+Раз+СокрЛП(Количество)+Раз+""+Раз+""+Раз+""+Раз+СокрЛП(ЦенаСНДС)+Раз+СокрЛП(СуммаСНДС));
    КонецЦикла;      
    
    Текст.Записать(ИмяФайла);  
    Сообщить("Накладная записана!!!");

очень похоже на обмен с КПК.

Добрый день. Не могли бы поделится примерами (jorick_best@mail.ru)? Заранее благодарен.

VasilyKushnir, Здравствуйте, поделитесь пожалуйста обработкой для файлов *.mmo dedov1976@ukr.net Спасибо.