Set up a Naming Rule Script

using System;
using Mincom.MineMarket.DAL;
using Mincom.MineMarket;
using System.Collections;
using Mincom.MineMarket.Server;
/* 
This file includes standard naming scripts for the following objects:
Version 1.0
Date last Modified : 16/07/2015 to compile and run with V4.7 MineMarket
Modified by : Datamine
Train TrainNaming : Using the following format R-YY-####
*/
/// <summary>
/// This is simply an example or template class and should not be used
/// </summary>
public class TrainNaming : INameGenerator
{
    public TrainNaming() { }
    /// <summary>
    /// Returns a list of strings describing the parameters required. Used for testing purposes mainly.
    /// This method is part of the required implementation of the INameGenerator interface
    /// </summary>
    /// <returns></returns>
    public string[] GetParameterMap()
    {
        return null;
    }
    /// <summary>
    /// Generates and returns a name based on a list of strings described in the GetParameterMap() function.
    ///    Mainly called by the script test form.
    /// This method is part of the required implementation of the INameGenerator interface
    /// </summary>
    /// <param name="paramList">The list of strings used to generate a name for an object in the same order that the GetName() function described them</param>
    public string GetName(string[] paramList)
    {
        return null;    
    }
    /// <summary>
    /// Generates the name of the "obj" BTBusinessObject. This method is called by the NameGenerator class.
    /// This method is part of the required implementation of the INameGenerator interface
    /// </summary>
    /// <param name="obj">The business object for which a name is required</param>
    /// <param name="info">The validation info object which may be null and allows validation messages to be returned if conditions are not met to generate a valid name</param>
    /// <param name="nameGenerated">Returns whether the name was generated by this script</param>
    public string GetName(BTNamedBusinessObject obj, ValidationInfo info, out ScriptResult scriptResult)
    {
        Train train = obj as Train;
        if (train != null && train.Route != null)
        {
            scriptResult = ScriptResult.NameGenerated;
            string trainName = "R-" + DateTime.Now.ToString("yy") + "-" ;

            ArrayList temp;
            Criteria crit1 = new Criteria(typeof(Train), "Name", QueryOperator.Like, trainName + "%");
            QueryBuilder qryb = new QueryBuilder(crit1,null);
            qryb.OrderByList.Add(new OrderByClause(typeof(Train), "Name", false));

            temp = Train.GetFactory().GetByCriteria(qryb);
            int number = 0;
            if (temp.Count > 0)
            {
                string nameTemp = ((Train)temp[0]).Name;
                int.TryParse(nameTemp.Substring(trainName.Length, 
                nameTemp.Length - trainName.Length),out number);
            }

            number++;
            trainName = trainName + number.ToString("0000");
            return trainName;
        }
        else if (info != null && train != null && train.Route == null) 
        {
            info.AddError(obj, "Train Route cannot be null");
        }

        scriptResult = ScriptResult.NameNotGenerated;
        return null;
    }
}