É bom também RETIRAR vírgulas e aspas duplas (").
Abraços,
Moderador: Moderadores
PROCEDURE mymemow(qarquivo,qtext)
nFileHandle := FCreate( qarquivo, FC_NORMAL )
FWrite(nFileHandle,qtext)
FClose( nFileHandle )
return nil
mymemow('modelo.xml',"TEXTO DE TESTE")
Na pasta do ACBrMonitor, se ao instalar você deixou selecionado manuais e exemplos, você encontra o arquivo ACBrMonitor.chm.ricardo-barros escreveu:Vi, no tutorial, um exemplo de arquivo INI para nfe de compra (Entrada). Gostaria de ver também um de venda (do Simples Nacional) para eu saber em qual parte do texto devo incluir os campos típicos de uma saída
NFE.AssinarNFe("C:\ACBRNFE2\RETORNO\51160407407005000182550010000037361000037361-nfe.XML")
OK: C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml
NFE.AssinarNFe(C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml)
OK: C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml
NFE.ValidarNFe(C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml)
OK:
NFE.EnviarNFe()
ERRO: Arquivo n?o encontrado.
OK: C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml
NFE.AssinarNFe(C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml)
OK: C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml
NFE.ValidarNFe(C:\ACBrMonitorPLUS\RETORNO\29160908898948000118550010000413921000413920-nfe.xml)
OK:
NFE.EnviarNFe()
ERRO: Arquivo n?o encontrado.
Fwrite( Farq,"NFE.EnviarNFe("+cXml+")"+&FimDeLinha)
cLin:=MEMOLINE(cTxt,200,1)
cXml:=Alltrim(Subs(cLin,5,100))
Retornar para Legislação Fiscal e Tributária
Usuários vendo este fórum: Nenhum usuário registrado online e 4 visitantes