PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  ADVPL
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
Treports - Conversão de data
Versão:
12.1.17
Plataforma:
Microsoft
Complemento:
DB:
Oracle
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário LHC LHC em 13/02/2020, 14:44 h
Local: ES  Registro: 11/05/2013  Postagens: 49
Senhores alguém que saiba como converter uma data da linha:

No meu caso meu código está assim:

TRCell():New( oSecCab, "RD_DATPGT"    , "SQL")

Ele retorna o campo RD_DATPGT ex: 20191231 (aaaammdd)

Tem alguma forma de converter para dd/mm/aaaa?


Atenciosamente

Mensagem do Enviar e-mail Abrir o Perfil do usuário AGMC AGMC em 13/02/2020, 16:54 h
Local: AC  Registro: 04/07/2014  Postagens: 262
Boa tarde, verifica se te atende:

https://tdn.totvs.com/pages/viewpage.action?pageId=23889348

Atenciosamente,

Alan Gustavo
Grupo Miragina
skype:alan_miragina

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário LHC LHC em 13/02/2020, 17:02 h
Local: ES  Registro: 11/05/2013  Postagens: 49
mano pior que já olhei isso e já tentei inserir isso de varias maneiras mais sem sucesso, to na esperança de que alguém que já tenha passado por isso na hora de montar ela na TRCell possa dar a luz ai.

Atenciosamente,

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário EMERSON.EN EMERSON.EN em 13/02/2020, 17:08 h
Local: SP  Registro: 20/08/2010  Postagens: 670
publique as maneiras que você tentou.

uma sugestão:
TRCell():New( oSecCab, "DTOC(STOD(RD_DATPGT))", "SQL")


Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário VRTN VRTN em 13/02/2020, 18:05 h
Local: MG  Registro: 09/11/2009  Postagens: 191
Aparentemente esse campo está vindo de uma query.
Se você não estiver usando o Embedded SQL, você precisa converter o seu campo para o tipo data:

Após a execução da query faça o seguinte:

TCSetField("ALIAS_DA_SUA_QUERY", "RD_DATPGT", "D", 8, 0)

Everton Alves

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário LHC LHC em 14/02/2020, 07:58 h
Local: ES  Registro: 11/05/2013  Postagens: 49
Desse jeito: TRCell():New( oSecCab, "DTOC(STOD(RD_DATPGT))", "SQL")
Ele imprime no cabeçalho: DTOC(STOD(RD_DATPGT)) e não retorna nada nas celulas.


A dica do Amigo Everton ajudou bastante e deu certo!

Só tive que acrescentar a minha query a linha:
column RD_DATPGT as Date

e ajustar para: TCSetField(cAlias, "RD_DATPGT", "D", 8, 0)


Obrigado senhores. Resolvido.
Se alguém passar por isso tá aê a resolução.

https://tdn.totvs.com/display/framework/Embedded+SQL

Abraços.



Atenciosamente,
Luis Henrique

Para postar no Fórum você precisa efetuar o seu login ou se registrar

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal