Página 1 de 1

dúvida com duas linhas de comando

Enviado: 08 Jun 2016 08:41
por porter
olá pessoal, esse trecho de código, faz parte da rotina que o fladimir passou ao qual agradeço, para ser usado com o Acbr, mas tem duas linhas da rotina que não estou entendendo, elas tem a função de gravar valores Nota->XMLRETORNO:=cRetorno e Nota->STATUS:=GERADA no arquivo Nota.dbf ?

Se for isso não estou conseguindo gravar o campo.

Código: Selecionar todos

nPosIni       := Rat(Alltrim(Caminho->PathNFe) +'\RESPOSTA\', cNFeLog)
nPosFim     := RAt('XML', cNFeLog) + 3                                          // devido ter q considerar os caracteres 'XML' tb
nTotSubstr  := nPosFim - nPosIni
cRetorno    := Substr( cNFeLog, nPosIni, nTotSubstr )
cRetorno    := StrTran( cRetorno, 'OK:','')                                     
cRetorno    := StrTran( cRetorno, ' ','')                                       
cRetorno    := StrTran( cRetorno, 'C:\ACBR\NFE\',Alltrim(Caminho->PathNFe))     
cRetorno    := StrTran( cRetorno, CHR(13),'')
cRetorno    := Alltrim(StrTran( cRetorno, CHR(10),''))
Nota->XMLRETORNO := cRetorno   // ,'C', 70, 0},;
Nota->STATUS          := 'GERADA'   // ,'C', 20, 0},;
xHabour

obrigado.

dúvida com duas linhas de comando

Enviado: 08 Jun 2016 09:54
por Daniel
Porter
Este comando grava no banco de dados nota no campo XMLRETORNO e no campo STATUS
e na frete esta o tamanho dos campos e o tipo.
e o mesmo que o comando Replace STATUS With 'GERADA'

dúvida com duas linhas de comando

Enviado: 08 Jun 2016 09:59
por porter
olá Daniel,
é o que eu pensei, ele faz o mesmo que Replace, não sei porque que o meu não está gravando, devo ter feito algo errado, vou procurar aqui.

obrigado.