_CASetItemInfo

(    HndlBatch	    : Longint;
     RPVZSP         : Real;
     RPVZZP         : Real;
     SPFirm         : Real;
     ZPFirm         : Real;
     PolIdxSP       : Integer;
     PolIdxZP       : Integer;
     TKCenId        : Longint;
     TKProjektId    : Longint;
     TKZdrojId      : Longint;
     TKZakazkaId    : Longint) : Byte

Ukládá základní informace potřebné pro rozdělení mzdových nákladů.

 
HndlBatch Číslo (handle) zpracovávané dávky. Zpracování dávky startuje funkcí _CABatchBegin.
RPVZSP Redukovaný poměr vyměřovacích základů pro sociální pojištění.
M[ixmSocVymZakl] Pojistné - sociální / M[ixmSocPojVZALL] SP - Vyměřovací základ nekrácený (pro ND)
RPVZZP Redukovaný poměr vyměřovacích základů pro zdravotní pojištění.
M[ixmZdrVymZakl] Pojistné - zdravotní / M[ixmZdrPojVZALL] ZP - Vyměřovací základ nekrácený
SPFirm M[ixmSocPojFirm] Pojistné sociální - organizace
ZPFirm M[ixmZdrPojFirm] Pojistné zdravotní - organizace
PolIdxSP Index mzdové položky 'ixmSocPojFirm' - 'Pojistné sociální - organizace'
PolIdxZP Index mzdové položky 'ixmZdrPojFirm' - 'Pojistné zdravotní - organizace'
TKCenId Ident třídicího kritéria režie - středisko. Může být nula.
TKProjektId Ident třídicího kritéria režie - projekt. Může být nula.
TKZdrojId Ident třídicího kritéria režie - zdroj. Může být nula.
TKZakazkaId Ident třídicího kritéria režie - zakázka. Může být nula.

Jestliže dávka HndlBatch neexistuje, vrací funkce false.

Podívejte se na: Rozdělení nákladů

Příklad:

procedure RozdeleniNakladuJedneMzdy
    dim hBatch      : Longint;
    dim CntItems    : Integer;
    dim RVZSP       : Real;
    dim RVZZP       : Real;

    RVZSP := M[ixmSocVymZakl] / M[ixmSocPojVZALL];
    RVZZP := M[ixmZdrVymZakl] / M[ixmZdrPojVZALL];

    { Spustí proces rozdělení }	
    hBatch := _CABatchBegin(O[dbIdent], _SysMonth, _ActMonth, _SysYear, false, CntItems);
    _CASetItemInfo(hBatch, RVZSP, RVZZP, M[ixmSocPojFirm], M[ixmZdrPojFirm], ixmSocPojFirm, ixmZdrPojFirm, 
            O[ixNaklStr], O[ixProjekt], O[ixZdroj], O[ixZakazka]);
    ...
    _CABatchCommit(hBatch);
endproc