Molim za malu pomoć

Molim za malu pomoć 10.11.2015. u 22:01 · pre 133 meseca #1

Pozdrav svima.
Najpre da pomenem da sam tek nedavno počeo da se bavim Access-om (muka, tj. gazda firme naterao...), tako da je moje znanje vrlo tanko. Ipak, uz pomoć literature i malo zdravog razuma, i puno lupanja glavom o zid i ekran monitora, donekle sam dogurao. A odnekle sam zapeo, pa nemam drugo rešenje osim da zamolim vas pametnije da mi malo pomognete...
Elem, potrebno je da napravim nekakvu aplikaciju i učinilo mi se da je MS Access najjednostavnije rešenje (a šta u Office-u ima komplikovano...?), ali sam već u prvim koracima zahramao... Naime, moram da iz TblCene kurs evra na današnji dan upotrebim u TblUgovori, kako bih na osnovu današnjeg kursa formirao cenu u dinarima. Reći ćete, Lookup wizard. Jes', vraga. Ne radi!!!! Probao sam u svim verzijama, od 2003 do 2016, i - neće...! Prevazišao sam to (nadam se...) tako što sam peške napravio nekakav upit, i to sad (o5 se nadam...) nekako radi... Ono što sam hteo da pitam i da zamolim za pomoć je sledeće: imam jedan Combo box u kome su tri stavke: 1; admin. zabrana, 2; čekovi građana i 3; gotovina. U slučaju gotovinskog plaćanja odobravamo popust od, recimo, 10%. Moja logika mi kaže da bi trebalo da upotrebim komandu "If [3 iz kombo boxa] than [cena*0,9]" (izvinjavam se na sintaksi...) Međutim, koliko sam ja uspeo da uklavirim, Access nema operator IF... Šta da radim? Biću vrlo zahvalan svakome ko me udostoji nekog rešenja. I, da... izvinjavam se na preopširnosti, pokušao sam da što više pojasnim problem... A i umem ponekad da se otmem kontroli...

Re: Molim za malu pomoć 11.11.2015. u 08:02 · pre 133 meseca #2

Ima Access IF .... Endif upravljačku strukturu u VBA jeziku. Takođe u SQL-u ima IIf funkciju. Pokušaj, pa ako neide, zakači primer rasterećen od ostalih objekata koji nisu bitni. Popuni neophodne podatke u tabelama za test primer. Neko će se već naći da ti pomogne. Pošto si novi na forumu pogledaj kako se kače fajlovi uz poruku. Odaberi FAQ na vrhu ove stranice i pročitaj tačku 22.

Potpis

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Re: Molim za malu pomoć 11.11.2015. u 09:20 · pre 133 meseca #3

Hvala, Getsbi, pokušaću. Mada, moje znanje programiranja se završava tamo negde pre dvadesetak godina, kada sam u Basicu i RPN programirao džepne Packarde i Sharpove... Bojim se da će to biti preveliki zalogaj za moje "male sive stanice"...

Re: Molim za malu pomoć 11.11.2015. u 12:13 · pre 133 meseca #4

Dakle, ovako... Uopšte nisam uspeo da se snađem sa ovim... Ako je neko raspoložen da mi pomogne, evo uploada, i kratkog objašnjenja... U formi FrmUgovori postoji stavka "Način plaćanja". kada se u Combo boxu izabere opcija "Gotovina", u FsubUgovori u polju "Popust" treba da obračunam popust u visini od, recimo, 10%, a možda bi bilo interesantno da se korisniku omogući da sam unese stopu popusta (5, 10, 76.5%... Lupetam brojke, naravno...), ako nisam previše bezobrazan i zahtevan. Biću duboko zahvalan svima koji se uključe u rešavanje mog problema, i stavljam se na raspolaganje svima kojima je potrebna pomoć u AutoCAD-u, recimo... Hvala još jednom...

database.rar71.44k

Re: Molim za malu pomoć 11.11.2015. u 19:31 · pre 133 meseca #5

Ovo što ste uradili ne valja. Baza nije normalizovana, nisu dobro određeni ključevi, nisu uspostavljene relacije.....
Da bi dobili ono što želite morate zanemariti sve što ste uradili i krenuti od početka. Početak je opis realnog sistema za koji se projektuje baza. Krenite od toga.
Preporučio bih Vam da najprije pročitate knjigu http://tutoriali.org/Razvoj_in...h_sistema_i_baze_podataka.html

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

Re: Molim za malu pomoć 11.11.2015. u 20:23 · pre 133 meseca #6

Hvala na trudu... Ovo što ste mi napisali, i letimičan pogled na literaturu koju ste mi preporučili, jasno mi je dalo do znanja da je ovo previše komplikovano za mene. Da sad, u ovim godinama, učim da plivam u potpuno nepoznatim vodama, bojim se da neće na dobro izaći... Moraću, izgleda, potražiti pomoć na drugoj strani. Hvala još jednom...

Re: Molim za malu pomoć 25.12.2015. u 22:13 · pre 132 meseca #7

Opet ja...
Što bi rekli The Beatles, uz VELIKU pomoć mojih prijatelja, od poslednjeg posta obavljen je veliki posao... Zahvaljujući zaista nesebičnoj, i ogromnoj, pomoći člana nenadmarkoni, kome ne znam koliko bih dovoljno mogao da se zahvalim, doguralo se do tačke na kojoj se nazire i kraj... Međutim, kako i sam Nenad reče, obojica smo amateri (pri tome ja sa velikim A...), pa nije loše da imamo mišljenje, i još malu pomoć pprofesionalca (ili barem, malo manje amatera od nas dvojice...). Elem, u prilogu kojeg šaljem nalazi se baza i model. Ono što nam je problem, to je da ne možemo da u formi Magacin osvežimo formu kada se promene podaci u Prijemnici i Internoj Otpremnici. I, naravno, ako na ovo baci oko neko ko se razume... Dobrodošle su sve ispravke, sugestije, predlozi, pohvale (naravno), pokude (ako baš mora...), plakete, diplome, čestitke... Znam da je vreme praznika, i da svi imaju nekog pametnijeg posla, možda ima neko ko je raspoložen za glavolomke ovog tipa... Unapred se zahvaljujem na pomoći ili bilo kakvom savetu, osim na savetu da se manem ćorava posla...

SCS.rar487.57k

Re: Molim za malu pomoć 26.12.2015. u 09:25 · pre 132 meseca #8

Ako neko ima vremena neka pogleda i pripomogne covjeku koliko moze. Trenutno sam u nekim licnim problemima pa se ne mogu dovoljno posvetiti ovome. Hvala svima

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

Re: Molim za malu pomoć 26.12.2015. u 11:45 · pre 132 meseca #9

Evo nadjoh malo vremena. Rijeseno je stanje magacina.

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

Re: Molim za malu pomoć 07.01.2016. u 12:39 · pre 131 mesec #10

Imamo mali problem u formi UgovorDetaljno, pri unosu DokumentStavka, nešta nije odradjeno kako treba, a ja ne mogu da nadjem sta. Moze li neko pogledati?
Morao sam fajlove da podjelim na 4 rar fajla.

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

07012016NM.part01.rar1000k 07012016NM.part02.rar1000k 07012016NM.part03.rar1000k 07012016NM.part04.rar28.31k

Re: Molim za malu pomoć 12.01.2016. u 23:50 · pre 131 mesec #11

Da li mi možete dati malo pojašnjenje kako se definiše status ugovora?
Pošto je nemoguće editovati polje na formi koje kontroliše status, jer je svojstvo Locked postavljeno na Yes. Zato i pitam za pojašnjenje kako se definiše isti. U kodu za događaj Form_Current pod formom UgovorDetaljno na osnovu statusa ugovora se definiše mogućnost dodavanja, editovanja ili brisanja zapisa u formi DokumentStavka, kao i ažuriranje ostalih stavki ugovora. Koliko vidim ako je status ugovora 1 (U pripremi) postoji mogućnost rada sa stavkama, u ostalim slučajevima zapisi se zaključavaju kroz VBA kod. Status ugovora 5 (Neotpisan) nije definisan kroz VBA kod.
Ako bi se svojstvo za kombo boks StatusUgovoraID Locked postavilo na No i sledeći deo koda iz događaja Form_Current prebacio na događaj After Update pod kombo boksom:

Code:
Select Case StatusUgovoraID
    Case 1
        Me.cmdOveri.Visible = True
        Me.AllowAdditions = True
        Me.AllowEdits = True
        Me.AllowDeletions = True
        Me.DokumentStavka.Locked = False
        Me.Tab_Povratnica.Visible = False

        If Me.NacinPlacanjaID = 2 Then
            Me!AdministrativnaZabrana.Form!cmdDatumDokumenta.Visible = True
            Me.AdministrativnaZabrana.Locked = False
        End If

        If Me.NacinPlacanjaID = 3 Then
            Me!CekoviGradjana.Form!cmdDatumDokumenta.Visible = True
            Me!CekoviGradjana.Form!cmdDatumAktivacije.Visible = True
            Me!CekoviGradjana.Locked = False
        End If

    Case 2
        Me.cmdOveri.Visible = False
        Me.DokumentStavka.Locked = True
        Me.AllowAdditions = False
        Me.AllowEdits = False
        Me.AllowDeletions = False
        Me.Tab_Povratnica.Visible = True

        If Me.NacinPlacanjaID = 2 Then
            Me!AdministrativnaZabrana.Form!cmdDatumDokumenta.Visible = False
            Me.AdministrativnaZabrana.Locked = True
        End If

        If Me.NacinPlacanjaID = 3 Then
            Me!CekoviGradjana.Form!cmdDatumDokumenta.Visible = False
            Me!CekoviGradjana.Form!cmdDatumAktivacije.Visible = False
            Me.CekoviGradjana.Locked = True
        End If

    Case 3
        Me.cmdOveri.Visible = False
        Me.DokumentStavka.Locked = True
        Me.AllowAdditions = False
        Me.AllowEdits = False
        Me.AllowDeletions = False
        Me.Tab_Povratnica.Visible = True
        Me.Povratnica.Locked = True
        Me!Povratnica.Form!cmdDatumDokumenta.Visible = False
        Me!Povratnica.Form!cmdOvera.Visible = False

        If Me.NacinPlacanjaID = 2 Then
            Me!AdministrativnaZabrana.Form!cmdDatumDokumenta.Visible = False
            Me.AdministrativnaZabrana.Locked = True
        End If

        If Me.NacinPlacanjaID = 3 Then
            Me!CekoviGradjana.Form!cmdDatumDokumenta.Visible = False
            Me!CekoviGradjana.Form!cmdDatumAktivacije.Visible = False
            Me.CekoviGradjana.Locked = True
        End If

    Case 4
        Me.cmdOveri.Visible = False
        Me.DokumentStavka.Locked = True
        Me.AllowAdditions = False
        Me.AllowEdits = False
        Me.AllowDeletions = False
        Me.Tab_Povratnica.Visible = False

        If Me.NacinPlacanjaID = 2 Then
            Me!AdministrativnaZabrana.Form!cmdDatumDokumenta.Visible = False
            Me.AdministrativnaZabrana.Locked = True
        End If

        If Me.NacinPlacanjaID = 3 Then
            Me!CekoviGradjana.Form!cmdDatumDokumenta.Visible = False
            Me!CekoviGradjana.Form!cmdDatumAktivacije.Visible = False
            Me.CekoviGradjana.Locked = True
        End If
End Select

mislim da bi se dobila mogućnost editovanja zapisa i unosa novih.

Re: Molim za malu pomoć 13.01.2016. u 07:26 · pre 131 mesec #12

Novi ugovor se dodaje kroz subformu na formi Radnik. Ugovor je u statusu P- U pripremi dok se ne ovjeri tasterom Ovjeri. Pritiskom na taster najprije se provjerava da li su unijeta obavezna polja ugovora i da li broj unijetih cekova odgovara broju rata. Ako je sve u redu Ugovor se zakljucava popunjava se polje Avans koje je ujedno i prva rata, a ostalo se upisuje u polje IznosZaNaplatu i prelazi u status Realizacije. 14 dana nakon roka dostave kupac ima pravo da neostecenu robu vrati prodavcu uz popunjeni Povratnicu. Nakon zakonskog roka ugovor prelazi u status Aktivan u koji ga mijenja Update Query u pozadini pri otvaranju aplikacije. Nakon toga se ne vidi tab Povratnica. Ako se aktivira povratnica ugovor se stornira. Neotpisan je ugovor koji je u sporu. Status ne smije da se mijenja rucno.

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

Re: Molim za malu pomoć 13.01.2016. u 08:25 · pre 131 mesec #13

@dr.Iver ako ste mislili da je to bio problem, nije. Problem je bio sto je davalo Type Mistmatch gresku pri otvaranju forme UgovorDetaljno, a nism mogao naci gresku. Problem se rjesio prebacivanjem subformi iz ranijih verzija aplikacije. I dalje ne znam zasto se pojavljivala greska.

Potpis

Sve sam fino smislio...
Još samo da propadne. :-)

Re: Molim za malu pomoć 13.01.2016. u 20:43 · pre 131 mesec #14

Izvinjavam se na unošenju zabune. Kod mene se nije javljala nikakva greška prilikom otvaranja forme UgovorDetaljno, pa sam zato pomislio da je problem nemogućnost menjanja zapisa. I sad kad sam ispratio korake koje ste opisali nisam dobijao nikakvu grešku.
Inače, koristim Access 2010.

Re: Molim za malu pomoć 14.01.2016. u 10:09 · pre 131 mesec #15

Neka zona sumraka je u pitanju... ja imam Access 2013, i još uvek mi se javlja Type Mismatch, i to po 2 puta na Adminnistrativnoj zabrani, i 2 puta na Povratnici... Klik na OK (po 2 puta, naravno), i nastavlja sa radom bez nekih vidljivih problema, koliko sam uspeo da shvatim... A, iz komunikacije naše, vidim da Nenad u 2003 nema tih grešaka...

Forum kao aplikacija na telefonu

Srodne teme