Amarildo de Matos

Bom dia.. Abaixo um exemplo de como tem de ficar.. mesmo o vDesc sendo zero , tem de gerar a Tag <vDesc> Vou esperar a atualizacao do Monitor com Essa alteração Do momento , so tenho a agradecer a todos ai . Obrigado Amarildo [Fatura] nFat=NF 4024 vOrig=15.00 vDesc=0.00 vLiq=15.00 [Duplicata001] nDup=001 dVenc=18/07/2018 vDup=15 Abaixo um exemplo de xml que fiz manual <cobr> <fat> <nFat>NF 4023</nFat> <vOrig>1.00</vOrig> <vDesc>0.00</vDesc> <vLiq>1.00</vLiq> </fat> <dup> <nDup>001</nDup> <dVenc>2018-07-17</dVenc> <vDup>1.00</vDup> </dup> </cobr> <pag> <detPag> <indPag>1</indPag> <tPag>99</tPag> <vPag>1.00</vPag> </detPag> </pag>

Bom Dia.. Qual Versão voce está usando do Monitor? Voce faz txt ou já faz xml Direto. Se faz txt, Mande Tambem, para dar uma olhada.. Aqui para mim, está funcionando a Transmissão. Blz..

Satira - Video com Apresentação do Senhor dos Windevs

Muito Legal..ai.. a Participação da Acbr.. Fiquei muito feliz que vocês, tiveram la. Próximo Ano Novamente em Curitiba conto ai com a Galera ai do Acbr.. Já estão convidados. Amarildo Matos

bom dia Obrigado por avisar.. estarei la dia 10 11 2018.

Bom dia.. tudo bem? ele nao estava funcionando.. mas o meu representante fez o seguinte e deu certo na Internet ele desmarcou Usar TLS 1.2 resolvido nos dois clientes Muito Obrigado..ai Pelo Retorno.. ai.. La em cima , tem essa configuração.. e com isso nos ajudou muito Amarildo de Matos

Boa Tarde.. Eu vi os comentarios.. tentei fazer tambem mas nao consegui resolver. comigo aconteceu a pouco em dois clientes. e nao estou conseguindo resolver: esta dando o seguinte: ERRO: Erro Interno: 12031 Erro HTTP: 0 Erro: Requisição não enviada. Erro: 12031 - A conexão com o servidor foi redefinida estou mandando os arquivos ini que fiz Muito Obrigado..ai.. Amarildo ent_Ambiente.txt ent_Envia_txt_assinar.txt ent_Enviar_NFe.txt ent_lerIni.txt sai_Ambiente.txt sai_Envia_txt_assinar.txt sai_Enviar_NFe.txt sai_lerIni.txt 43180516577190000144550010000012911000012918-nfe.xml sai.txt 43180516577190000144550010000012911000012918-nfe.xml 1-env-lot.xml 1-env-lot-soap.xml

Muito Obrigado .. Já mandei o Email.

Bom dia.. Muito boa iniciativa,, Se possivel Gostaria, de me inscrever para fazer uma Palestra, sobre Integracao do Acbr Com Windev.. Obrigado Amarildo

Boa Noite.. Quando o Cassiano me apresentou o Acbr, fiquei muito motivado. Apesar de no inicio, estar apenas programando e fazendo videos sobre Acbr integrado, com Windev, fiz questão de Assinar o Sac, pois acho essencial, essa assinatura.. Para empresas de Desenvolvimento o valor 120 mes, é super em conta. sempre que indico o acbr, que peço para eles fazerem a assinatura tambem, pois somente assim, o Acbr irar cada vez mais nos ajudar. quando a dll, vai ser muito bom mesmo.. Abracos a Todos, Amarildo de Matos Mestre Jedi.

s_nfe_xml is string=[ [Dest] CNPJCPF="#CNPJCPF#" IE="#IE#" xNome="#xNome#" fone="#fone#" xLgr="#xLgr#" nro="#nro#" xCpl="#xCpl#" xBairro="#xBairro#" cMun="#cMun#" xMun="#xMun#" cep="#cep#" UF="#UF#" cPais="#cPais#" xPais="#xPais#" ] s_nfe_xml is string=[ [vPrest] vTPrest="#vTPrest#" vRec="#vRec#" ] BOA TARDE Aula 1348 DE 1622 Videos WINDEV ACBR 031 CTE DESTINATARIO,vprest, http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1348-de-1622-videos-windev-acbr.html

https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/page/1.awp BOA TARDE Aula 1347 DE 1621 Videos WINDEV ACBR 030 CTE COLETA,INFNF,INFNFE LOCCOLETA INFNF001 INFNFE001 http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1347-de-1621-videos-windev-acbr.html s_nfe_xml is string=[ [locColeta] CNPJCPF="#CNPJCPF#" xNome="#xNome#" xLgr="#xLgr#" nro="#nro#" xCpl="#xCpl#" xBairro="#xBairro#" cMun="#cMun#" xMun="#xMun#" UF="#UF#" ] s_nfe_xml is string=[ [infNF001] nRoma="#nRoma#" nPed="#nPed#" mod="#mod#" serie="#serie#" nDoc="#nDoc#" dEmi="#dEmi#" vBC="#vBC#" vICMS="#vICMS#" vBCST="#vBCST#" vST="#vST#" vProd="#vProd#" vNF="#vNF#" nCFOP="#nCFOP#" nPeso="#nPeso#" PIN="#PIN#" CNPJCPF="#CNPJCPF#" xNome="#xNome#" xLgr="#xLgr#" nro="#nro#" xCpl="#xCpl#" xBairro="#xBairro#" cMun="#cMun#" xMun="#xMun#" UF="#UF#" ] s_nfe_xml is string=[ [infNFe001] chave="#chave#" PIN="#PIN#" dPrev="#dPrev#" ]

[rem] CNPJCPF=123456987 IE=1321231 xNome=CLIENTE DE TESTE xFant= fone= xLgr=RUA DA RUA nro=SN xCpl= xBairro=BAIRRO cMun=1321321 xMun=XXXXXX CEP=0 UF=XX PaisCod=1058 Pais=BRASIL Email= BOA TARDE Aula 1338 DE 1604 VIDEOS - WINDEV ACBR 029 - CTE.CRIARCTE REMETENTE http://acbr.sourceforge.net/ACBrMonitor/CTECriarCTe.html https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2800-curso-acbr-com-windev-cte-2818/read.awp http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1338-de-1604-videos-windev-acbr.html

[emit] CNPJ=#CNPJ# IE=#IE# xNome=#xNome# xFant=#xFant# xLgr=#xLgr# nro=#nro# xCpl=#xCpl# xBairro=#xBairro# cMun=#cMun# xMun=#xMun# cep=#cep# UF=#UF# fone=#fone# BOA TARDE Aula 1337 DE 1603 VIDEOS - WINDEV ACBR 028 - CTE.CRIARCTE EMITENTE http://acbr.sourceforge.net/ACBrMonitor/CTECriarCTe.html http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1337-de-1603-videos-windev-acbr.html https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2800-curso-acbr-com-windev-cte-2817/read.awp

BOA TARDE [compl] xEmi= tpPer=0 tpHor=0 origCalc= destCalc= xObx= Aula 1336 DE 1602 VIDEOS - WINDEV ACBR 027 - CTE.CRIARCTE COMPL http://acbr.sourceforge.net/ACBrMonitor/CTECriarCTe.html http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1336-de-1602-videos-windev-acbr.html

AULA 1327 WINDEV ACBR 026 - CTE.CRIARCTE TOMADOR http://windevdesenvolvimento.blogspot.com.br/2018/01/aula-1327-windev-acbr-026-ctecriarcte.html https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2800-curso-acbr-com-windev-cte-2804/read.awp [infCte] versao=3.0 [ide] cCT=548 CFOP=5353 natOp=Prestacao de servico de transporte a estabelecimento comercial forPag=0 mod=57 serie=0 nCT=548 dhEmi=03/01/2018 tpImp=1 tpemis=1 procEmi=0 verProc=1.2.7 dhCont= xJust= tpCTe=0 refCTe= cMunEnv=4313409 xMunEnv=NOVO HAMBURGO UFEnv=RS modal=01 tpServ=0 cMunIni=4313409 xMunIni=RS UFIni=RS cMunFim=4307609 xMunFim=ESTANCIA VELHA UFFim=RS retira=1 xDetRetira=teste cUF=43 indGlobalizado= indIEToma=1 [toma3] toma=0 [toma4] toma=4 CNPJCPF=89184238000128 IE=0420036873 xNome=DIMAQX COMERCIO DE PECAS E MAQUINAS AGRICOLAS xFant=DIMEL MATERIAIS DE EMBALAGEM LTDA fone=5132111932 xLgr=RUA PRESIDENTE LUCENA nro=4 xCpl= xBairro=DAS ROSAS cMun=4307609 xMun=ESTANCIA VELHA cep=93600000 UF=RS cPais=1058 xPais=BRASIL email=matosi@terra.com.br

https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2800-curso-acbr-com-windev-cte-2803/read.awp

http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1318-windev-acbr-024-ctecriarcte.html http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1320-windev-acbr-025-ctecriarcte.html

Estou Iniciando a Fazer integracao Cte,com Acbr, Estou disponibilizando os estudos Hoje sera sobre CriarCte, AULA 1316 WINDEV ACBR 023 - CTE.CriarCTe http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1316-windev-acbr-023-ctecriarcte.html https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2800-curso-acbr-com-windev-cte/read.awp

NFE.CNPJCertificado como trocar o certificado AULA 1315 WINDEV ACBR 022 - NFE.SetCertificado http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1315-windev-acbr-022.html https://www.youtube.com/watch?v=-GTwG0TVyp8

PEGAR O CNPJ DO CERTIFICADO s_arquivo_acbr=[NFE.CNPJCertificado] http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1314-windev-acbr-021.html

AULA 1313 WINDEV ACBR 020 - ACBR.LERINI http://acbr.sourceforge.net/ACBrMonitor/ACBrlerini.html http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1313-windev-acbr-020-acbrlerini.html s_arquivo_acbr is string=[ ACBr.lerini() ] PROCEDURE ACBR_TROCA_CERTIFICADO() HReadSeekFirst(parametros,codigo_parametro,1) IF HFound(parametros) THEN IF parametros.acbr_nfe=True THEN HReadSeekFirst(empresa_certificado,Id_empresa,gnEmpresaCodigo) IF HFound(empresa_certificado) THEN s_NUMERO_SERIE is string = INIRead("Certificado","NumeroSerie","","C:\ACBrMonitorPLUS\ACBrMonitor.ini") s_NUMERO_SERIAL is string=Replace(empresa_certificado.serial_numero," ","") IF s_NUMERO_SERIAL=s_NUMERO_SERIE THEN ELSE INIWrite("Certificado","NumeroSerie",s_NUMERO_SERIAL,"C:\ACBrMonitorPLUS\ACBrMonitor.ini") INIWrite("Certificado","Senha",empresa_certificado.senha,"C:\ACBrMonitorPLUS\ACBrMonitor.ini") Info("ARRUMAR DIRETORIO WIN_SELECIONAEMPRESA") s_diretorio is string="C:\amarildo\jairo\xml_acbr\PASTA\" s_arquivo_entrada is string=s_diretorio+"ent.txt" s_arquivo_Saida is string=s_diretorio+"sai.txt" IF fFileExist(s_arquivo_Saida) THEN fDelete(s_arquivo_Saida) END s_arquivo_acbr is string=[ ACBr.lerini() ] fSaveText(s_arquivo_entrada,s_arquivo_acbr) END END END END

AULA 1310 WINDEV ACBR - 018 - NFE.InutilizarNFe http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1310-windev-acbr-018.html AULA 1311 WINDEV ACBR - 019 - NFe.EnviarEvento - Carta de Correção Exemplo:NFe.EnviarEvento([EVENTO]idLote=[EVENTO001]chNFe=43171203850874000126550010000039201000039205cOrgao=43CNPJ=03850874000126dhEvento=20/12/2017 21:39:00tpEvento=110110nSeqEvento=1versaoEvento=3.10descEvento=Carta de CorrecaoxCorrecao=teste de CARTA de CORRECAO matos informatica) http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1311-windev-acbr-019.html

AULA 1309 WINDEV ACBR - 017 - NFE.CancelarNFe NFE.CANCELARNFE("43171203850874000126550010000038991000038998",CANCELAMENTO TESTE ,03850874000126,110111) ===================================== RETORNO OK: Lote de Evento Processado [CANCELAMENTO] Versao=RS201710241716 TpAmb=2 VerAplic=RS201710241716 CStat=135 XMotivo=Evento registrado e vinculado a NF-e CUF=43 ChNFe=43171203850874000126550010000038991000038998 DhRecbto=17/12/2017 16:15:03 NProt=143170001511870 tpEvento=110111 xEvento= nSeqEvento=1 CNPJDest=89184238000128 emailDest= Arquivo=C:\amarildo\jairo\xml_acbr\Arqs\03850874000126\NFe\201712\Evento\Cancelamento\1101114317120385087400012655001000003899100003899801-procEventoNFe.xml XML= ===================================== PROCEDURE gera_150_01_gerar_txt_acbr() VERIFICA_ARQUIVO_SAIDA(EDT_diretorio_arquivo_saida) _arquivo_acbr is string=[ NFE.CANCELARNFE("#chave_nfe#",#justificativa#,#cnpj_emissor#,#evento#) ] _arquivo_acbr=Replace(_arquivo_acbr,"#chave_nfe#",EDT_ChaveNFE) _arquivo_acbr=Replace(_arquivo_acbr,"#justificativa#",EDT_Justificativa) _arquivo_acbr=Replace(_arquivo_acbr,"#cnpj_emissor#",empresa.cnpj) _arquivo_acbr=Replace(_arquivo_acbr,"#evento#",EDT_TipoEvento) EDT_xml=_arquivo_acbr gs_auditoria+=_arquivo_acbr EDT_xml_retorno_assinado=VERIFICA_ARQUIVO_RETORNO(EDT_diretorio_arquivo_entrada,EDT_xml,EDT_diretorio_arquivo_saida) ===================================== ROCEDURE gera_160_01_retorno_txt_acbr() s_texto_cstat is string="" EDT_ProtocoloCancelamento="" _sequencia is int=0 _tipo_evento is string="" s_xml_retornado is string="" EDT_xml_autorizado="" _cabecalho_xml is string=[ <?xml version="1.0" encoding="UTF-8"?> ] FOR EACH STRING s_linha OF EDT_xml_retorno_assinado SEPARATED BY ["XML="] s_xml_retornado=s_linha END EDT_xml_autorizado=_cabecalho_xml+s_xml_retornado FOR EACH STRING s_linha OF EDT_xml_retorno_assinado SEPARATED BY CR IF s_linha[[1 TO 6]]="CStat=" THEN s_texto_cstat=s_linha END IF s_linha[[1 TO 6]]="NProt=" THEN EDT_ProtocoloCancelamento=s_linha[[7 TO 21]] END IF s_linha[[1 TO 11]]="nSeqEvento=" THEN _sequencia=s_linha[[12 TO 13]] END IF s_linha[[1 TO 9]]="tpEvento=" THEN _tipo_evento=s_linha[[10 TO 15]] END END EDT_xml_autorizado=Replace(EDT_xml_autorizado,"XML=","") IF s_texto_cstat="CStat=135" THEN gera_200_01_grava_nota_xml() END ===================================== http://windevdesenvolvimento.blogspot.com.br/2017/12/aula-1309-windev-acbr-017-nfecancelarnfe.html