iCentar » Racunari i oprema » Programirannje i baze podataka » Access

zxz	07.03.2012 20:28
Predmet:Stanje robe rjesenje U rowsource combo8 upisi ovaj SQL. PreuzmiIzvorni kôd (SQL): SELECT stanje.NSN, Robastanje(Forms!frm_unos!Broj_doc,Forms!frm_unos!NSN,Forms!frm_unos!Kolicina,[ukupno],Forms!frm_unos!VrstDoc) AS PStanje, SUM(stanje.Stanje) AS Ukupno FROM stanje WHERE (((stanje.NSN)=[Forms]![frm_unos]![NSN])) GROUP BY stanje.NSN; Ovu proceduru stavi u neki modul. PreuzmiIzvorni kôd (Visual Basic): Function RobaStanje(DocBr As String, NSN As String, Kol, Stanje As Single, SifraD As Integer) Dim DB As Database Dim Rs As Recordset Dim SQL As String Dim X As Single If SifraD = 1 Then X = 1 ElseIf SifraD = 2 Then X = -1 Else X = 0 End If SQL = "SELECT Sifradoc FROM tblStavke WHERE Broj_Doc='" & DocBr & "' AND NSN='" & NSN & "'" Set DB = CurrentDb Set Rs = DB.OpenRecordset(SQL) If Rs.RecordCount = 0 Then If Format$(Kol) = "" Then RobaStanje = Stanje Else RobaStanje = Stanje + (Val(Kol) * X) End If Else RobaStanje = Stanje End If Kraj: End Function

zxz

07.03.2012 20:28

Predmet:Stanje robe rjesenje

U rowsource combo8 upisi ovaj SQL.

PreuzmiIzvorni kôd (SQL):

SELECT stanje.NSN, Robastanje(Forms!frm_unos!Broj_doc,Forms!frm_unos!NSN,Forms!frm_unos!Kolicina,[ukupno],Forms!frm_unos!VrstDoc) AS PStanje, SUM(stanje.Stanje) AS Ukupno
FROM stanje
WHERE (((stanje.NSN)=[Forms]![frm_unos]![NSN]))
GROUP BY stanje.NSN;

Ovu proceduru stavi u neki modul.

PreuzmiIzvorni kôd (Visual Basic):

Function RobaStanje(DocBr As String, NSN As String, Kol, Stanje As Single, SifraD As Integer)
Dim DB As Database
Dim Rs As Recordset
Dim SQL As String
Dim X As Single
If SifraD = 1 Then
X = 1
ElseIf SifraD = 2 Then
X = -1
Else
X = 0
End If
SQL = "SELECT Sifradoc FROM tblStavke WHERE Broj_Doc='" & DocBr & "' AND NSN='" & NSN & "'"
Set DB = CurrentDb
Set Rs = DB.OpenRecordset(SQL)
If Rs.RecordCount = 0 Then
If Format$(Kol) = "" Then
RobaStanje = Stanje
Else
RobaStanje = Stanje + (Val(Kol) * X)
End If
Else
RobaStanje = Stanje
End If
Kraj:
End Function

Dado	08.03.2012 09:44
Predmet:Re: Pregled stanja Ne znam jeli ovo kod tebe radi ali kod mene na ovom mom primjeru nece. Namam pojma zbog cega. Ako radi kod tebe mozes li mi zakaciti primjer. Hvala.

Dado

08.03.2012 09:44

Predmet:Re: Pregled stanja

Ne znam jeli ovo kod tebe radi ali kod mene na ovom mom primjeru nece. Namam pojma zbog cega. Ako radi kod tebe mozes li mi zakaciti primjer. Hvala.

zxz	08.03.2012 11:22
Predmet:Re: Pregled stanja Evo moj primjer.
Prilozi: PrimjerZxz.zip (Velicina datoteke: Bajt)

zxz

08.03.2012 11:22

Predmet:Re: Pregled stanja

Evo moj primjer.

Prilozi:
PrimjerZxz.zip (Velicina datoteke: Bajt)

pmiroslav	08.03.2012 12:22
Predmet:Re: Pregled stanja Ja bih to moÅ¾da napravio ovako. Malo jednostavnije, bez koda.
Prilozi: primjerMP.rar (Velicina datoteke:51.28 KB)

pmiroslav

08.03.2012 12:22

Predmet:Re: Pregled stanja

Ja bih to moÅ¾da napravio ovako. Malo jednostavnije, bez koda.

Prilozi:
primjerMP.rar (Velicina datoteke:51.28 KB)

Dado	08.03.2012 16:54
Predmet:Re: Pregled stanja Evo radi i kod mene na ovom mom primjeru, sad cu vidjeti hocu li to moci primjeniti na pravoj app., posto u ovoj alikaciji prvo unosim preko forme podatke o dokumentu a poslije otvaram formu za unos stavki sa kolicinama. U svakom slucaju hvala vam.

Dado

08.03.2012 16:54

Predmet:Re: Pregled stanja

Evo radi i kod mene na ovom mom primjeru, sad cu vidjeti hocu li to moci primjeniti na pravoj app., posto u ovoj alikaciji prvo unosim preko forme podatke o dokumentu a poslije otvaram formu za unos stavki sa kolicinama. U svakom slucaju hvala vam.

Dado	08.03.2012 20:52
Predmet:Re: Pregled stanja Ipak nisam mogao postaviti ovaj primjer od zxz-a u svoju aplikaciju. Evo spremio sam mini app. sa glavnim tabelama i formama koje su potrebne za unos knjizenja. E sad u txt fajlu sam naveo kodove koje imam na formi za unos i to sam sve spremio, pa eto ako ko ima volje i strpljenja neka pogleda.

Dado

08.03.2012 20:52

Predmet:Re: Pregled stanja

Ipak nisam mogao postaviti ovaj primjer od zxz-a u svoju aplikaciju. Evo spremio sam mini app. sa glavnim tabelama i formama koje su potrebne za unos knjizenja. E sad u txt fajlu sam naveo kodove koje imam na formi za unos i to sam sve spremio, pa eto ako ko ima volje i strpljenja neka pogleda.

Dado	08.03.2012 21:04
Predmet:Re: Pregled stanja Evo ponovo novi primjer,prvi put promasaj, hehhee
Prilozi: pr-novi.zip (Velicina datoteke:70.79 KB)

Dado

08.03.2012 21:04

Predmet:Re: Pregled stanja

Evo ponovo novi primjer,prvi put promasaj, hehhee

Prilozi:
pr-novi.zip (Velicina datoteke:70.79 KB)

Dado	12.03.2012 12:44
Predmet:Re: Pregled stanja Jos nista. Cekam i dalje.

Dado

12.03.2012 12:44

Predmet:Re: Pregled stanja

Jos nista. Cekam i dalje.

pmiroslav	12.03.2012 13:35
Predmet:Re: Pregled stanja Malo si nejasan u ovom zadnjem pitanju. U primjeru koji si poslao nema svih polja na koje se odnose kodovi koje si priloÅ¾io. Bolje bi bilo da frm_Stavke iz tvog primjera bude Datasheet jer je to preglednije i vide odjednom sve stavke koje pripadaju određenom dokumentu
Prilozi: primjer_noviMP.rar (Velicina datoteke:65.43 KB)

pmiroslav

12.03.2012 13:35

Predmet:Re: Pregled stanja

Malo si nejasan u ovom zadnjem pitanju. U primjeru koji si poslao nema svih polja na koje se odnose kodovi koje si priloÅ¾io.
Bolje bi bilo da frm_Stavke iz tvog primjera bude Datasheet jer je to preglednije i vide odjednom sve stavke koje pripadaju određenom dokumentu

Prilozi:
primjer_noviMP.rar (Velicina datoteke:65.43 KB)

Dado	12.03.2012 14:28
Predmet:Re: Pregled stanja U pravu si zaista nema u ovom primjeru jer sam postavio samo polja za koja ja mislim da su mi potrebna za izracun. A da sam postavio i ostale forme i ostale tabele bila bi to preglomazno i ne bih mogao priloziti na forum. Pozdrav.

Dado

12.03.2012 14:28

Predmet:Re: Pregled stanja

U pravu si zaista nema u ovom primjeru jer sam postavio samo polja za koja ja mislim da su mi potrebna za izracun. A da sam postavio i ostale forme i ostale tabele bila bi to preglomazno i ne bih mogao priloziti na forum. Pozdrav.