Передать переменную

[srg]

Вопрос такого характера..

сделал на реквест форме построение отчета по периодам

вот код

Col:=3;
CASE PeriodType OF
 PeriodType::Day:
   Formula:='<1D>';
 PeriodType::Week:
   Formula:='<1W>';
 PeriodType::Month:
   Formula:='<1M>';
 PeriodType::Quarter:
   Formula:='<1Q>';
 PeriodType::Year:
   Formula:='<1Y>';
END;

REPEAT
 CASE PeriodType OF
  PeriodType::Day:
    DateText:=FORMAT(CurDate);
  PeriodType::Week:
    DateText:=FORMAT(CurDate,7,'<Week>.<Year4>');
  PeriodType::Month:
    DateText:=FORMAT(CurDate,12,'<Month Text,3> <Year4>');
  PeriodType::Quarter:
    DateText:=FORMAT(CurDate,7,'<Quarter>/<Year4>');
  PeriodType::Year:
    DateText:=FORMAT(DATE2DMY(CurDate,3));
 END;

Но появилась иная задача, и как реализовать вообще хз.
мне нужно вот эти периоды, получать с самой формы и передавать себе в отчет уже.