Рабочие периоды отпусков

[smmmmm]

Здесь считается так

Код: Выделить всё

#include FactVacation.vih    // для расчета остатков отпусков
....
var
  iFV          : iFactVacation New;
.....
    dCur_Date := WorkPeriod.dPerEnd;

  case wParam_Get of

    word(0):
      {
        if ( iFV.funGetDaysHarmVac(PutVacation.nRec, Cur_Date, dTmp) )
          result := word(dTmp);
        else
          result := word(if ((PutVacation.wProvidWay <> '1'),
                           iFV.funGetBalanceVac(PutVacation.NRec,0,date(0,0,0)),
                           iFV.funGetDayProportionCur(WorkPeriod.dPerBeg, if (funPeriodPosition = word(1),
                                                                             dCur_Date,
                                                                             if (funPeriodPosition = word(0),
                                                                               WorkPeriod.dPerEnd,
                                                                               Date(0,0,0))),
                                                                               PutVacation.NRec, 0 )));

Найдите FactVacation.vih в архивах в папке Frm(брать нужное наиболее свежую версию)
По поводу того, что поле не открыто - всегда же есть конфигуратор? из которого
1. Можно в дополнение к getifccurrentfieldname вытащить название поля
2. Или снять атрибут skip

Спасибо за квалифицированную поддержку, воспользовался интерфейсом, остатки по отпускам выводит корректно.

[edward_K]

smmmmm Это форум не поддержки - вы адресом ошиблись. Тот на http://forum.galaktika.ru. Здесь такие же пользователи в основном как и вы и отвечают при наличии времени и возможности. Так что не надо по три раза дублировать сообщения - будет возможность вам ответят.

[smmmmm]

smmmmm Это форум не поддержки - вы адресом ошиблись. Тот на http://forum.galaktika.ru. Здесь такие же пользователи в основном как и вы и отвечают при наличии времени и возможности. Так что не надо по три раза дублировать сообщения - будет возможность вам ответят.

Да не дублирование случайно получилось, думал, не в ту ветку сунул. Хотел сообщить, что интерфейсом этим (FactVacation.vih) воспользовался, остатки по отпускам выводит корректно, проблема решена, палец вверх нажал, за помощь спасибо от чистого сердца.

[Irina_]

Здравствуйте.
Поднимаю тему. edward_K приводил ранее кусок кода для расчета остатков отпусков, в котором в зависимости от способа предоставления отпуска остаток рассчитывался разными функциями. В коде не понятна ф-ция (или переменная) funPeriodPosition, значение которой влияет на значение 2 пар-ра ф-ции funGetDayProportionCur(…). Кстати, в vih и в z_staff.chm описание ф-ции явно не соответствует действительности.

В последнем FactVacation.vih от 01.04.2016 нашла ф-цию:
#doc
Заполнение поля “из дней” для приказов РПД-6 и РПД-41, а также для проверки в компенсациях при увольнении
#end
public function funGetDayCountIz(cPutVac : comp; wPrWay : word; dWPBeg, dWPEnd, dRasch : date) : integer;

Который раз без описания параметров (((
Вопросы:
1.Изменился ли за прошедшее время подход к нахождению остатков отпусков на заданную дату?
2. Можно ли эту последнюю ф-цию использовать для нахождения остатков по отпускам в своем отчете?