Gjoreski | 14.05.2014 01:10 |
---|---|
Predmet:Presmetka DPH (DDV) , (PDV) vo cod so popust Pozdrav do site. Ovaj moj Problem se sostoi vo toa sto treba da napravam rekapitulacija na po Danocni stavki na Racun vo koj e vklucen i Popust. Imam dva Recordseti edniot e za stavkite vo racunot , drugiot e za danocnite stavki vo racunot e sega ne mozam da napravam rekapitulacija na danocni stavki na racun na koj ima dadeno odreden popust. Eve ja funkcijata za racunot a ke stavam i baza ako nekoj ima ideja kako da se resi PreuzmiIzvorni kфd (Visual Basic):
|
|
Prilozi: BazaRL.rar (Velicina datoteke:56.07 KB) |
zxz | 14.05.2014 12:48 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Imam nekoliko pitanja: -koja ide cijena: Ed_Cena Posledna_Prod_Cena Koja je mjera za popust: -procenat(%) -iznos Dali je PDV uracunat u cijenu ili se dodaje na cijenu. Rekapitulacija se racuna od datuma do datuma pa te najbolje nisam razumio kada kaze da pravis rekapitulaciju po racunima. |
zxz | 14.05.2014 12:53 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Sada sam nasao zvoj Query1. Jeli u njemu sve ono kako zelis da napravis rekapitulaciju? Hocu reci jeli u njemu rekapitulacija dobra. |
Gjoreski | 14.05.2014 13:31 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Ovako: popustot e presmetan vo pari na vkupnata suma na racunot. Rekapitulacijata mi treba da se prikazi na racunot (odnosno treba da seimplementira vo funkcijata gore)na mestoto od rsDDV. Cenata koja ja koristam e Ed_Cena . Qerito e samo za test me koristam querija vo programov sve e co cod. Cenata e so presmetan PDV. |
zxz | 14.05.2014 20:54 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Evo nadam se da ces se snaci ako ne onda mi posalji primjer ili setup.ini i ispisi u wordu ili Notepadu kako treba da izgleda rekapitulacija i jeli uvijek idu obadvije ili nekad jedna nekad druga. Naslov procedure: Function Smetka_Rekapitulacija(SmetkaBroj As Long, Optional Datum = Date) ... SQLSmetkaStavki = "SELECT tblSmetki_Stavki.DDV, Sum([Ed_Cena]*[Kolicina]) AS BezPopusta," _ & " Sum([Ed_Cena]*[Kolicina]-[Popust]) AS SoDDV, Sum(tblSmetki_Stavki.Popust) AS pp_Popust," _ & " Sum([Ed_Cena]*[Kolicina]-[popust]/[Koeficient]) AS BezDDV," _ & " Sum(([Kolicina]*[Ed_Cena]-[popust])-([Ed_Cena]*[kolicina]-[popust])/[Koeficient]) AS dDDV" _ & " FROM tblTarifi INNER JOIN tblSmetki_Stavki ON tblTarifi.Tarifa = tblSmetki_Stavki.DDV" _ & " WHERE tblSmetki_Stavki.Smetka_Br =" & SmetkaBroj _ & " GROUP BY tblSmetki_Stavki.DDV" ... SQL_DDV = "SELECT tblSmetki_Stavki.Stavka, tblSmetki_Stavki.DDV, Sum([Ed_Cena]*[Kolicina]) AS BezPopusta," _ & " Sum([Ed_Cena]*[Kolicina]-[Popust]) AS SoDDV, Sum(tblSmetki_Stavki.Popust) AS pp_Popust," _ & " Sum([Ed_Cena]*[Kolicina]-[popust]/[Koeficient]) AS BezDDV," _ & " Sum(([Kolicina]*[Ed_Cena]-[popust])-([Ed_Cena]*[kolicina]-[popust])/[Koeficient]) AS dDDV" _ & " FROM tblSmetki INNER JOIN (tblTarifi INNER JOIN tblSmetki_Stavki ON tblTarifi.Tarifa = tblSmetki_Stavki.DDV)" _ & " ON tblSmetki.ID_Smetka = tblSmetki_Stavki.Smetka_Br" _ & " WHERE tblSmetki.Data Between " & Datum & " And " & Datum + 1 AND tblSmetki.Storna=False _ & " GROUP BY tblSmetki_Stavki.Stavka, tblSmetki_Stavki.DDV" _ & " HAVING Sum([Ed_Cena]*[Kolicina]>0)" end function |
Gjoreski | 16.05.2014 12:46 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Mene mi treba nesto vakvo : SQL_DDV = "SELECT A.DDV, Sum(A.Kolicina) AS KOL, Avg(A.Ed_Cena) AS Cena, tblTarifi.Koeficient, [kol]*[Cena] AS VUkupno, & VkupnaSuma & AS Suma, Avg(" & Rabat & ") AS Rab, [suma]-[rab] AS Za_Naplatu, [Suma]/[VUkupno] AS Procenat, [Za_Naplatu]/[procenat] AS N_Sa_Pdv, [N_Sa_Pdv]/[Koeficient] AS N_Bez_PDV, [N_Sa_PDV]-[N_Bez_Pdv] AS PDV_Iznos" _ & " FROM tblTarifi INNER JOIN (tblSmetki INNER JOIN tblsmetki_stavki AS A ON tblSmetki.ID_Smetka = A.Smetka_Br) ON tblTarifi.Tarifa = A.DDV" _ & " Where (((tblSmetki.ID_Smetka) =" & SmetkaBroj & "))GROUP BY A.DDV, tblTarifi.Koeficient;" VkupnaSuma = vkupnata suma na racunot so PDV bez popust (Ovaa vrednos ja imam gotova ne mora da se presmetuva) Rabat = Popustot na racunot ( Isto gotova vrednost) SmetkaBroj = ID od Racunot za koj treba da se odnesuva rekapitulacijata |
zxz | 16.05.2014 12:55 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Citat: VkupnaSuma = vkupnata suma na racunot so PDV bez popust (Ovaa vrednos ja imam gotova ne mora da se presmetuva) Ja sam ove vrjednosti stavio da bi sve imao na jednome mjestu i da je lakse napraviti izvjestaj Citat: SmetkaBroj = ID od Racunot za koj treba da se odnesuva rekapitulacijata Ja sam stavio u proceduru kao ulaz broj Smetka umjesto id smetka racunajuci da je lakse i to sam i napisao. Citat: " Where (((tblSmetki.ID_Smetka) =" & SmetkaBroj & "))GROUP BY A.DDV, tblTarifi.Koeficient;" Ovo imas samo sa broj Smetki. |
zxz | 16.05.2014 13:04 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Evo ti u mdb procedura. Otvori modu i u prozor immediate kocaj ovo: ?Smetka_Rekap(0) ?Smetka_Rekap(10) ?Smetka_Rekap(0,"10.05.2014","17.05.2014") Na putanji mdb dobit ces stampa.txt file i pogledaj sta ima. ?Smetka_Rekap(10) Dobit ces rezultate kao u tvome xls fajlu. Mogu ti ovo napraviti i u vb ako vidis da je dobro. |
|
Prilozi: BazaRLzxz.zip (Velicina datoteke:66.72 KB) |
Gjoreski | 16.05.2014 13:05 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust vo mojov slucaj e biten ID to od smetkata bideki za sekoja kasa (a ima 3 ) se generira broj na smetka odnosno brojot na smetkata moze da bide isti na tri kasi samo ID to e razlicno. Pred da se zatvori smetkata prvo se printa a potoa se zatvora,pri zatvorajne na smetkata se zapisuva i vrednosta na rabatot. Znaci so vakva konstrukcija jas na racunot nikogas ke nemam prikazan rabat. |
zxz | 16.05.2014 13:15 |
---|---|
Predmet:Re: Presmetka DPH (DDV) , (PDV) vo cod so popust Dobro nije problem promijeniti broj smetka u id kao uslov ali prvo isprobaj i vidi dali ti to pase sto sam napravio. Napravio sam po onome sto si ti dao. |