Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

выдает такую ошибку на некоторых документах как проверит есть ли данное Субконто?

sfeed
читатель
офлайн
Дата регистрации: 28.08.2009
Сообщений: 31
Пост №1
 
04.12.2009 14:45

"выдает такую ошибку на некоторых документах как проверит есть ли данное Субконто? <br>(это я вставляю в обработчик журнала)<br><br>если Опер.Документ.СубконтоКт4 <> 0 тогда<br>{Отчет.новый2.Форма.Модуль(582)}: Поле агрегатного объекта не обнаружено (СубконтоКт4)<br><br><br><br>Пока Опер.Документ.ПолучитьСтроку() = 1 Цикл <br> Опер_ = СоздатьОбъект("Операция");<br> Если Опер_.НайтиОперацию(Опер.Документ) = 1 Тогда<br> Опер_.ВыбратьПроводки();<br> Пока Опер_.ПолучитьПроводку() = 1 Цикл       <br> Если Опер_.Дебет.Счет.Код ="А17.01.2.3" Тогда <br>        Опер_.Дебет.Субконто("Подразделения",Опер.Документ.Подразделение);<br> Опер_.Дебет.Подразделения =Опер.Документ.Подразделение;<br> ИначеЕсли Опер_.Кредит.Счет.Код ="А17.01.2.3" Тогда <br>        Опер_.Кредит.Субконто("Подразделения",Опер.Документ.Подразделение);<br> Опер_.Кредит.Подразделения =Опер.Документ.Подразделение;<br> ИначеЕсли Опер_.Дебет.Счет.Код ="А18.01.2.3" Тогда <br>        Опер_.Дебет.Субконто("Подразделения",Опер.Документ.Подразделение);<br> Опер_.Дебет.Подразделения =Опер.Документ.Подразделение;<br> ИначеЕсли Опер_.Кредит.Счет.Код ="А18.01.2.3" Тогда <br> если Опер.Документ.СубконтоКт4 <> 0 тогда<br> Опер_.Кредит.Субконто("Подразделения",Опер.Документ.СубконтоКт4);<br> Опер_.Кредит.Подразделения =Опер.Документ.СубконтоКт4; <br> иначе <br> Опер_.Кредит.Субконто("Подразделения",Опер.Документ.Подразделение);<br> Опер_.Кредит.Подразделения =Опер.Документ.Подразделение;<br> конецесли;<br> Иначе <br> КонецЕсли; <br>                   <br> <br> КонецЦикла;<br> Опер_.Записать();<br>КонецЕсли;       <br>КонецЦикла;"

ValeraH
читатель
офлайн
Дата регистрации: 31.03.2004
Сообщений: 264
Пост №2
 
04.12.2009 14:58

Попытка<br>

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №3
 
04.12.2009 16:44

ууууууууу<br><br>бюджетка 77?

sfeed
читатель
офлайн
Дата регистрации: 28.08.2009
Сообщений: 31
Пост №4
 
04.12.2009 23:52

да 7,7 634<br>так как правильно проверить? существует ли субкнто или нет?

Вьюн
читатель
офлайн
Дата регистрации: 14.01.2007
Сообщений: 657
Пост №5
 
05.12.2009 00:40

Если глЕстьРеквизитМнЧ("СубконтоКт4", Опер.Документ.Вид()) = 1 Тогда <br>

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №6
 
06.12.2009 16:18

> Если глЕстьРеквизитМнЧ("СубконтоКт4", Опер.Документ.Вид()) = 1 Тогда <br>> <br><br>а разве есть такая функция в бюджетке ?

Вьюн
читатель
офлайн
Дата регистрации: 14.01.2007
Сообщений: 657
Пост №7
 
06.12.2009 16:37

Конечно, есть. И даже есть глЕстьРеквизитШапки().

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация