Имя: Пароль:
1C
1C 7.7
v7: Отчет по выручкам-затратам
0 alisssa
 
10.03.15
10:53
Здравствуйте!Необходимо создать отчет по выручкам/затратам в 1С 7.7 Выглядеть должен примерно вот так:
         Январь - …декабрь                           Итого:
Выручка с ндс    Ко( 90.1)    
Выручка без ндс    КО(90.1) – ДО(90.2)    
ндс             ДО(90.2)    
Затраты:
Товары(себестоимость)ОБ(90.4-41.1)+ОБ(90.4-43)    
Материалы    ОБ(90.4-10.1)+ОБ(10.1)    
Амортизация ос    ОБ(20-02)+ОБ(23-02)+ОБ(26-02)
Зарплата    ОБ(20-70)+ОБ(26-70)+ОБ(23-70)    
Налоги на зп    ОБ(20-69.1)+ОБ(26-69.1)+ОБ(23-69.1)    
Итого:        
Помогите кто чем сможет.Спасибо!
1 Ёпрст
 
10.03.15
10:55
Помогаю, купите ЖКК, читайте.
2 torgm
 
10.03.15
10:56
(0) забыли затраты с 60 и 71, по 10.01 будет двоиться.
Как то так, помогаю :)
3 lavalit
 
10.03.15
15:11
Ну  с БухИтогами умеете?
4 lavalit
 
10.03.15
15:11
По моему таки простенький бухЗапрос должон получиться....
5 Злопчинский
 
10.03.15
19:10
А прочие доходы/расходы?
6 torgm
 
10.03.15
19:15
(5)  ну это дорасти надо :) банковские по любому есть :)
7 alisssa
 
12.03.15
09:15
Пока вот что получилось:
Перем  Итого1, БИ ;
ПРоцедура ПриОткрытии()
    ВыбНачПериода = '01.01.2015';
    ВыбКонПериода = РабочаяДата();
    
КонецПроцедуры
Процедура Сформировать_Колонки(БИ, Т, Стр)
    Т.ВывестиСекцию(Стр+"|Начало");
    БИ.ВыбратьПериоды(1);
    Пока БИ.ПолучитьПериод() = 1 Цикл
    Т.ПрисоединитьСекцию(Стр+"|Период");
    КонецЦикла;
    Т.ПрисоединитьСекцию(Стр+"|Итог");
КонецПроцедуры

Процедура Сформировать()
    БИ = СоздатьОбъект("БухгалтерскиеИтоги");
    Т = СоздатьОбъект("Таблица");
    Т.ИсходнаяТаблица("Таблица");
    БИ.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода,,,, 1, "Месяц", "СК");
    Т.Опции(0,0,Т.ВысотаТаблицы(),0);
    БИ.Рассчитать(ВыбНачПериода, ВыбКонПериода,,,1);
    ВырСНДС     = БИ.КО(СчетПоКоду("90.1"));
    ВырБезНДС     = (БИ.КО(СчетПоКоду("90.1",)) - БИ.ДО(СчетПоКоду("90.2",)));
    НДС= БИ.ДО(СчетПоКоду("90.2"));
    Товары    = (БИ.ОБ("90.4","41.1"))+(БИ.ОБ("90.4", "43"));
    Материалы    = Окр((БИ.ОБ("90.4", "10.1")));
    АморОС = Окр((БИ.ОБ("20", "02")) + (БИ.ОБ("23", "02")) + (БИ.ОБ("26", "02")));
    ЗП = (БИ.ОБ("20", "70")) + (БИ.ОБ("26", "70")) + (БИ.ОБ("23", "70"));
    НалогиЗП = (БИ.ОБ("20", "69.1")) + (БИ.ОБ("26", "69.1")) + (БИ.ОБ("23", "69.1"));
    Итого1=Товары+Материалы+АморОС+ЗП+НалогиЗП;
    
    Т.ИсходнаяТаблица("Таблица");
    Т.ВывестиСекцию("Начало");
    Т.ВывестиСекцию("Период");
    Т.ВывестиСекцию("Итог");
    Т.Опции(0,0);
    Т.Показать();
КонецПроцедуры


Как-то нужно разбить по месяцам....
8 Злопчинский
 
12.03.15
13:03
Воспользуйся http://infostart.ru/public/14794/
как пример: http://infostart.ru/public/14381/
9 cw014
 
12.03.15
13:43
Про фото в купальнике что то никто не заикнулся
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.