admin
2025-01-15 a8b49e963c749cbbcac029fa228d96e4056d501e
_Main/BL/Type_AOnlineAndMOfflinePlanPIR/StaticMethod_GenerateData.qbl
@@ -8,7 +8,8 @@
  Date startdate,
  Date enddate,
  String executor,
  String feedback
  String feedback,
  Boolean isPush
) as InterfaceLoginfo
{
  TextBody:
@@ -65,7 +66,7 @@
          if( not exists( productids, Elements, e, e = row.ProductID() ) ){
            productids.Add( row.ProductID() );
          }
          pirdata          := selectobject(  pir, PIRData, pirdata, pirdata.Product() = row.ProductID() and pirdata.PlanningDate() = column.StartDate() );
          pirdata          := select( pir, PIRData, pirdata, pirdata.Product() = row.ProductID() and pirdata.PlanningDate() = column.StartDate() );
          if( isnull( pirdata ) ){
            pirdata        := pir.PIRData( relnew, Product := row.ProductID(), PlanningDate := column.StartDate(), PlanningQty := 0, Werk := rowwerk );
          }
@@ -91,7 +92,11 @@
      }
    }
    loginfo.TotalRow( pir.PIRData( relsize ) );
    feedback             := AOnlineAndMOfflinePlanPIR::Publish( owner, loginfo );
    if ( isPush ) {
      feedback             := AOnlineAndMOfflinePlanPIR::Publish( owner, loginfo );
    }
    return loginfo;
  *]
}