Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Подскажите функцию :)

manoff
читатель
офлайн
Дата регистрации: 26.01.2005
Сообщений: 91
Пост №1
 
22.09.2006 04:20

Что-то совсем заработался<br><br>Договор = СоздатьОбъект("Документ")<br>Делаю выборку за период<br><br>Далее необходимо проверить, что есть У Договор ЕСТЬ реквизит Сотрудник<br><br>Вопрос как?

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №2
 
22.09.2006 05:56

Так. по конкретнее нужно было бы.<br><br>1)Если необходимо проверить, что документ "Договор" содержит<br>реквизит "Сотрудник" то причём здесь СоздатьОбъект.<br>Это делается через перебор всех реквизитов в <br>документе "Договор" (Объект метаданных).<br><br>2) Если нужно проверить, что в документе "Договор" реквизит<br>"Сотрудник" заполнен (т.е. не пустой :-) тогда "ПустоеЗначение(договор.Сотрудник)"<br><br>

manoff
читатель
офлайн
Дата регистрации: 26.01.2005
Сообщений: 91
Пост №3
 
22.09.2006 07:55

Да нужен имеено первый пункт, можно подробнее ках их именно перебрать

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №4
 
22.09.2006 08:54

"Вот пример, переделаешь на свой лад как нужно:<br><br>для й = 1 по Метаданные.Документ() цикл<br> док = Метаданные.Документ(й);<br> Если СокрП(док.Идентификатор) = "Счет" тогда<br> для с = 1 по док.РеквизитШапки() цикл<br> рекв = док.РеквизитШапки(с);<br> Сообщить(рекв.Идентификатор + " тип: " + рекв.ПолныйИдентификатор());<br> КонецЦикла;<br> КонецЕсли; <br> прервать;<br>КонецЦикла;<br>"

CheshirskyCat
читатель
офлайн
Дата регистрации: 09.01.2004
Сообщений: 326
Пост №5
 
22.09.2006 12:19

"Вот еще вариант: (взят из какой-то типовой конфигурации)<br>Функция ЕстьРеквизитШапки(ИмяРекв,ВидДока)<br>      Если Метаданные.Документ(ВидДока).РеквизитШапки(ИмяРекв).Выбран() = 1 Тогда<br>       Возврат(1);<br>      Иначе<br>       Возврат(0);<br>      КонецЕсли;<br>КонецФункции"

manoff
читатель
офлайн
Дата регистрации: 26.01.2005
Сообщений: 91
Пост №6
 
23.09.2006 02:45

Спасибо огромное всем участникам:)

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация