Имя: Пароль:
1C
1С v8
Как в конвертации данных реализовать выгрузку договоров на один договор
0 Fyokla5
 
20.11.12
19:38
Клиент просит сделать обмен между Бух 7.7 доработанной и Бух 8.2 чистой. Договора при этом должны сливаться. То есть, если у контрагента было 10 договоров поставки, 15 договоров по закупкам, 5 с типом прочее, то в 8.2 должно быть просто 3 договора с типом: поставщик, покупатель, прочее. Как это реализовать??? Далее в документах также будут подменяться договора по типу. Помогите, пожалуйста..... Уже сдавать проект надо(
1 Amra
 
20.11.12
19:40
(0) Делаешь поиск по наименованию договора и владельцу, и в обработчике переназначаешь наименование договора в "покупатель","поставщик" или "прочее" в зависимости от вида договора
2 Fyokla5
 
20.11.12
19:46
Можно немного поподробнее. Пока что пытаюсь хотя бы сам справочник Договоры выгрузить. В обработчике каком? ПриВыгрузке, ПриЗагрузки, ПередВыгрузкой или ПередЗагрузкой... в ПКО или ПКС ?
3 Aleksey
 
20.11.12
19:47
(1) Без наименования. Владелец, организация и вид
4 Конфигуратор1с
 
20.11.12
20:01
В ПКО после загрузки ищете договор по владельцу организации и виду и все
5 Йохохо
 
20.11.12
20:05
берешь какой есть ПКО Договоры
на всех свойствах галку - получить из входящих данных
в перед выгрузкой заполняешь списокзначений, как душе угодно
Источник будет СпрДоговоры
профит
6 Fyokla5
 
22.11.12
13:13
Спасибо. Частично разобралась. Договоры сливаются в один. Но теперь надо сделат так, чтобы вид договора подставлялся. В 7.7 нет вида. А в 8.2 надо его проставить соответственно счетам учета по каким прошел договор, 60 -поставщик, 62 - покупатель, остальное - прочее. Сделала запрос:

ТаблицаСчетовУчетаПоДоговорам = СоздатьОбъект("ТаблицаЗначений");
ТаблицаСчетовУчетаПоДоговорам.НоваяКолонка("Договор");
ТаблицаСчетовУчетаПоДоговорам.НоваяКолонка("Счет");
ТаблицаСчетовУчетаПоДоговорам.НоваяКолонка("ВидДоговора");

   Ит = СоздатьОбъект("БухгалтерскиеИтоги");                  
   Ит.ИспользоватьСубконто(ВидыСубконто.Договоры,, 1);          
   Ит.ВыполнитьЗапрос(НачГода(ТекущаяДата()), КонГода(ТекущаяДата()), "60, 62",,, 1,, "С");
   Ит.ВыбратьСчета();
   Пока Ит.ПолучитьСчет() = 1 Цикл
       Ит.ВыбратьСубконто(ВидыСубконто.Договоры);
       Пока Ит.ПолучитьСубконто(ВидыСубконто.Договоры) = 1 Цикл
           ТаблицаСчетовУчетаПоДоговорам.НоваяСтрока();
           ТаблицаСчетовУчетаПоДоговорам.Счет =  Ит.Счет;
           ТаблицаСчетовУчетаПоДоговорам.Договор =  Ит.Субконто(ВидыСубконто.Договоры);
                       
           Если Ит.Счет.Код = "60" Тогда
               ТаблицаСчетовУчетаПоДоговорам.ВидДоговора = "СПоставщиком";
           Иначе
               ТаблицаСчетовУчетаПоДоговорам.ВидДоговора = "СПокупателем";
           КонецЕСли;    
       КонецЦикла;
   КонецЦикла;

Куда бы этот запрос запихнуть и как обратиться, так чтобы уже в ПКС "Вид договора" просто находить в готовой таблице результат по договору???
7 Fyokla5
 
22.11.12
19:44
Help!!!
Основная теорема систематики: Новые системы плодят новые проблемы.