В общем имеется внешний отчет, который мне нужно было отредактировать добавив колонки оставив их пустыми для заполнения их уже непосредственно контрагентом. В конфигураторе сделал то, что мне нужно отредактировав таблицу, но при выполнении этого отчета в 1С Предприятие, при заполнении колонки кредит строчки там где должны быть пустые значения не дорисовываются.
В общем вот два скрина, так будет понятнее.
скрин1 - таблица в конфигруаторе
скрин 2 непосредственно вид отчета
Почему это происходит и как это исправить, если кто-то знает то буду очень благодарен за помощь. Заранее спасибо.
Ах да, на всяк случай брошу содержание модуля
Кликни по мне =)
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
//-------------------
Процедура Сформировать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты, ВибКонтрагент, 2 );
Ит.ВыполнитьЗапрос(Дата1, Дата2, СокрЛП(ВибРах),,, 1 , "Операция", "СК");
Таб.ВывестиСекцию("Шапка");
Таб.Опции( 0 , 0 , 11 , 0 );
Ит.ВыбратьПериоды();
Пока Ит.ПолучитьПериод() = 1 Цикл
Дт = Ит.ВыбранаПоДт();
Кт = Ит.ВыбранаПоКт();
Опер = Ит.Операция;
Сд = Ит.СКД() - Ит.СКК();
Док = Опер.Документ;
ВыводБанка= 0 ;
Если Док.Вид()="БанковскаяВыписка" Тогда
БВ=СоздатьОбъект("Документ.БанковскаяВыписка");
Если БВ.НайтиДокумент(Док)= 1 Тогда
Если БВ.ВыбратьСтроки()= 1 Тогда
Пока БВ.ПолучитьСтроку()= 1 Цикл
//Если БВ.Субконто.Вид()="Контрагенты" Тогда
Если БВ.Субконто = ВибКонтрагент Тогда
Описание = ?(пустаяСтрока(БВ.НомерДокумента)= 0 ,"Пл.№"+СокрП(БВ.НомерДокумента),"БВ №"+БВ.НомерДок)+"; "+СокрП(БВ.Содержание);
Если БВ.ПриходРасход=Перечисление.ПлюсМинус.Плюс Тогда
Дб= 0 ;
Кт= 1 ;
Иначе
Дб= 1 ;
Кт= 0 ;
КонецЕсли;
Таб.ВывестиСекцию("Банк");
ВыводБанка= 1 ;
КонецЕсли;
//КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Если ВыводБанка= 0 Тогда
Таб.ВывестиСекцию("Рядок");
КонецЕсли;
Если (Опер.Дебет.Счет.Валютный = 1 ) Или (Опер.Кредит.Счет.Валютный = 1 ) Тогда
СдВал = Ит.СКД( 2 ) - Ит.СКК( 2 );
Таб.ВывестиСекцию("Валюта");
КонецЕсли;
//Если (Опер.Дебет.Счет.Количественный = 1 ) Или (Опер.Кредит.Счет.Количественный = 1 ) Тогда
// СдКол = Ит.СКД( 3 ) - Ит.СКК( 3 );
// Таб.ВывестиСекцию("Кількість");
//КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Дно");
Таб.ТолькоПросмотр( 1 );
Таб.Показать("Сформировать","");
КонецПроцедуры
//-------------------
Procedure ПриЗакрытии()
СохранитьЗначение("АктСверкиДата1",Дата1);
СохранитьЗначение("АктСверкиДата2",Дата2);
СохранитьЗначение("ВибРах",ВибРах);
EndProcedure
//-------------------
Функция УстановкаДоступности()
If ПустоеЗначение(ВибКонтрагент)= 1 then
Форма.кнПечать.Доступность( 0 );
Форма.кнХ.Доступность( 0 );
ИначеЕсли ПустаяСтрока(Вибрах)= 1 тогда
Форма.кнПечать.Доступность( 0 );
Else
Форма.кнПечать.Доступность( 1 );
Форма.кнХ.Доступность( 1 );
КонецЕсли;
Возврат "";
КонецФункции
Процедура ПриОткрытии()
Дата1=ВосстановитьЗначение("АктСверкиДата1");
Дата2=ВосстановитьЗначение("АктСверкиДата2");
If ПустоеЗначение(Дата1)= 1 then
Дата1 = НачалоПериодаБИ();
EndIf;
If ПустоеЗначение(Дата2)= 1 then
Дата2 = КонецПериодаБИ();
EndIf;
ВибРах = ВосстановитьЗначение("ВибРах");
Если пустаяСтрока (Вибрах)= 1 Тогда
ВибРах = "36";
КонецЕсли;
УстановкаДоступности();
КонецПроцедуры
//-------------------
