Sto se tice narucivanja robe, moguca su dva slucaja
1) tvoja firma (vlasnik magacina) narucuje robu od dobavljaca, to ima u diagramu procesa, ali nema u modelu baze koji smo zadnji napravili. Znaci ti narucujes robu.
2) Kupci narucuju robu od tvoje firme, putem interneta, ili ti posalju narudzbenicu postom. Onda se ta narudzba od kupca prosledi nekako magacinu i magacin poslaje robu pouzecem. Znaci, od tebe narucuju robu.
Kako 'dodati' ova dva slucaja ako se u buducnosti pojavi potreba za tim?
Drugo pitanje:
Za proveru stanja prilikom unosa, bice detaljno obradjeno kasd budemo radili aplikaciju, a to je uskoro. Ako ti je bas hitno, onda pre nego sto se sacuva rekord, uradis proveru 'da li mogu od trenutnog stanja da oduzmem uneti Qty i da pri tome ne dobijem negativan broj?' Ovako nekako treba da ide proces:
1) uneses artikl (RobaID)
2) unsese kolicinu Qty
3) pokusas da se pomeris na sledeci rekord, za novi artikl
4) Access proveri da li BeforeUpdate event za formu ima nekih zahteva i ako je sve OK sacuva rekord, pa te pusti na sledeci, novi rekord. Ovo se sve desava u kratkom trentku kad pokusas da izadjes sa tekuceg rekrda i odes negde drugo.
predpostavljam da se unos RobeID,Kolicina radi na nekoj subformi. Na subformin BeforeUpdate event stavis nesto otprilike ovako (sve je pseudokod):
Code:
sub Form_BeforeUpdate(Cancel as integer)
Dim sngStanje AS Single
Dim sngKolicina As Single
sngKolicina = me!Kolicina
sngStanje = dlookup("Stanje","qryStanje","RobaID=" & me!RobaID)
If (sngStanje-sngKolicina ) <0 Then
Cancel=TRUE 'ovo ce da ponisti transakciju, sprecice snimanje rekorda
MagBox "Nema dovoljno robe na lageru, ima samo " & sngStanje & " a vi zelite da isdate " & sngKolicina
Exit sub
End iF
end sub
qryStanje je stari dobri kveri qryStanje koji racuna SUM(Ulaz)-SUM(Izlaz) AS Stanje, cak i posle 50,000 rekorda i vise