Помогите с заданием
X

Привет дорогой друг

Наш сайт существует и развиваетется за счет рекламы. Пожалуйста, отключите блокировку рекламы AdBlock или подобное, для нашего сайта. Спасибо!
Показано с 1 по 8 из 8

Комбинированный просмотр

  1. #1
    Гость форума

    Регистрация
    24.07.2014
    Сообщений
    5
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию Помогите с заданием

    Здравствуйте. Я начал учить програмирование 1с и у меня возник в вопрос по модулю формы. Нужно что бы при изменении ЭлементаВидЦены и зменялась цена соответственно регистру сведений. Я так понял нужно прописать цикл, но у меня что то не выходит. Поможете? Первые две процедуры это изменение цены в табл. части при изменении номенклатуры и расчет суммы...

    Код:
    &НаКлиенте
    Процедура ПереченьТМЦТМЦПриИзменении(Элемент)
    	СтрокаТабличнойЧасти = Элементы.ПереченьТМЦ.ТекущиеДанные;
    	СтрокаТабличнойЧасти.Цена = РаботаСоСправочниками.РозничнаяЦена(Объект.Дата,СтрокаТабличнойЧасти.ТМЦ);
    	РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
    КонецПроцедуры
    
    &НаКлиенте
    Процедура ПереченьТМЦКоличествоПриИзменении(Элемент)
    	СтрокаТабличнойЧасти = Элементы.ПереченьТМЦ.ТекущиеДанные;
    	РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
    КонецПроцедуры
    
    &НаКлиенте
    Процедура ВидЦеныПриИзменении(Элемент)
    	Для каждого СтрокаТабличнойЧасти Из ПереченьТМЦ Цикл
    		СтрокаТабличнойЧасти.Цена = РаботаСоСправочниками.РозничнаяЦена(Объект.Дата,СтрокаТабличнойЧасти.ТМЦ);
    		РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
    	КонецЦикла;
    КонецПроцедуры

  2. #2
    Спец PRO
    Аватар для arccos6pi
    Регистрация
    13.12.2010
    Адрес
    Тамбов
    Сообщений
    366
    Сказал(а) спасибо
    22
    Поблагодарили 1066 раз(а) в 244 сообщениях

    По умолчанию

    РаботаСДокументами.Расчит� �тьСумму(СтрокаТабличнойЧа сти)
    нужен код процедуры

  3. #3
    Гость форума

    Регистрация
    24.07.2014
    Сообщений
    5
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию

    Код:
    Процедура РасчитатьСумму(СтрокаТабличнойЧасти) Экспорт
    	СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество * СтрокаТабличнойЧасти.Цена;
    КонецПроцедуры
    Вот

  4. #4
    Спец PRO
    Аватар для arccos6pi
    Регистрация
    13.12.2010
    Адрес
    Тамбов
    Сообщений
    366
    Сказал(а) спасибо
    22
    Поблагодарили 1066 раз(а) в 244 сообщениях

    По умолчанию

    а РаботаСоСправочниками.Роз� �ичнаяЦена(Объект.Дата,Стро каТабличнойЧасти.ТМЦ);

  5. #5
    Гость форума

    Регистрация
    24.07.2014
    Сообщений
    5
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию

    Код:
    Функция РозничнаяЦена(АктуальнаяДата,ЭлементТМЦ) Экспорт
    		Отбор = Новый Структура("ТМЦ",ЭлементТМЦ);
    	ЗначенияРесурсов = РегистрыСведений.ЦеныНоменклатуры.ПолучитьПоследнее(АктуальнаяДата,Отбор);
    	Возврат ЗначенияРесурсов.Цена;
    КонецФункции

  6. #6
    Спец PRO
    Аватар для arccos6pi
    Регистрация
    13.12.2010
    Адрес
    Тамбов
    Сообщений
    366
    Сказал(а) спасибо
    22
    Поблагодарили 1066 раз(а) в 244 сообщениях

    По умолчанию

    Код:
    &НаКлиенте
    Процедура ВидЦеныПриИзменении(Элемент)
    	Для каждого СтрокаТабличнойЧасти Из Объект.ПереченьТМЦ Цикл
    		СтрокаТабличнойЧасти.Цена = РаботаСоСправочниками.РозничнаяЦена(Объект.Дата,СтрокаТабличнойЧасти.ТМЦ);
    		РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
    	КонецЦикла;
    КонецПроцедуры
    попробуйте так

  7. #7
    Гость форума

    Регистрация
    24.07.2014
    Сообщений
    5
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    По умолчанию

    Ну ошибку перестало выдавать, но Цена при изменении ВидЦены не изменяется.... Только при изменении ТМЦ.

  8. #8
    Спец PRO
    Аватар для arccos6pi
    Регистрация
    13.12.2010
    Адрес
    Тамбов
    Сообщений
    366
    Сказал(а) спасибо
    22
    Поблагодарили 1066 раз(а) в 244 сообщениях

    По умолчанию

    Цитата Сообщение от pt_denis Посмотреть сообщение
    Ну ошибку перестало выдавать, но Цена при изменении ВидЦены не изменяется.... Только при изменении ТМЦ.
    смотрите отладкой почему цена пустая
    экстрасенсов нет

Похожие темы

  1. Помогите выбрать внешний HHD
    от kristall01 в разделе Носители информации
    Ответов: 2
    Последнее сообщение: 18.02.2009, 10:31

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •