Заглавная страница: различия между версиями

Материал из largespace
Перейти к навигации Перейти к поиску
Нет описания правки
Нет описания правки
Строка 11: Строка 11:
  | content    =  
  | content    =  
<p>
<p>
* [[Largespace:Описание|О компании]]
* [[Компания ЛарджСпейс|О компании]]
* Требования
* [[Сервис-инженер 1С|Требования к сервис-инженеру 1С]]
* [[Программист 1С|Требования к программисту 1С]]
* [[Аналитик 1С|Требования к аналитику 1С]]
* [[Тестировщик 1С|Требования к тестировщику 1С]]
* [[Менеджер по работе с клиентами|Требования к менеджеру по работе с клиентами]]
* [[Документация по клиентам ЛарджСпейс|Список клиентов]]
* [[Документация по клиентам ЛарджСпейс|Список клиентов]]
</p>
</p>

Версия от 09:13, 13 марта 2023

О компании

Функция РассчитатьЦенуСтрокиУПД(СтрокаТабличнойЧасти)

	//Инициализация ссылок
	Заказ = СтрокаТабличнойЧасти.Ссылка.Заказ;
	РасходнаяНакладная = СтрокаТабличнойЧасти.Ссылка;
	//Инициализация строки из реализации
	ТЧЗапасыРасходнаяНакладная = РасходнаяНакладная.Запасы.Выгрузить();
	СтрокаТЧ = ТЧЗапасыРасходнаяНакладная.Найти(СтрокаТабличнойЧасти.Номенклатура, "Номенклатура");
	//Цена на дату реализации 
	Цена = СтрокаТЧ.Цена * РегистрыСведений.КурсыВалют.ПолучитьПоследнее(РасходнаяНакладная.Дата,Новый Структура("Валюта", РасходнаяНакладная.ВалютаДокумента)).Курс;
	СтрокаТабличнойЧасти.Цена = СтрокаТЧ.Цена;
	
	//Процент отгрузки
	Коэф = ТЧЗапасыРасходнаяНакладная.Итог("Сумма") / Заказ.Запасы.Итог("Сумма");
	
	//Документы оплат
	ТЗОплаты = РасчетыРаботаСФормамиВызовСервера.ПолучитьДанныеОбОплатеПоДокументуОтгрузки(СтрокаТабличнойЧасти.Ссылка.Заказ,Ложь,Ложь);
	
	//Если нет авансов и оплат то цена на момент реализации
	Если ТЗОплаты.Количество() = 0 Тогда
		Возврат Цена;
	КонецЕсли;
	
КонецФункции