Retorna a data, a partir de uma string de oito caracteres, no formato ano, mês e dia (aaaammdd).
SToD ( < cData> ) --> dRet
| Nome | Tipo | Descrição | Obrigatório | Referência |
| cData | Caracter | Indica a data no formato ano, mês e dia (aaaammdd). | X |
dRet
- (data)
- Retorna a data convertida em oito caracteres.
#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local dData := SToD("20050216")
Local cMensagem := "Data em que entrou em vigor o tratado de Kyoto: "
//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função SToD |
//+----------------------------------------------------------------------------+
cMensagem += DToS(dData) + " [" + ValType(dData) + "]"
//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos |
//+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do SToD")Exemplo da função SToD
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server