Модераторы: stron
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как напечатать адрес текущего сотрудника? 1с 8.2 
:(
    Опции темы
Nia
Дата 10.7.2012, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 20
Регистрация: 14.2.2011

Репутация: нет
Всего: нет
(Внешняя печатная форма)

Добрый день всем.
С 1с начал осваиваться недавно.
Не получается вывести в документ MS Word юридический адрес сотрудника, по которому производится печать трудового договора.
Если выборка идёт в цикле, то печатается последний адрес из выборки.
Если запрос без цикла - печатается пустая строка.

Код

Запрос = Новый Запрос;
   Запрос.Текст = 
      "ВЫБРАТЬ
      |   КонтактнаяИнформация.Представление
      |ИЗ
      |   РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация";

   Результат = Запрос.Выполнить();

   ВыборкаДетальныеЗаписи = Результат.Выбрать();

   Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
      // Вставить обработку выборки ВыборкаДетальныеЗаписи

   КонецЦикла;

   //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    МестоЖительстваРаботника=ВыборкаДетальныеЗаписи.Представление;


      // Вставить обработку выборки ВыборкаДетальныеЗаписи
 - вот тут полагаю нужно прописывать условие выхода из цикла, если найден текущий сотрудник (по которому в данный момент времени производится печать договора), только вот не понятно, что писать (какие буковки, слова).
 




Это сообщение отредактировал(а) Nia - 10.7.2012, 13:30
PM MAIL   Вверх
SaschaL
Дата 10.7.2012, 17:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9
Если подразумевается что выводяться данные по одному сотруднику, то все навсего нужно указать условие запроса и установить параметр запроса. и в так случае у вас рузультат запроса будет только по одному сотруднику.
Если не понятно как это передать то могу и кинуть кусок кода.

Добавлено через 2 минуты и 36 секунд
Вот мы недавно разбирали подобную ситуацию, погдядите ссылку
PM MAIL ICQ   Вверх
Niakita
  Дата 11.7.2012, 12:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 22.12.2010

Репутация: нет
Всего: нет
Непонятно как передать - скиньте кусок кода, будем рады.

Насколько понял Справочник отличается от Регистра сведений.
Чтобы получить информацию из справочника оказалось достаточным просто написать полную ссылку на то что нужно.

Код

ТекущийСотрудникНаименование = СсылкаНаОбъект.Наименование; 


У реквизита СсылкаНаОбъект установлен Тип=СправочникСсылка.СотрудникиОрганизаций

С Регистром сведений - так не получилось.
PM MAIL   Вверх
SaschaL
Дата 11.7.2012, 16:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9
Скиньте лучше вы внешнюю печатную форму я прямо на ней попытасю сделать а вы потом проверите гтовое , а лисниг кода выложим для всех участников форума, думаю кому-то это будет тоже полезно
PM MAIL ICQ   Вверх
Niakita
Дата 11.7.2012, 17:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 22.12.2010

Репутация: нет
Всего: нет
Внешняя печатная форма Трудового договора.


Присоединённый файл ( Кол-во скачиваний: 4 )
Присоединённый файл  ТрудовойДоговор.epf 25,17 Kb
PM MAIL   Вверх
SaschaL
Дата 12.7.2012, 12:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9
Добрый день! Вот что ядобавил в коде для получения нужных сведений из регистра сведений
Код

Функция Печать() Экспорт
    
    //ВЫБОРКА ЗНАЧЕНИЙ
    //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
    Сотрудник = СсылкаНаОбъект;
    Запрос = Новый Запрос;
    Запрос.Текст = 
    "ВЫБРАТЬ
    |    КонтактнаяИнформация.Представление,
    |    КонтактнаяИнформация.Объект,
    |    КонтактнаяИнформация.Тип,
    |    КонтактнаяИнформация.Вид
    |ИЗ
    |    РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация";
    
    Запрос.УстановитьПараметр("Объект",Сотрудник);
    Запрос.УстановитьПараметр("Тип",Перечисления.ТипыКонтактнойИнформации.Адрес);
    Запрос.УстановитьПараметр("Вид",Справочники.ВидыКонтактнойИнформации.ЮрАдресФизЛица);
    
    Результат = Запрос.Выполнить();
    
    ВыборкаДетальныеЗаписи = Результат.Выбрать();



Добавлено через 3 минуты и 17 секунд
Еще маленький совет, для быстрой отладки запросов с реальным выводом результата запроса пользуйдесь универсально обработкой "Консоль запросов". Тогда сразу будет видно что и сколько попадает в запрос, прицепляю её к сообщению. Уверен кому то понадобиться, а так то она в свободном доступе в интернете имеется

Присоединённый файл ( Кол-во скачиваний: 3 )
Присоединённый файл  КонсольЗапросов.epf 38,67 Kb
PM MAIL ICQ   Вверх
Niakita
Дата 15.7.2012, 13:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 22.12.2010

Репутация: нет
Всего: нет
Ваш вариант не хочет работать - сопротивляется.
Скрин:
user posted image

За консоль спасибо  - Няшная вещь.
До этого пользовался другой, работала только в режиме управляемого приложения, была странной.

Это сообщение отредактировал(а) Niakita - 15.7.2012, 13:19
PM MAIL   Вверх
SaschaL
Дата 16.7.2012, 06:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9
Попробуйте уменьшить количество параметров в запросе, я пробовал на конфигураци УПП. Возможно что есть небольшая разница.
А эта консоль написана специально под обычное приложение, в нете есть и под управляемое приложение.
PM MAIL ICQ   Вверх
Niakita
Дата 16.7.2012, 18:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 22.12.2010

Репутация: нет
Всего: нет
1c 8.2
Конфигурация Комплексная автоматизация, редакция 1.1

Всё зашаманил.
Ано долго сопротивлялась - не очень хотела, но мы победили.
Код


 //------------------------------------------------------------------------//
  Сотрудник = СсылкаНаОбъект.Наименование;
  ВидАдреса = "000000002"; 
  
    //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |    КонтактнаяИнформация.Представление,
        |    КонтактнаяИнформация.Объект.Наименование,
        |    КонтактнаяИнформация.Вид.Код
        |ИЗ
        |    РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
        |ГДЕ
        |    КонтактнаяИнформация.Объект.Наименование = &Наименование
        |    И КонтактнаяИнформация.Вид.Код = &Код";

    Запрос.УстановитьПараметр("Код", ВидАдреса);
    Запрос.УстановитьПараметр("Наименование", Сотрудник);

    Результат = Запрос.Выполнить();

    ВыборкаДетальныеЗаписи = Результат.Выбрать();

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        // Вставить обработку выборки ВыборкаДетальныеЗаписи
    КонецЦикла;

    //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА


    МестоЖительстваРаботника=ВыборкаДетальныеЗаписи.Представление;



Очень помогло в решении вопроса вот это:
Цитата

Сотрудник = СсылкаНаОбъект;

Пришлось только немного дописать.
Спасибо за помощь и терпение.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "1C: Предприятие, SAP, ERP и учётные системы"
stron

Запрещается!

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

2. Давать ссылки на взломанные продукты

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, stron, Pegas.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.6129 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.