Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 4 odgovora
  • 3.247 pregleda

Najnovija ↓

Report -broj etiketa na osnovu kolicine 27.12.2008. u 12:31 · pre 217 meseci #1
Pozdrav
Potrebna mi je mala pomoć.

Napravio sam report za samoljepljive etikete 052029, znaci 40 kom na stranici.
Stampam normalno za svaki artikal po jednu etiketu, tj. slozi mi na prvu stranicu artikle od 1-40, na drugu 41-80 i tako redom dok ne odstampa sve.

Ima li neko ideju kako da odstampam tacan broj etiketa, npr. ako je nekog artikla na stanju 6 kom. da mi odstampa
6 takvih etiketa i tako redom da slaze svaki artikal, a da prati kolicinu na stanju.

Ili jos bolje kad bi napravio formu i dodao polje yes/no pa da funkcijom IIf stampam samo cekirane stavke.

Unaprijed hvala.

Re: Report -broj etiketa na osnovu kolicine 27.12.2008. u 17:32 · pre 217 meseci
izmenjeno 1 put, poslednji put domaci_a_nas 28.12.2008. u 01:18
  1. domaci_a_nas28.12.2008. u 01:18zapis iz teksta poruke
#2
Možda bi bilo dobro da napraviš podaci IzabraniArtikli koja bi čuvala ID Artikla za koji želiš da štampaš etiketu. Onda bi išlo nešto ovako... Možda nije najsrećnije rešenje, ali mislim da će funkcionisati:
Code:
Public Sub StampajEtikete(KojiRacun As Long)
Dim RS As Recordset
Dim I As Integer
Dim J As Integer
Dim StrSQL As String
CurrentDb.Execute "Delete IzabraniArtikli.* From IzabraniArtikli"
StrSQL = "Select StavkeRacuna.* From StavkeRacuna Where RacunID = " & KojiRacun & " Order By StavkeRacuna.ID"
Set RS = CurrentDb.OpenRecordset(StrSQL)
If RS.RecordCount = 0 Then GoTo CloseRS
RS.MoveLast
RS.MoveFirst
For I = 1 To RS.Recordcount
For J = 1 To RS!Kolicina
CurrentDb.Execute "Insert Into IzabraniArtikli (ArtikliID) Values (" & RS!ArtikalID & ")"
Next J
RS.MoveNext
Next I
CloseRS:
RS.Close
End Sub
Eto nešto iz glave, valjda će ti dati ideju :)
Potpis
Ozbiljan i odgovoran mladić
Re: Report -broj etiketa na osnovu kolicine 29.12.2008. u 09:15 · pre 217 meseci #3
Hvala na odgovoru. Probacu i sa ovim, ali sam vec rijesio sa dodatnom tabelom, a upitom pravim broj recorda kolika je kolicina.
U svakom slucaju hvala.
Re: Report -broj etiketa na osnovu kolicine 02.01.2009. u 14:34 · pre 217 meseci #4
Napravi pomocnu tabelu koja ce se zvati Brojevi. Neka ima tacno jednu kolonu, tipa long integer i koja ce se zvati Broj. Onda u tabelu Brojevi uneses brojeve od 1 do N. N je proizvoljno veliki broj, recimo 10,000 ili 1000,0000 ili milion. Treba da bude veci broj od najvece kolicine koju ocekujes da vidis na lageru. Tabela se moze popuniti na mnogo nacina, cut/paste iz Excela je jedan od njih.

Pretpostavimo dalje da imas neki kveri koji izracunava kolicinu artikala na lageru, neka se zove qryInventar i ima bar dve kolone, Artikl i Kolicina. Onda mozes da napises ovakav kveri:

SELECT qryInventar.Artikl, qryInventar.Kolicina, Brojevi.Broj
FROM qryInventar, Brojevi
WHERE Brojevi.Broj <= qryInventar.Kolicina

SQL izraz ne moras da kucas, moze se koristiti i Query Design prozor. Vazno je da uocis da se ne koristi JOIN. Znaci, navuces u kveri prozor tabelu Brojevi i tvoj qryInventar i otkucas WHERE uslov. Ovaj kveri ce iz tabele Brojevi prikazati za svaki artikl onoliko redova (brojeva) koliko qryInventar pokazuje u koloni Kolicina. Koliko redova, toliko etiketa :-)

Ponekad nije dobro da se mnogo dobro programira. Nikola veoma dobro programira i njemu je lako da napise onaj kod sa petljama i rekordsetima. Medjutim, postoje i laksa i efikasnija resenja ako se setimo da je "the best code is no code at all"
Re: Report -broj etiketa na osnovu kolicine 05.01.2009. u 21:58 · pre 216 meseci #5
Hvala Zidar...
Tako sam i uradio s tim da sam dodao i polje yes/no u tabelu "Sifarnik".Report vucem iz Query-a i to samo one rekorde koji ispunjavaju uslov "Yes" na formi.Imam JOIN u query-u, ali istina nije izmedju tabele "Brojevi" i "Sifarnik".
U svakom slucaju hvala svima na trudu.
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme