Uživatelské nástroje

Nástroje pro tento web


reports:cizi_meny

Problematika cizích měn a přecenění ve fakturách

Ukázkový testovací kód:

local md = ClientSession:ActivateMid("Faktury")
local ds = md:FindDataSetItem("")
ds:LocateRange("idfaktura", "Fv015466")
 
print("V Kc pouzivat pouze CenaKUhrade, Uhrazeno; vypoctem je nutne ziskat Neuhrazeno")
print({
 CenaKUhrade=ds:FieldByName("CenaKUhrade"), 
 Uhrazeno_VcetnePreceneni=ds:FieldByName("Uhrazeno"),
 Neuhrazeno_HodnotaZavazkuPoPreceneni_Vypocet=ds:FieldByName("CenaKUhrade")-ds:FieldByName("Uhrazeno")})
 
print("--------")
 
print("V Kc nelze pouzit Neuhrazeno resp. SpoctiNeuhrazeno - jde o nesmyslne hodnoty (kvuli zobrazeni v Eur v OBISu)")
print({ 
 Neuhrazeno=ds:FieldByName("Neuhrazeno"),
 SpoctiNeuhrazeno=faktury_faktury.SpoctiNeuhrazeno(ds),
})
 
print("--------")
 
print("V EUR pouzivat pouze CenaKUhrade a Neuhrazeno resp. SpoctiNeuhrazeno; vypoctem je nutne ziskat Uhrazeno (bez preceneni)")
print({
 CenaKUhrade=cf.RecalcToDSIMena(ds, ds:FieldByName("CenaKUhrade")), 
 Uhrazeno_BezPreceneni_Vypocet=cf.RecalcToDSIMena(ds, ds:FieldByName("CenaKUhrade")-faktury_faktury.SpoctiNeuhrazeno(ds)),
 Neuhrazeno_BezPreceneni=cf.RecalcToDSIMena(ds, faktury_faktury.SpoctiNeuhrazeno(ds))})
 
 
print("--------")
 
print("V EUR nelze pouzit Uhrazeno - tohle ale vidi uzivatel v OBISu")
print({Uhrazeno=cf.RecalcToDSIMena(ds, ds:FieldByName("Uhrazeno"))})
 
print("--------")
 
ClientSession:Passivate(md)
reports/cizi_meny.txt · Poslední úprava: 2011/05/10 14:57 autor: Karel Petrů