lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
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
Quintiq file version 2.0
#parent: #root
Method EnableDisableManufactureDate () id:Method_DialogCreateEditActualPISPIP_EnableDisableManufactureDate
{
  #keys: '[136682.1.1100624445]'
  Body:
  [*
    
    product := SelectionProduct.Data();
    stockingpoint := SelectionStockingPoint.Data();
    pispspec := select( product, PISPSpecification, pisp, pisp.StockingPoint_MP() = stockingpoint );
    
    hasshelflife := ( guard( product.HasShelfLife()
                      or product.HasMaturation(), false ) ) and guard( not pispspec.IsExcludeShelfLifeAndMaturation(), true );
                      
    isEnableManufacture := hasshelflife and not ValueHolderIsBatchEdit.Data();                 
    
    GUIDateSelectorManufacturedDate.Enabled( isEnableManufacture );
    
    if ( isEnableManufacture  )  
    {
      manufaturedate := Dialog.Data().ManufacturedDate();
      if( manufaturedate.IsInfinite() )
      {
        manufaturedate := GUIDateTimeSelectorDate.DateTime().Date(); 
      } 
      GUIDateSelectorManufacturedDate.DateTime( manufaturedate.DateTime() );
    }
  *]
}