<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Dim db As Database
Dim rs3 As Recordset
Dim rs4 As Recordset

Set Baza = CurrentDb()
Set rs3 = db.OpenRecordset("Q_Stanje", dbOpenDynaset)
Set rs4 = db.OpenRecordset("tblUlazIzlaz", dbOpenDynaset)

   Do While Not rs3.EOF
                 rs4.AddNew
                
                 rs4![IDtransakcije] = "IDtransakcije iz tblTransakcija
                 rs4![Sifra] = rs3![Sifra]
                 rs4![Ulaz] = 0
                 rs4![Izlaz] = rs3![Stanje]
                 rs4![Status] = 1
                 rs4![DatumU] = Date