[moid]

PHP код:

static Date WeekSel(date _date, int Coun, str ST)
{
    int a;
    ;
    if(strRightPos(ST,'1') > dayofwk(_date))
    {
       for(a=1; a<=7; a++)
       {
         if((Substr(ST,a,1) == "1") && a > dayofwk(_date)) //есть выбранный день
         {
            return (mkdate(dayofmth(_date)+ a-dayofwk(_date), mthofyr(_date), year(_date)));
         }
       }
    }
    else
      return(((_date) + 7*Coun) - dayofwk(_date) + strLeftPos(ST,'1'));
}