протокол расчета доп. отпуска

rebel25

В зарплате не печатаются протоколы расчента доп. отпусков. Программа выдает "Расшифровка расчета не была записана", при нажатии на кнопку "Печать". Хотя при нажатии на кнопку "Просмотр" выводится расчет.

Николай

В процедуре «zrp_prc_absent_rep_leave»
…
SELECT
Code_Leave
,l_back
,Operat
,Workdays
,pId
,Auto_Leave
,FromD
INTO
_Code_Leave_,
_L_Back_,
_Operat_,
_WorkDays_,
_pId_,
_AUTO_LEAVE_,
_FromD_
FROM
pr_Leave
WHERE
Auto_Leave = _ID_MAIN_ ;
…

Заменить на :
SELECT
pr_leave.Code_Leave
,pr_leave.l_back
,pr_leave.Operat
,pr_leave.Workdays
,pr_leave.pId
,(case when isnull(pr_leave_add.id,0)=0 then pr_leave.Auto_Leave else pr_leave_add.id end)
,pr_leave.FromD
INTO
_Code_Leave_,
_L_Back_,
_Operat_,
_WorkDays_,
_pId_,
_AUTO_LEAVE_,
_FromD_

FROM
pr_Leave _HINTBROWSER
left join pr_leave_add on pr_leave_add.Auto_Leave =pr_leave.Auto_Leave
WHERE pr_leave.Auto_Leave = _ID_MAIN_ ;

Vitaly

А я просто поставил заглушку на проверку

Код:

/*---------------------------------------------------------------
IF exists (SELECT id
      FROM z_sabsence
      WHERE n_dirm in (5, 25) and idmain = _AUTO_LEAVE_ )
THEN {
DIALOG zrp_DLG_SignatureReport,,"~Печать расчета по среднему заработку";
IF _RESULT == 10 THEN
{
   ALIAS _Accountant := BOSS_BUH_auto_card;
   report Записка_краткая_2003.rpt,"Расчет неявок",,option_;
};
} ELSE {
IF _IsMsgView_ == 1 THEN return [\3 Расшифровка расчета не была записана];
};
*/

------------------ -----------------------------------------------

DIALOG zrp_DLG_SignatureReport,,"~Печать расчета по среднему заработку";
IF _RESULT == 10 THEN
{
ALIAS _Accountant := BOSS_BUH_auto_card;
   report Записка_краткая_2003.rpt,"Расчет неявок",,option_;
};
-------------------------------------------------------------------

Николай

А если оформлен только дополнительный отпуск, то же формирует расшифровку Question

Vitaly

Да, формирует... только что-то с сортировкой, не стал разбираться