sram me je


Moderator: Mirko Zbačnik

Odgovori
Angelina
Računovodja
Računovodja
Prispevkov: 406
Pridružen: 08 Feb 2004, 23:06

sram me je

Odgovor Napisal/-a Angelina »

Sram me je ampak sem se po nekaj urnem delu opogumila prositi za pomoč.

Vem kako poknjižiti prejete račune za blago trgovini, vem kako poknjižiti blagajno, vem kako ...

Dobim TDR - na njem je nakupna vrednost - prodano blago in zaloga

poknjižim ga na 1107 (iztržki) / 762 (prihodek od prodaje) JA - NE?

Če ja - po katerem dokumentu knjižim razbremenjevanje zalog, da se mi zapira konto 663 ?

saj ne vem mogoče ko prespim ugotovim in bo enostavno, samo sedajle res rabim vašo pomoč

hvala vam:sad:
Soncek
Začetnik
Začetnik
Prispevkov: 49
Pridružen: 09 Sep 2003, 15:10
Kraj: Slovenia

Odgovor Napisal/-a Soncek »

Spoštovana Angelina.
Zakaj bi te bilo sram?
Nekoč sem imel iste probleme. Mislim da ni tako komlicirano.
Poglej.
Ko prejmes racun za nabavljeno blago, naredis kalkulacijo.
Trgovsko blago v skladišču mora imeti podatke o

-Nabavni vrednosti
-Trgovski marži
-Prodajni ceni
-Stopnji davka (DDV)

Tistega momenta, ko se blago proda, je potrebno navedeno popraviti.

Torej.

Nabavna vrednost + marža je vaša prodajna cena brez DDV, ki je vaš prihodek, ki je razviden iz izdanega računa.
Čisti prihodek ali dobiček od prodaje je v bistvu le marža. Zato se nabavna vrednost v tem primeru šteje kot strošek blaga in se evidentira (šteje) šele ob prodaji.

Nikar ne mesaj kontov blagajne ali TR. Tukaj gre predvsem za obremenitev in razbremenitev zalog. Namesto konta blagajne uporabi konto prihodkov.

Po katerem dokumentu knjižiš razbremenitev zalog?
Lahko ga imenujes kakor koli. Mogoce obračun prodaje. Vendar ne pozabi na marsikatere posebnosti kot so dani popusti itd.
Mogoce mimigrede, kako izgleda knjiženje prodaje napisano kot programska procedura .....

For i = 1 To Cikl

rsX.AddNew

rsX!Aop = iAop
rsX!Aop_obr = iAop_obr
rsX!Opis = iDobav
rsX!datum_npd = iDatum_npd
rsX!Datum_pre = iDatum_pre
rsX!St_tem = iSt_tem
rsX!Pozicija = iSt_dokum
rsX("Stev_dok") = iSt_rac
rsX("Opis") = "Prodaja / " & iSt_dokum
rsX!stanjeX = "1"
rsX!Datum_tem = DateSerial(Year(rsX!datum_npd), Month(rsX! datum_npd), 1)

If i = 1 Then
rsX!Konto = "1200" & Mid(iSi_firme, 3, 4)
rsX!Opis_Konta = "KRATKOROČNE TERJATVE " & iDobav
rsX!Debet = Kupec1200
rsX!Saldo = Kupec1200
End If
If i = 2 Then
rsX!Konto = "7702"
rsX!Opis_Konta = "PRIHODKI OD PRODAJE"
rsX!Kredit = Kupec1200 - DDV2600
rsX!Saldo = (Kupec1200 - DDV2600) * -1
End If
If i = 3 Then
rsX!Konto = "2600"
rsX!Opis_Konta = "KRATKOROČNE OBVEZNOSTI ZA IZSTOPNI DDV"
rsX!Kredit = DDV2600
rsX!Saldo = DDV2600 * -1
rsX!X = iSt_davka
rsX!Znesek = Kupec1200 - DDV2600
'rsX!Znesek = MaloprodajnaVrednost - ZnesekIstopnegaDDV
End If
If i = 4 Then
rsX!Konto = "6630"
rsX!Opis_Konta = "ZALOGA BLAGA V TRGOVINI Z VRAČUNANIM DDV"
rsX!Kredit = Bruto6630
rsX!Saldo = Bruto6630 * -1
End If
If i = 5 Then
rsX!Konto = "6640"
rsX!Opis_Konta = "VRAČUNANI DDV"
rsX!Debet = DDV6640
rsX!Saldo = DDV6640
End If
If i = 6 Then
rsX!Konto = "7100"
rsX!Opis_Konta = "STROŠKI BLAGA"
rsX!Debet = Stroski7100
rsX!Saldo = Stroski7100
End If
If i = 7 Then
rsX!Konto = "6690"
rsX!Opis_Konta = "MARŽA"
rsX!Debet = (Bruto6630 - DDV6640) - Stroski7100
rsX!Saldo = (Bruto6630 - DDV6640) - Stroski7100
End If

rsX.Update

Next

Torej!
7 vknjižb. Ali to vse knjižite peš kot bi se reklo ??????

Lep pozdrav !!!
diana
Računovodja
Računovodja
Prispevkov: 608
Pridružen: 23 Jan 2004, 22:38
Kraj: Slovenia

Odgovor Napisal/-a diana »

Nekaj mi tukaj manjka-tudi pri obračunu prodaje je konto 669-razlika v ceni-saj konec leta, ko delaš inventuro, ti ostane tudi v zalogi 663 B, 664-DDV/D in 669-razlika v ceni D! Knjiženje iztržkov-jaz n.npr. knjižim 100 v B,762 v D, 762-DDV v iztržku v B, in 260-DDV v dobro.

diana
Odgovori