wdtki=transform(day(DTINICIO),"@L 99") wdtki=wdtki+ transform(month(DTINICIO),"@L 99") wdtki=wdtki+ substr(transform(year(DTINICIO),"@L 9999"),3,2) * wdtkf=transform(day(DTFIM),"@L 99") wdtkf=wdtkf+transform(month(DTFIM),"@L 99") wdtkf=wdtkf+substr(transform(year(DTFIM),"@L 9999"),3,2) wText=wdtki+ "|" +wdtkf+ "|I" Comando = Chr(27) + "|08|" + wText + "|" + Chr(27) Retorno = FormataTX(Comando)Diga-me se lhe ajudou ok ?