Pesquisa resultou em 3 ocorrências

por softecmario
02 Fev 2017 17:21
Fórum: [x]Harbour
Tópico: tag infCpl XML NFe com caracter invalido
Respostas: 4
Exibições: 845

tag infCpl XML NFe com caracter invalido

Obrigado José Quintas.
Nada como um expert para os mínimos detalhes.
alterei para:

if ValType( infCpl ) != "C"
//caracteres inválidos no campo infCpl do XML, não grava observação
elseif Len( AllTrim( InfCpl ) ) != 0
...
endif


FUNCIONANDO OK.

Colaborando,
o XML que estava lendo é de uma ...
por softecmario
02 Fev 2017 15:05
Fórum: [x]Harbour
Tópico: tag infCpl XML NFe com caracter invalido
Respostas: 4
Exibições: 845

tag infCpl XML NFe com caracter invalido

Obrigado pelo interesse fladimir.

...
IF oCurrent:cName == "infCpl"
infCpl := oCurrent:cData
ENDIF
...
if len(alltrim(infCpl)) # 0 <------------------------------------------------------------------------------------------------ aqui da erro Error BASE/2022 Argument error: ALLTRIM
xObs ...
por softecmario
02 Fev 2017 12:47
Fórum: [x]Harbour
Tópico: tag infCpl XML NFe com caracter invalido
Respostas: 4
Exibições: 845

tag infCpl XML NFe com caracter invalido

Ola foreiros.
Lendo um XML de NFe me vem o campo infCpl (informações complementares) com caracteres inválidos.
Dai meu teste para ver se tem informação [CODIGO] if len(alltrim(infCpl)) # 0 [CODIGO] provoca um erro.
Como posso evitar este erro se tiver caracteres invalidos?
XML em anexo.
Obrigado.