KDP Wydruk wartości płacowej
Witam,
Tak jak w temacie - potrzebuję aby ktoś życzliwy podał krok po kroku przykład jak prawidłowo wykonać wydruk wartości płacowej - np łączna kwota netto ze wszystkich okresów płacowych mca stycznia dla konkretnego pracownika. Czytam instrukcję i kompletnie nie czuję w jakiej kolejności używać poszczególnych obiektów. Z warotściami kadrowymi nie ma problemu. Zaczynam mniej więcej tak:
Kod:
long idGrupy = Val(Arg0)
long typ = Val(Arg1)
if val(Arg0) ==0 && Val(Arg1)==0 then
message "Raport może zostać wykonany TYLKO z okna Pracownicy"
error ""
endif
if setGroup (idGrupy, typ, TR_PRACOWNICY) == 0 then
message "Ustawienie grupy pracowników niepowiodo się"
error ""
endif
Infofirma firm
InfoPrac prac
Perioditem okr
Summary summ
//testowo - okresy
okr.init("2016-01-01")
//message using "%l", okr.id//GetNameMonthYear()
summ.AddComponent( 6022, SCF_SUMM_VALUE)
summ.PrepareSummary(0,SCF_SUMM_VALUE)
//message using "%i",summ.GetComponentCount()
//summ.AddPeriod (okr.id)
long idprac = GetFirst()
ProgDlg dlg
dlg.Show()
dlg.SetMax( ElemCount() )
while idprac != 0
Pracownik (prac,idprac)
summ.DoSummary (idprac, 6022)
message prac.nazwisko
dlg.Update()
idprac = GetNext()
wend
Potrzebuję aby mi ktoś raz na zawsze jak chłopu na miedzy krok po kroku wytłumaczył jak pobrać wartość płacową