Имя: Пароль:
1C
1С v8
УПП и Контрагенты ОсвобожденОтНДС
0 Mikhail Volkov
 
29.08.17
13:10
В Альфа-Авто у контрагентов есть реквизит ОсвобожденОтНДС (НЕ является плательщиком НДС). А в УПП/КА что-то не нахожу!?
НеЯвляетсяРезидентом - оно? Может в договора перенесли?
1 Джинн
 
29.08.17
13:49
(0) Традиционный вопрос - анакуа?
2 Mikhail Volkov
 
29.08.17
14:47
(1) Так оно, просто был удивлен!?
Создаю контрагента через Com-соединение:

            Состояние("Com-объект: '" + СокрЛП(Ссылка) + "' не найден в КА " + СокрЛП(ОбъектКА.СтрокаСоединенияИнформационнойБазы()) + ", создаем...");
            IDАльфа     = Ссылка.УникальныйИдентификатор();
            СсылкаКА = ОбъектКА.Справочники.Контрагенты.ПолучитьСсылку(ОбъектКА.NewObject("УникальныйИдентификатор",Строка(IDАльфа)));
            Форма=СсылкаКА.ПолучитьФорму();
        //    Форма.Code                    = Ссылка.Код;    //+МВ 29.08.2017 Код свой пусть создается
            Форма.DeletionMark            = Ссылка.ПометкаУдаления;
            Форма.Description            = Ссылка.Наименование;
            Форма.ИНН                    = Ссылка.ИНН;
            Форма.КодПоОКПО                = Ссылка.КодПоОКПО;
            Форма.Комментарий            = Ссылка.Комментарий + ?(ПустаяСтрока(Ссылка.Комментарий), "", " ") + "Выгружен из программы Альфа-Авто";
            Форма.КПП                    = Ссылка.КПП;
            Форма.НаименованиеПолное    = Ссылка.НаименованиеПолное;
            Форма.НеЯвляетсяРезидентом    = Ссылка.ОсвобожденОтНДС;
            Если Ссылка.ФормаСобственности = Перечисления.ФормыСобственности.ЮридическоеЛицо Тогда
                Форма.ЮрФизЛицо = ОбъектКА.Перечисления.ЮрФизЛицо.ЮрЛицо;
            Иначе
                Форма.ЮрФизЛицо = ОбъектКА.Перечисления.ЮрФизЛицо.ФизЛицо;
            КонецЕсли;
            Форма.Покупатель = Истина;    //?(Ссылка.ВидКонтрагента = Перечисления.ВидыКонтрагентов.Покупатель Или мвДоработки.ЕстьТорговыйДоговор(Ссылка, "Продажа"), Истина, Ложь);    //+МВ 14.07.2015
            Форма.Поставщик  = Истина;    //?(Ссылка.ВидКонтрагента = Перечисления.ВидыКонтрагентов.Поставщик  Или мвДоработки.ЕстьТорговыйДоговор(Ссылка, "Покупка"), Истина, Ложь);    //+МВ 14.07.2015
            Форма.УстановитьСсылкуНового(СсылкаКА);
            
            Состояние("Открыта модально форма создания Com-объекта: '" + СокрЛП(Ссылка) + "' в КА " + СокрЛП(ОбъектКА.СтрокаСоединенияИнформационнойБазы()));
            Форма.ОткрытьМодально();

Галочки Покупатель и Поставщик никак не встают? Для теста вставил НеЯвляетсяРезидентом - нормально работает! Почему?
3 Вафель
 
29.08.17
14:56
(1) Чтоб автоматом ставку без ндс с ПТУ ставил
4 Mikhail Volkov
 
29.08.17
17:06
(2) Потому что в Процедура ПриОткрытии() содержит:

    Если ЭтоНовый() Тогда
        
        Если НЕ ЗначениеЗаполнено(ЮрФизЛицо) Тогда
            ЮрФизЛицо   = Перечисления.ЮрФизЛицо.ЮрЛицо;
        КонецЕсли;
        
        // установим флаги Покупатель и Поставщик в зависимости от настроек пользоватлеи
        ОсновнойСтатусКонтрагента = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ОсновнойСтатусКонтрагента");
        Покупатель = (ОсновнойСтатусКонтрагента = Перечисления.СтатусыКонтрагентов.Покупатель);
        Поставщик  = (ОсновнойСтатусКонтрагента = Перечисления.СтатусыКонтрагентов.Поставщик);

    КонецЕсли;

Как это обойти?
5 Mikhail Volkov
 
29.08.17
17:08
+ в УПП
6 Господин ПЖ
 
29.08.17
17:12
сначала открывай, потом заполняй
7 Mikhail Volkov
 
29.08.17
17:20
(6) Так:
Форма.ОткрытьМодально();
Форма.Покупатель = Истина;
Форма.Поставщик  = Истина;
не работает. Как?
8 Господин ПЖ
 
29.08.17
17:21
(7) коню понятно что не работает

зачем тебе ее открывать модально?
9 Mikhail Volkov
 
29.08.17
17:31
(8) А если не модально, какие варианты? Модально, чтобы УПП не весело зря открытым. Надо - записали, не надо - просто закрыли.
10 h-sp
 
29.08.17
17:53
(9) а эта форма точно форма документа? Потому что Покупатель и Поставщик это реквизиты документа.
11 Mikhail Volkov
 
29.08.17
17:56
(10) Справочник УПП/КА Контрагенты
12 ribuh
 
29.08.17
18:11
А форма то почто? Создаём да и всё, зачем форму то тиранить? НовыйКонтрагент = ОбъектКА.Справочники.Контрагенты.СоздатьЭлемент();
НовыйКонтрагент.Покупатель = Истина;
...итд...
НовыйКонтрагент.ОбменДаннямиЗагрузка = Истина;
НовыйКонтрагент.Записать();

где ОбъектКА - переменная с соединением...
13 Господин ПЖ
 
29.08.17
18:12
(12) ты нам глаза открыл...
14 ribuh
 
29.08.17
18:21
(13) эт ты меня послал, или я чего-то не догоняю?
15 Mikhail Volkov
 
29.08.17
18:57
(12) Не совсем так: Альфа-Авто упр. программа, в ней нет много чего нужного для бух. учета в УПП. Поэтому сделана возможность создания контрагента в УПП через Com-соединение, чтобы заполнить его все нужные реквизиты, которых нет в Альфа-Авто. Для этого открывается только форма нового контрагента максимально заполненная из Альфа-Авто. А дальше пользователь решает: записывать его, или отказаться - перепоручить бухгалтеру УПП. УПП чужая база партнера.
В общем вопрос сводится: можно ли открытую форму через Com-соединение заполнять?
Ну или придется менять настройку УПП ПланВидовХарактеристикСсылка.НастройкиПользователей.ОсновнойСтатусКонтрагента до открытия формы.
16 ribuh
 
29.08.17
19:05
(15) Через ком не пробовал, через алё - работает. А вообще, не стоит открывать форму УПП из альфы (хлопотно это и медленно), я бы париться не стал - сделал свою форму, открыл в альфе, заполнил что можно, потом пользователь дозаполняет, что хочет, принимает решение записывать или нет...
17 Mikhail Volkov
 
29.08.17
19:37
(16) Com-обмен делался для одной компаний (базы на одном сервере), а теперь хотят вообще с чужими обмениваться. Сами будут галочки ставить, иначе нужный договор не сделают.
18 Mikhail Volkov
 
30.08.17
09:35
Переписываю настройку УПП ПланВидовХарактеристикСсылка.НастройкиПользователей.ОсновнойСтатусКонтрагента до открытия формы.
19 Mikhail Volkov
 
30.08.17
09:57
(8) Вроде модально открывают форму, чтобы получить из нее что-то. Например, код договора могу получить из Com-окна УПП? Если конечно пользователь записал контрагента и создал договор.
20 Mikhail Volkov
 
31.08.17
06:21
Не пойму: ComОбъект.СтрокаСоединенияИнформационнойБазы() только на время подключения имеет значение? После удачного подключения теряется?
21 ASU_Diamond
 
31.08.17
07:05
(15) обычно заполняют объект, а не форму.
22 Mikhail Volkov
 
31.08.17
07:59
(21) Обычно да, но база не компании, партнера. Тут главное сперва убедиться: есть в ней контрагент или нет.
(20) Приходится опять смотреть настройку УПП ПланВидовХарактеристикСсылка.НастройкиПользователей.ОсновнаяОрганизация!?
Закон Брукера: Даже маленькая практика стоит большой теории.