Alla oleva listaus tulostaa ALV:n erittelyn bruttona tiliöidyistä
ostolaskuista.
Ostolaskut on tiliöity bruttokirjauksina. Kuitenkin halutaan eritellä
ALV:n osuus. Tulosteeseen halutaan kunkin tilin yhteissumma ko. ajanjaksolta.
Tässä esimerkkitapauksessa tilillä 1841 on perintätoimistolta
tullutta paljasta alvia, joka halutaan kokonaan alv-sarakkeeseen.
Jotta kysely toimisi, avaa ostoreskontratietokanta Microsoft Access -tietokantaohjelmalla ja linkitä siihen Tiedosto|Nouda ulkoiset tiedot|Linkitä taulukoita -toiminnolla Tilikartta-taulukko, joka löytyy kirjanpitotietokannasta (esim. c:\winkp\firma\fi09.wkp).
Kuvallinen ohje vastaavantyyppisestä tilanteesta (tosin laskutusohjelmaan liittyvä, eli noudata soveltuvin osin) löytyy osoitteesta http://www.atsoft.fi/wllinkitataulukko.htm
- valitse Tulosta|Kyselytilastot(SQL)|Luo kyselyitä
- Valitse vasemman yläkulman alaspudotuslistasta seuraava vapaa määrittämätön
kysely ja anna sille sopiva nimi, esim. "ALV erittely"
- Kopioi alla olevista SQL-lause (maalaus ja ctrl+C = kopioi) ja liitä
(ctrl+V = liitä) se ostoreskontraohjelman sql-kyselytoiminnon isoon
tekstikenttään
SELECT Tiliöintirivit.Debet AS Tili, Sum(Tiliöintirivit.Summa) AS Debetsaldo, 0 AS Kreditsaldo, Max(Tilikartta.ALVtunnus) AS ALVtunnus , Max(IIF(Tilikartta.Tilinumero = '1841',1000000000000, Val('' & Mid(Tilikartta.ALVtunnus,4)))) AS ALVpros, Format(Debetsaldo/(1+ALVpros/100),'0.00') AS Netto, Format(Debetsaldo-Netto,'0.00') AS ALVeuroa FROM Tilikartta INNER JOIN (Tiliöintirivit INNER JOIN Ostolaskut ON Tiliöintirivit.Laskuntunniste = Ostolaskut.Laskuntunniste) ON Tilikartta.Tilinumero = Tiliöintirivit.Debet WHERE [Ostolaskut].Tila <> '4' AND Val('' & Tiliöintirivit.Debet) <> 0 AND Ostolaskut.[Laskun pvm] BETWEEN DateValue('%1') AND DateValue('%2') GROUP BY Debet UNION SELECT Tiliöintirivit.Kredit AS Tili, 0 AS Debetsaldo, Sum(Tiliöintirivit.Summa) AS Kreditsaldo, Max(Tilikartta.ALVtunnus) AS ALVtunnus , Max(Val('' & Mid(Tilikartta.ALVtunnus,4))) AS ALVpros, Format(Kreditsaldo/(1+ALVpros/100),'0.00') AS Netto, -1*Format(Kreditsaldo-Netto,'0.00') AS ALVeuroa FROM Tilikartta INNER JOIN (Tiliöintirivit INNER JOIN Ostolaskut ON Tiliöintirivit.Laskuntunniste = Ostolaskut.Laskuntunniste) ON Tilikartta.Tilinumero = Tiliöintirivit.Kredit WHERE [Ostolaskut].Tila <> '4' AND Val('' & Tiliöintirivit.Kredit) <> 0 AND Ostolaskut.[Laskun pvm] BETWEEN DateValue('%1') AND DateValue('%2') GROUP BY Kredit
Kysymys %1 on jakson alkamispäivä
Kysymys %2 on jakson päättymispäivä
Tuloste kannattaa ottaa Omatuloste-valinnalla ja sinne määritellä "2 desim., yhteenlasku"
- Paina tallenna ja/tai suorita, jolloin näet taulukossa haluamasi
tiedot
- Käytettävissäsi on Tulosta-valikon paperitulosteet ja
Muokkaa-valikon erilaiset leikepöytäkopiointiversiot
- Seuraavilla käyttökerroilla saat tulosteen suoraan valinnalla
Tulosta | Kyselytilastot (SQL) | Valmiit kyselyt | ALV erittely