GetDate (exp)

function GetDate():TDatetime;

Type
  VueSoldeComptePeriode = viewOf(TCumulPeriodeCompte,ISoldeCompte)
    //solde:Currency = sumDiff(creditTenue,debitTenue);
    credit:Currency = creditTenue;
    debit:Currency = debitTenue;
    typeLot:Integer = typeLot; 
    codeCompte:string = compteGeneral.codeCompte;
    captionCompte:string = compteGeneral.Caption;
    sensCompte:Integer = compteGeneral.sensPrivilegie; 
    norme:string = normeComptable.code; 
    dateFin:Tdatetime = Periode.dateFin notInSelect;
    [dateFin < GetDate] 
  end;