Код: Выделить всё
Interface TMCmove 'Параметры отчета';
Show at (1,1,40,10);
Create view TMCmoveview 
var
 Begdate,EndDate: Date;
as select *
from 
  GroupParty, Katparty, SpOrder,KatSopr, SklOrder
where((
         1111111111        == GroupParty.Kod and 
         GroupParty.nRec   == Katparty.cGroupParty and 
         KatParty.nRec     == SpOrder.cParty and 
         SpOrder.cSklOrder == SklOrder.nRec and 
         SklOrder.cSopr    == KatSopr.nrec and
         KatMc.nRec        == SpOrder.cMc
        // begdate          <<= sporder.dord and
        // enddate          >>= sporder.dord
          
     ));
Form frm_TMCmove ('TMCmove.out','TMCmove');
Screen TMCmove;
Fields
  begdate ('Введите начальную дату'): [,'DD/MM/YYYY'],noprotect;
  enddate ('Введите конечную дату'): [,'DD/MM/YYYY'],noprotect;
Buttons
  cmOk, default,,'OK';
  cmCancel,,,'Отмена';
  <<
  Начало периода .@@@@@@@@@@
  Конец периода  .@@@@@@@@@@
  <.Принять.>      <.Выход.>   
  
  >>
end;// Screen
Что это такое и вообще.. я в правильном направлении или нет