Как работает функция глПересчет?

Новая тема
Добрые люди, подскажите параметры функции глПересчет, ее описание (что делает?).Книге по описанию  встроенного языка  не могу найти.
"гл" обычно означает - ищи в глобальном модуле :)
")))

так и не найдёте в книжке, на в глобальнике - вот она:


////////////////////////////////////////////////­////////////////////////////////
// ПРОЦЕДУРЫ И ФУНКЦИИ ДЛЯ РАБОТЫ СО СТОИМОСТНЫМИ РЕКВИЗИТАМИ
//
//******************************************************************************
//  глПересчет(Сумма,ВалютаНач,ПоКурсуВалютыНач,ВалютаКон,ПоКурсуВалютыКон,ПоКратностиВалютыНач,ПоКратностиВалютыКон)
//
// Параметры:      
// Сумма                - сумма, которую следует пересчитать
// ВалютаНач            - валюта (элемент справочника "Валюты"), из которой считаем
// ВалютаКон            - валюта (элемент справочника "Валюты"), в которую считаем
// ПоКурсуВалютыНач     - курс или дата курса валюты нач
// ПоКурсуВалютыКон     - курс или дата курса валюты кон
// ПоКратностиВалютыНач - кратность валюты нач
// ПоКратностиВалютыКон - кратность валюты кон
//
// Возвращаемое значение:
//  Сумма, пересчитанная в другую валюту
//
// Описание:
// Эта функция пересчитывает сумму из ВалютаНач и возвращает значение Сумма в
// ВалютаКон в параметрах ПоКурсуВалютыНач и ПоКурсуВалютыКон могут передаваться
// либо сами курсы либо даты
//
Функция глПересчет(Сумма,ВалютаНач,ПоКурсуВалютыНач,ВалютаКон,ПоКурсуВалютыКон,ПоКратностиВалютыНач = 1,ПоКратностиВалютыКон = 1) Экспорт

Если ВалютаНач = ВалютаКон Тогда
// ну, тут и считать нечего...
Возврат Сумма;
КонецЕсли;

ТипЗн=ТипЗначенияСтр(ПоКурсуВалютыНач);

Если ТипЗн = "Число" Тогда
КурсВалютыНач      = ПоКурсуВалютыНач;
КратностьВалютыНач = ПоКратностиВалютыНач;
КратностьВалютыНач = ?(КратностьВалютыНач = 0,1,КратностьВалютыНач);

ИначеЕсли ТипЗн = "Дата" Тогда
КурсВалютыНач      = глКурсДляВалюты(ВалютаНач,ПоКурсуВалютыНач);
КратностьВалютыНач = глКратностьДляВалюты(ВалютаНач,ПоКурсуВалютыНач);

Иначе
Сообщить("глПересчет():Неверный тип параметра ПоКурсуВалютыНач!");
Возврат Сумма;

КонецЕсли;

ТипЗн = ТипЗначенияСтр(ПоКурсуВалютыКон);

Если ТипЗн = "Число" Тогда
КурсВалютыКон      = ПоКурсуВалютыКон;
КратностьВалютыКон = ПоКратностиВалютыКон;
КратностьВалютыКон = ?(КратностьВалютыКон = 0,1,КратностьВалютыКон);

ИначеЕсли ТипЗн = "Дата" Тогда
КурсВалютыКон      = глКурсДляВалюты(ВалютаКон,ПоКурсуВалютыКон);
КратностьВалютыКон = глКратностьДляВалюты(ВалютаКон,ПоКурсуВалютыКон);

Иначе
Сообщить("глПересчет():Неверный тип параметра ПоКурсуВалютыКон!");
Возврат Сумма;

КонецЕсли;

Если (КурсВалютыНач = 0)
ИЛИ (КурсВалютыКон = 0) Тогда
Сообщить("При пересчете валюты обнаружен нулевой курс валюты "
+?(КурсВалютыНач = 0,ВалютаНач,ВалютаКон));
Возврат Сумма;
КонецЕсли;
   
Если (КратностьВалютыНач = 0) ИЛИ (КратностьВалютыКон = 0) Тогда
Возврат 0;
КонецЕсли;

Возврат Сумма * ((КурсВалютыНач / КратностьВалютыНач) / (КурсВалютыКон / КратностьВалютыКон));

КонецФункции // глПересчет()"
спасибо)))
Читают тему
(гостей: 1)

Быстрый переход