diff --git a/贸易管理/TradeManage.dof b/贸易管理/TradeManage.dof
index def4da0..6605422 100644
--- a/贸易管理/TradeManage.dof
+++ b/贸易管理/TradeManage.dof
@@ -101,7 +101,7 @@ DebugSourceDirs=
 UsePackages=0
 [Parameters]
 RunParams=
-HostApplication=D:\�������Ŀ����\��Ŀ����\��С��\ó�׹���\testDll.exe
+HostApplication=D:\Dp7Repo\��Ŀ����\D7wmleixiaofu\ó�׹���\testDll.exe
 Launcher=
 UseLauncher=0
 DebugCWD=
diff --git a/贸易管理/U_CKProductBCPInList.dfm b/贸易管理/U_CKProductBCPInList.dfm
index 64c140e..8e56ef4 100644
--- a/贸易管理/U_CKProductBCPInList.dfm
+++ b/贸易管理/U_CKProductBCPInList.dfm
@@ -147,7 +147,8 @@ object frmCKProductBCPInList: TfrmCKProductBCPInList
         'PD'#33457#22411#31859#25968'+'#30721#25968
         'PD'#31859#25968'+'#30721#25968
         #26816#39564#30721#21333'('#28151#33394#25171#21253')'
-        #20108#32500#30721#30721#21333)
+        #20108#32500#30721#30721#21333
+        #27178#21521#25171#21253#30721#21333)
     end
     object TBClose: TToolButton
       Left = 801
diff --git a/贸易管理/U_CKProductBCPInList.pas b/贸易管理/U_CKProductBCPInList.pas
index a66c07a..0ef2801 100644
--- a/贸易管理/U_CKProductBCPInList.pas
+++ b/贸易管理/U_CKProductBCPInList.pas
@@ -1113,6 +1113,19 @@ begin
     SCreateCDS20(ADOQueryTemp, CDS_HZ);
     SInitCDSData20(ADOQueryTemp, CDS_HZ);
   end;
+  if trim(ComboBox1.Text) = '�������뵥' then
+  begin
+    with ADOQueryTemp do
+    begin
+      Close;
+      sql.Clear;
+      sql.add('exec P_Print_CKMDYDL_Bao ');
+      sql.add('@DName=' + quotedstr(Trim(DCode)));
+      Open;
+    end;
+    SCreateCDS20(ADOQueryTemp, CDS_HZ);
+    SInitCDSData20(ADOQueryTemp, CDS_HZ);
+  end;
   if trim(ComboBox1.Text) = '��ά���뵥' then
   begin
     with ADOQueryTemp do
diff --git a/贸易管理/U_CKProductBCPOutList.dfm b/贸易管理/U_CKProductBCPOutList.dfm
index b546302..00815bb 100644
--- a/贸易管理/U_CKProductBCPOutList.dfm
+++ b/贸易管理/U_CKProductBCPOutList.dfm
@@ -139,7 +139,8 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
         'PD'#33457#22411#31859#25968'+'#30721#25968
         'PD'#31859#25968'+'#30721#25968
         #26816#39564#30721#21333'('#28151#33394#25171#21253')'
-        #20108#32500#30721#30721#21333)
+        #20108#32500#30721#30721#21333
+        #27178#21521#25171#21253#30721#21333)
     end
     object ToolButton2: TToolButton
       Left = 673
diff --git a/贸易管理/U_CKProductBCPOutList.pas b/贸易管理/U_CKProductBCPOutList.pas
index 9c20775..d0d7f8b 100644
--- a/贸易管理/U_CKProductBCPOutList.pas
+++ b/贸易管理/U_CKProductBCPOutList.pas
@@ -1088,7 +1088,20 @@ begin
       sql.add('@DName=' + quotedstr(Trim(DCode)));
       Open;
     end;
-    SCreateCDS20(ADOQueryTemp, CDS_HZ);                          
+    SCreateCDS20(ADOQueryTemp, CDS_HZ);
+    SInitCDSData20(ADOQueryTemp, CDS_HZ);
+  end;
+  if trim(ComboBox1.Text) = '�������뵥' then
+  begin
+    with ADOQueryTemp do
+    begin
+      Close;
+      sql.Clear;
+      sql.add('exec P_Print_CKMDYDL_Bao ');
+      sql.add('@DName=' + quotedstr(Trim(DCode)));
+      Open;
+    end;
+    SCreateCDS20(ADOQueryTemp, CDS_HZ);
     SInitCDSData20(ADOQueryTemp, CDS_HZ);
   end;
   if trim(ComboBox1.Text) = '��ά���뵥' then
@@ -1101,7 +1114,7 @@ begin
       sql.add('@DName=' + quotedstr(Trim(DCode)));
       Open;
     end;
-    SCreateCDS20(ADOQueryTemp, CDS_HZ);                          
+    SCreateCDS20(ADOQueryTemp, CDS_HZ);
     SInitCDSData20(ADOQueryTemp, CDS_HZ);
   end;
   with ADOQueryTemp do