lazhen
2024-11-07 98666fb3add2c1b2529318d1aec463c7360f2be3
_Main/BL/Type_InterfaceDataset/StaticMethod_PushPlanInventoryData.qbl
@@ -2,7 +2,8 @@
#parent: #root
StaticMethod PushPlanInventoryData (
  const MacroPlan macroPlan,
  InterfaceDataset interfaceDataset
  InterfaceDataset interfaceDataset,
  String executor
)
{
  Description: '发送计划库存数据接口'
@@ -10,7 +11,8 @@
  [*
    table         := selectobject( interfaceDataset, InventoryPlanArchiveVersion, version, not version.IsShow() );
    
    interfaceTime := DateTime::ActualTime().Format( "Y-M2-D2 h2:m:s" );
    totalRow      := 0;
    interfaceTime := DateTime::ActualTime().Format( "Y-M2-D2 H2:m:s" );
    
    jsonarray     := JSON::Array();
    
@@ -27,19 +29,23 @@
                                   .Add( "fac", ifexpr( r.Unit().Regex( "CC" ), "CC", "DL" ) )
                                   .Add( "interfaceTime", interfaceTime ).Build();
          jsonarray.Add( idsjson );
          totalRow++;
        }
      }
    }
    
    requestbody := jsonarray.Build().AsString();
    info(  requestbody );
    //loginfo := owner.InterfaceLoginfo( relnew, ExecuteUser := executor
    //                                   , Name := Translations::InterfaceDataset_CustomerDemandPPAIDS_Name()
    //                                   , InterfaceDateTime := DateTime::ActualTime()
    //                                   , Message := '客户需求(PPA+IDS)'
    //                                   , RequestBody := requestbody);
    ////error( '--------------------', requestbody );
    //data     := InterfaceLoginfo::CallInterfaceForDataCenter( owner, loginfo );
    //info( '----------------', data.AsString() );
    //info(  requestbody );
    loginfo := interfaceDataset.InterfaceLoginfo( relnew,
                                                  ExecuteUser       := executor,
                                                  Name              := "Plan inventory data",
                                                  InterfaceDateTime := DateTime::ActualTime(),
                                                  Message           := "计划库存数据",
                                                  RequestBody       := requestbody,
                                                  TotalRow          := totalRow );
    InterfaceLoginfo::CallInterfaceForDataCenter_PlanInventory( interfaceDataset, loginfo );
  *]
}