( UvazekId : Byte;
SMonth : Integer;
AMonth : Integer;
SYear : Integer;
RefDate : Date;
SepDate : Date;
WZakl : Wage;
WSum : Wage;
TKCenId : Longint;
TKProjektId : Longint;
TKZdrojId : Longint;
TKZakazkaId : Longint;
PolIdxSP : Integer;
PolIdxZP : Integer;
KracVeDnech : Byte;
SmerDoRNRezie : Longint;
SmerDoRNSumWage : Longint;
dim Error : String) : Byte
Vypočítá kompletní rozdělení mzdových nákladů pro úvazek UvazekId.
| SMonth | Měsíc mzdové věty. Může být mimo rozsah 1..12. |
| AMonth | Měsíc ze kterého generování probíhá (1..12). |
| SYear | Rok ze kterého generování probíhá. |
| RefDate | Referenční datum pro čtení historických položek. |
| SepDate | Separační datum pro čtení historických položek. |
| WZakl | Mzdová věta základní. Musí být typ Wage, nelze používat M! |
| WSum | Mzdová věta součtová. Musí být typ Wage, nelze používat M! |
| TKCenId | Ident třídicího kritéria režie - středisko. Aby dobře fungovalo třídění (_SortGenerate) pro položku odkud je tato hodnota brána, měla by zde být relace na existující větu. |
| TKProjektId | Ident třídicího kritéria režie - projekt. Aby dobře fungovalo třídění (_SortGenerate) pro položku odkud je tato hodnota brána, měla by zde být relace na existující větu. |
| TKZdrojId | Ident třídicího kritéria režie - zdroj. Aby dobře fungovalo třídění (_SortGenerate) pro položku odkud je tato hodnota brána, měla by zde být relace na existující větu. |
| TKZakazkaId | Ident třídicího kritéria režie - zakázka. Aby dobře fungovalo třídění (_SortGenerate) pro položku odkud je tato hodnota brána, měla by zde být relace na existující větu. |
| PolIdxSP | Index mzdové položky 'ixmSocPojFirm' - 'Pojistné sociální - organizace' |
| PolIdxZP | Index mzdové položky 'ixmZdrPojFirm' - 'Pojistné zdravotní - organizace' |
| KracVeDnech | true = krácení podle dní |
| SmerDoRNRezie | Maska směru označující položky, které se mají automaticky přenášet do systemu rozdělení mzdových nákladů jako režie.
Maska se použije na druhou sadu mzdových směrů! Jestliže zadáte nulu, vybere system sám 'vhodné' položky. |
| SmerDoRNSumWage | Maska směru označující položky, které se při historické změně neřeší jako historické.
Maska se použije na druhou sadu mzdových směrů! Jestliže zadáte nulu, vybere system všechny položky! |
| Error | Jestliže funkce vrací false, je zde text chyby. |
Podívejte se na: Rozdělení nákladů
Příklad:
procedure RozdeleniNakladuJedneMzdy
dim Error : String;
dim DRef, DSep : Date;
dim WZakladni : Wage;
dim WSouctova : Wage;
...
DRef := _LastDate(_ActMonth, _SysYear);
DSep := _LastDate(_ActMonth, _SysYear);
if(_CAGenerate(idZam, _SysMonth, _ActMonth, _SysYear, DRef, DSep, WZakladni, WSouctova,
idRNS, idRProjekt, idRZdroj, idRZakazka, ixmSocPojFirm, ixmZdrPojFirm, TypKraceni, 0, Error) = false)then
_MsgBox(0, Error, 0);
endif
endproc