Página 2 de 2
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 24 Mai 2024 15:34
por leandromiler
Boa tarde pessoal
Consegue me passar as funcoes HB_ para fazer este tratamento de arquivos ? não estou conseguindo achar.
Desde já agradeço
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 24 Mai 2024 18:20
por Itamar M. Lins Jr.
Olá!
Não tinha reparado. Vc usa clipper ?
Saudações,
Itamar M. Lins Jr.
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 25 Mai 2024 00:12
por leandromiler
tenho este mesmo sistema em harbour também
este cliente especifico está usando a versão em harbour
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 25 Mai 2024 01:02
por Itamar M. Lins Jr.
Olá!
E pq não tem no seu Harbour essa função ?
A versão do seu Harbour é antes de 2014 ?
Se vc informar qual versão vc usa, anda mais rápido...
Saudações,
Itamar M. Lins Jr.
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 25 Mai 2024 13:10
por leandromiler
esta é a versao que eu uso
Harbour 3.4.0 28-04-2018
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 25 Mai 2024 22:33
por ivanil
Ola,
você postou clipper mais usa o Harbour, correto? pelo que vi você carrega para um dbf intermediário e em seguida trata a informação...
você pode lidar com isso diretamente;
for each cLine in hb_atokens(cTxt,CRLF)
?cLine
next
APPEND SDF NAO FUNCIONA COM ARQUIVO TXT
Enviado: 25 Mai 2024 23:51
por Itamar M. Lins Jr.
Olá!
esta é a versao que eu uso
No seu harbour 3.4 tem até pq foi o Viktor que fez.
Código: Selecionar todos
2014-02-12 01:42 UTC+0100 Viktor Szakats
* include/harbour.hbx
* src/rtl/Makefile
+ src/rtl/strutf8.c
+ added hb_StrIsUTF8( <cString> ) -> <lIsUTF8Encoded>
Will do heuristics to autodetect strings that are
UTF8 encoded. Adapted from Far Manager source code.
It works rather well. Implicitly detects UTF8 BOM, too.
Uses the same kind of license as SHA1/SHA2 sources.
Código: Selecionar todos
IF ! IsASCII7( cFile, @tmp ) .AND. ! hb_StrIsUTF8( cFile )
AAdd( aErr, hb_StrFormat( "content: is non-UTF-8/ASCII-7: %1$d", tmp ) )
ENDIF
Saudações,
Itamar M. Lins Jr.