Imprimi Página | Fechar janela

Treports - Conversão de data

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: ADVPL
Descrição do Forum: Dúvidas sobre a programação em ADVPL
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=43102
Data da Impressão: sexta-feira, 19 de abril de 2024 at 01:33


Topico: Treports - Conversão de data

Postado por: LHC
Assunto: Treports - Conversão de data
Data Postagem: quinta-feira, 13 de fevereiro de 2020 at 14:44

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


Respostas:

Postado Por: AGMC
Data Postagem: quinta-feira, 13 de fevereiro de 2020 at 16:54

Boa tarde, verifica se te atende:

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

Atenciosamente,

Alan Gustavo
Grupo Miragina
skype:alan_miragina


Postado Por: LHC
Data Postagem: quinta-feira, 13 de fevereiro de 2020 at 17:02

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,



Postado Por: EMERSON.EN
Data Postagem: quinta-feira, 13 de fevereiro de 2020 at 17:08

publique as maneiras que você tentou.

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




Postado Por: VRTN
Data Postagem: quinta-feira, 13 de fevereiro de 2020 at 18:05

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


Postado Por: LHC
Data Postagem: sexta-feira, 14 de fevereiro de 2020 at 07:58

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



Imprimir Página | Fechar Janela