Centar za edukaciju-BiH



#11 30.03.2011 14:40
Bosanec Van mreze
Clan
Registrovan od:02.02.2009
Postovi:155


Predmet:Re: Provjera duplog unosa
evo moje rješenje ako sam dobro skonto

pozdrav

Prilozi:
Informacije o tipu datoteke za:rar  ProvjeraUnosa.rar
Preuzimanja:175
Velicina datoteke:44.59 KB

↑  ↓

#12 30.03.2011 14:41
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Provjera duplog unosa
Želim da za različiti status može biti isti broj dokumenta.
Na primjer imam tzv. "MeđuskladiÅ¡nu otpremnicu", to je dokument sa kojim artikl sa jednog skladiÅ¡ta skidam i premjeÅ¡tam ga u drugo skladiÅ¡te.
Pozdrav
↑  ↓

#13 30.03.2011 15:12
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Provjera duplog unosa
Otvori tabelu transakcije na dizajn.
Klikni na ikonicu index (Izgled munje).
U polje
Index name stavi napr. StatusTrans i Unique stavi na yes.
U field name dodaj dva zapisa i to:
BrDokumenta
StatusTR

A na on exit polja brdokumenta onda ide ovako:
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub BrDokumenta_Exit(Cancel As Integer)
  2. Dim Podatak As String
  3.  
  4. Podatak = Me.BrDokumenta
  5.  
  6. If NadjiVrijednost("tblTransakcije", "BrDokumenta", Podatak) = True Then
  7.    If NadjiVrijednost("tblTransakcije", "BrDokumenta", Me.Status) = True Then
  8.      MsgBox "broj dokumenta ve postoji"
  9.      Cancel = True
  10.    End If
  11. End If
  12. End Sub

Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#14 31.03.2011 12:29
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Provjera duplog unosa
Hvala na pomoći, oba prijedloga su dobr.

Sada imam novi problem.
U bazi je tablica tblProdaja i tblPtodajaStavke, ove tablice popunjava referent prodaje kada pravi otpremnnicu.
Problem je kako da skladiÅ¡tar iz ovih tablica prebaci podatke u tablicu tblUlazIzlaz, a da se to ne mora raditi ručno

Prilozi:
Informacije o tipu datoteke za:rar  Knjizenje.rar
Preuzimanja:413
Velicina datoteke:42.74 KB


Pozdrav
↑  ↓

#15 31.03.2011 20:00
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Provjera duplog unosa
Evo sad sam htio to odraditi ali bi mi trebalo mnogo vremena da desifrujem polja.
Trebao bi malo pojasniti da ne trazim sam.
Koji je kljucni podatak na osnovu kojega kupim podatke iz tabele tblProdajaSavke i koji podqatak smijestam u koje polje u tabelu tblUlazIzlaz.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#16 01.04.2011 07:21
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Provjera duplog unosa
Malo sam više razmišljao i mislim da bi trebalo zapravo nekako ovako:
napraviti prvo dva Querya
q_Prodaja:

PreuzmiIzvorni kôd (vbnet):
  1. SELECT tblProdaja.OrderID, tblProdaja.PartnerID, tblProdaja.Skladiste, tblProdajaStavke.Sifra, tblProdajaStavke.Kolicina
  2. FROM tblProdaja INNER JOIN tblProdajaStavke ON tblProdaja.OrderID = tblProdajaStavke.OrderID;

i Q_Izlaz:
PreuzmiIzvorni kôd (Visual Basic):
  1. SELECT tblTransakcije.IDTransakcije, tblTransakcije.Datum, tblTransakcije.IDdokumenta, tblTransakcije.BrDokumenta, tblTransakcije.PartnerID, tblTransakcije.RadniNalog, tblTransakcije.OperID, tblTransakcije.StatusTR, tblUlazIzlaz.Sifra, tblUlazIzlaz.Skl, tblUlazIzlaz.Izlaz, tblUlazIzlaz.Status
  2. FROM tblTransakcije INNER JOIN tblUlazIzlaz ON tblTransakcije.IDTransakcije = tblUlazIzlaz.IDtransakcije;

I zati puniti Q_Izlaz_

IDTransakcije - Autonumber
Datum - Now()
IDdokumenta = DefaultValuje = "Otpremnica"
BrDokumenta - Q_Prodaja.OrderID
PartnerID - Q_prodaja.Partner.ID
RadniNalog - "n/a"
OperID - logiraniOperator
StatusTR - 2 (izlaz)
Sifra - Q_Prodaja.Sifra
Skl - Q_Prodaja.Skladiste
Izlaz - Q_Prodaja.Kolicina
Status - 1

Prilozi:
Informacije o tipu datoteke za:rar  Knjizenje_2.rar
Preuzimanja:259
Velicina datoteke:54.39 KB


Pozdrav
↑  ↓

#17 01.04.2011 19:10
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Provjera duplog unosa
PreuzmiIzvorni kôd (Visual Basic):
  1. Function UnosStavki(TransakcijaID As Integer, Order As Integer)
  2. Dim Db As Database
  3. Dim Rs1 As Recordset
  4. Dim Rs2 As Recordset
  5. Dim SQL As String
  6.  
  7.  
  8. If TransakcijaID = 0 Or Order = 0 Then GoTo Kraj
  9. Set Db = CurrentDb()
  10. SQL = "SELECT * FROM tblProdajaStavke WHERE OrderID=" & Order
  11. Set Rs1 = Db.OpenRecordset(SQL)
  12. Set Rs2 = Db.OpenRecordset("TblUlazIzlaz")
  13.  
  14. Do While Not Rs1.EOF
  15. Rs2.AddNew
  16. Rs2!IDTransakcije = TransakcijaID
  17. Rs2!Sifra = Rs1!Sifra
  18. Rs2!Skl = DLookup("[skladiste]", "TblProdaja", "[orderID] =" & Order)
  19. Rs2!Status = -1
  20. Rs2!Izlaz = Rs1!Kolicina
  21. Rs2.Update
  22. Rs1.MoveNext
  23. Loop
  24. Rs1.Close
  25. Rs2.Close
  26. Set Db = Nothing
  27. Izlaz:
  28. Exit Function
  29. Kraj:
  30. MsgBox "Niste popunili sve podatke"
  31. End Function

Ovu proceduru kopirja u neki modul.
Na formi izlaz napravi komandni taster i na njega ovaj kod.
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Uvoz_Click()
  2. Me.frmIzlazSub.SetFocus
  3. UnosStavki Me.IDTransakcije, Me.BrDokumenta
  4. Me.frmIzlazSub.Requery
  5. End Sub

Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#18 03.04.2011 17:56
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Provjera duplog unosa
Evo muči me ovo već dva dana i nikako da nađem rijeÅ¡enje.
napravio sam formu frmKnjizenje čiji je recordsource Q_Prodaja i sada bi iz nje htio napuniti Q_Izlaz koji je kombinacija tablica tblProdaja i tblProdajastavke.

Malo sam prepravio tvoj Kod međutim kada ga pokrenem javlja mi greÅ¡ku Field cannot be updated.
Neznam u ćemu je problem
Hvala unaprijed.

Prilozi:
Informacije o tipu datoteke za:rar  Knjizenje_3.rar
Preuzimanja:239
Velicina datoteke:33.58 KB


Pozdrav
↑  ↓

#19 03.04.2011 18:32
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,612


Predmet:Re: Provjera duplog unosa
U tabeli tblProdaja stavke u polju sifra nemas lukap tabele artikala pa mozes upisati artikal kojeg i nema.
Dok u tabeli tblUlazIzlaz to imas.
To je greska koju sad pokazuje e sad dali ima jos ti vidi pa javi.
Prvo ovo popravi.
Trebao si odma pitati.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#20 03.04.2011 18:42
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: Provjera duplog unosa
Evo ispravio sam i opet isto

Prilozi:
Informacije o tipu datoteke za:rar  Knjizenje_31.rar
Preuzimanja:225
Velicina datoteke:36.17 KB


Pozdrav
Ovaj post je ureden 1 puta. Posljednja izmjena 03.04.2011 18:43 od strane pmiroslav. ↑  ↓

Stranice (11):1,2,3,4 ... 10,11


Sva vremena su GMT +02:00. Trenutno vrijeme: 8: 59 am.