陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Quintiq file version 2.0
#parent: #root
Method GetShelflifeInventoryAge (
  ShelfLife shelflife
) as String
{
  Description: 'Return age of the inventory in string'
  TextBody:
  [*
    str := ShelfLife::GetShelfLifeDetails( shelflife.ShelfLifeEndQuantityVectorAsBinaryValue(), shelflife.ShelfLifeEndAgeVectorAsBinaryValue() ).ToString( "|");
    agequantity := str.Tokenize( "(" );
    agestr := guard( agequantity.Element( 1 ).ReplaceAll( ")", ""), "" );
    
    return agestr;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}