Не выводит значение реквизита

[HbIXA]

Процедура ОбработкаПроведения()
	Спр=СоздатьОбъект("Справочник.КнигиНаРуках");   
	Спр.ИспользоватьВладельца(Читатель);
	ВыбратьСтроки();
	Пока ПолучитьСтроку()=1 Цикл
		Если ПустоеЗначение(ИнвНомер)=0 Тогда
			
			Если Спр.НайтиПоРеквизиту("ИнвНомер",ИнвНомер,0)=0 Тогда
				Спр.Новый();
				Спр.Книга=Книга;
				Спр.ИнвНомер=ИнвНомер;
				Спр.ДатаВыдачи=ДатаДок;
				Спр.Записать();
			КонецЕсли;  
			Если Константа.УчетПоместамХранения=Перечисление.Булево.Да Тогда
				МХ=СоздатьОбъект("Справочник.МестаХранения");
				Если МХ.НайтиПоКоду(0)=0 Тогда
					МХ.Новый();
					МХ.Код=0;
					МХ.Наименование="Книга находится на руках";
					МХ.Записать();
				КонецЕсли;	
				УстановитьРеквизитСправочника(ИнвНомер,"МестоХраненияКниги",МХ.ТекущийЭлемент(),ДатаДок,,,);
            КонецЕсли;
		Иначе
			Если Спр.НайтиПоРеквизиту("Книга",Книга,0)=0 Тогда
				Спр.Новый();
				Спр.Книга=Книга;
				Спр.ДатаВыдачи=ДатаДок;
				Спр.Записать();
			КонецЕсли;
		КонецЕсли;                                      
		
		ЗапросВБазу(Спр.Книга.ПолноеНаименование);
	КонецЦикла;
КонецПроцедуры

Выдает пустое значение - Спр.Книга.ПолноеНаименование

Что не так делаю?

[АнонимХ]

из приведенного кода вовсе не очевидно что не так делаешь
может у тя пусто в полном наименовании

[HbIXA]

Нет не пусто

[Аноним64]

Нет не пусто

+

[HbIXA]

к сожалению нет, почему то ф5 не работает в нем

[Аноним64]

к сожалению нет, почему то ф5 не работает в нем

ф5 - это продолжить далее, точка ставится ф9. Когда до нее доберешься, то ф8 (продолжить/следующая строка) Ну и шифт+ф9 - это просмотр выражения

[HbIXA]

у меня вся панель, продолжить, точки все закрыто

[Аноним64]

у меня вся панель, продолжить, точки все закрыто

-

[HbIXA]

разобрался, "КонецПроцедуры = Ошибка в выражении!"

[HbIXA]

после прогона он все норм выдал книга 22, а потом опять пусто

[Аноним64]

после прогона он все норм выдал книга 22, а потом опять пусто

Прогони ТиИ, вдруг поможет (((

[HbIXA]

Заблочена утилитка(

[Аноним64]

Заблочена утилитка(

Администрирование-Тестирование и исправление

[HbIXA]

сделал в конце просто Сообщить(КнигаД); и выдало, почему тогда не передает в процедуру

Процедура ЗапросВБазу(Книга)
Connection = СоздатьОбъект("ADODB.Connection");
  
 //Необходимые параметры для подключения
АдресСервера   = "localhost";  
НомерПорта     = "3306";    
ИмяБД          = "test";    
Пользователь   = "root";    
Пароль         = ""; 
 
  //Подключаемся
Попытка      
    Connection.Open("Driver={MySQL ODBC 3.51 Driver};Server="+СокрЛП(АдресСервера)+";Port=" + НомерПорта + ";Database=" + СокрЛП(ИмяБД) + ";User=" + СокрЛП(Пользователь) + ";Password=" + Пароль + ";Option=3;STMT=SET CHARACTER SET cp1251");
    Сообщить("Подключение прошло успешно");  
Исключение
    Сообщить("Ошибка подключения - " + ОписаниеОшибки());  
    Возврат;
КонецПопытки;

Сообщить(Книга);
Command=СоздатьОбъект("ADODB.Command"); 
Command.CommandText = "set names cp1251";
Command.ActiveConnection = Connection;
Command.CommandType = 1;
Command.Execute();   

Command=СоздатьОбъект("ADODB.Command");                             
Запрос1 = "update dbname set book='тест' where id='1'";
//Запрос1 = "insert into dbname (book) values ()";
Command.CommandText = Запрос1; 
Command.ActiveConnection = Connection;
Command.CommandType = 1;
Command.Execute();
                  
//Закрываем соединение.
Connection.Close();       
КонецПроцедуры

[Аноним64]

сделал в конце просто Сообщить(КнигаД); и выдало, почему тогда не передает в процедуру

Процедура ЗапросВБазу(Книга)
Connection = СоздатьОбъект("ADODB.Connection");
  
 //Необходимые параметры для подключения
АдресСервера   = "localhost";  
НомерПорта     = "3306";    
ИмяБД          = "test";    
Пользователь   = "root";    
Пароль         = ""; 
 
  //Подключаемся
Попытка      
    Connection.Open("Driver={MySQL ODBC 3.51 Driver};Server="+СокрЛП(АдресСервера)+";Port=" + НомерПорта + ";Database=" + СокрЛП(ИмяБД) + ";User=" + СокрЛП(Пользователь) + ";Password=" + Пароль + ";Option=3;STMT=SET CHARACTER SET cp1251");
    Сообщить("Подключение прошло успешно");  
Исключение
    Сообщить("Ошибка подключения - " + ОписаниеОшибки());  
    Возврат;
КонецПопытки;

Сообщить(Книга);
Command=СоздатьОбъект("ADODB.Command"); 
Command.CommandText = "set names cp1251";
Command.ActiveConnection = Connection;
Command.CommandType = 1;
Command.Execute();   

Command=СоздатьОбъект("ADODB.Command");                             
Запрос1 = "update dbname set book='тест' where id='1'";
//Запрос1 = "insert into dbname (book) values ()";
Command.CommandText = Запрос1; 
Command.ActiveConnection = Connection;
Command.CommandType = 1;
Command.Execute();
                  
//Закрываем соединение.
Connection.Close();       
КонецПроцедуры

Подключение через адо не отлаживается! Точка

[HbIXA]

мне и не нужно его отлаживать, почему переменная КнигаД не передается в процедуру?

[Аноним64]

мне и не нужно его отлаживать, почему переменная КнигаД не передается в процедуру?

А вот это и не сказать без Отладчика.

[Аноним64]

в сторону адо проходят только примитивные (простые) типы - строка, число, дата... копай дальше сам

[HbIXA]

дык итак приходит строка. сделал проще

Процедура ЗапросВБазу(КнигаД)
Сообщить(КнигаД);
КонецПроцедуры

В итоге в отладичке выводит, без него нет

[Аноним64]

дык итак приходит строка. сделал проще

Процедура ЗапросВБазу(КнигаД)
Сообщить(КнигаД);
КонецПроцедуры

В итоге в отладичке выводит, без него нет

еще раз повторяю - пересылать нужно строку - Строка(КнигаД), получить, потом НайтиПоНаименованию - как-то так