Добрый день!

Самописная конфигурация, очень простая. Во всех пяти документах используется получение данных из регистра накопления. В связи с этим написана функция

Функция ПосчитатьБаланс(СуммаСписания, СуммаСписанияБыла, Контрагент)
    Фильтр = Новый Структура;
    Фильтр.Вставить("Контрагент", Контрагент);
    Баланс = РегистрыНакопления.БалансКонтрагентов.Остатки( , Фильтр, , "Баланс").Итог("Баланс") - СуммаСписания + СуммаСписанияБыла;
    Возврат(Баланс);
КонецФункции

Вопрос: целесообразно ли выносить её в общий модуль, какие параметры использовать (флажки какие, надо ли "Экспорт")?
А также как обратиться к ней из модуля формы?

Спасибо за помощь!

Целесообразно вынести + сделать запросом.
Экспорт надо

(1) +100.

+(1) +ПовторноеИспользование

(1) А как к ней обратиться из модуля формы документа?
Нужно её сделать &НаСервереБезКонтекста ?

ну и определится на сервере или клиенте делать

(4) да, без контекста, раз не нужны данные формы

(1) +

хм, УФ - там может быть сложней

(0)Есть такой принцип в разработке ПО называется Don’t Repeat Yourself (DRY, рус. Не повторяйся).
wiki:Don%27t_repeat_yourself

Говорят помогает.

дурацкая какая-то функция... берёт остатки и прибавляет-отнимает переданные параметры.
Тебе не казалось, что функция должна решать более глобальную задачу?

(8) Да, УФ у меня
(10) Я совсем начинающий) Вообще, цель функции выдернуть данные из регистра. Вычитать и прибавлять решил уже на форме.

Остались вопросы по галкам у общего модуля и способу обращения к функции из модуля документа.

(10) нести мир и процветание в общество?)

(11) Будет запрос - значит модуль серверный, без контекста

что такое баланс контрагента ?

(14) Это регистр накопления, у него есть измерение Контрагент и ресурс Баланс.

(14) самописный РН. типа взаиморасчетов с контрагентами видимо

(13) С запросами у меня плоховато) Особенно к регистрам...

(17) Юзай конструктор запросов. Там почти всё мышкой....

(17) в любом случае на сервере, ибо Остатки - только тама

Убрал из функции мусор,

&НаСервереБезКонтекста
Функция ПолучитьБаланс(Контрагент) Экспорт
    Фильтр = Новый Структура;
    Фильтр.Вставить("Контрагент", Контрагент);
    Баланс = РегистрыНакопления.БалансКонтрагентов.Остатки( , Фильтр, , "Баланс").Итог("Баланс");
    Возврат(Баланс);
КонецФункции

Кто-нибудь может помочь с заменой на запрос?)

(20) оставь как есть. не нужен тут запрос

(21) Осталось разобраться почему у меня

{Документ.СписаниеСРасчетногоСчета.Форма.ФормаДокумента.Форма(23,31)}: Процедура или функция с указанным именем не определена (ПолучитьБаланс)
    ЭтаФорма.БалансКонтрагента = <<?>>ПолучитьБаланс(Объект.Получатель) - Объект.СуммаСписания + ЭтаФорма.СуммаСписанияБыла; (Проверка: Тонкий клиент)

ИмяОбщегоМодуля.ПолучитьБаланс

(22) Имя общего модуля забыл написать

(23) (24) {Документ.СписаниеСРасчетногоСчета.Форма.ФормаДокумента.Форма(23,31)}: Переменная не определена (РаботаСРегистрами)
    ЭтаФорма.БалансКонтрагента = <<?>>РаботаСРегистрами.ПолучитьБаланс(Объект.Получатель) - Объект.СуммаСписания + ЭтаФорма.СуммаСписанияБыла; (Проверка: Тонкий клиент)

(3) А я б не стал :)
Остатки штука такая, которую повторным использованием лучше не тянуть.

(20) Как-то так:

&НаСервереБезКонтекста
Функция ПолучитьБаланс(Контрагент) Экспорт
    
    Запрос = Новый Запрос("ВЫБРАТЬ
                          |    БалансКонтрагентов.БалансОстаток
                          |ИЗ
                          |    РегистрНакопления.БалансКонтрагентов.Остатки(, Контрагент = &Контрагент) КАК БалансКонтрагентов");
    Запрос.УстановитьПараметр("Контрагент", Контрагент);
    Выборка = Запрос.Выполнить().Выбрать();
    Возврат (Выборка.Следующий(), Выборка.БалансОстаток, 0);
    
КонецФункции

(25) Я так понимаю дело во флажках в свойствах модуля, может что мне нужно в моём случае?)

(27) И всё же, какие плюсы/минусы использования запроса?

+(27) Очепятка:

Вместо Возврат (Выборка.Следующий(), Выборка.БалансОстаток, 0);

Надо Возврат ?(Выборка.Следующий(), Выборка.БалансОстаток, 0);

(25) галка Вызов Сервера стоит у модуля?

(28) запрос - по феншую, привыкай к хорошему сразу

(28) "И всё же, какие плюсы/минусы использования запроса?"
v8: Как поставить такое условие? пост 63. Можешь переделать код под свою задачу и сравнить.

(29) Это не опечатка, это моё невежество)) поэтому прошу объяснить почему так?)

(33) Что?

(30) Спасибо, заработало =) пошёл читать факи по галкам)

(34) Зачем там "?" ??

Блин, вернул в общем обратно, без запроса. Нет в нём смысла тут.

теперь новая беда, уже при отладке...:

{Документ.СписаниеСРасчетногоСчета.Форма.ФормаДокумента.Форма(21)}: Метод объекта не обнаружен (ПолучитьБаланс)
    ЭтаФорма.БалансКонтрагента = РаботаСРегистрами.ПолучитьБаланс(Объект.Получатель) - Объект.СуммаСписания + СуммаСписанияБыла;

(36) Это условие:

МояПеременная = ?(Условие, Значение_Истина, Значение_Ложь);

Равнозначно этому

Если Условие Тогда
    МояПеременная = Значение_Истина;
Иначе
    МояПеременная = Значение_Ложь;
КонецЕсли;

(37) "Нет в нём смысла тут"
С умным видом говорил?

(39) Нет, просто конфига настолько банальная, что мне так проще)) С очень глупым видом говорил)

В общем модуле директивы компиляции как бы не по феншую.

ТС - реинкарнация Товарища ЛивингСтар, или мне только кажется?

(40) "мне так проще"
А, ну сразу бы так и сказал: "Я лентяй, ничего не умею и учиться ничему не хочу"... :)

(43) Исправился, вернул запрос :D Я его просто не понимал. пока не объяснили про условие))

Осталось выпросить у кого-нибудь, почему

{Документ.СписаниеСРасчетногоСчета.Форма.ФормаДокумента.Форма(21)}: Метод объекта не обнаружен (ПолучитьБаланс)
    ЭтаФорма.БалансКонтрагента = РаботаСРегистрами.ПолучитьБаланс(Объект.Получатель) - Объект.СуммаСписания + СуммаСписанияБыла;

(44) Забыл написать слово ЭКСПОРТ у функции?

(44) Убери директивы компиляции в общем модуле.

(44) и что там с галками общего модуля?

(45) Экспорт написал
(46) Поподробнее, пожалуйста. не владею терминологией)
(47) Стоят только "Сервер", "Вызов сервера"

&НаСервереБезКонтекста в общем модуле - это бред.

Директивы компиляции имеют смысл только в моделях упр форм и команд.

(48) директивы компиляции это те которые #НаКлиенте, #НаСервере и т.д.
Если только модуль выполняется только на сервере, значит в форме надо уйти на сервер, а потом уже вызывать процедуру этого модуля

О, соврала)

(51) приятно видеть))
(51) (50) спасибо)

Всё, добил, пошёл приводить в порядок модули форм =)
Всем огромное спасибо, по учебникам учиться скучно, а в режиме диалога приятно и познавательно!

(51) Это инструкции препроцессору.