[es] - prikaz od datuma do datuma

zikret

Član broj: 124281
Poruke: 42
*.PPPoE-5888.sa.bih.net.ba.

Sajt: https://kakosepise.info

Profil

^{23.05.2007. u 13:06 - pre 206 meseci}

Pozdrav

Ovako, ja necu dati nikakav savjet niti uputsvo jer i meni treba ista pomoc...a da ne bi otvarao istu temu iskoristit cu ovaj prostor.

Naime, definisao sam sub formu u glavnoj formi i povezao ih datumom...
Sta mi je potrebno?

Potrebno mi je da uz pomoc dva combo boxa ("od datuma" i "do datuma") u sub formi, da kazem, sortiram - izlistam, sve podatke u odabranom periodu...

Ako moze pomoc sto prije...

Hvala svima unaprijed

https://kakosepise.info/

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: prikaz od datuma do datuma

^{23.05.2007. u 14:25 - pre 206 meseci}

Za ovakav slucaj se ne koristi forma i subforma. Potrebna je nevezana (unbound) forma sa sledecim kontrolama:

1. text box txtFromDatum
2. text box txtToDatum
3. list box lstMyList, ostvi Row Source prazno
4. dugme cmdOdradiPosao, koje ce da odradi sta treba - da za zadata datume prikaze podatke u lit boxu

Code:

'na -OnClick za dugme imas ovako nesto:
Sub cmdOdradiPosao_Click()
DIM strSQL as string

If IsNull(txtFromDatum) OR isNull(txtToDatum)
MsgBox "Molim vas ukucajte OBA datuma!"
exit sub
End If

'Ako smo dosli ovde, znaci d aimamo oba datuma i mozemo da probamo ovo:

strSQL = " SELECT <sta zelis da pokazes u listi> FROM <Tvoja tabela ili kveri> " _
& " WHERE <tvoje polje koje sdrzi datum> BETWEEN " & SQLDate(txtFromDatum) & " AND " & SQLDate(txtToDatum)

me!lstMyList.RowSource = strSQL
me!lstMyList.requery

Korisno ej da dodas i ERROR handling, za slucaj da su nesto podje naopako (lose ukucani datumi i slicno)

End Sub

Code:

Function SQLDate(varDate As Variant) As String
    'Purpose:    Return a delimited string in the date format used natively by JET SQL.
    'Argument:   A date/time value.
    'Note:       Returns just the date format if the argument has no time component,
    '                or a date/time format if it does.
    'Author:     Allen Browne. [email protected], June 2006.
    If IsDate(varDate) Then
        If DateValue(varDate) = varDate Then
            SQLDate = Format$(varDate, "\#mm\/dd\/yyyy\#")
        Else
            SQLDate = Format$(varDate, "\#mm\/dd\/yyyy hh\:nn\:ss\#")
        End If
    End If
End Function

Na linku http://allenbrowne.com/ser-36.html#Interface imas objasnjenj o SQLdate funkciji.

Odgovor na temu

zikret

Član broj: 124281
Poruke: 42
*.PPPoE-6749.sa.bih.net.ba.

Sajt: https://kakosepise.info

Profil

Re: prikaz od datuma do datuma

^{25.05.2007. u 12:56 - pre 205 meseci}

Zidar hvala na code-u, funkcionise...

Samo to nije ono sto meni treba...

Objasnit cu o cemu se radi:
Radim knjigovodstvene poslove pa sam odlucio da sebi uradim program "KNJIGA ULAZNIH I IZLAZNIH FAKTURA" radi jednostavnijeg i lakseg vodjenja knjiga odnosno unosenja ulaznih i izlaznih faktura. Uradio sam sve do samog printanja, ali mi se pojavio jedan problem...

Kada knjizim za odredjeni mjesec i trebam saciniti (da tako kazem) mjesecni izvjestaj na kraju mjeseca, moram imati sumu Ulaznih faktura, tako isto i Izlaznoh (posebno ih vodim) za tekuci mjesec, te SUMU za tekucu godinu. To sam sve uradio i funkcionise, ali kada se vratim da vrsim korekciju (izmjenu) nekog racuna, recimo u martu, i kada sacinim izvjestaj u sumi za tekucu godinu pojavi mi se promet i od aprila pa i od maja (jer sam unio fakture i od ova dva mjeseca), sto nije dobro jer izvjestaj pravim za mart...

Kako rijesiti moj problem...

Ja sam trenutacno rijesio preko queryja

U queryju sam napravio datumsku kolonu sa formatom 'mm.yyyy' a u ostale kolone sam postavio SUM, tako da mi qry sumira po mjesecu.

U frm sam uradio combo box i subformu koje zaista funkcionisu...pretraga je po mjesecu i godini

a za SUMU tekuće godine: to sam uradio u Reportu npr. txtBox= Sum(IzbnosSaPDV) i to funkcionise ali na prethodno opisan nacin

Mene zanima kako pronaci rjesenje da mi godisnje sumira samo one fakture koje su izdate u prethodnim i biranom mjesecu. Znaci do kraja biranog mjeseca...

Opsirno sam pisao, nadam se da shvatas o cemu se radi i da imas rjesenje za moj problem. Unaprijed ti hvala...

Zikret

https://kakosepise.info/

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: prikaz od datuma do datuma

^{25.05.2007. u 13:47 - pre 205 meseci}

Nazalost nisam knjigovodaj i ne razumem najbolje sta je problem.

Citat:

Mene zanima kako pronaci rjesenje da mi godisnje sumira samo one fakture koje su izdate u prethodnim i biranom mjesecu. Znaci do kraja biranog mjeseca...

Da li ovo znaci, ako radis izvestaj za Maj 2007, onda godisnja suma treba da sadzi samo ono sto je uneseno zakljucno sa 31 Maj 2007?

Kada kazes 'izvestaj', da li mislis na stampani izvestaj na papiru ili opisanu kombinaciju forma/subforma? Ako stampas izvestaj, pokazi mi kod kojim pozivas izvestaj (DoCmd....) pa cemo da vidimo dalje.

Zakaci screen shot tvoje forme i subforme, imamproblem da razumem sta se u stvari desava. Ili zkaci priemr .MDB gde se vis st je uradjeno.

Odgovor na temu

zikret

Član broj: 124281
Poruke: 42
*.PPPoE-2852.sa.bih.net.ba.

Sajt: https://kakosepise.info

Profil

Re: prikaz od datuma do datuma

^{26.05.2007. u 10:54 - pre 205 meseci}

Ovako...

U mjescnom isvjestaju (stampani oblik - report) moram imati, pored faktura i podataka koje fakture povlace sa sobom, "UKUPNO ZA TEKUĆI MJESEC" ,
takoder moram imati "RED" - "UKUPNO ZA TEKUĆU GODINU" koji sadrzi kumulativni iznos svih mjeseci zajedno sa tekucim.

Evo objasbit cu detaljno:

U bazu sam unio sve fakture sa danasnjim datumom (maj-om), morao sam se vratiti u mart i ispraviti odredene fakture (iznos fakture) tako da mi se promijenio i mjesecni i godisnji sumarni prikaz ( "UKUPNO ZA TEKUĆI MJESEC" i "UKUPNO ZA TEKUĆU GODINU").
Eh, sada hocu da isprintam izvjestaj za mart, treba da mi u "UKUPNO ZA TEKUĆU GODINU" sumira sve iznose od januara, februara i marta, nikako april i maj (a koji su uneseni u bazu).

Report otvaram po datumu a Name je "Mjesec" formata 'mm.yyyy'

Code za DoCmd
Private Sub Command7_Click()
DoCmd.OpenReport ReportName:="rprUlazneFakture", _
WhereCondition:="Mjesec='" & Me!Mjesec & "'", _
view:=acPrint
End Sub

a za pregled isto samo umjesto Print - Preview

Potrebno mi je i jedno i drugo!!!!
[quote]Zidar:

Kada kazes 'izvestaj', da li mislis na stampani izvestaj na papiru ili opisanu kombinaciju forma/subforma? Ako stampas izvestaj, pokazi mi kod kojim pozivas izvestaj (DoCmd....) pa cemo da vidimo dalje.

https://kakosepise.info/

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: prikaz od datuma do datuma

^{28.05.2007. u 14:01 - pre 205 meseci}

OK, sad je jasnije. Jedna nacin je da sev sto ti treba izracunas u kveriju koji je dara source za report, pa da prosto poakzes sta imas. Ti je medjutim texi nacin. Laksi nacin je da to uradis u samom reportu, koristcei grupisanje i runningsum prpoertu za odrdjene text boxove. (Ono sto ti wizard daje sa sdum(..) nije dobro, sporo je i tesko se razume pa ostajes na onom sto ti wizard ponudi a cesto to nije dovoljno).

Ovako uradi:
1. u kveriju koji je source za report, treba da izracunas mesec i godinu za svaku fakturu, u dve zasebne kolone
2. na reporu stavis Grouping na nivou godine i na nivou meseca, footer/header da postoje za oba nivoa
Imaces dakle 3 nivoa:
Godina header
Mesec header
Detail section
Mesec footer
Godina footer
3. u detail sekciji naravno pokazujes sta ti vec treba o fakturama
4. Recimo da sabiras kolonu Ulaz iz detail sekcije, ond auradi ovako: stavi jos jedan text box, txtSUM_cumulativ, nevidljiv i male sirine pored txt boxa za Ulaz, data source = Ulaz. U Runningsum property stavi Yes, Over group. Ovo ce da ti u tom nevidljivom polju ispisuje kumulativ, u prvom redu Ulaz1, u drugom Ulaz1+Ulaz2, u trecem Ulaz1+Ulaz2+Ulaz3 i tako dalje. Ostavi ovo polje vidljivo dok testiras. Kad report ispise poslednju fakturu za tekuci mesec, txtSUM_cumulativ ce sadrzati zbir za taj mesec.
5. Sada na Mesec.Footer sekciji ti treba jedan text, txtUlazZaMesec box koji ima DataSource formulu "=txtSUM_cumulativ " Posto ti je u txtSUM_cumulativ vrednost jednaka zbiru za tekuci mesec, to ce isto pisati i u txtUlazZaMesec . txtUlazZaMesec je vidljiva kontrola, a txtSUM_cumulativ ce posle testiranja postati nevidljiva (ili je ostavi vidljivom ako zelis da se vidi tok operacija)

6. Sada pored vidljivog txtUlazZaMesec postavis jos jedan text box, txtUlazZaMesec_cumulativ, dodelis mu row source =txtUlazZaMesec i stavis RunningSum na "over group". Ostavi txtUlazZaMesec_cumulativ vidljiv , da vidis kako se menja od meseca do meseca.
To ti je godisnja suma zaklucno sa tekucim mesecom. Posle prvog meseca sadrzace zbir za prvi mesec, posle dva meseca mesc1+mesec2 i tako dalje.

Evo skica reporta sa kontrolama:
Godina header
Mesec header
Detail section (<txtUlaz = db.Ulaz>; <txtUlaz_Cumulative = db.Ulaz, RunningSm = over group>)
Mesec footer (<txtUlazZaMesec = txtUlaz_Cumulative> ; <txtUlazZaMesec_Cumulative=txtUlazZaMesec , RunningSum = "over group">)
Godina footer

Sad vidim da ti Godina section mozda i ne treba, ali ne smeta.

Nadam se da je pomoglo. Ako ne ide, zkaci primer, pa cemo da podesimo na reportu direkno.

Ako nije jasno, prouci malo RunningSum property i igraj se malo sa vidljivim kontrolama dok ne proradi.

Odgovor na temu

zikret

Član broj: 124281
Poruke: 42
*.PPPoE-54.sa.bih.net.ba.

Sajt: https://kakosepise.info

Profil

Re: prikaz od datuma do datuma

^{30.05.2007. u 09:35 - pre 205 meseci}

Uredu...pokusao sam...i sve funkcionise...ali opet se sve vraca na ono sto sam imao ranije...samo je sada u drugoj formulaciji...

Problem je u tome sto sam na DoCmd (u formi) dao naredbu da mi u reportu prikaze fakture koje su izdate samo u odabranom mjesecu...pa u Runingu dobijem za mjesec i za godinu istu cifru, jer runing sumira samo ono sto je prikazano u reportu (a meni je potrebno da printam-štampam samo birani mjesec, jer nepotrebno je da svaki mjesec printam cijelu godinu, sve mjesece) tako da on ne sumira i ostale (prethodne) mjesece.

Kada bih otvarao sve mjesece onda bi funkcionisalo ovo sto si mi savjetovao, ali opet kazem, ja po zakonu moram zasebno prikazati svaki mjesecni prikaz zasebno, sa podkolonom koja u sebi sadrzi kumulativno godisnji promet, znaci ono sto si mi i pokazao mjesec1+mjesec2+mjesec3= kumulativno (godisnje) sa 3 mjesecom..., ali je problem kada otvorim mjesec3 Runing ne racuna mjesec1 i mjesec2 jer nije u otvorenom reportu...nadam se da razumijes o cemu razgovaram...

Pokusat cu nesto izbrisati da mi baza bude laksa, pa cu je prikaciti da pogledas...

u svakom slucaju velika ti hvala...

https://kakosepise.info/

Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
*.bilokalnik.hr.

+8 Profil

Re: prikaz od datuma do datuma

^{30.05.2007. u 13:51 - pre 205 meseci}

Najlakše ti je da napraviš query, odeš u wizard,
povučeš tablice koje trebaš ,
i dodaješ uvjete koje trebaš

znači ako trebaš od datuma
ispod mu staviš za uvijet

datum_fakture
>=forms!glavna!pocetnidatum

datum_fakture
<=forms!glavna!pocetnidatum

itd itd, prednost je što vidiš rezultate na ekranu , pa lako podešavaš sql

i onda taj queri staviš u report ,

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: prikaz od datuma do datuma

^{30.05.2007. u 14:13 - pre 205 meseci}

Dobro, nismo se razumeli. Trtko ti je dao dobru ideju. Medjutim, pre nego sto pokusas da pravis kveri, mozda nije sve izgubljeno.

Ako si vec prosao kroz muku sa running sum, nije jos sve izgubljeno. Mozes da malo modifikujs DoCmd, pa uesto uslova tipa "Godina = yyyy AND Mesc = mmmm" stavis uslov "Godina = yyyy AND mesec <= mmmm" . To ce ti dati sve mesece zakljucno sa onim koji zelis da vidis i sve running sum bice tacne. Onda odstampas samo poslednju stranicu ili poslednjih N stranica. Ovo naravno ako svaki mesec pocinje na novoj starnici, sto je vrlo verovatno.

Ako ne moze quick and dirty, onda ono sto ti Trtko kaze - napravi kveri pa citaj odatle.
Ako napravis kveri koji sumira po mesecima i ima i kumulativ kolonu, onda sa Dlookup mozes iz tog kverija da procitas kumulativ za bilo koji meces u godini i da ga prikazes bilo na formi bilo na reportu.

Nesto ovako da dobijes sumu po mesecima, trivijalan zadatak:

qrySUmaPoMesecima:
SELECT Year(DatumFakture) AS Godina, Month(DatuFakture) AS Mesec, SUM(Ulaz) AS MesecnaSuma
FROM Fakture
GROUP BY Year(DatumFaktur), Month(DatuFakture)

Da dobijes kumulative po mesecima, ides ovako, nije vise trivijalno jer zahteva correlated subquery:

qryKumulativPoMessecima:
SELECT
A.Godina
, A.Mesec
, A.MesecnaSuma
, (SELECT SUM(MesecnaSuma)
FROM qrySUmaPoMesecima AS B
WHERE B.Year=A.Year
AND B.Mesec<=A.Mesec) AS KumulativnaSumaNaKrajuOvogMeseca
FROM qrySUmaPoMesecima AS A

Sada mozes za bilo koju kombinaciju (Godina, Mesec) da kazes ovako:

= DLOOKUP
(
'KumulativnaSumaNaKrajuOvogMeseca'
,'qryKumulativPoMessecima'
,'Godina = ' & Year(forms!glavna!pocetnidatum)
& ' AND Mesec = ' & Year(forms!glavna!
pocetnidatum)
)

Ovu formulu stavis na report ili na formu i podesis deo gde se definise kriterijum za Dlookup - Year(forms!glavna!pocetnidatum)

A mozda da proveris da li ti uopset i treba sumarni zbir na kraju meseca. Taj zbir je imao smisla u pairnom knjigovodstvu. Svrha je bila da se lakse dobije zbir na kraju godine. Na kraju svakog mesca saberes sve fakture za taj meses. U tom momentu to dodas na kumulativ. Kad odradis 12-ti mesec dobio si automatski i zbir za celu godinu. Ima smisla kad se radi rucno. Kad se radi kompjuterom, nema potrebe za tim. Proveri da li bas absolutno mora taj podatak da se napise na kraju meseca u izvestaj. Imali smo slocaj na forumu gde smo isto ovako nadebelo objasnjavali kako se ovo radi, trebalo je na svakoj starnici imati medjuzbirove, to je jos komplikovanije nego zbir na kraju meseca. Pa kad se covek raspitao malo, ispalo je da mu to ni ne treba u stvari.

Odgovor na temu

zikret

Član broj: 124281
Poruke: 42
*.PPPoE-5721.sa.bih.net.ba.

Sajt: https://kakosepise.info

Profil

Re: prikaz od datuma do datuma

^{31.05.2007. u 10:14 - pre 205 meseci}

OK pokusat cu nesto....

Ipak hvala vam na pomoci.

Cini mi se da po Zakonu o PDV BiH stoji da u svakom mjesecnom prikazu mora biti i kumulativni iznos za tekucu godinu...valjda da se moze u odredenom mjesecu napraviti uvid prometa sa posljednjim mjesecom...

Provjerit cu opet pa vam javim...

Nego meni opet treba pomoc u vezi neceg drugog a to je u vez teme na linku http://www.elitesecurity.org/t250355-0#1592719 pa ako mozete tu pomoc bio bih vam zahvalan.

https://kakosepise.info/

Odgovor na temu