Имя: Пароль:
1C
1С v8
КД: перенос документа ОперацииБух из БП 2.0 в КА 1.1
0 maksjuve
 
16.05.14
21:08
При переносе документа ОперацииБух из БП 2.0 в КА 1.1 возникла трудность: в БП на некоторых счетах 3 субконто а в КА только 2. При загрузке в КА выскакивает ошибка. Подскажите как в КД при выгрузке данного документа удалить (или не выгружать) не нужные субконто?
1 Тюря
 
16.05.14
21:43
В правилах убрать третье субконто.
2 mehfk
 
16.05.14
21:46
Если разово - кури модуль набора записей регистра бухгалтерии.
3 maksjuve
 
16.05.14
21:50
(1) так я и спрашиваю как?? в ПКС документа ОперацияБух есть свойство СубконтоДт и СубконтоКт, если при выгрузке в них ставить отказ = истина тогда вообще не выгружается ни одного субконто!! не понимаю как не выгружать именно то что не нужно...
4 maksjuve
 
16.05.14
21:53
(2)пробовал делать так : в группу Хозрасчетные ПКС ОперацияБух перед обработкой добавил моду:
НаборЗаписей = Источник.Движения.Хозрасчетный.Прочитать();
//КоллекцияОбъектов = НаборЗаписей.Выгрузить();
//Для каждого СтрокаКоллекции Из КоллекцияОбъектов Цикл
//    Если СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("91.02") ИЛИ
//         СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("91.01") тогда
//        СтрокаКоллекции.СубконтоДт.Удалить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.РеализуемыеАктивы);
//    ИначеЕсли  СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("60.01") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("76.09") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("60.02") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("62.02") тогда
//             СтрокаКоллекции.СубконтоДт.Удалить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ДокументыРасчетовСКонтрагентами);
//    КонецЕсли;
//    Если     СтрокаКоллекции.СчетКт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("91.02") ИЛИ
//             СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("91.01") тогда
//        СтрокаКоллекции.СубконтоДт.Удалить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты);
//    ИначеЕсли  СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("60.01") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("76.09") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("60.02") ИЛИ
//               СтрокаКоллекции.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду ("62.02") тогда
//             СтрокаКоллекции.СубконтоДт.Удалить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ДокументыРасчетовСКонтрагентами);
//    КонецЕсли;     
//КонецЦикла;

но Ошибка  Источник.Движения - не определено (у Источника нет свойства Движения)