PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 25 → Campos DATA na importação de arquivos XLS para o HFSQL - WinDev19
Campos DATA na importação de arquivos XLS para o HFSQL - WinDev19
Iniciado por namon, abr., 24 2015 2:21 AM - 2 respostas
Membro registado
12 mensagems
Publicado em abril, 24 2015 - 2:21 AM
Com a ajuda de vários colegas e também em vários fóruns, consegui criar rotina de importação de arquivos do Excel (XLS) para minhas tabelas no HFSQL.
Quase todos os campos foram importados corretamente, com exceção dos campos DATA que na planilha está no formato "DD/MM/YYYY".
Ao importar para a tabela HFSQL vêm no formato "YYYY/MM/DD" e tenho que corrigir manualmente.
Qual seria a instrução na linha de importação do campo para que importasse no formato desejado "DD/MM/YYYY"?

Por exemplo, tenho a seguinte coluna da planilha com a data 12/05/2013.
Usando o código:
MeuDB.DataSaida = xlsData(l_nXLSFileID, l_nOnRow, 4)

Qual seria o complemento para que já importasse para a tabela no formato "DD/MM/YYYY"?


Enéa Monteiro
Membro registado
12 mensagems
Publicado em abril, 24 2015 - 5:01 PM
namon escreveu:
Com a ajuda de vários colegas e também em vários fóruns, consegui criar rotina de importação de arquivos do Excel (XLS) para minhas tabelas no HFSQL.
Quase todos os campos foram importados corretamente, com exceção dos campos DATA que na planilha está no formato "DD/MM/YYYY".
Ao importar para a tabela HFSQL vêm no formato "YYYY/MM/DD" e tenho que corrigir manualmente.
Qual seria a instrução na linha de importação do campo para que importasse no formato desejado "DD/MM/YYYY"?

Por exemplo, tenho a seguinte coluna da planilha com a data 12/05/2013 (atualmente vêm como 20/05/0012)
Usando o código:
MeuDB.DataSaida = xlsData(l_nXLSFileID, l_nOnRow, 4)

Qual seria o complemento para que já importasse para a tabela no formato "DD/MM/YYYY"?


Enéa Monteiro
Membro registado
12 mensagems
Publicado em abril, 24 2015 - 6:13 PM
Boa tarde!

Já consegui corrigir a linha de importação de campos data!

MeuDB.DataSaida = StringToDate(xlsData(l_nXLSFileID, l_nOnRow, 4),"DD/MM/YYYY")

Obrigado