diff --git a/应收应付(YSYF.dll)/U_YSMXlist.dfm b/应收应付(YSYF.dll)/U_YSMXlist.dfm
index 5e6eb46..6da1162 100644
--- a/应收应付(YSYF.dll)/U_YSMXlist.dfm
+++ b/应收应付(YSYF.dll)/U_YSMXlist.dfm
@@ -1,7 +1,7 @@
 object frmYSMXlist: TfrmYSMXlist
-  Left = 173
-  Top = 272
-  Width = 1341
+  Left = 196
+  Top = 169
+  Width = 1314
   Height = 559
   Caption = #24212#25910#23545#36134#20449#24687#34920
   Color = clBtnFace
@@ -21,7 +21,7 @@ object frmYSMXlist: TfrmYSMXlist
   object ToolBar1: TToolBar
     Left = 0
     Top = 0
-    Width = 1325
+    Width = 1306
     Height = 31
     ButtonHeight = 30
     ButtonWidth = 59
@@ -78,7 +78,7 @@ object frmYSMXlist: TfrmYSMXlist
   object Panel1: TPanel
     Left = 0
     Top = 31
-    Width = 1325
+    Width = 1306
     Height = 38
     Align = alTop
     BevelInner = bvRaised
@@ -127,6 +127,13 @@ object frmYSMXlist: TfrmYSMXlist
       Height = 12
       Caption = #23458#25143
     end
+    object Label7: TLabel
+      Left = 500
+      Top = 14
+      Width = 48
+      Height = 12
+      Caption = #25351#31034#21333#21495
+    end
     object MPRTCodeName: TEdit
       Tag = 2
       Left = 726
@@ -186,7 +193,7 @@ object frmYSMXlist: TfrmYSMXlist
     end
     object factoryName: TEdit
       Tag = 2
-      Left = 364
+      Left = 356
       Top = 9
       Width = 120
       Height = 20
@@ -194,13 +201,23 @@ object frmYSMXlist: TfrmYSMXlist
       OnChange = MPRTCodeNameChange
       OnKeyPress = factoryNameKeyPress
     end
+    object Edit1: TEdit
+      Tag = 2
+      Left = 556
+      Top = 9
+      Width = 120
+      Height = 20
+      TabOrder = 6
+      OnChange = MPRTCodeNameChange
+      OnKeyPress = factoryNameKeyPress
+    end
   end
   object cxGrid2: TcxGrid
     Left = 0
     Top = 69
-    Width = 1325
-    Height = 444
-    Align = alTop
+    Width = 1306
+    Height = 459
+    Align = alClient
     TabOrder = 2
     object TV1: TcxGridDBBandedTableView
       Navigator.Buttons.CustomButtons = <>
@@ -228,6 +245,10 @@ object frmYSMXlist: TfrmYSMXlist
         end
         item
           Kind = skSum
+        end
+        item
+          Kind = skSum
+          Column = TV1Column1
         end>
       DataController.Summary.SummaryGroups = <>
       OptionsCustomize.ColumnFiltering = False
@@ -415,8 +436,8 @@ object frmYSMXlist: TfrmYSMXlist
     end
   end
   object Panetime: TPanel
-    Left = 318
-    Top = 164
+    Left = 286
+    Top = 244
     Width = 185
     Height = 41
     BevelInner = bvRaised
diff --git a/应收应付(YSYF.dll)/U_YSMXlist.pas b/应收应付(YSYF.dll)/U_YSMXlist.pas
index fb9f0a1..bdcb89b 100644
--- a/应收应付(YSYF.dll)/U_YSMXlist.pas
+++ b/应收应付(YSYF.dll)/U_YSMXlist.pas
@@ -83,6 +83,8 @@ type
     V1Column23: TcxGridDBBandedColumn;
     TV1Column1: TcxGridDBBandedColumn;
     TV1Column3: TcxGridDBBandedColumn;
+    Label7: TLabel;
+    Edit1: TEdit;
     procedure FormDestroy(Sender: TObject);
     procedure FormClose(Sender: TObject; var Action: TCloseAction);
     procedure TBCloseClick(Sender: TObject);