Имя: Пароль:
1C
1С v8
Конвертация данных. Перенос документов ПоступлениеТоваровУслуг с с/ф
0 Novicadmin
 
17.01.14
08:29
Ребята помогите пожалуйста реализовать перенос документа Поступление товаров и услуг с привязанной счет фактурой.

из УТ 10.3 в БП 2.0

Подскажите где рыть.

Сами документы поступления переносятся корректно, есче бы с/ф с ними переносились, было бы здорово.

Спасибо!
1 rinatru
 
17.01.14
08:33
создать ПКО для счет-фактуры

в ПКО для Поступления в обработчике ПередВыгрузкой запросом получить подчиненный документ Счет-ф. полученные.. и потом ВыгрузитьПоПравилу(....
2 rinatru
 
17.01.14
08:34
т.е. выгрузить по правилу ПКО "СчетФактПолученный" .. или как ты его там назовешь
3 Novicadmin
 
17.01.14
08:49
Спасибо, ща пробую )
4 Novicadmin
 
17.01.14
09:21
Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    СчетФактураПолученный.Ссылка
        |ИЗ
        |    Документ.СчетФактураПолученный КАК СчетФактураПолученный
        |ГДЕ
        |    СчетФактураПолученный.ДокументОснование = &ВыбДок";

    Запрос.УстановитьПараметр("ВыбДок", Источник.Ссылка);

    Результат = Запрос.Выполнить();

    Выборка = Результат.Выбрать();
    Пока Выборка.Следующий() Цикл
       СчетФактура = Выборка.Ссылка;
    КонецЦИкла;
    


Если НЕ СчетФактура = Неопределено Тогда
    ВыгрузитьПоПравилу(СчетФактура, , , , "СчетФактураПолученный");
КонецЕсли;


Отлично работает, только вот теперь в бухии при попытке провести документ с/ф выходит ошибка

Проведение документа: Счет-фактура полученный УТОПТ000060 от 01.04.2013 16:12:42
Не заполнено значение реквизита "Код вида операции"!
5 Novicadmin
 
17.01.14
09:27
Это у документа Постулпение должен быть Код вида операции или у с/ф? ) че то не могу нарыть (
6 Novicadmin
 
17.01.14
09:28
все нашел у с/ф, тип строка, че туда пихать?
7 Wobland
 
17.01.14
09:30
(6) из Шекспира что-нибудь
8 Godofsin
 
17.01.14
09:32
(7) =)
9 Novicadmin
 
17.01.14
09:32
(7) ))))) в УТ у с/ф нет такого, в БП есть, какое поставить туда значение не могу найти (
10 Godofsin
 
17.01.14
09:35
(9) УчетНДС.ЗаполнитьСписокКодовВидовОпераций(Перечисления.ЧастиЖурналаУчетаСчетовФактур.ПолученныеСчетаФактуры, ЭлементыФормы.КодВидаОперации.СписокВыбора);

С тебя 500 руб.
11 Godofsin
 
17.01.14
09:35
за наводку )
12 Wobland
 
17.01.14
09:38
похожее дело надо расположить в после (при?) загрузки. ещё 500
13 rinatru
 
17.01.14
09:41
ну все... ТС теперь только на долги будет работать :)))
14 Novicadmin
 
17.01.14
09:45
(12) в после загрузки
15 Godofsin
 
17.01.14
09:47
(14) На вот тебе:
Процедура УстановитьКодВидаОперации(КодВидаОперацииОснования = Неопределено) Экспорт

не забывай про 500
16 Godofsin
 
17.01.14
09:47
Это из модуля объекта СФ.
17 Novicadmin
 
17.01.14
09:59
Если Объект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.НаАванс Тогда
    
    КодВидаОперации = "02";
    
ИначеЕсли Объект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.НаАвансКомитента Тогда
    
    КодВидаОперации = "05";
    
ИначеЕсли Объект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.НаПоступление Тогда
    
    Для Каждого СтрокаТабличнойЧасти ИЗ Объект.ДокументыОснования Цикл
        
        Если ТипЗнч(СтрокаТабличнойЧасти.ДокументОснование) = Тип("ДокументСсылка.ВозвратТоваровОтПокупателя") Тогда
            КодВидаОперации = "03";
        ИначеЕсли ТипЗнч(СтрокаТабличнойЧасти.ДокументОснование) = Тип("ДокументСсылка.ПоступлениеТоваровУслуг") Тогда
            КодВидаОперации = "01";
        КонецЕсли;
        
    КонецЦикла;
КонецЕсли;
    

Объект.КодВидаОперации = КодВидаОперации;


Вот так исполнил в После загрузки, ошибок во время загрузки нет а код всёравно не проставляется (
18 Godofsin
 
17.01.14
10:01
Объект.Записать();
19 Godofsin
 
17.01.14
10:01
ну и традиционно - 500руб.
20 Godofsin
 
17.01.14
10:02
Слушай, ты бы хоть типовые примеры глянул, а то ты так скоро в рабство к нам попадешь
21 Godofsin
 
17.01.14
10:06
Или не надо там .записать()? Чот не помню... Попробуй для начала без алгоритма указать явно: КодВидаОперации = "02";
22 Novicadmin
 
17.01.14
10:07
Хорошо ща пробну )
23 Godofsin
 
17.01.14
10:08
И кстати: Объект.КодВидаОперации = "02";
24 Novicadmin
 
17.01.14
10:09
да да да, всё ништь, походу условие не отрабатывается, ща разберусь. Записать не надо
25 Поpyчик-4
 
17.01.14
10:12
(0) В штатных правилах есть же.

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

http://savepic.su/4011790.png

С вас 500 рублей
26 Novicadmin
 
17.01.14
10:15
это феня на мисте такая про 500р? ))))
27 Поpyчик-4
 
17.01.14
10:18
Не. Только за эту неделю снял с местной тусы тысячи полторы. Луркай темы.
28 Novicadmin
 
17.01.14
10:21
а как тут деньги передавать? Оо
29 Godofsin
 
17.01.14
10:22
(28) ого! можешь мне на карту перевести, или на телефон кинь
30 Wobland
 
17.01.14
10:22
(28) о, Братск! я могу тебе адрес родителей дать, занесёшь ;)
31 Godofsin
 
17.01.14
10:23
Реально Братск! Земеля почти, я с УИ.
32 Wobland
 
17.01.14
10:23
(31) ну здравствуй, сосед ;)
33 Godofsin
 
17.01.14
10:23
Раз так, тогда 300
34 Novicadmin
 
17.01.14
10:24
)))) весело
35 Godofsin
 
17.01.14
10:24
(32) Здаров =)
36 Novicadmin
 
17.01.14
10:25
Оба оттуда чтоли? )
37 Novicadmin
 
17.01.14
10:26
у вас там в УИ много хороших прогеров
38 Wobland
 
17.01.14
10:26
(36) я первую половину жизни провёл в Братске
39 Novicadmin
 
17.01.14
10:27
а я первую в Тулуне, теперь вот в Брастке
40 Godofsin
 
17.01.14
10:29
(38) Идентично. Только в УИ =)
(39) Чо как там у нас? Морозы?
41 Wobland
 
17.01.14
10:31
как усть-илимское пиво? лет 10 назад сильно уделывало братское по вкусовым ощущениям
42 Novicadmin
 
17.01.14
10:31
нету их (40) тепло этой зимой ниже 20 не опускается, 10-15.
Тут не забанят за вопросы не потеме? )))
43 Novicadmin
 
17.01.14
10:32
а я не пью пиво уже >10 лет
44 Godofsin
 
17.01.14
10:39
(41) Лет 10 назад завод загнулся )))
45 Godofsin
 
17.01.14
10:40
Там такая мутная афера была шописец. Директорат них*ево наварился, взяв кредит на оборудование и свалив с баблом полученным )))
46 Wobland
 
17.01.14
10:42
и теперь директорат не пьёт пиво (завода нет, а чужое западло) и конвертирует данные на мисте
47 Novicadmin
 
17.01.14
10:45
есть завод в Братске и пиво делает ))) только походу пивас неахти. честно не знаю давно очень не пробывал, раньше упивался властелином )))
48 Wobland
 
17.01.14
10:53
где-то с 98го братский пивзавод начал портиться. а потом суровые братские ролевики научили меня пить три топора (777) ;)
49 Novicadmin
 
17.01.14
11:02
Ладна ребят, очень выручили. тут в други можно добавлять?
50 Wobland
 
17.01.14
11:08
(49) тут пол-мисты уже давно требуют возможность лайкать котиков. безрезультатно