Quintiq file version 2.0
|
#parent: #root
|
Method CanDelete () as String id:Method_FormKBManagement_CanDelete
|
{
|
#keys: '[11660.0.90540992]'
|
Body:
|
[*
|
//Check whether KB can be deleted
|
feedback := '';
|
|
strings := StringListKnowledgeBase.GetSelectedLine().Tokenize( ':');
|
if (strings.Size() = 0 )
|
{
|
feedback := 'No record is selected'
|
}
|
else if (strings.Size() = 4 )
|
{
|
name := strings.Element( 0 );
|
branch := strings.Element( 1 );
|
inuse := strings.Element( 3 );
|
|
if (name = ScenarioManager.CompanyKBName() and branch = GlobalParameters_MP::GetKB() )
|
{
|
feedback := 'Cannot delete the default knowledgebase instance, name=' + ScenarioManager.CompanyKBName() + ', branch=KB'
|
}
|
else if ( [Number]inuse > 0 )
|
{
|
feedback := 'This KB is in use by other scenarios. Some of the scenarios may not be visible to this usergroup.';
|
}
|
|
}
|
|
return feedback;
|
*]
|
}
|
