pmiroslav 15.10.2013 19:19
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Ne znam zašto? Kod mene radi, evo primjer sa izvještajem koji je napravio Wizard.
Nisam napomenuo da u Design View-u query-a odeš na Query > Parameters... pa pobriši
[Unesi godinu]
[Unesi jedinicu]
[Unesi smenu]
Prilozi:
PROBA_MP.rar (Velicina datoteke:17.50 KB)

MOZEBITIPONOVO 16.10.2013 07:09
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Izgleda da se nismo razumeli. Ja bih hteo da mi to radi sa kriterijumima (godina, jedinica, smena), ako je to uopÅ¡te moguće. Jer ako napravim izveÅ¡taj, sa trista zaposlenih, to je onda malo nepregledno.

zxz 16.10.2013 09:34
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Trebalo bi biti da nije veliko ali se zakomplikovalo.
Zato sam trazio da postavis primjer.
Nije problem u Crostab Query samo nego je pronlem u tabelama.
Po meni tabele nisu dovoljno dobro napravljene niti im se posvetilo dovoljno paznje pa se to poslije osveti.
Da pretpostavimo sta zelis napraviti.
Imas neku firmu koja vrsi neke servise i opravke preko svojih radnika koji su opet rasporedjeni u grupe i po smjenama.
Servisi imaju i opravke nemaju tacno vrijeme trajanja nego treba upisivati vrijeme i datum pocetka i zavrsetka.
Eto to ja visim tako.
Ako sam negdje pogrijesio ti me ispravi.

MOZEBITIPONOVO 16.10.2013 10:48
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Da pokuÅ¡am objasniti. Ovo je samo deo tabela iz baze a tiče se konkretnog problema. Imamo intervencije, tabela INTERVENCIJADETALJI, na koje se upućuju radnici, tabela RADNICI. Vreme od do provedeno na intervenciji upisuje se u tabeli RADNICINAINTERVENCIJAMA. Tabela ORGANIZACIONA mi treba zbog kriterijuma organizacione jedinice, a tabela VRSTADOGAĐAJA zbog sumiranja vremena provedenog na određenoj vrsti intervencije. I to bi bilo to. pozdrav!

MOZEBITIPONOVO 16.10.2013 10:55
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Da pokuÅ¡am objasniti. Ovo je samo deo tabela iz baze a tiče se konkretnog problema. Imamo intervencije, tabela INTERVENCIJADETALJI, na koje se upućuju radnici, tabela RADNICI. Vreme od do provedeno na intervenciji upisuje se u tabeli RADNICINAINTERVENCIJAMA. Tabela ORGANIZACIONA mi treba zbog kriterijuma organizacione jedinice, a tabela VRSTADOGAĐAJA zbog sumiranja vremena provedenog na određenoj vrsti intervencije. I to bi bilo to. pozdrav!
↑
Prilozi:
2013-10-16_103355.zip (Velicina datoteke:85.27 KB)

zxz 17.10.2013 23:03
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Napravi praznu formu.
U recordsource stavi tvoj crostab query.
Na on load stavi ovaj kod.
Ja sam stavio da se izvjestaj zove report1.
Ako nije ispravi u kodu
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Form_Load()
  2. DoCmd.OpenReport "Report1", acViewPreview
  3. End Sub

Napravi prazan izvjestaj.
Na on page izvjestaja stavi ovaj kod.
Na kraju procedure imas red koda koji zatvara formu kojoj sam ja dao ime form1.
Ako das neko drugo ime ispravi.
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Report_Page()
  2. Dim Rs As Recordset
  3. Dim DuzinaPapira As Integer
  4. Dim Sredina As Integer
  5. Dim DuzTeksta As Integer
  6. Dim StartY As Integer
  7. Dim X As Integer
  8. Dim Y As Integer
  9. Dim PozX() As Integer
  10. Dim Tekst As String * 10
  11. Dim Tekst1 As String * 20
  12. Dim BrojKolona As Integer
  13. Dim I As Integer
  14.  
  15.  
  16.  
  17. DuzinaPapira = Me.Width
  18. Me.ForeColor = 255
  19. Me.FontSize = 18
  20. Me.FontBold = True
  21. DuzTeksta = Me.TextWidth("NEKI NASLOV")
  22. Sredina = (DuzinaPapira - DuzTeksta) / 2
  23. Me.CurrentX = Sredina
  24. Print "NEKI NASLOV"
  25. X = 500
  26. Me.ForeColor = 0
  27. Me.FontSize = 10
  28. Me.CurrentX = X
  29. Y = Me.CurrentY
  30. Set Rs = Forms![Form1].RecordsetClone
  31. BrojKolona = Rs.Fields.Count - 1
  32. ReDim PozX(BrojKolona)
  33.     For I = 0 To BrojKolona
  34.     Me.CurrentY = Y
  35.     PozX(I) = Me.CurrentX
  36.         If Tekst = "Ime" Or Tekst = "Prezime" Then
  37.         Tekst1 = Rs.Fields(I).Name
  38.         Print Tekst1 & "   "
  39.         Else
  40.         Tekst = Rs.Fields(I).Name
  41.         Print Tekst & "   "
  42.         End If
  43.     Next I
  44.  
  45. Me.FontBold = False
  46. Me.CurrentX = X
  47. Y = Me.CurrentY
  48. Do While Not Rs.EOF
  49.     For I = 0 To BrojKolona
  50.     Me.CurrentX = PozX(I)
  51.     Me.CurrentY = Y
  52.         If Rs.Fields(I).Name = "Ime" Or Rs.Fields(I).Name = "Prezime" Then
  53.         Tekst1 = LTrim(Format$(Rs.Fields(I)))
  54.         Print Tekst1
  55.         Else
  56.         Tekst = Format$(Rs.Fields(I))
  57.         Print Tekst
  58.         End If
  59.     Next I
  60. Me.CurrentX = X
  61. Y = Me.CurrentY + 5
  62. Rs.MoveNext
  63. Loop
  64. DoCmd.Close acForm, "Form1"
  65. End Sub

Struktura baze je nikakva pa bi najbolje bilo napraviti sve kodom jer ovaj tvoj uslov i crostab je megalomansko rjesenje.

MOZEBITIPONOVO 24.10.2013 19:15
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Zdravo svima! Rešio sam na osnovu Getsbijevog predloga rešenja, da budem iskren imam još takvih rešenja sa privremenim tabelama. Hvala vima na trudu. E sad, ono što me je zabrinulo jeste komentar od zxz da baza nije dobro organizovana - nisu dobro povezane tabele u ovom primeru. Molio bih, ako neko ima volje napravi novi model u ovom primeru. Još jednom pozdrav za sve!

zxz 24.10.2013 21:10
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Neznam dali si i uspio implementit+rai ovaj moj kod ali to je ne bitno.
Imam ja sad nekih pitanja.
BRRADMES-BROJ SISTEMATIZACIJE

Ako mozes ovo polje malo pojasniti i kakav je odnos njega i organizacionih jedinica ako ga ima

MOZEBITIPONOVO 26.10.2013 12:00
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Polje BRRADMES je u stvari BROJ SISTEMATIZACIJE., koji određuje: koje je to radno mesto (vozač, vatrogasac, mehaničar itd), koliko izvrÅ¡ilaca ima na tom radnom mestu i koja je to organizaciona jedinica (Novi Sad, Vrbas, Bečej itd).

zxz 26.10.2013 16:15
Predmet:Re: Izveštaj na osnovu crosstab upita sa parametrima!

Evo.
Ovo ja napravljeno tako da na jednu intervenciju se moze poslati samo jedan radnik.
Ako moze vise onda se treba prepraviti.
Radnik moze izvrsiti vise radnji kada ode na jenu intervenciju.
Prilozi:
Intervencijezxz.zip (Velicina datoteke:34.09 KB)