Имя: Пароль:
1C
1С v8
УПП ЗарплатаКВыплатеОрг Красный фон строки?
0 ЭЦ
 
17.07.12
12:20
ГОСПОДА !
Имеются ведомости :
Зарплата к выплате организаций - Плановый аванс
Внезапно обнаружил что в некоторых документах некоторые строки имеют красный фон.
Если кто в курсе прошу подсказать что это означает.
Спасибо
1 laeg
 
17.07.12
12:45
А модуль формы открыть и посмотреть не судьба ?

       Если (ДанныеСтроки.Сумма + ДанныеСтроки.КомпенсацияЗаЗадержкуЗарплаты) <= 0 Тогда
           ОформлениеСтроки.ЦветТекста = ЦветаСтиля.ЦветОтрицательногоЧисла;
       КонецЕсли;

       // Подсвечиваем отрицательные резервы, если они превышают погрешность округления
       // (это случай, когда "многовато" переплачиваем)
       Если ДанныеСтроки.Удержано < -Точность Тогда
           ЯчейкаУдержания = ОформлениеСтроки.Ячейки.Удержано;
           ЯчейкаУдержания.ЦветТекста = ЦветаСтиля.ЦветОтрицательногоЧисла;
       КонецЕсли;
2 ЭЦ
 
17.07.12
14:12
(1) Это я видел.
Но красным является не цвет текста а цвет фона.
3 Академик_
Келдыш
 
17.07.12
14:17
скрин в студию
4 ЭЦ
 
17.07.12
14:33
5 pessok
 
17.07.12
14:53
Тимуш Виктория НЕТ!!!
Давай ПриПолучениеДанных и ПриВыводеСтроки суда
6 pessok
 
17.07.12
14:53
и не говори, что это типовой зуп
7 pessok
 
17.07.12
14:53
а, УПП, сорри. но все равно явно не типовое
8 ЭЦ
 
17.07.12
15:13
Процедура ЗарплатаПриПолученииДанных(Элемент, ОформленияСтрок)
   ПоказыватьДокументы = ЭлементыФормы.Зарплата.Колонки.ВыплатаЗарегистрированаДокументом.Видимость;
   // получим данные для отрисовки в ячейках
   Если ПоказыватьДокументы Тогда
       
       Запрос = Новый Запрос();
       Запрос.Текст =
       "ВЫБРАТЬ
       |    СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям.Регистратор,
       |    ПРЕДСТАВЛЕНИЕ(СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям.Регистратор) КАК Представление,
       |    СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям.Физлицо КАК Физлицо
       |ИЗ
       |    РегистрСведений.СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям КАК СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям
       |ГДЕ
       |    СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям.Ведомость = &Ведомость
       |    И СведенияОВыплатахРаботникамОрганизацийПоПлатежнымВедомостям.Физлицо В(&Физлица)";
       
       Физлица = Новый Массив;
       Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
           Физлица.Добавить(ОформлениеСтроки.ДанныеСтроки.ФизЛицо)
       КонецЦикла;
       
       Запрос.УстановитьПараметр("Ведомость",Ссылка);
       Запрос.УстановитьПараметр("Физлица",    Физлица);
       
       Выборка = Запрос.Выполнить().Выбрать();
       
       ПоказыватьДокументы = Выборка.Количество() > 0;
       
   КонецЕсли;
   
   Точность = ЗарплатаКВыплатеОрганизацийСервис.СпособОкругленияТочность(Округление);
   
   // получим данные для отрисовки в ячейках
   Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
       
       ДанныеСтроки = ОформлениеСтроки.ДанныеСтроки;
       
       Если ПоказыватьДокументы Тогда
           Выборка.Сбросить();
           Если Выборка.НайтиСледующий(ДанныеСтроки.Физлицо, "ФизЛицо") Тогда
               ОформлениеСтроки.Ячейки.ВыплаченностьЗарплаты.ТолькоПросмотр = Истина;
               ОформлениеСтроки.Ячейки.ВыплатаЗарегистрированаДокументом.УстановитьТекст(Выборка.Представление);
           КонецЕсли;
       КонецЕсли;
       
       ЯчейкаСКартинкой = ОформлениеСтроки.Ячейки.Картинка;
       ЯчейкаСКартинкой.ОтображатьКартинку = Истина;
       ЯчейкаСКартинкой.ИндексКартинки = Число(ДанныеСтроки.Авторасчет);
       
       Если (ДанныеСтроки.Сумма + ДанныеСтроки.КомпенсацияЗаЗадержкуЗарплаты) <= 0 Тогда
           ОформлениеСтроки.ЦветТекста = ЦветаСтиля.ЦветОтрицательногоЧисла;
       КонецЕсли;

       // Подсвечиваем отрицательные резервы, если они превышают погрешность округления
       // (это случай, когда "многовато" переплачиваем)
       Если ДанныеСтроки.Удержано < -Точность Тогда
           ЯчейкаУдержания = ОформлениеСтроки.Ячейки.Удержано;
           ЯчейкаУдержания.ЦветТекста = ЦветаСтиля.ЦветОтрицательногоЧисла;
       КонецЕсли;
   КонецЦикла;
КонецПроцедуры
9 ЭЦ
 
17.07.12
15:14
ПриВыводеСтроки - не задействовано

УПП 1.3.17

Конфа правленая но этот док вроде бы нет.
10 shuhard
 
17.07.12
15:16
(9) что-то мешает закоментировать При получении данных ?
11 Академик_
Келдыш
 
17.07.12
15:21
(5) румынка Вика)))
12 ЭЦ
 
17.07.12
15:35
(10) Ничто не мешает - но хотелось бы понять глубинный смысл красного фона
13 shuhard
 
17.07.12
15:38
(12) как только будет найден код, красящий фон, глубинное понимание появиться
14 ЭЦ
 
17.07.12
15:39
Это да - но я думал мож кто знает