~

打卷检验管理/U_JYOrderCDOne.pas

@@ -2372,7 +2372,8 @@ begin
     Close;                                             
     sql.Clear;
     sql.Add('Update JYOrder_Main Set DYXH=''' + Trim(CRID) + '''  ');
-    sql.Add('where mainid in ''' + Trim(FMainID) + '''');
+    sql.Add('where mainid='''+Trim(Order_Main.fieldbyname('mainID').AsString) +'''');
+//    ShowMessage(sql.text);
     ExecSQL;                            
   end;
 end;