- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
Говно = 0;
ТекущийДокумент.ВыбратьСтроки();
Пока ТекущийДокумент.ПолучитьСтроку() = 1 Цикл
Если (ТекущийДокумент.ДатаПоставкиЭА < ТекущаяДата()) и (ПустоеЗначение(ТекущийДокумент.ДатаПоставкиЭА) = 0) и (ТекущийДокумент.Аннулирован = 0) и (ТекущийДокумент.Аннулирована = 0) Тогда
Если (ТекущийДокумент.СостояниеСтрокиЗаказа = Перечисление.СостояниеЗаказа.Сделан) или (ПустоеЗначение(ТекущийДокумент.СостояниеСтрокиЗаказа) = 1) Тогда
Говно = 1;
Прервать;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Если Говно = 1 Тогда
Возврат "FONT["+ПолучитьЦвет(0,0,0)+"] BRUSH["+ПолучитьЦвет(128,128,0)+"]";
КонецЕсли;
Код окрашивает строку в цвет говна:)
К коду претензий не имею, но говно-код получается.