实际发运数据报表调整

lazhen

2024-12-11 f259326e9055b18b369a14d4b49e6e9af37ae749

实际发运数据报表调整

 _Main/BL/Type_ShippingActualData/Method_SyncTable.qbl

@@ -8,7 +8,9 @@
  [*
    // ç”„兰鸽 Nov-27-2024 (created)
    column                := selectobject( owner, ShippingActualColumn, column, column.StartDate() = this.DDay() );
    cell                  := selectobject( column, ShippingActualCell, cell, cell.ShippingActualRow().Name() = this.FourCode() );
    cell.Quantity( this.Quantity() );
    cells                 := selectset( column, ShippingActualCell, cell, cell.ShippingActualRow().Name() = this.FourCode() );
    traverse( cells, Elements, e ){
    e.Quantity( this.Quantity() );
    }
  *]
}

 _Main/BL/Type_ShippingActualData/StaticMethod_Sync.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,29 @@
Quintiq file version 2.0
#parent: #root
StaticMethod Sync (
  InterfaceDataset owner
)
{
  TextBody:
  [*
    // ç”„兰鸽 Dec-11-2024 (created)
    owner.ShippingActualRow( relflush );
    traverse( owner, InterfaceLoginfo.ShippingActualData, data ){
      column        := selectobject( owner, ShippingActualColumn, column, column.StartDate() = data.DDay() );
      row           := selectobject( owner, ShippingActualRow, row, row.Name() = data.FourCode() and row.Fac() = data.Fac() );
      if( isnull( row ) ){
        row          := owner.ShippingActualRow( relnew, Name := data.FourCode(), Fac := data.Fac() );
      }
      cell := row.ShippingActualCell( relnew, Quantity := data.Quantity() );
      column.ShippingActualCell( relinsert, cell );
    }
    traverse( owner, ShippingActualColumn, sacolumn ){
      traverse( owner, ShippingActualRow, row ) {
        if( not exists( row, ShippingActualCell, cell, cell.ShippingActualColumn() = sacolumn ) ){
          cell := row.ShippingActualCell( relnew, Quantity := 0 );
          sacolumn.ShippingActualCell( relinsert, cell );
        }
      }
    }
  *]
}

 _Main/BL/Type_ShippingActualData/StaticMethod_Synchronize.qbl

@@ -53,15 +53,23 @@
      }
      beforerowsize := owner.ShippingActualRow( relsize );
      traverse( sadatalist, Elements, e ){
        row := selectobject( owner, ShippingActualRow, row, row.Name() = e.FourCode() );
        row := selectobject( owner, ShippingActualRow, row, row.Name() = e.FourCode() and row.Fac() = e.Fac() );
        if( isnull( row ) ){
          row := owner.ShippingActualRow( relnew, Name := e.FourCode() );
          row := owner.ShippingActualRow( relnew, Name := e.FourCode(), Fac := e.Fac() );
        }
        
        cell := row.ShippingActualCell( relnew, Quantity := e.Quantity() );
        column.ShippingActualCell( relinsert, cell );
      }
      if( beforerowsize <> owner.ShippingActualRow( relsize ) ){
        traverse( owner, ShippingActualColumn, sacolumn ){
          traverse( owner, ShippingActualRow, row ) {
            if( not exists( row, ShippingActualCell, cell, cell.ShippingActualColumn() = sacolumn ) ){
              cell := row.ShippingActualCell( relnew, Quantity := 0 );
              sacolumn.ShippingActualCell( relinsert, cell );
            }
          }
        }
        rows := selectsortedset( owner, ShippingActualRow, row, row.Name() );
        nr    := 0;
        traverse( rows, Elements, e ){

 _Main/BL/Type_ShippingActualRow/Attribute_Fac.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,8 @@
Quintiq file version 2.0
#parent: #root
Attribute Fac
{
  #keys: '3[415136.0.1361530035][415136.0.1361530034][415136.0.1361530036]'
  Description: '工厂'
  ValueType: String
}

 _Main/BL/Type_ShippingActualRow/Attribute_ShowName.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,8 @@
Quintiq file version 2.0
#parent: #root
Attribute ShowName
{
  #keys: '3[415136.0.1361530045][415136.0.1361530044][415136.0.1361530046]'
  Description: '显示名称'
  ValueType: String
}

 _Main/BL/Type_ShippingActualRow/Function_CalcShowName.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,16 @@
Quintiq file version 2.0
#parent: #root
Function CalcShowName
{
  TextBody:
  [*
    // ç”„兰鸽 Dec-11-2024 (created)
    
    value := this.Name();
    if( this.Fac() <> '' ){
      value := this.Fac().Concat( '_' ).Concat( this.Name() );
    }
    
    this.ShowName( value );
  *]
}

 _Main/UI/MacroPlannerWebApp/Component_FormShippingActualData/Component_MatrixEditorTable.def

@@ -53,7 +53,7 @@
      ]
      Properties:
      [
        Legend: 'Name'
        Legend: 'ShowName'
        SortCriteria: 'RowNr'
        Taborder: 1
      ]