Имя: Пароль:
1C
1С v8
Реализация товаров и услуг отгрузка запрещена
0 HeartQuake-Z
 
14.12.16
08:18
Привет, в реализации товаров и услуг пишет Отгрузка запрещена, почему при этом документ провести даёт ?
1 rbcvg
 
14.12.16
08:22
Неоперативное проведение.
давай полный текст ошибки, конфу и т.д.
2 HeartQuake-Z
 
14.12.16
08:24
КА 2
Ошибка то на форме документа красным "Отгрузка запрещена"

в конфигураторе нашел ток этот кусок
Если ПревышенаСумма ИЛИ ПревышенСрок Тогда
            Текст = НСтр("ru='Отгрузка запрещена'");
            ЦветТекста = WebЦвета.Кирпичный;
            ВидимостьТекста = Истина;
            ВидимостьКартинки = Истина;
3 HeartQuake-Z
 
14.12.16
08:25
Получается  ошибка просто информативная и ничего не запрещает ?
4 nordbox
 
14.12.16
08:31
я дико извиняюсь, сам в КА не работал, но:
Попробуй контрика которому отгружаешь посмотри, его задолженность хотя бы по одному договору
5 HeartQuake-Z
 
14.12.16
08:34
(4) Причина то в том, что у контрагента задолженность
6 Альбатрос
 
14.12.16
08:36
(3) Если это весь код, то да, просто информативная.
7 nordbox
 
14.12.16
08:36
(5) Ну вот по этому и выдает сообщение
8 HeartQuake-Z
 
14.12.16
08:37
(7) Я вкурсе, мне интересно почему документ даёт провести, а не почему ошибка)
9 HeartQuake-Z
 
14.12.16
08:37
// Управляет отображение ограничения задолженности в форме документа
//
// Параметры:
//    Договор           - СправочникСсылка.ДоговорыКонтрагентов - Договор, указанный в документе
//    Текст             - Строка - Реквизит, которому присваивается текстовая строка об остатке допустимого кредита
//    ВидимостьТекста   - Булево - Реквизит, которому присвается значение видимости строки об остатке допустимого кредита
//    ЦветТекста        - ЦветаСтиля - Реквизит, которому присвается значение цвета строки об остатке допустимого кредита
//    ВидимостьКартинки - Булево - Реквизит, которому присваивается значение видимости картинки о запрете отгрузки
//
Процедура ОбновитьОграничениеЗадолженности(Договор, Дата, Текст, ВидимостьТекста, ЦветТекста, ВидимостьКартинки) Экспорт
    
    Если ПравоДоступа("Чтение", Метаданные.Справочники.ДоговорыКонтрагентов)
        И ПравоДоступа("Чтение", Метаданные.РегистрыНакопления.РасчетыСКлиентами) Тогда
        
        СоставРеквизитов = "
        |ОграничиватьСуммуЗадолженности,
        |ДопустимаяСуммаЗадолженности,
        |ВалютаВзаиморасчетов,
        |ЗапрещаетсяПросроченнаяЗадолженность";

        ДанныеДоговора = Новый Структура(СоставРеквизитов, Ложь, 0, Неопределено, Ложь);
        
        Если ЗначениеЗаполнено(Договор) Тогда
            
            Запрос = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ
            |    ДоговорыКонтрагентов.ОграничиватьСуммуЗадолженности КАК ОграничиватьСуммуЗадолженности,
            |    ДоговорыКонтрагентов.ДопустимаяСуммаЗадолженности КАК ДопустимаяСуммаЗадолженности,
            |    ДоговорыКонтрагентов.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов,
            |    ДоговорыКонтрагентов.ЗапрещаетсяПросроченнаяЗадолженность КАК ЗапрещаетсяПросроченнаяЗадолженность
            |ИЗ
            |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
            |ГДЕ
            |    ДоговорыКонтрагентов.Ссылка = &Договор");
            
            Запрос.УстановитьПараметр("Договор", Договор);
            
            Выборка = Запрос.Выполнить().Выбрать();
            Если Выборка.Следующий() Тогда
                ДанныеДоговора = Выборка;
            КонецЕсли;
            
        КонецЕсли;
        
        ПревышенаСумма = Ложь;
        Если ДанныеДоговора.ОграничиватьСуммуЗадолженности Тогда
            ОстатокДопустимогоКредита = ОстатокДопустимогоКредита(Договор, ДанныеДоговора.ДопустимаяСуммаЗадолженности);
            ПревышенаСумма = ОстатокДопустимогоКредита < 0;
        КонецЕсли;
        
        ПревышенСрок = Ложь;
        Если ДанныеДоговора.ЗапрещаетсяПросроченнаяЗадолженность Тогда
            СуммаПросроченнойЗадолженности = СуммаПросроченнойЗадолженности(Договор, Дата);
            ПревышенСрок = СуммаПросроченнойЗадолженности > 0;
        КонецЕсли;
        
        Если ПревышенаСумма ИЛИ ПревышенСрок Тогда
            Текст = НСтр("ru='Отгрузка запрещена'");
            ЦветТекста = WebЦвета.Кирпичный;
            ВидимостьТекста = Истина;
            ВидимостьКартинки = Истина;
        ИначеЕсли ДанныеДоговора.ОграничиватьСуммуЗадолженности Тогда
            Текст = НСтр("ru='Остаток допустимого кредита:'") + " " + Формат(ОстатокДопустимогоКредита, "ЧДЦ=2; ЧН=0,00") + " " + Строка(ДанныеДоговора.ВалютаВзаиморасчетов);
            ЦветТекста = ЦветаСтиля.ЦветГиперссылки;
            ВидимостьТекста = Истина;
            ВидимостьКартинки = Ложь;
        Иначе
            ВидимостьТекста = Ложь;
            ВидимостьКартинки = Ложь;
        КонецЕсли;
        
    Иначе
        
        ВидимостьТекста = Ложь;
        ВидимостьКартинки = Ложь;
        
    КонецЕсли;
    
КонецПроцедуры
10 nordbox
 
14.12.16
08:39
(9) я бегло код посмотрел
А где ты видишь что есть запрет на проведение??
11 Альбатрос
 
14.12.16
08:40
из (9) "Управляет отображение ограничения задолженности в форме документа".
Эта процедура никакого отношения к проведению документа не имеет.
12 HeartQuake-Z
 
14.12.16
08:40
(10) Нету запрета, просто к чему эту ошибку выводить, если провести можно всё равно
И подскажите, как не внося изменение в конфу запретить проведение документа, если "Отгрузка запрещена"
13 HeartQuake-Z
 
14.12.16
08:41
(11)Я знаю
14 nordbox
 
14.12.16
08:42
(12) что бы бестолкового менегера предупредить что клиент должник
15 HeartQuake-Z
 
14.12.16
08:42
(14) там ещё 2ая строчка есть ))
16 Альбатрос
 
14.12.16
08:42
(12) не внося изменение в конфу - никак.
17 Альбатрос
 
14.12.16
08:44
Хотя это должно быть реализовано типовыми средствами.
18 nordbox
 
14.12.16
08:45
(15) Вторую строчку надо сделать с таким содержанием:
"Придурок, думай кому отгружаешь" )))
19 HeartQuake-Z
 
14.12.16
08:46
код в (9) - универсальная процедура и вызывается много где ?
20 nordbox
 
14.12.16
08:47
(19) а поискать по названию процедуры не судьба?
21 HeartQuake-Z
 
14.12.16
08:53
(20) Искал, не нашел
22 HeartQuake-Z
 
14.12.16
08:56
МОжет быть кто с КА 2 работал, как тиовым заапретить проведение реализации если отгрузка запрещена ??
23 HeartQuake-Z
 
14.12.16
09:09
ЧОт не нашел пока что )
24 Cyberhawk
 
14.12.16
09:09
Это настраивается в соглашении в графике платежей
25 nordbox
 
14.12.16
09:09
(22) Тебе же сказали, никак, ручками надо править, но не советую.
Хотя может в каких то релизах и есть что то подобное, полазий, почитай.
я тут за тебя поискал
26 nordbox
 
14.12.16
09:09
27 HeartQuake-Z
 
14.12.16
09:11
(24) в соглашении с поставщиком?
28 HeartQuake-Z
 
14.12.16
09:17
(24) РЕжим предприятие плохо знаю, подскажи
29 nordbox
 
14.12.16
09:23
30 HeartQuake-Z
 
14.12.16
09:27
я нашел
31 nordbox
 
14.12.16
09:30
(30) Ну раз нашел, то говори где ))
народ желает знать )))
32 HeartQuake-Z
 
14.12.16
09:38
реализация-соглашения реквизит -условия продаж
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.