Ocorreu um erro durante o Cálculo

[André]

Pessoal,
Estou tentando fazer um relatório o qual deve sair no cabeçalho o periodo que ele foi
gerado e sempre usei a seguinte expressão e funcionou bem:
Período: [MascData( [Data_Inicial],'dd/mm/yyyy')] à [MascData( [Data_Final],'dd/mm/yyyy')]
acontece que com atualização do xmaker 6,0 quando adiciono no cabeçalho agora dá a seguinte mensagem:
Ocorreu um erro durante o cálculo
Período: [MascData( [Data_Inicial],'dd/mm/yyyy')] à [MascData( [Data_Final],'dd/mm/yyyy')] Relatório:FrReport
Band: Cabeçalho de pagina.
Alguém poderia me a judar a respeito, não consigo achar o erro, e o interessante
que tenho no mesmo sistema varios relatórios funcionando perfeitamente com a mesma expressão.
atencosamente
André

[André]

Pessoal,
Agabei conferindo os relatórios e descobri que para sair a data no
relatório de ____ até _________ ,alem de por a expressão no cabeçalho do
relatório temos que fazer as auterações conforme abaixo senão ele não consegue
calcular:

Período: [MascData( [Data_Inicial],'dd/mm/yyyy')] à [MascData( [Data_Final],'dd/mm/yyyy')]


procedure TFormRel_0030.InicializaVariaveis;
begin
frVariables['Titulo'] := Sistema.Titulo;
frVariables['Versao'] := Sistema.Versao;
frVariables['Analista'] := Sistema.Analista;
frVariables['Programador'] := Sistema.Programador;
frVariables['Projetista'] := Sistema.Projetista;
frVariables['EstiloData'] := Sistema.EstiloData;
frVariables['SenhaInicial'] := Sistema.SenhaInicial;
frVariables['Pasta'] := Sistema.Pasta;
frVariables['Usuario'] := Sistema.Usuario;
frVariables['Senha'] := Sistema.Senha;
frVariables['Master'] := Sistema.Master;
frVariables['Grupo'] := Sistema.Grupo;
frVariables['NumeroUsr'] := Sistema.NumeroUsr;
frVariables['EmpresaUsr'] := Sistema.EmpresaUsr;
frVariables['EnderecoUsr'] := Sistema.EnderecoUsr;
frVariables['BairroUsr'] := Sistema.BairroUsr;
frVariables['CidadeUsr'] := Sistema.CidadeUsr;
frVariables['UfUsr'] := Sistema.UfUsr;
frVariables['CEPUsr'] := Sistema.CEPUsr;
frVariables['CNPJUsr'] := Sistema.CNPJUsr;
frVariables['IEUsr'] := Sistema.IEUsr;
frVariables['FonesUsr'] := Sistema.FonesUsr;
frVariables['LogoUsr'] := Sistema.LogoUsr;
frVariables['Titulo_1'] := Caption;
frVariables['Titulo_2'] := '';
frVariables['Data_Inicial'] := XDateEdit1.DateValue;
frVariables['Data_Final'] := XDateEdit2.DateValue;
if frReport.FindObject('Logomarca') <> nil then
if FileExists(Sistema.LogoUsr) then
TfrPictureView(frReport.FindObject('Logomarca')).Picture.LoadFromFile(Sistema.LogoUsr);
end;
Atenciosamente
André