Могу я, наконец-то, получить квалифицированный ответ от разработчиков - или что мы делаем не так, или что надо исправить в программе. Поймите, проверяющему из ФСС все равно, что справка выдается машиной: "штраф будет, т.к. справка неверна". Просили ее подождать, а ответа все нет и нет.
P.S. Похоже, кроме Вас все разработчики покинули форум... ни одного ответа
Могу я, наконец-то, получить квалифицированный ответ от разработчиков - или что мы делаем не так, или что надо исправить в программе. Поймите, проверяющему из ФСС все равно, что справка выдается машиной: "штраф будет, т.к. справка неверна". Просили ее подождать, а ответа все нет и нет.
P.S. Похоже, кроме Вас все разработчики покинули форум... ни одного ответа
Добрый день.
Документ «Справка о ЗП для б/л FR» формируется на основе записей начислений по дням нетрудоспособности Лицевого счета сотрудника.
До того, как Вы формируете документ Лицевой счет сотрудника должен быть рассчитан.
В карточке запроса указывается период (Начальный, Конечный), в котором были начисления по листку нетрудоспособности.
Начальный и конечный периоды, вычисляются по данным записей начислений для оплаты больничных.
Исходя из Вашего примера, в карточке запроса, Вы должны были указать конечный период 2006.01.
В команде
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
В переменную GR, возвращается значение периода, за который начисляется оплата больничных.
Вид начисления «БЛР» следует заменить, на вид начисления «Больничный за счет работодателя»: БОЛ или БЛ2.
Posted: 16 Apr 2007 17:12 Post subject: Re: Титову!!!
saxonova wrote:
Добрый день.
Документ «Справка о ЗП для б/л FR» формируется на основе записей начислений по дням нетрудоспособности Лицевого счета сотрудника.
До того, как Вы формируете документ Лицевой счет сотрудника должен быть рассчитан.
На дворе 2007 год, естественно все давно рассчитано
saxonova wrote:
В карточке запроса указывается период (Начальный, Конечный), в котором были начисления по листку нетрудоспособности.
Начальный и конечный периоды, вычисляются по данным записей начислений для оплаты больничных.
Исходя из Вашего примера, в карточке запроса, Вы должны были указать конечный период 2006.01.
Я так и делала, но в справку попадает период с 2004.02(прием на работу)по 2005.12 , а должен быть по 2005.11!! ведь больничный - декабрьский!!
saxonova wrote:
В команде
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
В переменную GR, возвращается значение периода, за который начисляется оплата больничных.
Вид начисления «БЛР» следует заменить, на вид начисления «Больничный за счет работодателя»: БОЛ или БЛ2.
И это, естественно, сделала. И в этой строке и еще в двух...
Какие еще будут советы? Боюсь даже появляться на работе...
Posted: 17 Apr 2007 11:44 Post subject: Re: Титову!!!
saxonova wrote:
Светлана wrote:
Я так и делала, но в справку попадает период с 2004.02(прием на работу)по 2005.12 , а должен быть по 2005.11!! ведь больничный - декабрьский!!
Добрый день.
Причину неправильного определния расчетного периода нашли.
Немного позже напишу Вам какие внести исправления.
Или выложить программу srzar_fr.frm
С уважением Саксонова Е.А. отдел разработок
В программе Srzar_fr.frm
Добавьте переменную fPerSet
fPerSet := ""
После команды
Y := 0
добавтьте следующие команды
DbPush()
NetUse("Setting",LoadPath()+"Salary\Setting.dbf")
fPerSet := setting->S_Period
DbCloseArea("Setting")
DbPop()
Блок команд
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
измените на
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
Не забудьте отредактировать виды начислений.
Отредактированная программа будет включена в SP36/
Posted: 17 Apr 2007 12:00 Post subject: Re: Титову!!!
saxonova wrote:
В программе Srzar_fr.frm
Добавьте переменную fPerSet
fPerSet := ""
После команды
Y := 0
добавтьте следующие команды
DbPush()
NetUse("Setting",LoadPath()+"Salary\Setting.dbf")
fPerSet := setting->S_Period
DbCloseArea("Setting")
DbPop()
Это понятно
а вот это нет: я просто не могу найти отличия
saxonova wrote:
Блок команд
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
измените на
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
Я чего-то не вижу? И где используется новая переменная fPerSet?
Да, и еще вопрос, а в справку 2007 года(ситуация та же) какие надо внести изменения?
Posted: 17 Apr 2007 12:41 Post subject: Re: Титову!!!
Светлана wrote:
saxonova wrote:
В программе Srzar_fr.frm
Добавьте переменную fPerSet
fPerSet := ""
После команды
Y := 0
добавтьте следующие команды
DbPush()
NetUse("Setting",LoadPath()+"Salary\Setting.dbf")
fPerSet := setting->S_Period
DbCloseArea("Setting")
DbPop()
Это понятно
а вот это нет: я просто не могу найти отличия
saxonova wrote:
Блок команд
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
измените на
If !Empty(aVars[30])
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
Я чего-то не вижу? И где используется новая переменная fPerSet?
Да, и еще вопрос, а в справку 2007 года(ситуация та же) какие надо внести изменения?
Извините, пожалуйста, за допущенную ошибку.
Изменить нужно на следующее
If !Empty(aVars[30])
if fPerSet= cEPeriod
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛР"), "FPERIOD")
else
DbPush()
DbPush("Arc_acc", "11")
Do While !Eof()
If arc_acc->TNUM=aPars[1] .and. Arc_Acc->Type='+' .and. Arc_Acc->CPeriod=cEPeriod .and. Arc_Acc->InOut='БЛР'
GR := Arc_Acc->FPeriod
EndIf
DbSkip()
EndDo
DbPop()
DbPop()
EndIf
Else
GR := Any( "ACCOUNTS", "16", UPPER(atnums[aPars[4]]+"БЛФ"), "FPERIOD")
EndIf
В программе srzar07.frm отредактировать аналогично только последнее.
Переменную fPerSet исправить на fPerSetting.
Все вставила, заменила, исправила коды. Не помогло. Период берется неверно. Можно отправить мне исправленный и проверенный у вас Srzar_fr.frm? может я не так исправляю...
Joined: 25 Nov 2004 Posts: 99 Location: Дмитриева Екатерина Occupation: БЭСТ-Программы (консультант) Interests: Москва
Posted: 20 Apr 2007 11:04 Post subject:
Добрый день!
Отредактированная программа включена в SP36 от 19.04.2007
Учет заработной платы
2. Выходные формы. Справки по шаблонам. Индивидуальные справки. «Справка о ЗП для б/л FR», «Справка о ЗП для б/л FR(2007)», «Справка о ЗП для б/л УСН FR(07)». Исправлено формирование расчетного периода.
На Ваш эл.адрес отправлен исправленный и проверенный Srzar_fr.frm.(обязательно исправьте на свои коды).
Получила. Коды исправила. Проверила. Ничего не изменилось. В Лицевой счет в 2006.11 введен б/лист за 2006.10. Рассчитан правильно. Формируем справку. Период начальный 2006.11 Период конечный 2006.11. ,вид периода- фактический. В результате в справку попадает период с 01.11.2005 по 31.10.2006, а должно быть с 01.10.2005 по 31.09.2006 !!!
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum