装配上线计划+机加下线计划筛选

lazhen

2024-08-27 d4d53b863bec6b836baff0f6f50131d8223cca4d

 _Main/BL/Type_AOnlineAndMOfflinePlanMS64/StaticMethod_GenerateData.qbl

@@ -5,8 +5,8 @@
  String werk,
  Date startdate,
  Date enddate,
  const MacroPlan macroplanfrom,
  const MacroPlan macroplanto,
  String versionfrom,
  String versionto,
  Boolean versionflag,
  const Product_MPs products,
  String executor
@@ -37,8 +37,8 @@
                                                      , Success := true
                                                      );
    ms64                   := owner.AOnlineAndMOfflinePlanMS64( relnew, Werk := werk, StartDate := startdate, EndDate := enddate
                                                                , VersionFrom := macroplanfrom.ScenarioName()
                                                                , VersionTo := macroplanto.ScenarioName(), IsActive := versionflag );
                                                                , VersionFrom := versionfrom
                                                                , VersionTo := versionto, IsActive := versionflag );
    loginfo.AOnlineAndMOfflinePlanMS64( relinsert, ms64 );
    traverse( products, Elements, product, product.IsLeaf() ){
      ms64.MS64Data( relnew, Product := product.ID() );