发送报表数据

lazhen

2024-11-06 20bac026b51b5d6572a6107ef09397288bbc6dd8

发送报表数据

 _Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl

@@ -3,8 +3,7 @@
StaticMethod GenerateData (
  InterfaceDataset interfaceDataset,
  const MacroPlan macroplan,
  String executor,
  Boolean versionflag
  String executor
)
{
  Description: '生成可以下发的客户需求（PPA+IDS）数据'
@@ -38,7 +37,7 @@
                                                                     , DemandQty               := [Number]cell.Value()
                                                                     , VersionName             := macroplan.ScenarioName()
                                                                     , InterfaceTime           := nowdate
                                                                     , VersionFlag             := versionflag
    //                                                                 , VersionFlag             := versionflag
                                                                     );
        loginfo.CustomerDemandPPAIDS( relinsert, cd );
      }

 _Main/BL/Type_InterfaceDataset/Method_PublishPlanReportData.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,33 @@
Quintiq file version 2.0
#parent: #root
Method PublishPlanReportData (
  const MacroPlan macroplan,
  Boolean iscustomdemand,
  Boolean isofflineplan,
  Boolean isshiftplan,
  Boolean isassembleonlineplan,
  Boolean isinventoryplan,
  String executor
)
{
  Description: '下发计划数据'
  TextBody:
  [*
    // ç”„兰鸽 Oct-30-2024 (created)
    if( iscustomdemand ){//全年日度需求/客户需求 
      CustomerDemandPPAIDS::GenerateData( this, macroplan, executor );
    }
    if( isofflineplan ){//各产线下线计划
    //  OfflinePlanArchiveVersion::RefreshData( this, macroplan, archive );
    }
    if( isshiftplan ){//班次计划
    //  CustomerDemandIDS::GenerateData( this, recyclebin, archive );
    }
    if( isassembleonlineplan ){//装配上线计划
    //  AssemblyOnlinePlanVersion::RefreshData( this, macroplan );
    }
    if( isinventoryplan ){//库存计划
    //  CustomerDemandIDS::GenerateData( this, recyclebin, archive );
    }
  *]
}

 _Main/UI/MacroPlannerWebApp/Component_DialogCustomerDemandPPAIDS/Method_OnOK.def

@@ -11,7 +11,7 @@
    currentuser  := QuintiqUser::CurrentUser().DisplayName();
    isactive     := ifexpr( rbgVersionFlag.BoundValue() = "true", true, false );
    if( efInterfacename.Text() = Translations::InterfaceDataset_CustomerDemandPPAIDS_Name() ){//客户需求
      CustomerDemandPPAIDS::GenerateData( InterfaceDataset, MacroPlan, currentuser, isactive );
      CustomerDemandPPAIDS::GenerateData( InterfaceDataset, MacroPlan, currentuser );
    }
    if( efInterfacename.Text() = Translations::InterfaceDataset_AssemblyOnlinePlanPPPSPush_Name()){//装配上线
      AssemblyOnlinePlanPPPSPush::GenerateData( MacroPlan, InterfaceDataset, currentuser, isactive );

 _Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def

@@ -26,8 +26,14 @@
      }
    
      showlabel := showlabel.Concat( plannames.Concatenate( "、" ) ).Concat( '？' );
    
    currentuser  := QuintiqUser::CurrentUser().DisplayName();
      if( WebMessageBox::Question( this, showlabel, 'OK|Cancel' ) = 0 ){
        InterfaceDataset.PublishPlanReportData( MacroPlan, cbCustomDemand.Checked()
                                              , cbOfflinePlan.Checked()
                                              , cbShiftPlan.Checked()
                                              , cbAssembleOnlinePlan.Checked()
                                              , cbInventoryPlan.Checked()
                                                , currentuser );
      }
    
    this.Close();