Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 мая 2024, 02:48

Не передаётся в функцию один из параметров

Автор Александр_Ярославль, 24 июн 2016, 12:08

0 Пользователей и 1 гость просматривают эту тему.

Александр_Ярославль

Цитата: Rasty от 24 июн 2016, 14:29
ну да, без кода тут ни как, вангавать можно долго

Вечером выложу..
Добавлено: 24 июн 2016, 18:51


Цитата: Александр_Ярославль от 24 июн 2016, 13:16Показывайте код.
И заодно скрины отладчика, где видно, что на входе есть значение параметра, а в функции нет.

СНоменклатура=Справочники.Номенклатура.НайтиПоРеквизиту("Артикул",Артикул);  //Ищем Артикул по Артикулу
            Если СНоменклатура=Справочники.Номенклатура.ПустаяСсылка() тогда  //Если и в Артикуле не нашли то счетчик пустых строк у еличиваем на 1
               КоличествоПустыхСтрок=КоличествоПустыхСтрок+1;
               Продолжить;
                     иначе
            КоличествоПустыхСтрок=0;   
         КонецЕсли;
         //
         //Если ПолучитьЧисло(КолВо)="" тогда //Обращаемся к Функции выше
         //   КоличествоПустыхСтрок=КоличествоПустыхСтрок+1;
         //   Продолжить;
         //А= ПолучитьГТД(СНоменклатура,КодСтраны,ГТД);
         //иначе
         //   КоличествоПустыхСтрок=0;   
         //КонецЕсли;
         Сообщить(Артикул);
           СтрТаблЧасть=ДокОбъект[ИмяТЧ].Добавить();  //Начинаем добавлять значения в табличную часть документа
         СтрТаблЧасть.Номенклатура = СНоменклатура;  //Добавляем значение номенклатуры
         СтрТаблЧасть.ЕдиницаИзмерения = СтрТаблЧасть.Номенклатура.ЕдиницаХраненияОстатков;
         СтрТаблЧасть.Коэффициент = СтрТаблЧасть.ЕдиницаИзмерения.Коэффициент;
         СтрТаблЧасть.Количество = КолВо;
         СтрТаблЧасть.Сумма = Сумма;
         СтрТаблЧасть.СтавкаНДС = СтрТаблЧасть.Номенклатура.СтавкаНДС;
         //СтрТаблЧасть.СерияНоменклатуры = ПолучитьГТД(СтрТаблЧасть.Номенклатура,КодСтраны,ГТД);  //Вызов функции поиска серии
         СтрТаблЧасть.СерияНоменклатуры = ПолучитьГТД(СНоменклатура,КодСтраны,ГТД);
         Если СтрТаблЧасть.Количество<>0 тогда
         СтрТаблЧасть.Цена = СтрТаблЧасть.Сумма/СтрТаблЧасть.Количество;   //Вычисляем цену деля сумму на количество      
         КонецЕсли;
         
         ОбработкаТабличныхЧастей.РассчитатьСуммуТабЧасти(СтрТаблЧасть, ДокОбъект);  //Вычисляем итоги в табличной части
         ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(СтрТаблЧасть, ДокОбъект);
      
      КонецЦикла;
      xls_files_Book.Close();   //Закрываем экселовский документ
   КонецЕсли;
Конецпроцедуры

Функция ПолучитьГТД(Номенклатура,КодСтраны,ГТД)
   
   СерияНом=Справочники.СерииНоменклатуры.ПустаяСсылка(); //Сначала переменной присваивается значение пустой ссылки
   
   Запрос = Новый Запрос;
   Запрос.Текст="ВЫБРАТЬ ПЕРВЫЕ 1
                |   СерииНоменклатуры.Ссылка КАК ССылка,
                |   СерииНоменклатуры.Наименование КАК Наименование,
                |   СерииНоменклатуры.НомерГТД КАК НомерГТД,
                |   СерииНоменклатуры.СтранаПроисхождения КАК СтранаПроисхождения
                |ИЗ
                |   Справочник.СерииНоменклатуры КАК СерииНоменклатуры
                |ГДЕ
                |   СерииНоменклатуры.Владелец = &Владелец
                |   И СерииНоменклатуры.НомерГТД = &НомерГТД";




Добавлено: 24 июн 2016, 18:55


Цитата: Kironten от 24 июн 2016, 13:15
Показывайте код.
И заодно скрины отладчика, где видно, что на входе есть значение параметра, а в функции нет.
Скирин во вложении
Добавлено: 24 июн 2016, 18:58


Цитата: Rasty от 24 июн 2016, 14:29
ну да, без кода тут ни как, вангавать можно долго

Посмотрите пожалуйста код и скрин...
Добавлено: 24 июн 2016, 21:49


Всё разобрался. Следующий вопрос как закрыть тему?))

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск