По теме из базы знаний
- Порядок учета операций импорта из стран ЕАЭС в УПП 1.3
- Рабочее место оператора резки рулонов. Конфигурация УПП 1.3
- Курсовые разницы в 2022 - 2024 годах в «1С:Управление производственным предприятием» ред.1.3 (УПП)
- Переход с УПП на ERP. Сложности выверки регламентированного учета при «плавном переходе»
- Оборотная ведомость движения ТМЦ по данным бухгалтерского учета для УПП 1.3
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
ОСВ - это отчет который выводит записи кторые записанны уже в рег.
Есть 2 варианта это сделать.
1. В рег. бух добавит еще одно количество (Кво*Коефициент). И потом его получать.
2. Переписать запрос ОСВ (геморойное дело).
Есть 2 варианта это сделать.
1. В рег. бух добавит еще одно количество (Кво*Коефициент). И потом его получать.
2. Переписать запрос ОСВ (геморойное дело).
(9) так совет советом но суть вопроса в том что мне ОСВ поменять надо, короче где мне вставить и главное что в этом запросеФункция СформироватьЗапрос(СтруктураПараметров) Экспорт
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Счет", Счет);
Запрос.УстановитьПараметр("ДатаНач", ДатаНач);
Если ДатаКон <> '00010101000000' Тогда
Запрос.УстановитьПараметр("ДатаКон", КонецДня(ДатаКон));
Иначе
Запрос.УстановитьПараметр("ДатаКон", ДатаКон);
КонецЕсли;
Запрос.УстановитьПараметр("Организация", Организация);
Если ПоСубсчетам Тогда
Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| ОстаткиИОбороты.Счет КАК Счет,
| ПРЕДСТАВЛЕНИЕ(ОстаткиИОбороты.Счет) КАК СчетПредставление";
Иначе
Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| &Счет КАК Счет,
| ПРЕДСТАВЛЕНИЕ(&Счет) КАК СчетПредставление";
КонецЕсли;
Если ПоВалютам Тогда
Текст = Текст + ",
| ОстаткиИОбороты.Валюта КАК Валюта,
| ПРЕДСТАВЛЕНИЕ(ОстаткиИОбороты.Валюта) КАК ВалютаПредставление";
КонецЕсли;
Текст = Текст + БухгалтерскиеОтчеты.ВернутьЧастьЗапросаПоВыборкеПолейОборотноСальдоваяВедомость(СтруктураПараметров.МассивПоказателей, Истина,
Истина, Истина, РазвернутоеСальдо);
ТекстПоля = "";
ТекстИтоги = "";
ТекстПорядок = "";
Для каждого Измерение Из ПостроительОтчета.ИзмеренияСтроки Цикл
ТекстПоля = ТекстПоля + ", " + Измерение.ПутьКДанным + " КАК " + Измерение.Имя;
ТекстПоля = ТекстПоля + ", ПРЕДСТАВЛЕНИЕ(" + Измерение.ПутьКДанным + ") КАК " + Измерение.Имя + "Представление";
ТекстИтоги = ТекстИтоги + ", " + Измерение.Имя + БухгалтерскиеОтчеты.ПолучитьПоТипуИзмеренияПостроителяОтчетаСтрокуЗапроса(Измерение.ТипИзмерения);
КонецЦикла;
ОграниченияПоПостроителюОтчета = БухгалтерскиеОтчеты.ПолучитьТекстОграниченийПоПостроителюОтчета(ПостроительОтчета, Запрос);
СтрокаОграниченийПоРеквизитам = "";
БухгалтерскиеОтчеты.ДополнитьСтрокуОграниченийПоРеквизитам(СтрокаОграниченийПоРеквизитам, "Организация", Организация);
Если Не ПустаяСтрока(ОграниченияПоПостроителюОтчета)
И Не ПустаяСтрока(СтрокаОграниченийПоРеквизитам) Тогда
ОграниченияПоПостроителюОтчета = " И " + ОграниченияПоПостроителюОтчета;
КонецЕсли;
Текст = Текст +
ТекстПоля + "
|
|ИЗ
| РегистрБухгалтерии."+ИмяРегистраБухгалтерии+".ОстаткиИОбороты(&ДатаНач, &ДатаКон, , , Счет В ИЕРАРХИИ (&Счет),
|, " + СтрокаОграниченийПоРеквизитам + ОграниченияПоПостроителюОтчета + ") КАК ОстаткиИОбороты
|";
ТекстИтогов = БухгалтерскиеОтчеты.ВернутьЧастьЗапросаПоВыборкеПолейОборотноСальдоваяВедомость(СтруктураПараметров.МассивПоказателей, Ложь,,, РазвернутоеСальдо);
Текст = Текст + Символы.ПС + "ИТОГИ" + Символы.ПС + Сред(ТекстИтогов, 2);
Текст = Текст + "
| ПО ОБЩИЕ";
Если ПоСубсчетам Тогда
Текст = Текст + ",
| Счет ИЕРАРХИЯ КАК Счет ";
КонецЕсли;
Если ПоВалютам Тогда
Текст = Текст + ",
| Валюта ";
КонецЕсли;
Текст = Текст + ТекстИтоги + "
|АВТОУПОРЯДОЧИВАНИЕ";
Запрос.Текст = Текст;
Возврат Запрос;
КонецФункции
чтобы количество умножалось на коэффициент из справочника Еденицы измерения
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Счет", Счет);
Запрос.УстановитьПараметр("ДатаНач", ДатаНач);
Если ДатаКон <> '00010101000000' Тогда
Запрос.УстановитьПараметр("ДатаКон", КонецДня(ДатаКон));
Иначе
Запрос.УстановитьПараметр("ДатаКон", ДатаКон);
КонецЕсли;
Запрос.УстановитьПараметр("Организация", Организация);
Если ПоСубсчетам Тогда
Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| ОстаткиИОбороты.Счет КАК Счет,
| ПРЕДСТАВЛЕНИЕ(ОстаткиИОбороты.Счет) КАК СчетПредставление";
Иначе
Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| &Счет КАК Счет,
| ПРЕДСТАВЛЕНИЕ(&Счет) КАК СчетПредставление";
КонецЕсли;
Если ПоВалютам Тогда
Текст = Текст + ",
| ОстаткиИОбороты.Валюта КАК Валюта,
| ПРЕДСТАВЛЕНИЕ(ОстаткиИОбороты.Валюта) КАК ВалютаПредставление";
КонецЕсли;
Текст = Текст + БухгалтерскиеОтчеты.ВернутьЧастьЗапросаПоВыборкеПолейОборотноСальдоваяВедомость(СтруктураПараметров.МассивПоказателей, Истина,
Истина, Истина, РазвернутоеСальдо);
ТекстПоля = "";
ТекстИтоги = "";
ТекстПорядок = "";
Для каждого Измерение Из ПостроительОтчета.ИзмеренияСтроки Цикл
ТекстПоля = ТекстПоля + ", " + Измерение.ПутьКДанным + " КАК " + Измерение.Имя;
ТекстПоля = ТекстПоля + ", ПРЕДСТАВЛЕНИЕ(" + Измерение.ПутьКДанным + ") КАК " + Измерение.Имя + "Представление";
ТекстИтоги = ТекстИтоги + ", " + Измерение.Имя + БухгалтерскиеОтчеты.ПолучитьПоТипуИзмеренияПостроителяОтчетаСтрокуЗапроса(Измерение.ТипИзмерения);
КонецЦикла;
ОграниченияПоПостроителюОтчета = БухгалтерскиеОтчеты.ПолучитьТекстОграниченийПоПостроителюОтчета(ПостроительОтчета, Запрос);
СтрокаОграниченийПоРеквизитам = "";
БухгалтерскиеОтчеты.ДополнитьСтрокуОграниченийПоРеквизитам(СтрокаОграниченийПоРеквизитам, "Организация", Организация);
Если Не ПустаяСтрока(ОграниченияПоПостроителюОтчета)
И Не ПустаяСтрока(СтрокаОграниченийПоРеквизитам) Тогда
ОграниченияПоПостроителюОтчета = " И " + ОграниченияПоПостроителюОтчета;
КонецЕсли;
Текст = Текст +
ТекстПоля + "
|
|ИЗ
| РегистрБухгалтерии."+ИмяРегистраБухгалтерии+".ОстаткиИОбороты(&ДатаНач, &ДатаКон, , , Счет В ИЕРАРХИИ (&Счет),
|, " + СтрокаОграниченийПоРеквизитам + ОграниченияПоПостроителюОтчета + ") КАК ОстаткиИОбороты
|";
ТекстИтогов = БухгалтерскиеОтчеты.ВернутьЧастьЗапросаПоВыборкеПолейОборотноСальдоваяВедомость(СтруктураПараметров.МассивПоказателей, Ложь,,, РазвернутоеСальдо);
Текст = Текст + Символы.ПС + "ИТОГИ" + Символы.ПС + Сред(ТекстИтогов, 2);
Текст = Текст + "
| ПО ОБЩИЕ";
Если ПоСубсчетам Тогда
Текст = Текст + ",
| Счет ИЕРАРХИЯ КАК Счет ";
КонецЕсли;
Если ПоВалютам Тогда
Текст = Текст + ",
| Валюта ";
КонецЕсли;
Текст = Текст + ТекстИтоги + "
|АВТОУПОРЯДОЧИВАНИЕ";
Запрос.Текст = Текст;
Возврат Запрос;
КонецФункции
чтобы количество умножалось на коэффициент из справочника Еденицы измерения
по моему какая то бессмыселенная доработка, у разной номенклатуры может быть разное количество ЕдиницИзмерения
и коэффициентов и на какой из них умножать (на тот который не является единицой хранения остатков )?
примерно получиться вот такой бессмысленный запрос:
и коэффициентов и на какой из них умножать (на тот который не является единицой хранения остатков )?
примерно получиться вот такой бессмысленный запрос:
ВЫБРАТЬ РАЗРЕШЕННЫЕ
ОстаткиИОбороты.Счет КАК Счет,
ПРЕДСТАВЛЕНИЕ(ОстаткиИОбороты.Счет) КАК СчетПредставление,
ОстаткиИОбороты.Субконто1,
ЕдиницыИзмерения.Наименование,
ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоНачальныйОстатокДт * ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоНачальныйОстатокКт * ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоОборотДт * ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоОборотКт * ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоКонечныйОстатокДт * ЕдиницыИзмерения.Коэффициент,
ОстаткиИОбороты.КоличествоКонечныйОстатокКт * ЕдиницыИзмерения.Коэффициент
ИЗ
РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты(&ДатаНач, &ДатаКон, , , Счет В ИЕРАРХИИ (&Счет), , ) КАК ОстаткиИОбороты
Левое Соединение
(
Выбрать Владелец,Наименование, Коэффициент
из Справочник.ЕдиницыИзмерения
) как ЕдиницыИзмерения
ПО
ОстаткиИОбороты.Субконто1 = ЕдиницыИзмерения.Владелец
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот