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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
Quintiq file version 2.0
#parent: #root
StaticMethod ValidateInput (
  output String feedback_o,
  output String sanitycheckfeedback_o,
  MacroPlan owner,
  SalesLevel_MP saleslevel,
  String name,
  Boolean checkunique
) declarative remote as Boolean
{
  Description: 'Validate if sales level has valid and unique name'
  TextBody:
  [*
    feedback_o := ''
    
    // Get the maximum allowed length of names
    maxnamelength := GlobalParameters_MP::GetLengthOfNames();
    
    // Check if name is unique
    if( checkunique
        and exists( owner, SalesLevel_MP, slevel,
                    slevel <> saleslevel,
                    slevel.Name() = name ) )
    {
      feedback_o := Translations::MP_SalesLevel_ValidateInput_IsNotUnique();
      sanitycheckfeedback_o := SanityCheckCategoryLevel::GetSanityCheckCategoryDataIssue();
    }
    // Check if the name is valid or the name's length is within the allowed length
    else if( name = '' or name.Length() > maxnamelength )
    {
      feedback_o := Translations::MP_SalesLevel_ValidateInput_InvalidName( maxnamelength );
      sanitycheckfeedback_o := SanityCheckCategoryLevel::GetSanityCheckCategoryDataWarning();
    } 
    
    // Add feedback text if any of the preconditions above are violated
    if( feedback_o <> '' )
    {
      slname := MacroPlan::GetSubstituteName( name );
      feedback_o := SanityCheckMessage::GetFormattedMessage( Translations::MP_SalesLevel_Instance( slname ),
                                                             feedback_o );
    }
    
    return feedback_o = '';
  *]
}