yypsybs
2023-09-19 bc27afe76dc7bfbb63c8d078d546b97746ebddde
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
Quintiq file version 2.0
#parent: #root
StaticMethod TestData (
  MacroPlan macroPlan
)
{
  TextBody:
  [*
    // yypsybs Sep-12-2023 (created)
    if( selectset( macroPlan, PRData, item, true ).Size() = 0 ) {
      info( "======== Create PR Test Data ========" );
      for( i := 0; i < 100; i := i + 1 ) {
        macroPlan.PRData( relnew,
                          MRPCalverNo := [String]Number::Random( 1, Number::MaxNumber() ),
                          BusinessType := [String]Number::Random( 1, Number::MaxNumber() ),
                          OrganCode := [String]Number::Random( 1, Number::MaxNumber() ),
                          ProductID := [String]Number::Random( 1, Number::MaxNumber() ),
                          StockingPointID := [String]Number::Random( 1, Number::MaxNumber() ),
                          Quantity := Number::Random( 1, Number::MaxNumber() ),
                          ProduceRequiredDate := Date::Construct( 2023,
                                                                  Number::Random( 9, 12 ),
                                                                  Number::Random( 13, 28 ) ),
                          DataID := [String]Number::Random( 1, Number::MaxNumber() ), 
                          SendStatus := ifexpr( Number::Random( 1, 5 ) = 1, "已发送", "" ) );     
      }
    }
  *]
}