Имя: Пароль:
1C
1С v8
Договор контрагентов, контроль проведения по Сроку Действия
0 Rolandas
 
03.07.14
13:08
Здравствуйте,
В ДоговорыКонтрагентов есть реквизиты  ДопустимаяСуммаЗадолженности и ДопустимоеЧислоДнейЗадолженности. При продаже, проверяется эти значения, и при превышений блокируется перевод документа.  Вопрос, в каком модуле происходит процедура проверки? Поиском не удалось найти.
Дело в том, что я хочу туда же добавить и блокировку по истечению Срока Действия Договора.
1 Rolandas
 
03.07.14
14:24
Опрос, штоб понять што к чему...
1.    Вопрос слишком сложный, ответа не знаете.
2.    Ответ знаете, но лень отвечать.
3.    Ваш вариант ответа.
2 piter3
 
03.07.14
14:25
конфа управление борделем?
3 anatoly
 
03.07.14
14:25
3. отладчик рулит
4 Rolandas
 
03.07.14
14:27
(2) 1с предприятие 8.2, если это хотели узнать...
5 piter3
 
03.07.14
14:29
(4) у меня win7 64 круто да:)
6 Mitriy
 
03.07.14
14:29
глобальным поиском поищи в модулях ДопустимоеЧислоДнейЗадолженности, скорее всего где-то в общих модулях найдешь то, что тебе надо...
7 Rolandas
 
03.07.14
14:53
(3) Отладчиком пока не умею пользоваться…
(5) очень умный?
(6) поиском пользовался, но ничего внятного не нашёл…
8 Михаил Козлов
 
03.07.14
14:55
(0) Обычно или в модуле документа или в подписке на события.
9 piter3
 
03.07.14
14:55
(7) да
10 anatoly
 
03.07.14
14:56
(7) надо учиться - иначе никак.
в (5) он имел в виду что в (0) не указано какая конфигурация.
11 Rolandas
 
03.07.14
15:33
(8) Модуль документа излазил самым первым, есть там такая процедура ОбработкаПроведения

Процедура ОбработкаПроведения(Отказ, РежимПроведения)

    Перем Заголовок, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоУслугам, ТаблицаПоТаре;
    Перем ТаблицаПоВзаиморасчетам, ТаблицаПоРасчетам;
    
    Если мУдалятьДвижения Тогда
        ОбщегоНазначения.УдалитьДвиженияРегистратора(ЭтотОбъект, Отказ);
    КонецЕсли;

    ПодготовитьСтруктуруШапкиДокумента(Заголовок, СтруктураШапкиДокумента, РежимПроведения);

    // Проверим правильность заполнения шапки документа
    ПроверитьЗаполнениеШапки(СтруктураШапкиДокумента, Отказ, Заголовок);

    // Проверим допустимость для пользователя цен документа
    УправлениеДопПравамиПользователей.ПроверитьДопустимостьЦенОтпуска(ЭтотОбъект, "Товары", Отказ);
    УправлениеДопПравамиПользователей.ПроверитьДопустимостьЦенОтпуска(ЭтотОбъект, "Услуги", Отказ);

    ПодготовитьТаблицыДокумента(СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоУслугам, ТаблицаПоТаре);

    ПроводитьПоВзаиморасчетам = СтруктураШапкиДокумента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем;
    мСтруктураПараметровВзаиморасчетов.Вставить("ПроводитьПоВзаиморасчетам", ПроводитьПоВзаиморасчетам);

    СтруктураПодготовленныхТаблиц = Новый Структура("Товары, Услуги", ТаблицаПоТоварам, ТаблицаПоУслугам);
    мСтруктураПараметровВзаиморасчетов.Вставить("СтруктураПодготовленныхТаблиц", СтруктураПодготовленныхТаблиц);
    УправлениеВзаиморасчетами.ПодготовитьТаблицыДляПроведенияПоВзаиморасчетам(ТаблицаПоВзаиморасчетам, ТаблицаПоРасчетам,
                                                    ЭтотОбъект, мСтруктураПараметровВзаиморасчетов, СтруктураШапкиДокумента,
                                                    Отказ, Заголовок);

                                                    
    //Проверка и борьба с "плавающим" сантимом //jk
    УправлениеВзаиморасчетами.ПроверитьИВыровнятьПлавающийСантим(ЭтотОбъект, ТаблицаПоВзаиморасчетам);
    
                                                
    // Проверить заполнение ТЧ.
    ПроверитьЗаполнениеТабличнойЧастиТовары(ТаблицаПоТоварам,      СтруктураШапкиДокумента, Отказ, Заголовок);
    ПроверитьЗаполнениеТабличнойЧастиУслуги(ТаблицаПоУслугам,      СтруктураШапкиДокумента, Отказ, Заголовок);
    ПроверитьЗаполнениеТабличнойЧастиВозвратнаяТара(ТаблицаПоТаре, СтруктураШапкиДокумента, Отказ, Заголовок);

    // Проверить заполнение ТЧ "Состав набора".
    СтруктураПолей = Новый Структура;
    СтруктураПолей.Вставить("Номенклатура");
    СтруктураПолей.Вставить("Количество");
    СтруктураПолей.Вставить("Цена");
    ЗаполнениеДокументов.ПроверитьЗаполнениеТабличнойЧасти(ЭтотОбъект, "СоставНабора", СтруктураПолей, Отказ, Заголовок);

    //Проверим на возможность проведения в БУ и НУ.
    Если ОтражатьВБухгалтерскомУчете
     Или ОтражатьВНалоговомУчете Тогда
        УправлениеВзаиморасчетами.ПроверкаВозможностиПроведенияВ_БУ_НУ(ДоговорКонтрагента, ВалютаДокумента,
                                             ОтражатьВБухгалтерскомУчете, ОтражатьВНалоговомУчете, мВалютаРегламентированногоУчета,
                                             Ложь, Отказ, Заголовок, "", СтруктураШапкиДокумента.ВалютаВзаиморасчетов,
                                             СтруктураШапкиДокумента.РасчетыВУсловныхЕдиницах);
    КонецЕсли;

    // Движения по документу
    Если Не Отказ Тогда

        // Подготовим таблицу скидок для проведения.
        ТаблицаПоСкидкам = ПодготовитьТаблицуСкидок(ТаблицаПоТоварам, ТаблицаПоУслугам, СтруктураШапкиДокумента);

        ДвиженияПоРегистрам(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоСкидкам, ТаблицаПоТаре,
                            ТаблицаПоУслугам, ТаблицаПоВзаиморасчетам, ТаблицаПоРасчетам, Отказ, Заголовок);
    КонецЕсли;

КонецПроцедуры // ОбработкаПроведения()

Но проверок я там не нашёл.
в подписке на события ничего вроде ПриПроведение…  или Перед Проведением… тоже нету
(9) может и умный но не мудрый то точно.
12 piter3
 
03.07.14
15:35
(11)товарищ судья (8)выполнен?
13 Михаил Козлов
 
03.07.14
15:41
(11) Попробуйте тогда в отладчике смотреть Отказ при проведении.
В УТ 10.3 есть КонтрольОстатковПоТЧ(...) в общем модуле УправлениеДенежнымиСредствами, которая вырабатывает отказ.
14 Rolandas
 
03.07.14
15:50
(12) Бог тебе судья…
(13) Спасибо, попробую отладчиком овладеть…
15 Михаил Козлов
 
03.07.14
16:07
Отказ происходит при проведении в форме документа или и из списка документов?
16 Rolandas
 
03.07.14
16:12
(15) В форме документа РеализацияТоваровУслуг
17 ОчкарикСлава
 
03.07.14
16:17
Labas dienas Rolandas :)
18 Rolandas
 
03.07.14
16:19
Labas Slava :)
19 ОчкарикСлава
 
03.07.14
16:20
(16) справка -> о программе -> конфигурация: [что тут написано????]
20 Rolandas
 
03.07.14
16:28
(19) "Управление торговлей", редакция 10.3 (10.3.13.3)
21 ОчкарикСлава
 
03.07.14
16:32
(4) 1с предприятие 8.2, если это хотели узнать. ..
это ни о чем. на проедприятии 8.2. 100500 разных конф работает....

первый вопрос, это какая конфигурация, о чём намекнул вопросом (2)

любой вопрос следует начинать с уточнения того, с чем работаешь.
...
(20) вот, с этого надо было начинать.
могу глянуть это в аналогичной конфе упп 1.3.
22 Михаил Козлов
 
03.07.14
16:34
(16) Тогда лезьте в процедуру  КонтрольОстатковПоТЧ(...) в общем модуле УправлениеДенежнымиСредствами
23 ОчкарикСлава
 
03.07.14
16:38
ОбщийМодуль.УправлениеДенежнымиСредствами.КонтрольОстатковПоТЧ(ДатаПлатежа, ТаблицаПлатежейУпр, Отказ, Заголовок, РасчетыВозврат = Неопределено, ВходящийПлатеж = Ложь) Экспорт


есть такое:

Если РазницаДней > ДопустимоеЧислоДнейЗадолженности Тогда
                        ОбщегоНазначения.СообщитьОбОшибке("Превышено допустимое число дней задолженности по договору " +
                            Платеж.ДоговорКонтрагента + Символы.ПС + Символы.Таб +
                            " Допустимое число дней задолженности: " + ДопустимоеЧислоДнейЗадолженности +
                            ", дата самой старой задолженности: " + Выборка.ДатаПервойСделки +
                            ", превышение: " + РазницаДней + " дней", Отказ, Заголовок);

КонецЕсли;

копай там...

УТ 10.3, под рукой нету, но могу завтра развернуть
24 ОчкарикСлава
 
03.07.14
16:39
(22) опередил, пока я печатал :)
25 Rolandas
 
03.07.14
17:06
(22) (23) Спасибо, если я хорошо понял, то после этой проверки я пишу свою проверку типа такого


Если СрокДействия > Дата Тогда
ОбщегоНазначения.СообщитьОбОшибке("Срок Действия Договора истёк"), Отказ, Заголовок);
КонецЕсли;
26 Михаил Козлов
 
03.07.14
17:47
(25) Извините, что дезориентировал: эта процедура относится к платежным документам.
Есть еще КонтрольОстатков в модуле набора записей РН "ВзаиморасчетыСКонтрагентами", но обращения к ней в УТ 10.3 не нашел.
Попробуйте, все-таки в отладчике отловить Отказ = ИСТИНА при проведении РТиУ.