Доброе утро, господа.
Мож. кто делал бух.1.6. ?

Заранее признателен

согласен с (0) - может кто и делал

(1) мож. кто поделиться?

возможно и поделится, откуда такая неуверенность?

1С-ные братья и сестры, я в ВАС уверен, поделитесь, помогите коллеге.

Рисуй сам, я недавно ТОРГ-3 спрашивал, нарисовал :)

Спасибо на добром слове. А как же взаимовыручка?

Gooogle вам поможет =) я лично там нашел!

см. на инфостарте, там есть

есть, без модуля

(9) Модуль есть, его не видно

Я делала обе формы.
Для УПП, правда, но к БП прикрутить их не проблема.
А раз речь зашла о взаимовыручке - мне нужен (для любой восьмерочной конфигурации) документ "отгрузки с передачей права собственности".
Баш на баш я вполне согласна.

Добавил Реквизит - Ссылка, тип Документ перемещенеи, Добавил Модуль:

Функция ПолучитьФамилиюИмяОтчество(Фамилия = " ", Имя = " ", Отчество = " ", ФИОКратко = Истина) Экспорт
   
   Если ФИОКратко Тогда
       Возврат ?(НЕ ПустаяСтрока(Фамилия), Фамилия + ?(НЕ ПустаяСтрока(Имя)," " + Лев(Имя,1) + "." +
               ?(НЕ ПустаяСтрока(Отчество) ,
               Лев(Отчество,1)+".", ""), ""), "");
   Иначе
       Возврат ?(НЕ ПустаяСтрока(Фамилия), Фамилия + ?(НЕ ПустаяСтрока(Имя)," " + Имя +
               ?(НЕ ПустаяСтрока(Отчество) , " " + Отчество, ""), ""), "");
   КонецЕсли;

КонецФункции // ПолучитьФамилиюИмяОтчество()

Функция Печать() Экспорт
   Перем Запрос, ВыборкаШапки, ВыборкаТоваров; // Определяем переменные, используемые
   Перем ТабДокумент, Макет, ОбластьМакета;     // в нашей обработке
   
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект);
   Запрос.Текст = "
       |ВЫБРАТЬ
       |    Док.Номер КАК НомерДокумента,
       |    Док.Дата КАК ДатаДокумента,
       |    Док.Организация,
       |    Док.СкладОтправитель КАК СО,
       |    Док.СкладПолучатель КАК СП
       |
       |ИЗ
       |    Документ.ПеремещениеТоваров КАК Док
       |ГДЕ
       |    Док.Ссылка = &ТекущийДокумент";
   ВыборкаШапки = Запрос.Выполнить().Выбрать();    // Собираем данные пол шапке документа
   ВыборкаШапки.Следующий();
   
   Запрос.Текст = "
       |ВЫБРАТЬ
       |    Док.НомерСтроки,
       |    Док.Номенклатура.Код КАК ТоварКод,
       |    Док.Номенклатура.Представление КАК ТоварНаименование,
       |    Док.Количество,
       |    Док.ЦенаВРознице КАК Цена,
       |    Док.СуммаВРознице КАК Сумма
       |ИЗ
       |    Документ.ПеремещениеТоваров.Товары КАК Док
       |ГДЕ
       |    Док.Ссылка = &ТекущийДокумент";
   ВыборкаТоваров = Запрос.Выполнить().Выбрать();    // Собираем данные по товарам документа
   
   ТабДокумент = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("МХ1");            // Получаем оригинальный макет который
                                                                          // храниться в нашей обработке
                                           
   // Выводим заголовок документа
   ОбластьМакета = Макет.ПолучитьОбласть("Страница1");
   
   ТабДокумент.Вывести(ОбластьМакета);        
   
   СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(ВыборкаШапки.Организация, ВыборкаШапки.ДатаДокумента);
   ПредставлениеОрганизации = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОбОрганизации, "ПолноеНаименование,");
   
   ОбластьМакета.Параметры.ПредставлениеОрганизации = ПредставлениеОрганизации;
     ОбластьМакета.Параметры.ОрганизацияПоОКПО=ФормированиеПечатныхФорм.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(
                                   ВыборкаШапки.Организация, ВыборкаШапки.ДатаДокумента),
                                   "КодПоОКПО,");
   ТабДокумент.Вывести(ОбластьМакета);
   
   // Выводим шапку таблицы
   ОбластьМакета = Макет.ПолучитьОбласть("Шапка");
   ТабДокумент.Вывести(ОбластьМакета);
   
   // Выводим строки таблицы
   ОбластьМакета = Макет.ПолучитьОбласть("Строка");
   Пока ВыборкаТоваров.Следующий() Цикл
       ОбластьМакета.Параметры.Номер = ВыборкаТоваров.НомерСтроки;
       ОбластьМакета.Параметры.ТоварКод = ВыборкаТоваров.Код;
       ОбластьМакета.Параметры.БазоваяЕдиницаНаименование=ВыборкаТоваров.ЕдиницаИзмерения.Наименование;
       ОбластьМакета.Параметры.БазоваяЕдиницаКодПоОКЕИ=ВыборкаТоваров.ЕдиницаИзмерения.Код;
       ОбластьМакета.Параметры.ТоварНаименование = ВыборкаТоваров.Номеклатура;
       ОбластьМакета.Параметры.Количество = ВыборкаТоваров.Количество;
       ОбластьМакета.Параметры.Цена = ВыборкаТоваров.Цена;
       ОбластьМакета.Параметры.Сумма = ВыборкаТоваров.Сумма;
       ТабДокумент.Вывести(ОбластьМакета);
   КонецЦикла;
   
   // Выводим секцию с итоговой суммой
   ОбластьМакета = Макет.ПолучитьОбласть("ИтогоПоСтранице");
   //ОбластьМакета.Параметры.Всего = ОбщегоНазначения.ФорматСумм(ВыборкаШапки.СуммаДокумента,
   //                                         ВыборкаШапки.Валюта);
   ТабДокумент.Вывести(ОбластьМакета);
   
   // Выводим секцию для подписей сторон
   
   
   ОбластьМакета = Макет.ПолучитьОбласть("Подвал");
   Отбор = Новый Структура("СтруктурнаяЕдиница");
   Отбор.СтруктурнаяЕдиница = ВыборкаШапки.СО.Ссылка;
   СрезПоследних   = РегистрыСведений.ОтветственныеЛица.СрезПоследних(ТекущаяДата(), Отбор);
   Если СрезПоследних.Количество() < 1 Тогда
       ЗНФИО = Неопределено;
   Иначе
       ЗНФИО = СрезПоследних[0].ФизическоеЛицо;
   КонецЕсли;
   
   ФИОСрез = РегистрыСведений.ФИОФизЛиц.ПолучитьПоследнее(,Новый Структура("ФизЛицо",ЗНФИО));
   
   Фамилия  = ФИОСрез.Фамилия;
   Имя      = ФИОСрез.Имя;
   Отчество = ФИОСрез.Отчество;
   

   ОбластьМакета.Параметры.СдалФИО=ПолучитьФамилиюИмяОтчество(Фамилия,Имя, Отчество);
   ОбластьМакета.Параметры.Сдал=СокрП(ЗНФИО);

   Отбор = Новый Структура("СтруктурнаяЕдиница");
   Отбор.СтруктурнаяЕдиница = ВыборкаШапки.СП.Ссылка;
   СрезПоследних   = РегистрыСведений.ОтветственныеЛица.СрезПоследних(ТекущаяДата(), Отбор);
   Если СрезПоследних.Количество() < 1 Тогда
       ЗНФИО = Неопределено;
   Иначе
       ЗНФИО = СрезПоследних[0].ФизическоеЛицо;
   КонецЕсли;
   
   ФИОСрез = РегистрыСведений.ФИОФизЛиц.ПолучитьПоследнее(,Новый Структура("ФизЛицо",ЗНФИО));
   
   Фамилия  = ФИОСрез.Фамилия;
   Имя      = ФИОСрез.Имя;
   Отчество = ФИОСрез.Отчество;
   

   ОбластьМакета.Параметры.ПринялФИО=ПолучитьФамилиюИмяОтчество(Фамилия,Имя, Отчество);
   ОбластьМакета.Параметры.Принял=СокрП(ЗНФИО);
   
   ТабДокумент.Вывести(ОбластьМакета);
           
   Возврат ТабДокумент;
КонецФункции // Печать()
В отладчике проверял значения заполняются, но почему-то не выводится, выводится пустая форма макета, т.е. без значений. В чем не прав?