Ваши комментарии
Добрый день.
В 2-НДФЛ и в 6-НДФЛ вылезает один рубль (задолженность по налогу) в ОП. (ЛС во вложении.)
Это последствия разбиения доходов по ОКТМО.
Налог с общего дохода не равен сумме налогов (с доходов по каждому ОКТМО) из за округления НДФЛ до рублей.
В 6-НДФЛ во 2-м разделе суммы по ведомостям за январь и февраль встают с "-" в ОП
Можно поподробнее?
У меня на сохраненке формируются такие блоки:
и
Таблица "первоначальное заполнение" за период 01.2018-03.2018
| ID обособл. подразделе | Месяц учета | Месяц начисле ния | Дата фактического получения дохода (100) | Дата удержания налога(110) | Срок перечисления налога (120) | Сумма полученного дохода | Сумма удержанного налога |
| IDDepart | MonthTax | MonthV | Fld100 | Fld110 | Fld120 | Fld130 | Fld140 |
| 1 | 02.2018 | 02.2018 | 05.03.2018 | 05.03.2018 | 06.03.2018 | 0,00 | 11 341,00 |
| 1 | 02.2018 | 02.2018 | 05.03.2018 | 05.03.2018 | 06.03.2018 | 87 237,00 | 0,00 |
| 2 | 02.2018 | 02.2018 | 05.03.2018 | 05.03.2018 | 06.03.2018 | 0,00 | -11 341,00 |
| 2 | 02.2018 | 02.2018 | 05.03.2018 | 05.03.2018 | 06.03.2018 | 0,00 | 11 341,00 |
Добрый день.
У вас, наверно, в справке о предприятии добавлено несколько организаций (версия с уполномочкой или для разбивки НДФЛ по ОКТМО)
В этом случае при формировании отчета без предварительной засветки ЛС, в отчет включаются только сотрудники по выбранной организации.
Добрый день!
Как то так:
var Tabl = CreateObject("CurPrnTbl");
int FldSumm = Tabl.Find_Name_Fld(nameFld);
if(FldSumm==-1) return;
Tabl.Fill_Bottom_Text_1();
double columnItog = atof(Tabl.Get_Bottom_Text(FldSumm));Спасибо, исправил, перевыложил
- Вставляем код в SCRIPT\user\USFUNCRW.S
ProcessLs_ChangeOsnDolgn()
{
bool bInsertls=true;//только по выделенным ЛС
bool skipArhiveLs=true; //пропустить архивные ЛС
int countLs=(bInsertls)?cntnum:counttn;
var CMsg=CreateObject("ProgressBar");
CMsg.Initial(0,100,1);
CMsg.SetShowTime(static_cast_to_int(false));
for(int i=0;i<countLs;i++) //цикл по ЛС
{
if (CMsg.Msg_Proc(("Подождите немного. Идет обработка ЛС"),100.*i/countLs)==ESC ) {break;}
int tnum=(bInsertls)?Porobr1(i)%sizetn:tn(i)%sizetn;
if ( skipArhiveLs && IsArchLS(tnum))
continue;
int RC=LSRead(tnum, 0); //читаем ЛС
var CL=CreateObject("CombineList");
var tc=CreateObject("TmpCurCombine"); // Класс для временной смены а затем и восстановления текущего совместительства
var it = CL.CreateIterator();
int lastComb=0; //код должности с "максимальной" датой начала
var lastDPriem=KDateFromStr("01.01.1900");
for (it.SetBegin();!it.IsEnd();it.Next()) //цикл по должностям (it.CurKey() - внутр.код совместительства )
{
int combine=it.CurKey();
tc.Init(combine);//инициализируем нужным совместительством
var dPriem=KDateFromStr(kch_from_safe("data_rb"));
if (dPriem.IsValid() && dPriem.GT(lastDPriem))
{
lastComb=combine;
lastDPriem= KDateFromStr(dPriem.GetStr());
}
}
if(lastComb && CL.GetBaseID()!=lastComb) //меняем галку
{
CL.SetBaseID(lastComb);
//сохраняем ЛС
char ls[256];
long num;
polnyi_tn(num);
lsname(num,ls);
lswrite(ls,0);
}
}
}- Выделяем нужные ЛС
- Shift+F4->выполнить код -> открыть
- Выставляем строку
return ProcessLs_ChangeOsnDolgn();
- Жмем молнию
Добрый день!
Лог пишется в T_SYSTEM\KLASS5.VAL
Можете взять его из архива... в TABLCNF\hidden.cnf можно задать "Кол-во месяцев для хранения лога"
В сетевом варианте T_SYSTEM лучше сделать общим ресурсом, чтобы лог был единым.
Сервис поддержки клиентов работает на платформе UserEcho
Вам удалось решить проблему?