Changeset 819 for cprs/branches/tmg-cprs/CPRS-Chart/fPtSel.pas

Timestamp:

Jul 2, 2010, 7:54:17 PM (14 years ago)

Author:

Kevin Toppenberg

Message:

Fixed crash on non-login

File:

• cprs/branches/tmg-cprs/CPRS-Chart/fPtSel.pas (modified) (1 diff)

cprs/branches/tmg-cprs/CPRS-Chart/fPtSel.pas

@@ -752 +752 @@
               AFollowUp := StrToIntDef(Piece(Piece(x, U, 3), ';', 1), 0);
               Notifications.Add(ADFN, AFollowUp, RecordID + '^^' + Piece(x, U, 3));
-              enableclose := true;
-            end
+
+             enableclose := true;
+          end
           else
             DeleteAlert(XQAID);