Formatando datas

Retorno de um campo data com formatos diferentes conforme parametrização desejada. Importante: O terceiro parâmetro da função (formato do retorno) somente é respeitado, caso o 2º parametro (tipo de data) seja falso (.F.) Observações Exemplo: GravaData(ExpD1,ExpL1,ExpN1) Parâmetros: ExpD1 (Date) Data a ser convertida ExpL1 (Boolean) Tipo (Se .T https://impotenzastop.it., apresenta data utilizando barra, se .F., não apresenta a barra) ExpN1 (Integeger) Formato do retorno Sendo: 1 = ddmmaa 2 = mmddaa 3 = aaddmm 4 = aammdd 5 = ddmmaaaa 6 = mmddaaaa 7 = aaaaddmm 8 = aaaammdd

dData := GravaData(ExpD1,ExpL1,ExpN1)