8.х УТ Накладная за поставщика

Тема в разделе ""1С:Управление торговлей УТ"", создана пользователем antylopa, 27 ноя 2008.

  1. TopicStarter Overlay
    antylopa
    Offline

    antylopa

    Регистрация:
    27 ноя 2008
    Сообщения:
    11
    Симпатии:
    0
    Баллы:
    1
    Помогите, пожалуйста.
    В печатной форме накладной ТОРГ12 за поставщика не видно Ф.И.О. ген. директора и глав. буха контрагента.
    это значит, что неправильно забит сам контрагент в справочнике?
    у меня эти лица указаны во вкладке "Контакты"
  2. lazy
    Offline

    lazy Модераторы Команда форума Модератор

    Регистрация:
    1 сен 2007
    Сообщения:
    2.127
    Симпатии:
    4
    Баллы:
    29
    Это может также означать, что кода выводящего эти фамилии в печатную форму нет в конфигурации. Какая у Вас версия УТ?
  3. TopicStarter Overlay
    antylopa
    Offline

    antylopa

    Регистрация:
    27 ноя 2008
    Сообщения:
    11
    Симпатии:
    0
    Баллы:
    1
  4. x_under
    Offline

    x_under Модераторы Команда форума Модератор

    Регистрация:
    25 апр 2007
    Сообщения:
    2.576
    Симпатии:
    13
    Баллы:
    29
    Кода действительно нет. Но можно дописать внешнюю печатную форму, которая будет это делать
  5. TopicStarter Overlay
    antylopa
    Offline

    antylopa

    Регистрация:
    27 ноя 2008
    Сообщения:
    11
    Симпатии:
    0
    Баллы:
    1
    Спасибо.
    а скажите, куда они в принципе вбиваются?
  6. Senya
    Offline

    Senya Опытный в 1С

    Регистрация:
    6 июн 2006
    Сообщения:
    594
    Симпатии:
    0
    Баллы:
    26
    Два варианта.
    1. В процедуру ПечатьТОРГ12 модуля документа перед выводом области подвала вставить например такой код (ищем по ролям контактного лица):
    Код:
        // Вывод должностных лиц
    ГлБух    = Справочники.РолиКонтактныхЛиц.НайтиПоКоду("000000005");
    Дир        = Справочники.РолиКонтактныхЛиц.НайтиПоКоду("000000004");
    
    Запрос    = Новый Запрос;
    Запрос.Текст    = "ВЫБРАТЬ
    |    КонтактныеЛицаКонтрагентов.КонтактноеЛицо,
    |    КонтактныеЛицаКонтрагентов.РольКонтактногоЛица,
    |    КонтактныеЛицаКонтрагентов.Должность,
    |    КонтактныеЛицаКонтрагентов.КонтактноеЛицо.Фамилия КАК Фамилия,
    |    КонтактныеЛицаКонтрагентов.КонтактноеЛицо.Имя КАК Имя,
    |    КонтактныеЛицаКонтрагентов.КонтактноеЛицо.Отчество КАК Отчество
    |ИЗ
    |    Справочник.КонтактныеЛицаКонтрагентов КАК КонтактныеЛицаКонтрагентов
    |ГДЕ
    |    КонтактныеЛицаКонтрагентов.Владелец = &Владелец
    |    И КонтактныеЛицаКонтрагентов.РольКонтактногоЛица = &Роль";
    Запрос.УстановитьПараметр("Владелец", СсылкаНаОбъект.Контрагент);
    // Для директора
    Запрос.УстановитьПараметр("Роль", Дир);
    Рез            = Запрос.Выполнить();
    Если Не Рез.Пустой() Тогда 
    Разрешил    = Рез.Выбрать();
    Разрешил.Следующий();
    ОбластьПодвала.Параметры.ДолжностьРуководителя    = СокрЛП(Разрешил.Должность);
    ОбластьПодвала.Параметры.ФИОРуководителя        = СокрЛП(Разрешил.Фамилия) + ?(ЗначениеЗаполнено(Разрешил.Имя)," " + ВРег(Лев(Разрешил.Имя,1))+".","") +
    ?(ЗначениеЗаполнено(Разрешил.Отчество),ВРег(Лев(Разрешил.Отчество,1))+".","");
    КонецЕсли;
    // Для бухгалтера                                                    
    Запрос.УстановитьПараметр("Роль", ГлБух);
    Рез            = Запрос.Выполнить();
    Если Не Рез.Пустой() Тогда 
    Разрешил    = Рез.Выбрать();
    Разрешил.Следующий();
    ОбластьПодвала.Параметры.ФИОГлавБухгалтера        = СокрЛП(Разрешил.Фамилия) + ?(ЗначениеЗаполнено(Разрешил.Имя)," " + ВРег(Лев(Разрешил.Имя,1))+".","") +
    ?(ЗначениеЗаполнено(Разрешил.Отчество),ВРег(Лев(Разрешил.Отчество,1))+".","");
    КонецЕсли;
    
    
    2. Воспользоваться внешней печатной формой. Сразу скажу - она для УПП. Возможно для УТ необходимо будет её подправить.
    Успехов.

    Вложения:

    • Т12_1.epf
      Размер файла:
      29,8 КБ
      Просмотров:
      44

Поделиться этой страницей