fixed iob

docs/changelog/6.x.x.txt

@@ -28,6 +28,7 @@
  - The upgrade script now wipes out the file cache in case it would cause
    any conflicts.
  - fix [ 1373319 ] archive
+ - Fixed the In/Out Board so it doesn't produce fatal errors on add.
  - fix [ 1373493 ] Upgrade script fails because parameters are not quoted
  - Upgrade now uses --results-file parameter on mysqldump because some
    operating system don't handle UTF-8 characters through their pipes.

docs/upgrades/upgrade_6.8.0-6.8.1.pl

@@ -27,10 +27,17 @@ fixCSFaqTemplateAnchors();
 updateProfileSystem();
 convertDashboardPrefs();
 fixPosts();
+fixIOB();
 
 finish(); # this line required
 
 
+#-------------------------------------------------
+sub fixIOB  {
+	print "\tFixing IOB.\n" unless ($quiet);
+	WebGUI::SQL->write("alter table InOutBoard_statusLog add column createdBy varchar(22) binary");
+}
+
 #-------------------------------------------------
 sub fixPosts {
 	print "\tFixing posts.\n" unless ($quiet);

lib/WebGUI/Asset/Wobject/InOutBoard.pm

@@ -229,12 +229,14 @@ InOutBoard_status.status,
 InOutBoard_status.dateStamp, 
 c.fieldData as department, 
 groupings.groupId
-from users, InOutBoard, groupings
+from users 
+left join groupings on  groupings.userId=users.userId
+left join InOutBoard on groupings.groupId=InOutBoard.inOutGroup
 left join userProfileData a on users.userId=a.userId and a.fieldName='firstName'
 left join userProfileData b on users.userId=b.userId and b.fieldName='lastName'
 left join userProfileData c on users.userId=c.userId and c.fieldName='department'
 left join InOutBoard_status on users.userId=InOutBoard_status.userId and InOutBoard_status.assetId=".quote($self->getId())."
-where users.userId<>'1' and groupings.groupId=InOutBoard.inOutGroup and groupings.userId=users.userId and InOutBoard.inOutGroup=".quote($self->get("inOutGroup"))."
+where users.userId<>'1' and InOutBoard.inOutGroup=".quote($self->get("inOutGroup"))."
 group by userId
 order by department, lastName, firstName";
 
@@ -447,7 +449,8 @@ InOutBoard_statusLog.dateStamp,
 InOutBoard_statusLog.createdBy, 
 c.fieldData as department,
 groupings.groupId
-from users, InOutBoard, groupings
+from users
+left join groupings on groupings.userId=users.userId
 left join userProfileData a on users.userId=a.userId and a.fieldName='firstName'
 left join userProfileData b on users.userId=b.userId and b.fieldName='lastName'
 left join userProfileData c on users.userId=c.userId and c.fieldName='department'