[es] - Kako izračunti radni staž da bude prikazan godina mjesec i dan

nenadmarkoni
zaposlen
Pljevlja,Crna Gora

Član broj: 268419
Poruke: 705
*.crnagora.net.

+3 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{11.10.2015. u 10:33 - pre 103 meseci}

Ako mislite da je samo to problem u prilogu imate rješenje sa programerskim autonumber-om.

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

Prikačeni fajlovi

Primjer.rar - 21.29k

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
..ireless.livno.global.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{11.10.2015. u 11:10 - pre 103 meseci}

Citat:

Getsbi:
Ako si se već upustio u prilagođavanje tuđe aplikacije svojim potrebama, predpostavljam da imaš neku stariju verziju koja radi. Kod mene pokretanje aplikacije izaziva problem sa OLE serverom ili ActiveX Control.

Raskidanje veza i brisanje podataka bez reda uz očekivanje da će nakon ponovnog povezivanja sve da radi je kockanje. Uzmi kopiju koja radi, ne raskidaj veze, već uoči šta se prazni od podataka prvo (zavisne tabele), a potom nezavisne. Otvaraj redom tabele po prioritetu i tako ih prazni od podataka. Očigledno je da si nešto propustio. Tvoja slika Greska.jpg je indikativna jer je moguće da fali neki objekat.

Imam staru verziju koju sam skinuo od kolege Zidara

Prikačeni fajlovi

magacin.rar - 75.03k

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{11.10.2015. u 17:29 - pre 103 meseci}

Ispraznio sam ti tabele bez raskidanja veza. Sad pogledaj primer koji ti je dao kolega Nenad i napravi automatsku numeraciju.

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

Prikačeni fajlovi

magacin 31012012_G.rar - 85.22k

Odgovor na temu

nenadmarkoni
zaposlen
Pljevlja,Crna Gora

Član broj: 268419
Poruke: 705
*.crnagora.net.

+3 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{11.10.2015. u 22:35 - pre 103 meseci}

Za antonia i druge da uoče razliku između Autonumber-a i programerski dobijenog autonumbera. U prilogu su dvije baze. Pokušajte da dodate nekoliko slogova u obje tabele preko formi u obje baze. Zatim izbrišite neki slog pa probajte opet da dodate taj slog.

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

Prikačeni fajlovi

Desktop.rar - 50.74k

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{14.10.2015. u 09:59 - pre 103 meseci}

Ekipa trebala bi mi pomoc , napravio sam Upit za stanje lijekova ulaz i izlaz sve na izvjestaju, međutim želio bi da mi ne prikazuje one lijekove koji nisu ni usli ni izasli znaci one kojima je stanje 0 da ih nema na izvjestaju ... kako to napravit ??? U nastavku je kod :
Želim ako unesem 5 artikala samo da mi ti 5 artikala prikaze na ulazu tako i za izlaz ??

SELECT Artikl.ArtiklID, Artikl.NazivArtikla, Nz([UkupanUlaz],0) AS Ulaz, Nz([UkupanIzlaz],0) AS Izlaz, [Ulaz]-[Izlaz] AS Stanje, JedinicaMjere.NazivJediniceMjere
FROM JedinicaMjere INNER JOIN ((Artikl LEFT JOIN QArtikalUlaz ON Artikl.ArtiklID = QArtikalUlaz.ArtiklID) LEFT JOIN QArtikalIzlaz ON Artikl.ArtiklID = QArtikalIzlaz.ArtiklID) ON JedinicaMjere.JedinicaMjereID = Artikl.JedinicaMjereID;

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{14.10.2015. u 10:11 - pre 103 meseci}

Dodaj na kraju upita nešto ovako:
WHER ulaz-izlaz != 0 ili WHER ulaz-izlaz <> 0

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

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{15.10.2015. u 06:56 - pre 103 meseci}

Kad pokusam jedan ili drugi izraz izbaci mi gresku kao na slici .

Prikačeni fajlovi

slika greske.jpg - 71.77k

Odgovor na temu

nenadmarkoni
zaposlen
Pljevlja,Crna Gora

Član broj: 268419
Poruke: 705
*.cpe.m-kabl.net.

+3 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{15.10.2015. u 07:13 - pre 103 meseci}

WHERE [Ulaz]-[Izlaz]=0

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

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{15.10.2015. u 10:01 - pre 103 meseci}

Nenade, ja sam razumeo da želi, da tamo gde je stanje 0, da mu se ne prikazuje na izveštaju. Odnosno da SQL upit koji je izvor izveštaja sadrži samo one koji imaju neko stanje.

Uostalom najbolje je da zakači fajl sa sve tabelom, upitom i izveštajem, kao i formom odakle izveštaj pokreće. Verovatno je greška u sintaksi, jer sam pisao napamet.

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

Odgovor na temu

nenadmarkoni
zaposlen
Pljevlja,Crna Gora

Član broj: 268419
Poruke: 705
*.cpe.m-kabl.net.

+3 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{15.10.2015. u 10:11 - pre 103 meseci}

@Getsbi, nisam ispravio Vas vec @antonio22. Vi ste mu dali smjernicu,ali on ocigledno nije shvatio poentu vec je doslovno prepisao Vasu slucajnu gresku. Napisao sam prema onome sto je naznaceno u zakacenoj slici.

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

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{15.10.2015. u 10:12 - pre 103 meseci}

Ja cu malo preko vikend jos gledat citat pa cu okaciti bazu da vidite sta i kako . naravno prijedloge i sugestije da pisete ako tko ima vremena

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{28.10.2015. u 07:20 - pre 103 meseci}

Ako tko ima vremena i zelje neka malo baci pogled na bazu i da svoju sugestiju ... Kasno odgovaram na teme jer sam poslovno pretrpan kad stignem pokusam sta odradit . jos jednom Hvala svima na Vaćemu vremenu

Prikačeni fajlovi

UlazIzlaz.rar - 52.57k

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{04.11.2015. u 13:05 - pre 103 meseci}

Kreirao sam izvjestaj za izlazni dokument , u formi Izlaz sam dodao dugme naredba8 i kad unesem sljedeći kod izbaci mi gresku , zna li netko o cemu se radi :

Private Sub Naredba8_Click()
On Error GoTo Err_Naredba8_Click

Dim stDocName As String

stDocName = "Izlaz"

stLinkCriteria = "[DokumentID]=" & "'" & Me![DokumentID] & "'"
DoCmd.OpenReport stDocName, acViewPreview, , stLinkCriteria
DoCmd.Close acForm, "Dokument"
Exit_Stampa_Click:
Exit Sub

Err_Naredba8_Click:
MsgBox Err.Description
Resume Exit_Stampa_Click
End Sub

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{05.11.2015. u 05:30 - pre 103 meseci}

Nedostaje dimenzionisanje promenljive stLinkCriteria.
Dim stLinkCriteria As String
Bez toga neće da iskompajlira VBA kôd.

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

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{09.11.2015. u 06:53 - pre 102 meseci}

Hvala puno sad mi radi :) to je to za sad

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{09.11.2015. u 13:14 - pre 102 meseci}

Evo sad imam novu po meni problematicnu situaciju .... Imam formu na kojoj se nalaze ulaz i izlaz (prikazano na slici u prilogu) , kada idem na izlaz unesem lijek i kolicinu , ako je kolicina koju sam unio od veca od stanja lijekova onda mi izbaci upozorenje . Međutim kako su mi na istoj formi nalazi ulaz i izlaz, kod koji sam napisao stoji i kod ulaza pa kad unosim kolicinu on izbaci upozorenje , kako da to razdvojim ..

Dim provera As Double
provjera = DLookup("STANJE", "qArtikalStanje", "ArtiklID=" & Me.ArtiklID)
If provera < Me.Kolicina Then
MsgBox "Nema dovoljno na stanju. Imas samo: " & provjera, vbCritical, "STOP"
Me.Kolicina.Undo
Cancel = True
Else
End If

Prikačeni fajlovi

slika 1.jpg - 51.39k

slika 2.jpg - 27.73k

Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2831

+45 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{09.11.2015. u 21:10 - pre 102 meseci}

Iz tog što si napisao i slika ne mogu sa sigurnošću da ti dam odgovor. Pogledaj moj primer Ulaz-Izlaz na istoj formi pa uradi nešto analogno tome.

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

Prikačeni fajlovi

UlazIzlaz.rar - 31.13k

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{10.11.2015. u 07:08 - pre 102 meseci}

Hm pokusavam al ne ide , poredim s ovim tvojim primjerom koji si mi poslao . Moji podatci idu iz Tabele DokumentStavka ( prikazano na slici ispod ) Forma koju koristim je takodjer prikazana na slici ispod .

Napravio sam komandu knjizi i umetnuo sljedeci kod :

Dim Baza As Database
Dim Sl_Tabela1 As Recordset

Set Baza = CurrentDb()
Set Sl_Tabela1 = Baza.OpenRecordset("DokumentStavka", dbOpenDynaset)

If Me.ArtiklID > 0 Then

If Me.ArtiklID > Me.Kolicina Then
MsgBox "Nema dovoljno kolicine. Proverite stanje", vbCritical, "Paznja !"
GoTo Kraj
ElseIf Me.ArtiklID <= Me.Kolicina Then
With Sl_Tabela1
.AddNew
![DokumentStavkaID] = Me![FrmIDroba]
![ArtiklID] = Me![ArtiklID]
![Ulaz] = 0
.Update
End With
MsgBox "Izlaz je uknjizen", vbInformation, "Obavestenje"
GoTo Kraj
End If

End If

If Me.ArtiklID > 0 Then
With Sl_Tabela1
.AddNew
![DokumentStavkaID] = Me![FrmIDroba]
![ArtiklID] = Me![ArtiklID]
![Izlaz] = 0
.Update
End With
MsgBox "Ulaz je uknjizen", vbInformation, "Obavestenje"
GoTo Kraj
End If

Kraj:
Set Baza = Nothing
End Sub

Prikačeni fajlovi

nenadmarkoni
zaposlen
Pljevlja,Crna Gora

Član broj: 268419
Poruke: 705
*.cpe.m-kabl.net.

+3 Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{10.11.2015. u 08:06 - pre 102 meseci}

Nema potrebe za tolikim kodiranjem, mogli ste samo da u onaj predjasni kod dodate If Me.VrstaDokumentaID=2(ako je 2 izlaz) i nastavite sa ElseIf i vasim kodom za provjeru stanja. Znaci da provjeri ako je dokument izlaz, a ako je ulaz da preskoci provjeru i nema potrebe za dugmetom knjizi.
Odnosno posto je taj podatak na nadredjenoj formi Me.Parent.VrstaDokumentaID=2....

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

Odgovor na temu

antonio22
ne radim
nema
BiH

Član broj: 328089
Poruke: 41
*.tel.net.ba.

Profil

Re: Kako izračunti radni staž da bude prikazan godina mjesec i dan

^{11.11.2015. u 12:28 - pre 102 meseci}

Pokusao sam sa sljedecim kodom , al isto mi pokazuje i na ulazu i izlazu mi daje upozorenje da nema dovoljno lijekova :

Private Sub kolicina_BeforeUpdate(Cancel As Integer)
Dim provjera As Double
Me.Parent.VrstaDokumentaID = 2
provjera = DLookup("STANJE", "qArtikalStanje", "ArtiklID=" & Me.ArtiklID)
If provjera < Me.Kolicina Then
MsgBox "Nema dovoljno na stanju. Imas samo: " & provjera, vbCritical, "STOP"
Me.Kolicina.Undo
Cancel = True

Else
End If
End Sub

Odgovor na temu