Помогите новичку,запарка по ПУБ 7.7 как добавить код к наименованию в отчете
26.01.2009
08:50
#1
Бухгалтер попросила в отчете ОСВ по счету, в счете мц.02 добавить код , как по счету мц.01, перерыла всю базу не могу найти в каком месте она это берет, по ОС отслеживает, а по материалам не может, а если написать новый отчет то как вытащить чтобы именно остатки по этому счету.
26.01.2009
10:38
#2
"У бухгалтеров хотелки похожие, я в типовой 7.7 в отчете ОборотноСальдоваяВедомостьПоСчету делал вставку (не знаю, как это поможет в ПУБ, разве что идеологически) :
В процедуре ПоСубконто(Ит, Т, ФлВал)
перед началом цикла вставил строку:
ВидСубконто1=Счет.ВидСубконто(1);
а перед строкой
Т.ВывестиСекцию("Секция_2");
вставил:
//-----------------------------------------------
Если СокрЛП(ВидСубконто1)="Номенклатура" Тогда
ТекСубконто=Ит.Субконто();
Если СокрЛП(ТекСубконто.Вид())="Номенклатура" Тогда
ВидВыводаПредставленияСубконто=""""+ТекСубконто.Код+", "+Ит.ПредставлениеСубконто();
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
ИначеЕсли СокрЛП(ВидСубконто1)="Контрагенты" Тогда
ТекСубконто=Ит.Субконто();
Если СокрЛП(ТекСубконто.Вид())="Контрагенты" Тогда
ВидВыводаПредставленияСубконто=""""+ТекСубконто.ИНН+", "+Ит.ПредставлениеСубконто();
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
//-----------------------------------------------
И в печатной форме в 1 столбце Секция_2 теперь стоит ВидВыводаПредставленияСубконто.
Нашим хотелось Номенклатуру видеть с кодом, а Контрагентов с ИНН..."
В процедуре ПоСубконто(Ит, Т, ФлВал)
перед началом цикла вставил строку:
ВидСубконто1=Счет.ВидСубконто(1);
а перед строкой
Т.ВывестиСекцию("Секция_2");
вставил:
//-----------------------------------------------
Если СокрЛП(ВидСубконто1)="Номенклатура" Тогда
ТекСубконто=Ит.Субконто();
Если СокрЛП(ТекСубконто.Вид())="Номенклатура" Тогда
ВидВыводаПредставленияСубконто=""""+ТекСубконто.Код+", "+Ит.ПредставлениеСубконто();
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
ИначеЕсли СокрЛП(ВидСубконто1)="Контрагенты" Тогда
ТекСубконто=Ит.Субконто();
Если СокрЛП(ТекСубконто.Вид())="Контрагенты" Тогда
ВидВыводаПредставленияСубконто=""""+ТекСубконто.ИНН+", "+Ит.ПредставлениеСубконто();
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
Иначе
ВидВыводаПредставленияСубконто=Ит.ПредставлениеСубконто();
КонецЕсли;
//-----------------------------------------------
И в печатной форме в 1 столбце Секция_2 теперь стоит ВидВыводаПредставленияСубконто.
Нашим хотелось Номенклатуру видеть с кодом, а Контрагентов с ИНН..."
Читают тему
(гостей: 1)