Переписать скрипт с Frontol 4 на Frontol 5

Прошу в предложениях указывать конкретную цену и срок.
Предложения и вопросы прошу задавать здесь (не в скайп и т.п.)

Необходимо переписать два скрипта. Для отладки предоставим удалённый доступ к POS-системе.

Начисление бонуса:
function BeforeAct(AO, RO, E)
{
}
function AfterAct(AO, RO, E)
{
  RO.Counter.AddValueByTypeCode(3, RO.SummWD * 0.0500);
  for(RO.Disc.Index = 1; RO.Disc.Index <= RO.Disc.Count; RO.Disc.Index++)
    if (RO.Disc.DiscRateCode == 7)
      RO.Counter.AddValueByTypeCode(3, -RO.Disc.Summ);
}

Оплата  бонусом:
function BeforeAct(AO, RO, E)          
{
  if ((E == 6) && (RO.Payment.PayCode == 3))
  {                                                   
    for(RO.Counter.Index = 1;                         
        RO.Counter.Index <=                           
        RO.Counter.Count;                             
        RO.Counter.Index++)                           
        {                                             
          if (RO.Counter.TypeCode == 3)
          {                                            
            if (RO.Counter.Value >= RO.Payment.PaySum)
              RO.Counter.AddValue(-RO.Payment.PaySum);
            else                                      
            {                                                     
              AO.ShowMessage("На счетчике недостаточно накоплений для оплаты!"); 
              AO.Cancel();                            
            }                                         
            return;                                   
          }                                           
        }                                             
    AO.ShowMessage("Данный вид оплаты недоступен!");  
    AO.Cancel();                                      
  }                                                 
  if ((E == 7) && (RO.Payment.PayCode == 3))
  {                                                 
    for(RO.Counter.Index = 1;                       
        RO.Counter.Index <=                         
        RO.Counter.Count;                           
        RO.Counter.Index++)                         
    {                                               
      if (RO.Counter.TypeCode == 3) 
        RO.Counter.AddValue(RO.Payment.PaySum);     
    }                                               
  }                                                 
}                                                   
  function AfterAct(AO, RO, E)  
{
}