Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
17 Янв 2018, 06:23
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Обработка для Контрагента(доступ к справочнику номенклатура)  (Прочитано 2999 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн c_andrey

  • **
  • Сообщений: 85
  • РЕПУТАЦИЯ: -1
  • Регистрация: 2015-03-11
  • Сайт: 
  • Профессия: Ученик 1С
Добрый день.
1С 8.2 обычный интерфейс. файловая. УТ.

Пишу обработку.
Цель найти в справочнике "Контрагентов" реквизит (ДатаТек -тип дата) и сравнит его с другой датой. Если условие выполняется то другому реквизиту(Тест - тип строка) в этом справочнике присвоить текст "Да".

При написании его форме списка этого справочника. Код работает.
А через обработку не хочет. Подскажите как изменить.
сам код

 

текущий = (ТекущаяДата())-5184000;

ПредыщущийМесяц = текущий;    
 
   
Если ДатаТек<=ПредыщущийМесяц
  Тогда   тест= "Нет"
иначе
  тест= "Да"
 
  конецесли;
   
    КонтрагентОбъект.Записать();




Оффлайн Дмитрий@

  • *****
  • Сообщений: 742
  • РЕПУТАЦИЯ: 134
  • КПД: 18%
  • Ссылка на примеры работ https://yadi.sk/d/ksVluPMB
  • Регистрация: 2015-02-27
    • Skype: ShuplecovDima
  • Сайт: 
  • Профессия: Программист 1С
откуда "КонтрагентОбъект" берете
Ссылка на примеры работ https://yadi.sk/d/ksVluPMBkiRzX

Оффлайн c_andrey

  • **
  • Сообщений: 85
  • РЕПУТАЦИЯ: -1
  • Регистрация: 2015-03-11
  • Сайт: 
  • Профессия: Ученик 1С
т.е сначало надо получить объект?

Оффлайн дфтын

  • Могу решить ЛЮБУЮ задачу в 1С и не только.. С вопросами в личку:)
  • *****
  • Сообщений: 2720
  • РЕПУТАЦИЯ: 325
  • КПД: 12%
  • 1С наше все
  • Регистрация: 2014-04-29
    • Skype: Soprov1C
  • Компания: Корпорация зонтиков
  • Профессия: Разработчик 1С
т.е сначало надо получить объект?

А этот код нормально отрабатывает? без ошибок?
Помог? Нажми - Спасибо :)
skype: Soprov1C

Оффлайн c_andrey

  • **
  • Сообщений: 85
  • РЕПУТАЦИЯ: -1
  • Регистрация: 2015-03-11
  • Сайт: 
  • Профессия: Ученик 1С
В форме элемента в справочнике контрагенты первоначальный код работает.

Оффлайн дфтын

  • Могу решить ЛЮБУЮ задачу в 1С и не только.. С вопросами в личку:)
  • *****
  • Сообщений: 2720
  • РЕПУТАЦИЯ: 325
  • КПД: 12%
  • 1С наше все
  • Регистрация: 2014-04-29
    • Skype: Soprov1C
  • Компания: Корпорация зонтиков
  • Профессия: Разработчик 1С
А тут какую ошибку дает? КонтрагентОбъект  - не определен?
Помог? Нажми - Спасибо :)
skype: Soprov1C

Оффлайн c_andrey

  • **
  • Сообщений: 85
  • РЕПУТАЦИЯ: -1
  • Регистрация: 2015-03-11
  • Сайт: 
  • Профессия: Ученик 1С
код в обработке
 КонтрагентОбъект = справочники.Контрагенты.ПолучитьОбъект();
               
           текущий = (ТекущаяДата())-5184000;

             ПредыщущийМесяц = текущий;


               
                 Если КонтрагентОбъект.ДатаПоследнегоЗаказа <=ПредыщущийМесяц
                   Тогда
       КонтрагентОбъект.тест= "Нет"
   иначе
      КонтрагентОбъект.тест= "Да"
       


             конецесли;
   
                 КонтрагентОбъект.Записать();

ошибку выдает
{Обработка.Неак.Форма.Форма.Форма(77)}: Метод объекта не обнаружен (ПолучитьОбъект)
         КонтрагентОбъект = справочники.Контрагенты.ПолучитьОбъект();

Оффлайн дфтын

  • Могу решить ЛЮБУЮ задачу в 1С и не только.. С вопросами в личку:)
  • *****
  • Сообщений: 2720
  • РЕПУТАЦИЯ: 325
  • КПД: 12%
  • 1С наше все
  • Регистрация: 2014-04-29
    • Skype: Soprov1C
  • Компания: Корпорация зонтиков
  • Профессия: Разработчик 1С
Ясно.
справочники.Контрагенты.ПолучитьОбъект();
бессмысленное выражение.
ПолучитьОбъект() можно применять только к конкретному элементу справочника.
т.е. например:
Спр = Справочники.Контрагенты.ВЫбрать()
Пока Спр.Следующий() Цикл
КонтрагентОбъект = Спр.ПОлучитьОбъект(); // т.е. мы получаем объект каждого конкретного контрагента
КонецЦикла;

Помог? Нажми - Спасибо :)
skype: Soprov1C

Оффлайн c_andrey

  • **
  • Сообщений: 85
  • РЕПУТАЦИЯ: -1
  • Регистрация: 2015-03-11
  • Сайт: 
  • Профессия: Ученик 1С
Спасибо Вам дфтын за подсказку.
Данный код работает как нужно
       
Спр = Справочники.Контрагенты.ВЫбрать();
Пока Спр.Следующий() Цикл
КонтрагентОбъект = Спр.ПОлучитьОбъект();
текущий = (ТекущаяДата())-5184000;

ПредыщущийМесяц = текущий;

Если КонтрагентОбъект.ДатаПоследнегоЗаказа <=ПредыщущийМесяц
    Тогда
    КонтрагентОбъект.тест= "Нет"
   иначе
      КонтрагентОбъект.тест= "Да"
    конецесли;
   
КонтрагентОбъект.Записать();

КонецЦикла;
Подскажите данный код можно в отчет вставить по кнопке?
Тема закрыта

Оффлайн дфтын

  • Могу решить ЛЮБУЮ задачу в 1С и не только.. С вопросами в личку:)
  • *****
  • Сообщений: 2720
  • РЕПУТАЦИЯ: 325
  • КПД: 12%
  • 1С наше все
  • Регистрация: 2014-04-29
    • Skype: Soprov1C
  • Компания: Корпорация зонтиков
  • Профессия: Разработчик 1С
Помог? Нажми - Спасибо :)
skype: Soprov1C


Теги:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
106 Сообщений
AIFrame
100 Сообщений
alex0402
30 Сообщений
kiksi
19 Сообщений
pavl_vs
19 Сообщений
alexandr_ll
17 Сообщений
andron81_81
16 Сообщений
Norfolk
15 Сообщений
LexaK
13 Сообщений
Orion
12 Сообщений

* Кто онлайн

  • Точка Гостей: 250
  • Точка Скрытых: 0
  • Точка Пользователей: 3
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal