Имя: Пароль:
1C
1С v8
Как запретит продажу контрагенту на время. 1с УТ 10.3
,
0 unity
 
25.12.11
20:07
Как или вообще возможно ли запретит продажу определенным клиентам  или контрагентам на время. 1с УТ 10.3
1 Funeral_Worm
 
25.12.11
20:11
в конфигураторе
2 unity
 
25.12.11
20:19
(1) Как именно?
3 Азат
 
25.12.11
20:32
Процедура ПередЗаписью(Отказ)
   Если Контрагент.ЗапрещенаОтгрузка Тогда
       Предупреждение("Пашол нафег!");
       Отказ = Истина;
   КонецЕсли;
КонецПроцедуры

В контрагента добавь флаг "ЗапрещенаОтгрузка"
4 unity
 
25.12.11
20:41
(3) Азат спаси огромное но можно чуть подробнее. Я не профи в этом... Но очень надо
5 unity
 
25.12.11
20:42
(4) *Спасибо
6 Азат
 
25.12.11
20:43
(4) ну просто добавляешь реквизит типа Булево, на форме разместишь флажок.

в модуле формы напиши это... и все
7 unity
 
25.12.11
20:49
(5) А в модуле реализации не надо указывать?
8 unity
 
25.12.11
21:06
// Обработчик события ПриЗаписи формы.
//
Процедура ПередЗаписью(Отказ)
   
    Если Контрагент.ЗапрещенаОтгрузка Тогда
       Предупреждение("Пашол нафег!");
       Отказ = Истина;
   КонецЕсли;
   
   мЭтоНовый = ЭтоНовый();
   
   ЗаполнениеДокументов.ПроверитьЗаполнениеРеквизитов(ЭтотОбъект, СписокРеквизитовДляПроверкиЗаполнения, Отказ, мЭтоНовый);
   
   Если НЕ ВходитВХолдинг Тогда
       ТекущаяМодифицированность = Модифицированность;
       ГоловнойКонтрагент        = Ссылка;
       Модифицированность        = ТекущаяМодифицированность;
   КонецЕсли;
   
   Если Не Отказ и мЭтоНовый и УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ВыполнятьПоискДублейПередЗаписьюНовогоКонтрагента") = Истина Тогда
       
       ПоискДублей       = Обработки.ПоискИЗаменаДублирующихсяЭлементов.Создать();
       СтруктураПоиска = Новый Структура("Код,ИНН,Наименование,НаименованиеПолное",Неопределено,"=","=","=");
       НайденныеОбъекты  = ПоискДублей.НайтиДубли(ЭтотОбъект,СтруктураПоиска);
           
       Если НайденныеОбъекты.Количество() > 0 Тогда
           ФормаПоискаДублей = ПоискДублей.ПолучитьФорму("ФормаПоиска", ЭтаФорма);
           ФормаПоискаДублей.НайденныеОбъекты = НайденныеОбъекты;
           Результат = ФормаПоискаДублей.ОткрытьМодально();
           Если  Результат = Неопределено Тогда
                   
               Отказ = Истина;
                   
           ИначеЕсли Не Результат = Истина Тогда
                   
               Отказ = Истина;
               ОповеститьОЗаписиНовогоОбъекта(Результат);
               Модифицированность = Ложь;
               Если ЭтаФорма.Открыта() Тогда
                   Закрыть();
               КонецЕсли;
                   
           КонецЕсли;
               
       КонецЕсли;
       
   КонецЕсли;
   
КонецПроцедуры
9 unity
 
25.12.11
21:06
Я так вставил это правильно?
10 ProProg
 
25.12.11
21:08
5000 рублей.
Плюс сделаю чтобы юзер не мучался набивая док чтобы его потом послали. А чтобы еще при выборе контра ему выходило сообщение.
11 tridog
 
25.12.11
21:14
10000 руб. Сделаю еще чтобы тот, кто запрещает отгрузку указывал почему, а тот кто выбирает контрагента в доке - видел отчего низя отгрузить и кто запретил.
12 unity
 
25.12.11
21:21
(6) Выдает ошибку:

{Справочник.Контрагенты.Форма.ФормаЭлемента.Форма(836,9)}: Переменная не определена (Контрагент)
           Если <<?>>Контрагент.ЗапрещенаОтгрузка Тогда (Проверка: Толстый клиент (обычное приложение))
13 hhhh
 
25.12.11
21:38
(12) ведь ты же говорил в реализации. А сам в контрагенты всунул.
14 KRV
 
25.12.11
21:48
а чего - в новомодной торговле нет ограничения по долгам что ли?  кстати - галочки (реквизит) самый дерьмовый вариант ибо нужен еще человек, который будет их ставить и снимать.. опят показывает, что его могут подкупать, может сам забухать, а может и вообще полной ахинеи нафуячить с запретами.
15 hhhh
 
25.12.11
21:53
(14) дык, и в торговле ограничения по долгам тоже ставит человек и его тоже могут купить
16 KRV
 
25.12.11
21:57
(15) тут немного другое - покрыл контрагент долг и снова можно отгружать, не трогая галочки-пимпочки.. тогда и вариантов подкупа меньше - не скажет менагер, что проворонил наступления мега-долга...
17 unity
 
25.12.11
22:39
(13) так все таки получается надо написать в модуле реализации а не контрагента...?
18 МишельЛагранж
 
26.12.11
01:34
(16) а что, в типовой разве не реализовано? что если долг - отгрузка невозможна, заплатил - снова отгружай? вроде в УТ сделали тоже, в УПП - уже давно так есть.
19 hhhh
 
26.12.11
01:50
(18) у автора нет нигде про долг. У него другая задача. Допустим, контрагент нам не должен, а отгрузку надо запрнтить.
20 Godofsin
 
26.12.11
06:18
Нахера ПередЗаписью() то? ПриИзмененииКонтрагента() проверять и все. А то поставят контрагента, набьют ему позиций штук 60, а потом окажется, что он *блом не вышел и ему продавать низя.
21 0xFFFFFF
 
26.12.11
06:54
(18) Дык еще в ТиС было.
(19) "допустим контрагент нам не должен" - ну дык напрячь, чтобы стал должен :)
22 Godofsin
 
26.12.11
07:01
(21) Утюги-паяльники никто не отменял? =)
23 opty
 
26.12.11
07:49
Ну так сделать максимальный долг=1 копейка , пусть по копейке грузится
24 iamnub
 
26.12.11
07:58
Обычно в стоп-лист ставят не из-за долга, а из-за просрочки платежа.
25 opty
 
26.12.11
08:05
(24) В типовой 10.3 и по просрочке штатными средствами делается
26 iamnub
 
26.12.11
08:11
(25)
Я с УТ не работал. Скажи - как там просрочка вынимается?? Документы по взаиморасчетам должны быть перепроведены?
27 opty
 
26.12.11
08:58
(26) В разрезе договоров , проведены -да , перепроведены не обязательно , нарушение последовательности в данном случае особо не влияет , просто смотрится срез в разрезе договора .
28 stix2010
 
26.12.11
09:41
(3), (8) ага тупо,  юзер не сможет записать документ, потом бежит к боссу: "разрешите, бабло уже переведено, усе в упорядке шеф" и хрен вам, юзер бьетца головой об стол вбив 100 позиций и не может записать документ.

Вас просили запретить продажу, т.е. проведение
29 МишельЛагранж
 
26.12.11
09:47
(19) тогда фейс-контроль еще на уровне справочника контрагентов ))
типа, галочка - надежный/ненадежный, и проверять перед проведением реализации )
эт давно пора в типовую ввести...
30 opty
 
26.12.11
09:50
(29) И авторизацию по отпечаткам палцев :))
На самом деле функционал 10.3 по данному вопросу достаточен , а остальное на основании приказа о маркетинговой политике делается чисто административными средствами
31 unity
 
26.12.11
11:27
Так что есть решение или нет? Подскажите все таки как делать?
32 opty
 
26.12.11
11:40
(31) В договоре контрагента по которому ведутся расчеты , включить галку "Контролировать сумму задолженности" , и установить сумму задолженности в 0,01 руб .
Отгрузка на данного контрагента в разрезе данного договора будет заблокирована на сумму свыше одной копейки , то есть полностью . Если договоров несколько - по каждому договору .
А вот кто , когда и при каких условиях может эту блокировку снять , это проблема управленческих служб , а никак не пргораммиста , разве только по разграничению доступа к форме
33 Феерия
 
26.12.11
11:44
(32) opty правильно говорит. Ничего в конфигураторе добавлять не надо - для этого есть стандартные средства. Хоть мы и не на УТ, а на УПП, мы тоже этим функционалом активно пользуемся и реализации с просрочкой ни по количеству дней задолженности, ни по сумме,  не проводятся.
Там буквально одну галку поставить и сумму. Только в конфигуратор не лезьте)
34 unity
 
26.12.11
11:45
(32) А нельзя сделать кнопку или булево в самом контрагенте чтоб не могли ему продавать товар?
35 Феерия
 
26.12.11
11:47
(34) это проще всего сделать так, как в (32) написано - чтобы задолженность выше 1 копейки не давала проводить. В УПП эта галочка в договоре ставится, "Контроль дебиторской задолженности по договору".
36 unity
 
26.12.11
11:56
Ну все равно спасибо всем... попробую как вы советуете в (32)
37 Феерия
 
26.12.11
11:58
В конце концов, создайте папку НЕ ОТГРУЖАТЬ! в справочнике и добавьте туда всех контрагентов, которым отгружать не хотите, и заставьте пользователей обращать внимание на это. Если манагеры адекватные, то может помочь)
38 unity
 
26.12.11
12:16
(37) проблема в том что в УТ просто пишите названия компании в строке и он выдает сразу эту компанию... получается некто даже адекватный не будит искать контрагента по папке. По этому вариант папки самый не надежный...
39 Феерия
 
26.12.11
12:22
(38) Ну раз так, то идею с папкой можно откинуть. У нас еще есть группы доступа контрагентов - у разных пользователей видны только те контрагенты, которые назначены их группе.
40 opty
 
26.12.11
12:59
На практике у нас ставят суммы от 1 до нескольких копеек , и от копеек сразу видно по какой причине клиент закрыт
1 копейка просрочка
2 копейки косяки с документоборотом
3 копейки переоформление клиента и отсутсвие договора поставки
и т.д.

Потом элементарно строится отчетик по группировке и все сразу видно , в УТ 10.3 ничего особо придумывать не надо . Ну за исключением автоматических установок лимитов отгрузки , автоблокировок и разблокировок клиентов но это уже за пределами темы ветки :) Ну и сделан специальный интерфейс для пользователей который этими вопросами занимается что бы упростить его работу , типа не соваться в карточку каждого клиента , выбирать договора и т.п. Но если клентов несколько сотен можно не замарочиваться
41 unity
 
26.12.11
12:59
И так же у нас есть менеджера которые не ограничены правами группой доступности... тоже не вариант...
42 unity
 
26.12.11
13:01
(40) попробую, если сработает сообщу...
43 opty
 
26.12.11
13:04
(42) Сработает , куда денется :)
44 unity
 
26.12.11
13:07
(43) малоли что... я не хочу чтоб работники нашли какой-то путь чтоб все равно продавать своим клиентам
45 opty
 
26.12.11
13:41
(44) А вот програмно это полностью не решить , программа лишь отражение учета , должна быть нормативка определяющая что , кем , как , когда . Если нет нормативки все равно отгрузят , выпишут на другого клиента а увезут заблокированному , а потом зачетом долги закроют ,  это так на вскидку :)
46 1с-кин
 
26.12.11
14:04
(32) прикольное использование функционала... да еще подается как "стандартное средство" ))
47 opty
 
26.12.11
14:09
(46) Абсолютно стандартное использование стандартного функционала
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.