Changeset 738 for cprs/branches/tmg-cprs/CPRS-Chart/rCover.pas

Timestamp:

Apr 19, 2010, 5:24:20 PM (14 years ago)

Author:

Kevin Toppenberg

Message:

Fixed Text Object Parameters

File:

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

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

@@ -404 +404 @@
     tmplst := TStringList.Create;
     try
-//    Done := Results.Values['~Done'] = '1';  <-- original line.  //kt 8/17/2007
-      Done := Results.Values[DKLangConstW('rCover_xDone')] = '1'; //kt added 8/17/2007
+      Done := Results.Values['~Done'] = '1';  //kt restored original line 4/15/10
+//      Done := Results.Values[DKLangConstW('rCover_xDone')] = '1'; //kt added 8/17/2007
       if SubListPresent('~PROB') then AssignList(DestProb, 'PROB');
       if SubListPresent('~CWAD') then AssignList(DestCWAD, 'CWAD');