Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> В отчете не считает сумму по документам , Не видит суммы по одному виду документа          
wmatik Подменю пользователя
сообщение 09.06.11, 12:17
Сообщение #1

Оратор
*****
Группа: Пользователи
Сообщений: 294
Спасибо сказали: 1 раз
Рейтинг: 0

1С Предприятие 7.7(сетевая версия) - 7.70.027,Конфигурация: ПУБ (7.70.010)
Есть отчет, в котором в факт должна выводиться сумма по нескольким видам документов: ПриходнаяНакладнаяЗапасы,ПриходнаяНакладнаяГТД,ПриходнаяНакладнаяПрочие и БанковскаяВыписка. Сумма по первым трем видам выводится, а вот Банковской выписки не хочет.
        Если (Док.Вид() = "ПриходнаяНакладнаяЗапасы") ИЛИ
            (Док.Вид() = "ПриходнаяНакладнаяПрочие") ИЛИ
            (Док.Вид() = "ПриходнаяНакладнаяГТД") Тогда
            Док.ВыбратьСтроки();
            Сумма = 0;
            Пока Док.ПолучитьСтроку() = 1 Цикл
                Если ПустоеЗначение(Док.КодДК) = 1 Тогда
                    Продолжить;
                КонецЕсли;
                Если (ПустоеЗначение(ВыбКод) = 0)и((Лев(СокрЛП(Док.КодДК),СтрДлина(СокрЛП(ВыбКод))) <> СокрЛП(ВыбКод))или(СтрДлина(СокрЛП(ВыбКод))>СтрДлина(СокрЛП(Док.КодДК)))) Тогда
                    Продолжить;
                КонецЕсли;
                
                Табл.НоваяСтрока();
                Табл.КодДК = Док.КодДК;
                Сумма=Док.СуммаСНДС;
                //Сумма = глПересчет(Док.СуммаСНДС,Док.Валюта,Док.ДатаДок,Гривня,Док.ДатаДок,Док.ДатаДок);// Док.СуммаСНДС;
                Если ПрошлГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.ПрошлФакт = Сумма;
                ИначеЕсли ЭтотГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.УстановитьЗначение(Табл.КоличествоСтрок(),"мес"+Строка(ДатаМесяц(Док.ДатаДок))+"_факт",Сумма);
                КонецЕсли;
            КонецЦикла;
            
            Иначе  
                Если ПустоеЗначение(Док.ВидыЗакупок) = 1 Тогда
                    Продолжить;
                КонецЕсли;  
                Если (ПустоеЗначение(ВыбКод) = 0)и((Лев(СокрЛП(Док.ВидыЗакупок),СтрДлина(СокрЛП(ВыбКод))) <> СокрЛП(ВыбКод))или(СтрДлина(СокрЛП(ВыбКод))>СтрДлина(СокрЛП(Док.ВидыЗакупок)))) Тогда
                    Продолжить;
                КонецЕсли;
                
                Если Док.Вид() = "БанковскаяВыписка" Тогда
                    Сумма = глПересчет(Док.СуммаСНДС,Док.РСчет.Валюта,Док.ДатаДок,Гривня,Док.ДатаДок,Док.ДатаДок);// Док.СуммаСНДС;
                КонецЕсли;
                Табл.НоваяСтрока();
                Табл.КодДК = Док.ВидыЗакупок;
                Если ПрошлГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.ПрошлФакт = Сумма;
                ИначеЕсли ЭтотГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.УстановитьЗначение(Табл.КоличествоСтрок(),"мес"+Строка(ДатаМесяц(Док.ДатаДок))+"_факт",Сумма);
                КонецЕсли;
            КонецЕсли;


Signature
1С Предприятие 7.7(сетевая версия) - 7.70.027,Конф: ПУБ(7.70.010)

Vofka Подменю пользователя
сообщение 09.06.11, 12:36
Сообщение #2

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

А в банковской выписке разве не в табличной части суммы?

Спасибо сказали: wmatik,

wmatik Подменю пользователя
сообщение 09.06.11, 12:49
Сообщение #3

Оратор
*****
Группа: Пользователи
Сообщений: 294
Спасибо сказали: 1 раз
Рейтинг: 0

есть - СуммаСНДС

В общем сделала проще, изменила идентификатор Банковской выписки ВидыЗакупок на КодДК и в итоге:
            Если (Док.Вид() = "БанковскаяВыписка") ИЛИ
            (Док.Вид() = "ПриходнаяНакладнаяЗапасы") ИЛИ
            (Док.Вид() = "ПриходнаяНакладнаяПрочие") ИЛИ
            (Док.Вид() = "ПриходнаяНакладнаяГТД") Тогда
            Док.ВыбратьСтроки();
            Сумма = 0;
            Пока Док.ПолучитьСтроку() = 1 Цикл
                Если ПустоеЗначение(Док.КодДК) = 1 Тогда
                    Продолжить;
                КонецЕсли;
                Если (ПустоеЗначение(ВыбКод) = 0)и((Лев(СокрЛП(Док.КодДК),СтрДлина(СокрЛП(ВыбКод))) <> СокрЛП(ВыбКод))или(СтрДлина(СокрЛП(ВыбКод))>СтрДлина(СокрЛП(Док.КодДК)))) Тогда
                    Продолжить;
                КонецЕсли;
                
                Табл.НоваяСтрока();
                Табл.КодДК = Док.КодДК;
                Сумма=Док.СуммаСНДС;
                //Сумма = глПересчет(Док.СуммаСНДС,Док.Валюта,Док.ДатаДок,Гривня,Док.ДатаДок,Док.ДатаДок);// Док.СуммаСНДС;
                Если ПрошлГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.ПрошлФакт = Сумма;
                ИначеЕсли ЭтотГод = СокрЛП(ПериодСтр(НачГода(Док.ДатаДок),КонГода(Док.ДатаДок))) Тогда
                    Табл.УстановитьЗначение(Табл.КоличествоСтрок(),"мес"+Строка(ДатаМесяц(Док.ДатаДок))+"_факт",Сумма);
                КонецЕсли;
            КонецЦикла;
            КонецЕсли;


Ах да, забыла написать, все считает)


Signature
1С Предприятие 7.7(сетевая версия) - 7.70.027,Конф: ПУБ(7.70.010)

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 16.06.25, 0:43
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!