Centar za edukaciju-BiH



#21 07.12.2012 17:35
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Reden broj vo Queri
probav i vaka i so ova ne uspeav
PreuzmiIzvorni kôd (Visual Basic):
  1. Function RedenBroj(Baraj As String) As Integer
  2. On Error Resume Next
  3. Dim db As dao.Database, rs As dao.Recordset
  4.  
  5. Set db = CurrentDb
  6. Set rs = db.OpenRecordset("tblET_Promena_Cena_Kasa_Rb", dbOpenDynaset, dbReadOnly)
  7.  
  8. With rs
  9.  
  10. .FindFirst ("[Data] = " & CStr(DLookup("[Data]", "tblET_Promena_Cena_Kasa_Rb", "[Data] = " & "' & Baraj &'")))
  11.   RedenBroj = .AbsolutePosition + 1
  12.  
  13. End With
  14.  
  15. rs.Close
  16.   Set rs = Nothing
  17.   Set db = Nothing
  18.  
  19. End Function
↑  ↓

#22 07.12.2012 20:05
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,610


Predmet:Re: Reden broj vo Queri
Tesko mogu da te razumijem sta zelis da izvedes jer je poprilicno komplikovano i mislim da moze prostije.
Koliko sam razumio ti hoces redne projeve po datumima.
Opet mozes iskoristiti onaj moj Query samo imjesto polja id_Smetka uzmes datum.
Ali po mome netreba ti nikako jer pravis izvjestaj od toga a u izvjestaju mozes grupirati po datumu i napraviti redni broj.

dali sam ta dobro razumio.
Nisam ja pratio temu od pocetka pa neko ko jeste mozda da mi jos pojasni.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#23 07.12.2012 20:30
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Reden broj vo Queri
eve go prepraviv tvoeto query sega da go testiram malku da vidam sto ke bide
PreuzmiIzvorni kôd (Visual Basic):
  1. SELECT 1+(SELECT Count(Data)  FROM qryET_Promena_Cena_Kasa_Sum AS R WHERE qryET_Promena_Cena_Kasa_Sum.Data>R.Data ) AS RedniB, qryET_Promena_Cena_Kasa_Sum.Data, qryET_Promena_Cena_Kasa_Sum.VkSoDDV
  2. FROM tblSmetki RIGHT JOIN qryET_Promena_Cena_Kasa_Sum ON tblSmetki.Data = qryET_Promena_Cena_Kasa_Sum.Data;
↑  ↓

#24 07.12.2012 22:20
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Reden broj vo Queri
ova vaka sega zasega dobro funkcionira no nesto ne mi e jasno ovde
imam uste edno slicno queri na ova prethodnovo e sega :
PreuzmiIzvorni kôd (Visual Basic):
  1. SELECT 1+(SELECT Count(Data)  FROM qryET_Promena_Cena_Izlez_Sum AS R WHERE qryET_Promena_Cena_Izlez_Sum.Data>R.Data ) AS Broj_Dokument, qryET_Promena_Cena_Izlez_Sum.Data, qryET_Promena_Cena_Izlez_Sum.VkSoDDV
  2. FROM qryET_Promena_Cena_Izlez_Sum LEFT JOIN tblDati ON qryET_Promena_Cena_Izlez_Sum.Data = tblDati.DataPocetok;
za da funkcioniraat kako sto sakam jas ovie querija treba da imaat
1to query
[color=#FF0033]RIGHT JOIN qryET_Promena_Cena_Kasa_Sum ON tblSmetki.Data = qryET_Promena_Cena_Kasa_Sum.Data[/color];
2to query
[color=#FF0033]LEFT JOIN tblDati ON qryET_Promena_Cena_Izlez_Sum.Data = tblDati.DataPocetok;[/color]
neznam koja e ulogata i dali ova moze da se odstrani da ne se vo relacija so drugi tabeli
Ovaj post je ureden 1 puta. Posljednja izmjena 07.12.2012 22:23 od strane Gjoreski. ↑  ↓

#25 08.12.2012 23:30
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: Reden broj vo Queri
Ovo funkcionise ali veoma sporo.
Ako ti je redni broj potreban samo za izvestaj jednostavnije ti je da na izvestaju postavis textbox.
U control source postavi =1
i postavi Running sum na over all (ili over group, kako ti vec treba)

Prilozi:
Informacije o tipu datoteke za:zip  Access Application Dex.zip
Preuzimanja:303
Velicina datoteke:1.39 MB

↑  ↓

#26 14.11.2016 16:27
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Reden broj vo Queri
Povtorno jas so moive redni broevi.
Sega pak zapnav na isto mesto.
Imam union queri koe sobira podatoci od poveke querija e sega mi treba da napravam novo queru koe ke cita podatoci od unuon queryto i ke stavi reden broj vo novoto query.
PreuzmiIzvorni kôd (Visual Basic):
  1. SELECT Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
  2. FROM  qryET_PLT
  3. UNION SELECT
  4.              Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
  5. FROM qryET_DFI
  6. UNION SELECT
  7.              Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,Vkupno
  8. FROM qryET_Fakturi
  9. UNION SELECT
  10.              Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
  11. FROM qryET_Promena_Cena
  12. UNION SELECT
  13.              Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
  14. FROM qryET_Promena_Cena_Izlez_Prikaz
  15. UNION SELECT
  16.              Data,Broj_Dokument, Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
  17. FROM qryET_Promena_Cena_Kasa_Prikaz;

novoto query ET_Prikaz treba da bide
RB,Data,Broj_Dokument,VkNabSoDDV,VkSoDDV,DnFisIz
↑  ↓

#27 14.11.2016 18:37
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625



#28 14.11.2016 21:19
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Reden broj vo Queri
Fala @Dexxxl no ovi primeri ne rade kod mene.
Problem je u to sto koristim podatke od vise tabela koi pre spajajne u UNI query obrade se na osnovu neki kriteium.
Problem e i to sto nema nikakav ID a podatke Data,Broj_Dokumen i Dokument mogu sadrzati jedna vrednost vise puta.
Da bi bilo ovo SQLServer lako bi resio ali kod accesa je malo teze.

Neznam malo razmisljam oko pravlejne neka funkcija koja bi prikupila sve podatke iz ovih tabela i bi stavio u neka temp tabala ,podredio bi podatke kako meni trebaju i prbacio u druga tabela tako podredeni i sa redan broj . Izvestaj bi pravio na osnovu ova tabela.

Ako bi nasao neko resejne da resim ovo ovako kako sta je da ne mejnem puno stvari bi mi zastedio vreme i posla.
↑  ↓

#29 14.11.2016 22:24
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,610


Predmet:Re: Reden broj vo Queri
Ja to radim tako sto napravim temp.mdb u njoj kodom kreiram potrebnu tabelu te prebacim podatke napravim link (link i nemoras kodom praviti) i onda pravim izvjestaj na osnovu ovih podataka.
Mogu ti reci da radi veoma brzo.
Mnogo brze od union Query.
Imam negdje i primjer toga pa ako treba mogu nakaciti.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (3):1,2,3


Sva vremena su GMT +01:00. Trenutno vrijeme: 3: 53 am.