Имя: Пароль:
1C
1С v8
КА: РАУЗ и отчет ВаловаяПрибыль
,
0 Skom
 
24.04.14
10:14
Как сделать так, что бы отчет валовая прибыль учитывал себестоимость, которая рассчитывается в конце месяца, при проведении документа "расчет себестоимости"
1 neo_matrix_123
 
24.04.14
10:35
Если формировать валовую прибыль в начале месяца - однозначно никак.
требования к наполнению с-стоимости, которая должна попадать в валовую прибыль, - в вашем понимании это что?
2 Skom
 
24.04.14
10:36
я в конце формирую.
после расчта себестоимости вижу сформированные движения по регистру "Продажи себестоимость"
но, почему-то отчет не берет их во внимание.
3 Skom
 
24.04.14
10:39
может где настройки РАУЗ не верно указал. я его только начал осваивать.
4 говоряшийконь
 
24.04.14
10:45
Знаю про УПП. При Раузе он не работает. Писали сами на СКД.
5 Skom
 
24.04.14
10:50
это крайний случай.
6 Skom
 
24.04.14
12:41
в общем, придется дописать модуль, который создает движухи по регистру себестоимости.

валовая прибыль выбирает данные из продажи себестоимость не только по заказу но и по регистратору. немного допилить код и будет работать
7 neo_matrix_123
 
24.04.14
12:59
(2) реализация с видом операции продажа комиссия?
8 КнОпка
 
24.04.14
13:00
(6) для РАУЗ другие отчеты уже имеются
9 КнОпка
 
24.04.14
13:02
Сервис- произвольные отчеты, взять их из демо
10 Skom
 
24.04.14
14:04
Кстати, может кто знает.
В отчете РАУЗ: Выпуск продукции и услуг показывает себестоимость одну. А в регистре Продажи себестоимость, по той же номенклатура при проведении Расчет себестоимости устанавливается другая себестоимость. Причем как выше так и ниже отчета Выпуск продукции
11 Kalambur
 
24.04.14
14:15
(10) слова "Выпуск" и "Продажи" ни на че не намекают? совсем?
12 Skom
 
24.04.14
14:23
в данном случае не совсем.
у меня всего 2 выпуска сейчас в тестовой базе. и больше ничего. никаких дополнительных затрат
13 neo_matrix_123
 
24.04.14
14:31
(1) повторяю вопрос, ответ на который является ответом на вопрос (10)
14 Skom
 
24.04.14
14:38
(13) затраты на выпуск продукции.
15 Skom
 
24.04.14
14:39
стоимость материалов, списанных на производстов
16 neo_matrix_123
 
24.04.14
14:50
реализация продажа комиссия сделана?
17 neo_matrix_123
 
24.04.14
14:53
что мешает ответить? большимим буквами написать?
18 Skom
 
24.04.14
14:57
реализация через отчет ККМ
19 Skom
 
24.04.14
15:10
вот блин, сделал левое оприходование товаров и не могу понять, почему разная себестоимость)
20 neo_matrix_123
 
24.04.14
15:20
;-)
21 Skom
 
24.04.14
15:28
для себя решил вопрос с отчетом валовая прибыль.
не хочу по плановой себестоимости смотреть.

Немного поправил формирование движений по регистру Продажи себестоимость.
22 Skom
 
24.04.14
15:33
Стандартное поведение - документ Расчет Себестоимости делает
на каждую выпущенную продукцию одну запись за месяц с общей себестоимостью выпуска.

отчет же валовая прибыль собирает движуху из регистра себестоимости в разрезе документа сделавшего продажу.

в общем я сделал так:
В случае, если регистратор - документ
"Расчет Себестоимости", то при формировании движений беру все продажи продукции за месяц в разрезе документов продажи, беру общую себестоимость, которую док сам формирует, и формирую движения в таком виде, как берет отчет Валовая прибыль.
Т.е. просто детализирую штатные движения до документа продажи.
23 Skom
 
24.04.14
15:34
//БЫЛО:
//СтруктруаНаборовЗаписей.Вставить(Движения.ПродажиСебестоимость, ТаблицаДвиженийПоРегиструПродажиСебестоимость);

//СТАЛО:
            Если ТипЗнч(Регистратор) = Тип("ДокументСсылка.РасчетСебестоимостиВыпуска") Тогда
                
                ВремТЗ = Новый ТаблицаЗначений;
                ВремТЗ.Колонки.Добавить("Номенклатура", Новый ОписаниеТипов("СправочникСсылка.Номенклатура"));
                ВремТЗ.Колонки.Добавить("СебСтоимость"      , Новый ОписаниеТипов("Число"));
                
                Для Каждого Стр ИЗ ТаблицаДвиженийПоРегиструПродажиСебестоимость Цикл
                    к = ВремТЗ.Добавить();
                    к.Номенклатура = Стр.Номенклатура;
                    к.СебСтоимость = Стр.Стоимость;
                КонецЦикла;
                
                Запрос = Новый Запрос;
                Запрос.МенеджерВременныхТаблиц=Новый МенеджерВременныхТаблиц;
                Запрос.Текст = "
                |ВЫБРАТЬ ТЗ.Номенклатура, ТЗ.СебСтоимость ПОМЕСТИТЬ ДанныеИзТЗ ИЗ &ТЗ КАК ТЗ
                |;
                |////////////////////////////////////////////////////////////////////////
                //|Выбрать * ИЗ ДанныеИзТЗ
                |ВЫБРАТЬ
                |    ПродажиСебестоимость.Номенклатура,
                |    ПродажиСебестоимость.ХарактеристикаНоменклатуры,
                |    ПродажиСебестоимость.ЗаказПокупателя,
                |    ПродажиСебестоимость.ДокументОприходования,
                |    ПродажиСебестоимость.Подразделение,
                |    ПродажиСебестоимость.Проект,
                |    ПродажиСебестоимость.Организация,
                //|    ПродажиСебестоимость.Стоимость,
                |    дТЗ.СебСтоимость, МаксКоличество.Количество КАК МаксКоличетсво,
                |    (дТЗ.СебСтоимость /  МаксКоличество.Количество) * СУММА(ПродажиСебестоимость.Количество) КАК Стоимость,
                |    ПродажиСебестоимость.Регистратор КАК ДокументДвижения,
                |    ПродажиСебестоимость.Период,
                |    СУММА(ПродажиСебестоимость.Количество)
                |ИЗ
                |    РегистрНакопления.ПродажиСебестоимость КАК ПродажиСебестоимость
                |ЛЕВОЕ СОЕДИНЕНИЕ ДанныеИзТЗ КАК дТЗ
                |                 ПО дТЗ.Номенклатура = ПродажиСебестоимость.Номенклатура
                |ЛЕВОЕ СОЕДИНЕНИЕ
                |        (
                |            ВЫБРАТЬ
                |                ПродажиСебестоимость.Номенклатура,
                |                СУММА(ПродажиСебестоимость.Количество)
                |            ИЗ
                |                РегистрНакопления.ПродажиСебестоимость КАК ПродажиСебестоимость
                |            ГДЕ
                |                ПродажиСебестоимость.Период МЕЖДУ &НачДата И &КонДата
                |            СГРУППИРОВАТЬ ПО
                |                ПродажиСебестоимость.Номенклатура
                |        ) КАК МаксКоличество ПО МаксКоличество.Номенклатура = ПродажиСебестоимость.Номенклатура    
                |
                |ГДЕ
                |    ТИПЗНАЧЕНИЯ(ПродажиСебестоимость.Регистратор) = ТИП(Документ.ОтчетОРозничныхПродажах)
                |    И ПродажиСебестоимость.Период МЕЖДУ &НачДата И &КонДата
                |СГРУППИРОВАТЬ ПО
                |    ПродажиСебестоимость.Номенклатура,
                |    ПродажиСебестоимость.ХарактеристикаНоменклатуры,
                |    ПродажиСебестоимость.ЗаказПокупателя,
                |    ПродажиСебестоимость.ДокументОприходования,
                |    ПродажиСебестоимость.Подразделение,
                |    ПродажиСебестоимость.Проект,
                |    ПродажиСебестоимость.Организация,
                |    ПродажиСебестоимость.Стоимость,
                |    дТЗ.СебСтоимость, МаксКоличество.Количество,
                |    ПродажиСебестоимость.Регистратор,
                |    ПродажиСебестоимость.Период
                |";
                
                Запрос.УстановитьПараметр("ТЗ",            ВремТЗ);
                Запрос.УстановитьПараметр("НачДата",     НачалоМесяца(Регистратор.ПериодРегистрации));
                Запрос.УстановитьПараметр("КонДата",     КонецМесяца(Регистратор.ПериодРегистрации));
                
                Результат = Запрос.Выполнить().Выгрузить();
                ОбщееКоличество = Результат.Итог("Количество");
                
                КопияРезультат = ТаблицаДвиженийПоРегиструПродажиСебестоимость.Скопировать();
                КопияРезультат.Очистить();
                КопияРезультат.Колонки.Добавить("ДокументДвижения");
                
                Для Каждого СтрокаСебестоимость ИЗ Результат Цикл
                    НовСтр = КопияРезультат.Добавить();
                    ЗаполнитьЗначенияСвойств(НовСтр,СтрокаСебестоимость);
                КонецЦикла;
                СтруктруаНаборовЗаписей.Вставить(Движения.ПродажиСебестоимость, КопияРезультат);
            Иначе
                СтруктруаНаборовЗаписей.Вставить(Движения.ПродажиСебестоимость, ТаблицаДвиженийПоРегиструПродажиСебестоимость);
            КонецЕсли;
24 Skom
 
24.04.14
15:36
код немного корявый, завтра причешу его.

Кто в теме, подскажите, где мне может боком вылезти такая модернизация?

ПС: производство простейшее: кафешка, 1 цех, учитывается только тот выпуск продукции, который фактически продан, т.е. по отчету кмм формируется Выпуск продукции а потом уже формируется требование накладная.
Все то, что готовится заранее учтется в выпуске либо в день продажи, либо в день списания (на его основании тоже сделается выпуск продукции)
25 Skom
 
24.04.14
18:00
ку ку, специалисты?
26 Skom
 
25.04.14
09:22
подниму чуток.
27 Skom
 
25.04.14
11:34
и еще чуток