/[H6]/DatabaseLayer.cpp
ViewVC logotype

Diff of /DatabaseLayer.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 8 by torben, Wed Aug 30 12:39:09 2006 UTC revision 27 by torben, Sun Sep 3 09:14:24 2006 UTC
# Line 1  Line 1 
1    
2    
3  #include "StdAfx.h"  #include "StdAfx.h"
4  #include ".\databaselayer.h"  #include ".\databaselayer.h"
5    
6    
7  DatabaseLayer::DatabaseLayer(void)  DatabaseLayer::DatabaseLayer(void)
8  {  {
9          db.OpenEx("ODBC; Description=; DRIVER=SQL Server; SERVER=TK-Teacher; UID=GroupTwo; PWD=toog30");          db.OpenEx("ODBC; Description=; DRIVER=SQL Server; SERVER=TK-Teacher; UID=GroupTwo; PWD=toog30", CDatabase::noOdbcDialog);
10          db.ExecuteSQL("USE GroupTwo");          db.ExecuteSQL("USE GroupTwo");
11  }  }
12    
13  DatabaseLayer::~DatabaseLayer(void)  DatabaseLayer::~DatabaseLayer(void)
14  {  {
15            db.Close();
16  }  }
17    
18  vector<Person> DatabaseLayer::GetPersonAll(void)  vector<Person> DatabaseLayer::GetPersonAll(void)
# Line 18  vector<Person> DatabaseLayer::GetPersonA Line 21  vector<Person> DatabaseLayer::GetPersonA
21          CString id, inits, name, isadmin, pass;          CString id, inits, name, isadmin, pass;
22    
23                  CRecordset rs(&db);                  CRecordset rs(&db);
24                  rs.Open(AFX_DB_USE_DEFAULT_TYPE, "SELECT PersonID, Initialer, Navn, Admin, Pass FROM Person");                  rs.Open(AFX_DB_USE_DEFAULT_TYPE, "SELECT PersonID, Initialer, Navn, Admin, Pass FROM Person ORDER BY Initialer DESC");
25                  while(!rs.IsEOF())                  while(!rs.IsEOF())
26                  {                  {
27                          rs.GetFieldValue((short)0,id);                          rs.GetFieldValue((short)0,id);
# Line 65  Person DatabaseLayer::GetPerson(CString Line 68  Person DatabaseLayer::GetPerson(CString
68                          p.id            = id;                          p.id            = id;
69                          p.inits         = inits;                          p.inits         = inits;
70                          p.name          = name;                          p.name          = name;
71                          p.isadmin       = (isadmin == 1);                          p.isadmin       = (isadmin == "1");
72                          p.pass          = pass;                          p.pass          = pass;
73          }          }
74          return p;          return p;
# Line 94  bool DatabaseLayer::DeletePerson(Person Line 97  bool DatabaseLayer::DeletePerson(Person
97          db.ExecuteSQL(SQL);          db.ExecuteSQL(SQL);
98          return true;          return true;
99  }  }
100    
101    bool DatabaseLayer::ReturnEquipment(CString barcode)
102    {
103            CString SQL;
104            SQL.Format("UPDATE Udstyr SET Status = '3' WHERE Stregkode= '%s'", barcode);
105            db.ExecuteSQL(SQL);
106            
107            SQL.Format("UPDATE Udlån SET Afleveringsdato = Getdate() WHERE Stregkode= '%s' AND Afleveringsdato IS NULL ", barcode);
108            db.ExecuteSQL(SQL);
109    
110            checkReservations(barcode);
111            return true;
112    }
113    
114    bool DatabaseLayer::CheckoutEquipment(Person CheckPersID, Equipment CheckEquip, int Numdays)
115    {
116            CString SQL;
117            SQL.Format("UPDATE Udstyr SET Status = '1' WHERE Stregkode = '%s' ", CheckEquip.barcode);
118            db.ExecuteSQL(SQL);
119            SQL.Format("INSERT INTO Udlån (PersonID, Stregkode, Startdato, Antaldage) VALUES( '%s','%s', GetDate(),'%d')", CheckPersID.id, CheckEquip.barcode, Numdays);
120            db.ExecuteSQL(SQL);
121            return true;
122    }
123    
124    bool DatabaseLayer::EquipmentReservation(CString barcode, Person CheckPerson)
125    {
126            CString SQL;
127            SQL.Format("INSERT INTO Resevation (PersonID, Stregkode, Startdato) VALUES( '%s','%s', GetDate())", CheckPerson.id, barcode);
128            db.ExecuteSQL(SQL);
129            checkReservations(barcode);
130            return true;
131    }
132    
133    bool DatabaseLayer::UpdateEquipment(Equipment CheckEquip)
134    {
135            CString SQL;
136            SQL.Format("UPDATE Udstyr SET Navn = '%s', Beskrivelse = '%s', Placering = '%s', Status = '%s' WHERE Stregkode = '%s'", CheckEquip.name, CheckEquip.description, CheckEquip.placement, CheckEquip.status, CheckEquip.barcode);
137            db.ExecuteSQL(SQL);
138            return true;
139    }
140    
141    bool DatabaseLayer::AddEquipment(Equipment AddEquip)
142    {
143            CString SQL;
144            SQL.Format("INSERT into Udstyr(Stregkode, Navn, Beskrivelse, Placering, Status) VALUES('%s', '%s', '%s', '%s', '%s')",AddEquip.barcode, AddEquip.name, AddEquip.description, AddEquip.placement, "3");
145            db.ExecuteSQL(SQL);
146            return true;
147    }
148    
149    vector<Equipment> DatabaseLayer::GetEquipmentAll(void)
150    {
151            vector<Equipment> buffer;
152            CString barcode, name, description, placement, status;
153    
154            CRecordset rs(&db);
155            rs.Open(AFX_DB_USE_DEFAULT_TYPE, "SELECT Stregkode, Navn, Beskrivelse, Placering, Status FROM Udstyr");
156            while(!rs.IsEOF())
157            {
158                    rs.GetFieldValue((short)0,barcode);
159                    rs.GetFieldValue(1,name);
160                    rs.GetFieldValue(2,description);
161                    rs.GetFieldValue(3,placement);
162                    rs.GetFieldValue(4,status);
163                    
164                    Equipment p;
165                    p.barcode               = barcode;
166                    p.name                  = name;
167                    p.description   = description;
168                    p.placement             = placement;
169                    p.status                = status;
170                    buffer.push_back(p);
171    
172                    rs.MoveNext();
173            }
174            rs.Close();
175            return buffer;
176    }
177    
178    Equipment DatabaseLayer::GetEquipment(CString wantBarcode)
179    {
180    
181            CString barcode,name,description,placement,status;
182    
183            CString SQL;
184    
185            Equipment e;
186    
187            SQL.Format("SELECT Stregkode,Navn,Udstyr.Beskrivelse,Placering,Status.Beskrivelse FROM Udstyr INNER JOIN Status ON Udstyr.Status = Status.StatusID Where (Stregkode = '%s')", wantBarcode);
188            CRecordset rs(&db);
189            rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
190            if (!rs.IsEOF() )
191            {
192                    rs.GetFieldValue((short)0,barcode);
193                    rs.GetFieldValue(1,name);
194                    rs.GetFieldValue(2,description);
195                    rs.GetFieldValue(3,placement);
196                    rs.GetFieldValue(4,status);
197    
198                    e.barcode = barcode;
199                    e.name = name;
200                    e.description = description;
201                    e.placement = placement;
202                    e.status = status;
203            }
204            rs.Close();
205            return e;
206    }
207    
208    bool DatabaseLayer::DeleteEquipment(Equipment DelEquip)
209    {
210            CString SQL;
211            SQL.Format("DELETE FROM Udstyr WHERE Stregkode = '%s'", DelEquip.barcode);
212            db.ExecuteSQL(SQL);
213            return true;
214    }
215    
216    
217    // Developed by Torben H. Nielsen
218    vector<Equipment> DatabaseLayer::Search(CString barcode, CString name, CString inits, bool available, bool reserved, bool deposited)
219    {
220            vector<Equipment> buffer;
221    
222            //here are the wanted equipments found through 3 seperate queries - I could also
223            //find them all in one query where I joined the 3 selects via a UNION
224            CString SQL;
225            if (available == true) {
226                    SQL = "SELECT DISTINCT Udstyr.stregkode,Udstyr.Navn,Udstyr.Beskrivelse,Udstyr.Placering,Status.Beskrivelse \
227                                       FROM Udstyr \
228                                       INNER JOIN Status ON Udstyr.status = Status.StatusID WHERE Udstyr.Status = 3 ";
229                    if (barcode != "")
230                            SQL += " AND Udstyr.stregkode = '" + barcode + "' ";
231                    if (name != "")
232                            SQL += " AND Udstyr.Navn LIKE '%" + name + "%' ";
233                    
234                    CRecordset rs(&db);
235                    rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
236                    FillEquipmentVector(buffer,rs);
237                    rs.Close();
238            }
239            
240            if (reserved == true) {
241                    SQL = "SELECT DISTINCT Udstyr.stregkode,Udstyr.Navn,Udstyr.Beskrivelse,Udstyr.Placering,Status.Beskrivelse \r\n\
242                                       FROM Udstyr \r\n\
243                                       INNER JOIN Status ON Udstyr.status = Status.StatusID \r\n\
244                                       INNER JOIN Resevation ON Udstyr.Stregkode = Resevation.stregkode \r\n\
245                                       INNER JOIN Person ON Resevation.PersonID = Person.PersonID\r\n\
246                                       WHERE ( Udstyr.Status = 2 OR Person.Initialer = '" + inits + "') ";
247                    if (barcode != "")
248                            SQL += " AND Udstyr.stregkode = '" + barcode + "' ";
249                    if (name != "")
250                            SQL += " AND Udstyr.Navn LIKE '%" + name + "%' ";
251                    //if (inits != "")
252                    //      SQL += " AND Person.Initialer = '" + inits + "' ";
253                    
254                    CRecordset rs(&db);
255                    rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
256                    FillEquipmentVector(buffer,rs);
257                    rs.Close();
258            }
259    
260    
261            if (deposited == true) {
262                    SQL = "SELECT DISTINCT Udstyr.stregkode,Udstyr.Navn,Udstyr.Beskrivelse,Udstyr.Placering,Status.Beskrivelse \r\n\
263                                       FROM Udstyr \r\n\
264                                       INNER JOIN Status ON Udstyr.status = Status.StatusID \r\n\
265                                       INNER JOIN Udlån ON Udstyr.Stregkode = Udlån.stregkode \r\n\
266                                       INNER JOIN Person ON Udlån.PersonID = person.PersonID\r\n\
267                                       WHERE Udstyr.Status = 1 \r\n\
268                                       AND Udlån.Afleveringsdato IS NULL";
269                    if (barcode != "")
270                            SQL += " AND Udstyr.stregkode = '" + barcode + "' ";
271                    if (name != "")
272                            SQL += " AND Udstyr.Navn LIKE '%" + name + "%' ";
273                    if (inits != "")
274                            SQL += " AND Person.Initialer = '" + inits + "' ";
275    
276                    CRecordset rs(&db);
277                    rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
278                    FillEquipmentVector(buffer,rs);
279                    rs.Close();
280            }
281    
282            // now I have the equipment rows the user asked for, now I need some more checkout and
283            // reservation data for each piece of equipment
284    
285            for (int i=0; i<buffer.size(); i++) {
286                    //fill Equipment::checkouts
287                    
288                    SQL = "SELECT TOP 10 Udlån.StartDato, Udlån.Afleveringsdato,Udlån.Antaldage, Person.Initialer\
289                                    FROM Udlån\
290                                    INNER JOIN Person ON Udlån.PersonID = Person.PersonID ";
291                    SQL += "WHERE Udlån.Stregkode = " + buffer[i].barcode + " ORDER BY STARTDATO DESC";
292                    CRecordset rs(&db);
293                    rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
294                    if (rs.GetRecordCount()>0) {
295                            rs.MoveFirst();
296                            while ( !rs.IsEOF() ) {
297                                    Checkout check;
298                                    rs.GetFieldValue((short)0, check.startdate);
299                                    rs.GetFieldValue(1, check.enddate);
300                                    rs.GetFieldValue(2, check.numdays);
301                                    rs.GetFieldValue(3, check.inits);
302    
303                                    buffer[i].checkouts.push_back(check);
304                                    rs.MoveNext();
305                            }
306                    }
307                    rs.Close();
308                                    
309                    // fill Equipment::reservations
310                    SQL = "SELECT Resevation.ResevationID, Resevation.StartDato,  Person.Initialer\
311                                    FROM Resevation\
312                                    INNER JOIN Person ON Resevation.PersonID = Person.PersonID ";
313                    SQL += "WHERE Resevation.Stregkode = " + buffer[i].barcode + " ORDER BY STARTDATO ASC";
314                    
315                    rs.Open(AFX_DB_USE_DEFAULT_TYPE, SQL);
316                    if (rs.GetRecordCount()>0) {
317                            rs.MoveFirst();
318                            while ( !rs.IsEOF() ) {
319                                    Reservation res;
320                                    rs.GetFieldValue((short)0, res.reservationID);
321                                    rs.GetFieldValue(1, res.startdate);
322                                    rs.GetFieldValue(2, res.inits);
323    
324                                    buffer[i].reservations.push_back(res);
325                                    rs.MoveNext();
326                            }
327                    }
328                    rs.Close();
329            }
330    
331            return buffer;
332    }
333    
334    // Developed by Torben H. Nielsen
335    void DatabaseLayer::FillEquipmentVector(vector<Equipment> &buffer, CRecordset &rs)
336    {
337            CString barcode,name,description,placement,status;
338            if (rs.GetRecordCount()>0) {
339                    rs.MoveFirst();
340                    while (!rs.IsEOF() ) {
341                            Equipment eq;
342                            rs.GetFieldValue((short)0, eq.barcode);
343                            rs.GetFieldValue(1, eq.name);
344                            rs.GetFieldValue(2, eq.description);
345                            rs.GetFieldValue(3, eq.placement);
346                            rs.GetFieldValue(4, eq.status);
347    
348                            buffer.push_back(eq);
349    
350                            rs.MoveNext();
351                    }
352            }
353    }
354    
355    void DatabaseLayer::checkReservations(CString barcode)
356    {
357            CString scount,status;
358            CString SQL = "SELECT count(*) FROM Resevation WHERE Resevation.Stregkode = '" + barcode  + "'";
359            CRecordset rs(&db);
360            rs.Open(AFX_DB_USE_DEFAULT_TYPE,SQL);
361            rs.MoveFirst();
362            rs.GetFieldValue((short)0,scount);
363            int reservationCount = atoi(scount);
364            rs.Close();
365    
366            SQL = "SELECT status FROM Udstyr WHERE Udstyr.Stregkode = '" + barcode + "'";
367            rs.Open(AFX_DB_USE_DEFAULT_TYPE,SQL);
368            if (rs.GetRecordCount() >0) {
369                    rs.MoveFirst();
370                    rs.GetFieldValue((short)0,status);
371            }
372            rs.Close();
373    
374    
375            if (reservationCount > 0 && status == 3) {//equipment is available and has at lease one reservation
376                    SQL = "UPDATE Udstyr SET Status = 2 WHERE Stregkode = '" + barcode + "'";
377                    db.ExecuteSQL(SQL);
378            }
379    }
380    
381    bool DatabaseLayer::DeleteReservation(CString barcode, CString resid)
382    {
383            CString SQL = "DELETE FROM Resevation WHERE resevationid = " + resid;
384            db.ExecuteSQL(SQL);
385            checkReservations(barcode);
386            return true;
387    }
388    
Legend:
Removed from v.8  
changed lines
  Added in v.27
  ViewVC Help
Powered by ViewVC 1.1.20