Модераторы: stron
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Где ошибка в коде? Формирование Отчета Сведения по ОС  
V
    Опции темы
din107
Дата 4.4.2008, 10:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 17.1.2008

Репутация: нет
Всего: нет



1C: Бухгалтерия, v7.7
Доброе время суток!!!

Подскажите, у меня есть обработка Сведения по ОС. В эту обработку мне сказали вставить флажок, при нажатии на который должны выбираться Основные сведения стоимостью до 20000 рублей и при этом они должны быть с 01.01.2008 года, а те которые были раньше до этой даты, не учитывались. Я написал следующий код для этого флажка:
Код


    Если Включ = 1 Тогда
        Если Подразделение.Выбран()=1 Тогда   
            Спр = СоздатьОбъект("Справочник.ОсновныеСредства");
            БИ = СоздатьОбъект("БухгалтерскиеИтоги");
            Спр.ВыбратьЭлементы();
            Пока Спр.ПолучитьЭлемент() = 1 Цикл  
                Если Спр.ЭтоГруппа()=1 Тогда
                    Продолжить;
                КонецЕсли;
                
                Если (Спр.Подразделение.Получить(ДатаКон) = Подразделение) И (Спр.Состояние.Получить(ДатаКон) <> Перечисление.СостоянияОС.Выбыло) Тогда
                    ОсС = Спр.ТекущийЭлемент();
                    СуммаСпр = Спр.ПервоначальнаяСтоимость.Получить(ДатаКон);
                    БИ.ИспользоватьСубконто(ВидыСубконто.ОсновныеСредства,ОсС,1); 
                    БИ.ВыполнитьЗапрос(СДата,ДатаКон,"01.1",,1,,,);  
                    Сумма01 =БИ.СКД(); 
                    Если (Сумма01<>СуммаСпр) И (Сумма01<20000) Тогда 
                        ИТОГОкБалансоваяСтоимость = ИТОГОкБалансоваяСтоимость + СуммаСпр;
                        Т.ВывестиСекцию("Строка"); 
                    КонецЕсли;
                КонецЕсли;
                
            КонецЦикла;
        КонецЕсли;
        
    КонецЕсли;

,
где СДата = 01.01.2008
но документы почему-то учитываются датой раньше, чем 01.01.2008. Что мне надо сделать, чтобы обработка правильно работала? 

Это сообщение отредактировал(а) din107 - 4.4.2008, 10:44
PM MAIL   Вверх
SaschaL
Дата 4.4.2008, 11:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9



ДОбрый день!
Если возможно выложите весь код этой процедуры, и по подробнее объясните что именно не так работает и если ест ошибки то что они из себя представляют.
PM MAIL ICQ   Вверх
Itsys
Дата 4.4.2008, 12:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 7
Всего: 34



Что значит были? Если были введены в эксплуатацию, то надо написать:
                    Сумма01 =БИ.СКД() - БИ.СНД(); 
в этом случае, если ОС было до Сдата, то будет и сальдо начальное, а соответсвенно Сумма01 будет = 0, но только в том случае, если в указанный период небыло модернизации (в этом случае Сумма01 не будет равна 0)
PM MAIL WWW Skype   Вверх
din107
Дата 4.4.2008, 12:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 17.1.2008

Репутация: нет
Всего: нет



Цитата(Itsys @ 4.4.2008,  12:12)
Что значит были?

Это значит, что были введены в эксплуатацию

Добавлено через 12 минут и 42 секунды
Цитата(SaschaL @ 4.4.2008,  11:52)
Если возможно выложите весь код этой процедуры, и по подробнее объясните что именно не так работает и если ест ошибки то что они из себя представляют.

Дело в том, что, когда я ставлю галочку и запускаю обработку, то программа выдаёт основные средства и те, которые были введены в эксплуатацию до 01.01.2008 года. Процедуру целеком пока не могу выложить, я попосже обработку целеком выложу
PM MAIL   Вверх
Itsys
Дата 4.4.2008, 12:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 7
Всего: 34



Цитата(Itsys @  4.4.2008,  12:12 Найти цитируемый пост)
                   Сумма01 =БИ.СКД() - БИ.СНД(); 

Я же написал, чего надо исправить.
PM MAIL WWW Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "1C: Предприятие, SAP, ERP и учётные системы"
stron

Запрещается!

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

2. Давать ссылки на взломанные продукты

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, stron, Pegas.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема »


 




[ Время генерации скрипта: 0.0926 ]   [ Использовано запросов: 20 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.