Артикул Контрагента

[anton.kislov]

у вас эти поля заполнены?

конечно... и там много данных

[Yura063]

Для толстого клиента!

Добавлено: 27 мая 2013, 11:33

еще как вариант. Соответствие типов полей!

[anton.kislov]

Для толстого клиента!

Добавлено: 27 мая 2013, 11:33

еще как вариант. Соответствие типов полей!

он у меня не запускается...
на 8.2

[Yura063]

Сори вот!

[Dethmontt]

Потому что:
1. Функция ничего не возвращает.
2. Запрос написан не правильно

понял что не то писал..
Написал вот так..
Функция ПолучитьИзРегистраАртикулПоКонтрагентуЗапросом(Контрагент)

    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ               
        |    НоменклатураКонтрагентов.АртикулНоменклатурыКонтрагента             
        |ИЗ                 
        |    РегистрСведений.НоменклатураКонтрагентов КАК НоменклатураКонтрагентов     
        |ГДЕ               
        |    НоменклатураКонтрагентов.Контрагент = &Контрагент";
    Запрос.УстановитьПараметр("Контрагент", Контрагент);

    Выборка = Запрос.Выполнить().Выбрать();
    Если Выборка.Следующий() Тогда
        Возврат Выборка.АртикулНоменклатурыКонтрагента;
    КонецЕсли;

    Возврат "!!!!"; // не нашли

КонецФункции

Но результат тот же((

Функция написана правильно.

Добавлено: 27 мая 2013, 12:47

Что вы передаете в функцию при вызове?

[Dethmontt]

Я бы написал так:

Код Выделить Развернуть

Функция ПолучитьИзРегистраАртикулПоКонтрагентуЗапросом(Контрагент)

    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ               
        |    НоменклатураКонтрагентов.АртикулНоменклатурыКонтрагента             
        |ИЗ                 
        |    РегистрСведений.НоменклатураКонтрагентов КАК НоменклатураКонтрагентов     
        |ГДЕ               
        |    НоменклатураКонтрагентов.Контрагент = &Контрагент";
    Запрос.УстановитьПараметр("Контрагент", Контрагент);

    Выборка = Запрос.Выполнить().Выбрать();
    Если Выборка.Следующий() Тогда
        Возврат Выборка.АртикулНоменклатурыКонтрагента;
    КонецЕсли;

    Возврат Неопределено; // не нашли

КонецФункции
И после вызова проверял бы

Код Выделить Развернуть

Артикул = ПолучитьИзРегистраАртикулПоКонтрагентуЗапросом(Контрагент);
Если Артикул = Неопределено тогда
   Сообщить("Не удалось найти артикул по контрагенту - "+Контрагент.Наименование);
   //обработка что делать если не нашли артикул
КонецЕсли;

[anton.kislov]

простите домой ехал...
данные я беру не оттуда, или не туда обращаюсь...
нули показываются, и "!!!!" в служебных, (проверку сделал как выше предложили)

Добавлено: 27 мая 2013, 13:00

И после вызова проверял бы

Код Выделить Развернуть

Артикул = ПолучитьИзРегистраАртикулПоКонтрагентуЗапросом(Контрагент);
Если Артикул = Неопределено тогда
   Сообщить("Не удалось найти артикул по контрагенту - "+Контрагент.Наименование);
   //обработка что делать если не нашли артикул
КонецЕсли;

а вот так сделал...
пишет "Не удалось найти артикул по контрагенту - " и не пишет контрагента... по-этому и "0"!

[Dethmontt]

Ну надо проверить что в этом регистре и есть ли действительно там запись по этому контрагенту

[Yura063]

Какой тип у контрагента вы передаете? Какой тип у контрагента в регистре сведений?

[anton.kislov]

Какой тип у контрагента вы передаете? Какой тип у контрагента в регистре сведений?

и там и там "строки" длиной 25..
уже перепроверил и не раз