Frontol акция 4+1 на группы товаров : Frontol

function D(curpos)                           
{  
flag=0;
for (
curpos.ware.parent.index = 1;
curpos.ware.parent.index <=
curpos.ware.parent.count;
curpos.ware.parent.index++
)
{
if (curpos.ware.parent.code==КодГруппыТоваровСоскидками)
{
flag=1;
break;
}
}
if (flag==0) return 0;

warecode=curpos.ware.code;


n=5; //на пятый скидка
disc=100; //скидка 100%                    
num=0;
quantity=0;

position=frontol.currentDocument.position;
for (
position.index = 1;
position.index <=
position.count;
position.index++
)
{
if (position.ware.code==warecode)&&(position.index<curpos.index)
{
quantity=quantity+position.quantity; 
}
if (position.index==curpos.index)
{
curquantity=position.quantity-(n-quantity%n); 
if (curquantity>=0)
{
num=1+(curquantity-curquantity%n)/n;
}

}
}

return num*disc/curpos.quantity;
}