I
Irsis
Здравствуйте, всем!
Мучаюсь с функцией - не хочет работать. Что-то она у меня даже текущий документ в журнале не находит, хотя документов полно
Функция ПроверитьСтатус()
Если ПустоеЗначение(ТекущийДокумент) =0 Тогда
Если СокрЛП(ТекДок.Статус)="PIETEIKTS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,153,204) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="PASјT¬TS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,255,153) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="IZPILD¬TS" Тогда
Возврат "FONT[" + ПолучитьЦвет(128,128,128) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="DA±¦JI IZPILD¬TS" Тогда
Возврат "FONT[" + ПолучитьЦвет(128,128,128) + "]"+ "BRUSH[" + ПолучитьЦвет(255,255,153) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="CENU PIEDЎVЎJUMS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,153,204) + "]";
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Возврат "";
КонецФункции
HELP!!!!!
Мучаюсь с функцией - не хочет работать. Что-то она у меня даже текущий документ в журнале не находит, хотя документов полно
Функция ПроверитьСтатус()
Если ПустоеЗначение(ТекущийДокумент) =0 Тогда
Если СокрЛП(ТекДок.Статус)="PIETEIKTS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,153,204) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="PASјT¬TS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,255,153) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="IZPILD¬TS" Тогда
Возврат "FONT[" + ПолучитьЦвет(128,128,128) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="DA±¦JI IZPILD¬TS" Тогда
Возврат "FONT[" + ПолучитьЦвет(128,128,128) + "]"+ "BRUSH[" + ПолучитьЦвет(255,255,153) + "]";
Иначе
Если СокрЛП(ТекущийДокумент.Статус)="CENU PIEDЎVЎJUMS" Тогда
Возврат "BRUSH[" + ПолучитьЦвет(255,153,204) + "]";
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Возврат "";
КонецФункции
HELP!!!!!