Имя: Пароль:
1C
1C 7.7
v7: Журнал, при переходе в документ - Переменная не определена (ТекущийДокумент)
0 gugolovski
 
23.01.19
08:27
Есть журнал.
Работало ок: выбираешь документ - он открывается

Добавил текстовое поле, на нем функция для подсветки пиктограмм: ПоказыватьП()

В модуле журнала 1 функция:

Функция ПоказыватьП()
    Возврат ТекущийДокумент.Статус.ПорядковыйНомер();                                            
КонецФункции

//Статус - это перечисление

Теперь пиктограммы в журнале отображаются правильно, но при попытке перейти в документ из журнала ошибка:

Возврат ТекущийДокумент<<?>>.Статус.ПорядковыйНомер();                                            
{Документ.ПередачаВЗал.Форма.Модуль(8)}: Переменная не определена (ТекущийДокумент)

В прочих графах журнала не прописана эта функция, почему на нее ссылается, как отвязаться
1 Масянька
 
23.01.19
08:34
(0)     Если ТекущийДокумент.Выбран() = 0 Тогда
        Возврат "";
    КонецЕсли;
2 MadDAD
 
23.01.19
08:40
(0) Вот это "Документ.ПередачаВЗал.Форма.Модуль(8)" явно не из формы журнала. Это форма документа, а там естественно не определена переменная "ТекущийДокумент". Там есть функция "ТекущийДокумент()"
3 gugolovski
 
23.01.19
08:53
(1) По всякому пытался приладить этот кусок в модуль журнала не выходит.
(2) Пока Функция ПоказыватьП() в модуле журнала не прописана, документ открывается. Зачем же тогда мне форма документа. Проблема тут, в журнале должна быть
4 MadDAD
 
23.01.19
08:54
(3) У тебя в ошибке указана 8-я строка формы документа "ПередачаВЗал".
5 Масянька
 
23.01.19
08:59
(3) На форме журнала в ТЧ текстовое поле, в формуле которого стоит ПоказатьКонтроль() (это у меня).
Журнал Общий.
Графы отбора не забудь.
В графах этого журнала есть: Контроль - один док-т.
//******************************************************************************
Функция ПоказатьКонтроль()
    
    Если ТекущийДокумент.Выбран() = 0 Тогда
        Возврат "";
    КонецЕсли;
    
    Если ТекущийДокумент.Вид() = "Реализация" Тогда
        Возврат ТекущийДокумент.Контроль + 1;
    КонецЕсли;

    Если ТекущийДокумент.Вид() = "ДневнаяРеализация" Тогда
        Возврат "FONT[" + Системные.системПолучитьЦвет(128, 0, 128) + "] ";
    КонецЕсли;
    
КонецФункции
6 gugolovski
 
23.01.19
09:00
(4) все, точно. #ЗагрузитьИзФайла использовал и там и здесь. и на один файл ссылался... спасибо