admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
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 );
        }
      }
    }
  *]
}