Имя: Пароль:
1C
1С v8
Загрузить ТЗ с пустым видом субконто в регистр бухгалтерии.
0 marinell
 
22.10.13
14:02
Приветствую!
Искала решение проблемы в поиске, но нашла только топик с таким же, как у меня, вопросом, а на него ни одного ответа...
Проблема: есть запрос, который выгружает в ТЗ проводки по НУ с определенным условием (дебет или кредит 10 счета). Соответственно, корсчет может быть любым.
И вот эту ТЗ нужно загрузить в корректировку записей регистров. при загрузке выдает ошибку, что неверный тип у субконто, которого нет на 10 счете: "В колонке вид субконто содержится значение неверного типа! (ВидСубконтоДт3)"

Совсем отказаться от субконто3 по Дт и Кт я не могу, так как в корсчетах они есть (20 и ПВ). Прописывала типы "Неопределено" и просто "". Не помогает. Как быть?

Код:

    Запрос.Текст =  "ВЫБРАТЬ
                    |    НалоговыйДвиженияССубконто.СчетДт,
                    |    НалоговыйДвиженияССубконто.СубконтоДт1,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт1,
                    |    НалоговыйДвиженияССубконто.СубконтоДт2,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт2,
                    |    НалоговыйДвиженияССубконто.СубконтоДт3,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт3,
                    |    НалоговыйДвиженияССубконто.СчетКт,
                    |    НалоговыйДвиженияССубконто.СубконтоКт1,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт1,
                    |    НалоговыйДвиженияССубконто.СубконтоКт2,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт2,
                    |    НалоговыйДвиженияССубконто.СубконтоКт3,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт3,
                    |    НалоговыйДвиженияССубконто.Организация,
                    |    НалоговыйДвиженияССубконто.ВидУчетаДт,
                    |    НалоговыйДвиженияССубконто.ВидУчетаКт,
                    |    СУММА(НалоговыйДвиженияССубконто.Сумма) КАК Сумма,
                    |    СУММА(НалоговыйДвиженияССубконто.КоличествоДт) КАК КоличествоДт,
                    |    СУММА(НалоговыйДвиженияССубконто.КоличествоКт) КАК КоличествоКт
                    |ИЗ
                    |    РегистрБухгалтерии.Налоговый.ДвиженияССубконто(
                    |            &ДатаНач,
                    |            &ДатаКон,
                    |            ВидУчета = &НУ
                    |                И (СчетДт В ИЕРАРХИИ (&Сч10)
                    |                    ИЛИ СчетКт В ИЕРАРХИИ (&Сч10))
                    |                И (СубконтоДт1 В (&СписНом)
                    |                    ИЛИ СубконтоКт1 В (&СписНом)),
                    |            ,
                    |            ) КАК НалоговыйДвиженияССубконто
                    |
                    |СГРУППИРОВАТЬ ПО
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт1,
                    |    НалоговыйДвиженияССубконто.СубконтоДт1,
                    |    НалоговыйДвиженияССубконто.ВидУчетаДт,
                    |    НалоговыйДвиженияССубконто.Организация,
                    |    НалоговыйДвиженияССубконто.СчетДт,
                    |    НалоговыйДвиженияССубконто.СчетКт,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт3,
                    |    НалоговыйДвиженияССубконто.СубконтоКт1,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт2,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоДт2,
                    |    НалоговыйДвиженияССубконто.СубконтоДт3,
                    |    НалоговыйДвиженияССубконто.СубконтоДт2,
                    |    НалоговыйДвиженияССубконто.СубконтоКт3,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт1,
                    |    НалоговыйДвиженияССубконто.ВидУчетаКт,
                    |    НалоговыйДвиженияССубконто.СубконтоКт2,
                    |    НалоговыйДвиженияССубконто.ВидСубконтоКт3";
                    
                    Запрос.УстановитьПараметр("Сч10", Сч10);
                    Запрос.УстановитьПараметр("НУ", Перечисления.ВидыУчетаПоПБУ18.НУ);
                    Запрос.УстановитьПараметр("ДатаНач", ДатаНач);
                    Запрос.УстановитьПараметр("ДатаКон", ДатаКон);
                    Запрос.УстановитьПараметр("СписНом", СписНом);

    ТЗ = Запрос.Выполнить().Выгрузить();
    
ДокументОбъект  = Документы.КорректировкаЗаписейРегистров.СоздатьДокумент();
    ДокументОбъект.Движения.Налоговый.Прочитать();
    ДвиженияКЗР  = ДокументОбъект.Движения["Налоговый"];
            ДвиженияКЗР.Загрузить(ТЗ); ///вот тут здрасссссьте
1 zak555
 
22.10.13
14:04
2 marinell
 
22.10.13
14:11
(1) Да )) Пустая ссылка ПВХ. Спасибо!
3 zak555
 
22.10.13
14:16
500р
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший