limj
2023-09-21 89c96171bb971dcaed7cf289b58ef44ca689523c
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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Quintiq file version 2.0
#parent: #root
StaticMethod TestData (
  MPSync mpSync,
  MacroPlan macroPlan
)
{
  TextBody:
  [*
    // yypsybs Sep-20-2023 (created)
    
    info( "MPSync::TestData" );
    
    productCodeList := selectuniquevalues( macroPlan, Product_MP, item, item.ID() );
    
    info( "productCodeList : " + [String]productCodeList.Size() );
    
    mpSync.MappingCapacityAndSaleBudge( relflush );
    for( i := 1; i <= productCodeList.Size(); i := i + 1 ) {
      productCode := productCodeList.Element( i - 1 );
      mappingCapacityAndSaleBudge := mpSync.MappingCapacityAndSaleBudge( relnew, 
                                                                         ProductCode := productCode,
                                                                         BusinessType := "事业部" + [String](productCode.Length() mod 3 + 1), 
                                                                         PlaceOfProductionOfArray := "面板基地" + [String](productCode.Length() mod 4 + 1)
                                                                          );
      for( month := 1; month <= 12; month := month + 1 ) {
        field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInPCSInMonth" + [String]month );
        field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
        field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "CapacityInSheetInMonth" + [String]month );
        field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
        field := Reflection::FindAttribute( "MappingCapacityAndSaleBudge", "SaleAmountInMonth" + [String]month );
        field.Set( mappingCapacityAndSaleBudge, Real::Random( 20.0, 30.0 ) );
      }
      mappingCapacityAndSaleBudge.CapacityInPCSTotal( mappingCapacityAndSaleBudge.GetCapacityInPCSInYear() );
      mappingCapacityAndSaleBudge.CapacityInSheetTotal( mappingCapacityAndSaleBudge.GetCapacityInSheetInYear() );
      mappingCapacityAndSaleBudge.SaleAmountTotal( mappingCapacityAndSaleBudge.GetSaleAmountInYear() );
    }
    
    result := selectset( mpSync, MappingCapacityAndSaleBudge, item, true );
    
    info( "MappingCapacityAndSaleBudge size : " + [String]result.Size() );
  *]
}