Realiza a conversão do formato da data conforme o tipo definido.
Parâmetros
Nome | Tipo | Descrição |
---|---|---|
xData | Data / Caracter | Data base que será convertida. |
nTipo | Numérico | Tipo de conversão. Serão aceitos os seguintes parâmetros: 1 (Tipo data para caracter no formato DD/MM/AAAA), 2 (Tipo caracter no formato AAAA-MM-DD para AAAAMMDD), 3 (Tipo caracter no formato AAAA-MM-DD para DD/MM/AAAA), 4 (Tipo caracter no formato AAAAMMDD para AAAA-MM-DD), 5 (Tipo caracter no formato AAAAMMDD para DD/MM/AAAA). |
Retorno
Tipo | Descrição |
---|---|
caracter | Data no formato especificado pelo parâmetro nTipo. |
Exemplo de Uso
User Function formatData() Local lRet := .T. Local xDtOrig := Nil Local cDtDest := "" Set(_SET_DATEFORMAT, 'dd/mm/yyyy') ConOut(REPLICATE("-",70)) xDtOrig := cToD("31/10/2023") cDtDest := PCPMonitorUtils():FormataData(xDtOrig,1) ConOut("Tipo 1: " + cDtDest) //Tipo 1: 31/10/2023 xDtOrig := "2023-10-31" cDtDest := PCPMonitorUtils():FormataData(xDtOrig,2) ConOut("Tipo 2: " + cDtDest) //Tipo 2: 20231031 xDtOrig := "2023-10-31" cDtDest := PCPMonitorUtils():FormataData(xDtOrig,3) ConOut("Tipo 3: " + cDtDest) //Tipo 3: 31/10/2023 xDtOrig := "20231031" cDtDest := PCPMonitorUtils():FormataData(xDtOrig,4) ConOut("Tipo 4: " + cDtDest) //Tipo 4: 2023-10-31 xDtOrig := "20231031" cDtDest := PCPMonitorUtils():FormataData(xDtOrig,5) ConOut("Tipo 5: " + cDtDest) //Tipo 5: 31/10/2023 ConOut(REPLICATE("-",70)) Return lRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas