From 11b179f35b54d33f8414ccaa815b5fa8313b7746 Mon Sep 17 00:00:00 2001
From: xiaoding721 <33130084+xiaoding721@users.noreply.github.com>
Date: 星期二, 29 十月 2024 17:41:45 +0800
Subject: [PATCH] 修复一些bug

---
 _Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_DispatchCC.qbl |   15 ++++++++-------
 1 files changed, 8 insertions(+), 7 deletions(-)

diff --git a/_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_DispatchCC.qbl b/_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_DispatchCC.qbl
index b516ba0..108d268 100644
--- a/_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_DispatchCC.qbl
+++ b/_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_DispatchCC.qbl
@@ -13,28 +13,29 @@
     datas := selectset( recycleBin,DispatchShiftSchedulingLine.DispatchShiftSchedulingProduct,object,object.DispatchShiftSchedulingLine().Fac() = "CC" );
     
     datas_Json := JSON::Array();
-    
-    traverse( datas,Elements,product ){
+    traverse( datas,Elements,product ,product.DispatchShiftSchedulingDetail( relsize ) <> 0 ){
       line := product.DispatchShiftSchedulingLine();
       
       data_Json := JSON::Object();
-      datas_Json.Add( data_Json );
-      
       data_Json.Add( "LineName" , line.LineName() );
       data_Json.Add( "ProductionDate",line.ShiftDate().Format( "Y-M2-D2" ));
       data_Json.Add( "shiftCode" , line.ShiftName() );
+      
       details_Json := JSON::Array();
-      data_Json.Add( "planItems",details_Json );
       traverse( product,DispatchShiftSchedulingDetail,detail ){
         detail_Json := JSON::Object();
-        details_Json.Add( detail_Json );
         detail_Json.Add( "ShiftName",detail.SingleShiftName() );
         detail_Json.Add( "Quantity",detail.ShiftVolume() );
         detail_Json.Add( "ProductNo",detail.DispatchShiftSchedulingProduct().ProductID() );
+        
+        details_Json.Add( detail_Json );
       }
+    
+      data_Json.Add( "planItems",details_Json );
+      datas_Json.Add( data_Json );
     }
     
-    info( datas_Json.AsString() );
+    info( datas_Json.Build().AsString() );
     
     i := HTTPInterface::Create( url, 80 );
     i.URL( url );

--
Gitblit v1.9.3