FabioMachado

Boa noite! Eu iniciei a mudança do sistema para suportar a versão 4.0. Quando estou testando na versão 4.0, ou seja em homologação, flui que é uma blz, se eu coloco o sistema na versão 3.10 não consigo mais emitir os cupons, em homologação, da o erro: Rejeição: UF informada no campo cUF não é atendida peloWeb Service Status 410. Não fiz nenhuma mudança radical de estrutura e tb não mudei nada nos endereços, deixo isso sempre com o próprio componente.

Entendi! Iniciando as correções necessárias.

Minha duvida surgiu em um momento de besteirol, rsrsrsrs. Mas se fez real. Exemplo: Um cliente inicia as vendas do dia normalmente e então fica sem internet, ou seja vai passar a emitir de forma off-line mas o sistema continua tentando enviar normalmente até que seja alterado manualmente. Eu pensei em fazer o sistema, na negativa do envio, trocar a forma de emissão. Em teste verifiquei que não adianta apenas mudar a forma de emissão no componente, tenho que gerar toda a nota novamente com a forma de emissão teOffLine. É isso ou eu estou marcando? Segue exemplos do código: if (bTransmitiu) and (abFormaemissao<>0) then begin {2} case abFormaemissao of 0: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teNormal; 1: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teContingencia; 2: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teSCAN; 3: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teDPEC; 4: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teFSDA; 5: frmPrincipal.AcbrNFCe.Configuracoes.Geral.FormaEmissao := teOffLine; end; frmPrincipal.NFCeDANFeESCPOS1.ViaConsumidor:=true; ImprimeDanfe; Porem isso ai não funciona. Pra funcionar eu tenho que fazer assim: GerarNFCeByFabio(5); try frmPrincipal.AcbrNFCe.NotasFiscais.Assinar; except on e : exception do begin MessageDlg(pChar('Erro: ' + E.Message), mtInformation, [mbOk], 0); Exit; end; end; try frmPrincipal.AcbrNFCe.NotasFiscais.Validar; except on e : exception do begin MessageDlg(pChar('Erro: ' + E.Message), mtInformation, [mbOk], 0); Exit; end; end; frmPrincipal.NFCeDANFeESCPOS1.ViaConsumidor:=true; ImprimeDanfe; Isso causa a geração de dois arquivos xml com o mesmo número porém com digito verificador diferente com na primeira tentativa com emissão normal e a outra com a emissão de forma off-line.

Obrigado Daniel! Consegue resolver o problema. Só pra ficar registrado: ImprimirBarras(orNormal, 'E', '2', '2', 5, 600, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 130, becSIM); onde E equivale ao código 128 e A equivale ao código 39 F equivale ao EAN13

Alguém???

Eu ainda não resolvi o problema aqui no meu terminal, mas é o meu ambiente, disso eu tenho certeza. Não sei se é alguma dll em conflito, ou no lugar errado, pois tenho outros terminais funcionando normalmente assim como tenho clientes que não funciona de jeito algum, vou ver acho descubro esse pepino e posto aqui em seguida.

Ja tentei assim tb. ImprimirBarras(orNormal, 'barEAN13', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barEAN8', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barSTANDARD', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barINTERLEAVED', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barCODE128', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barCODE39', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barCODE93', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barUPCA', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barCODABAR', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barMSI', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'barCODE11', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); e nada.

Boa tarde, estou tentando imprimir na impressora Argox OX214 uma etiqueta com código de barras não valido, exemplo: 1132617712 Ja mudei todas as configurações e não achei meio pra imprimir esse código, alguém tem um adica? Tentei as opções abaixo: ImprimirBarras(orNormal, 'F', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becSIM); ImprimirBarras(orNormal, 'F', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becPadrao); ImprimirBarras(orNormal, 'F', '2', '2', 32, 25, SafeVarToStr(cxGridDBTableView1CON_ID.EditValue), 90, becNAO);

Boa noite, revivendo o tópico, pois não consigo imprimir na Argox usb via rede de jeito nenhum. Alguém ja conseguiu esse feito?

A revision: 12983 do svn parece que corrigiu o problema, fiz algumas vendas agora e não houve a rejeição.

Atualizei, compilei e testei deu de novo, exclui todo a acbr, baixei de novo, removi do delphi, instalei de novo, compilei e deu erro de novo, arredondando. 14170322899694000183650010000001071000001075-nfe.xml

Bom dia. Hoje voltei a ter problemas com arredondamento para NFCe, sabado tinha resolvido o arredondamento que estava gerando no qrcode agora ta arredondando no item. Na minha base de dados eu gravo com 3 casas decimais ou seja 139,125 quando o componente recebe esse valor ta arredondando para 139,13 o que não estava ocorrendo antes, porém estranhamente o mesmo produto com quantidade diferente o arredondamento não ocorre como pode ver no xml da nota 101. Tô perdidaço. 14170322899694000183650010000001001000001007-nfe.xml 14170322899694000183650010000001011000001012-nfe.xml

Resolveu! Obrigado.

Bom dia. Essa semana comecei a receber a rejeição (Rejeicao: Parametro do QR-Code divergente da Nota Fiscal (vNF) ) eu não entendi pq o na tag do qr-code está arredondando o valor. Ja procurei alguma configuração pra rever isso e não achei. Segue xml. Alguém ja teve algum problema parecido? Como resolve? 14170222899694000183650010000000741000000749-nfe.xml

O estranho é que não importa a sequencia nem a quantidade, apenas 5 boletos são visualizados, exemplo se eu seleciono 80 boletos só visualizo os últimos 5 e se a quantidade for de 15 só visualiza os últimos 5 E se eu usar o componente ACBrBoletoFCFR funciona tudo normal, porém a formatação dos boletos não estão com layout correto.

Então .... pelo demo não apresentou esse problema pra visualizar.

Bom dia! Meu ambiente é Delphi Seatle com acbrboleto e ACBrBoletoFCFortes1 estou tendo problemas com a visualização para impressão e na geração do PDF pois nada é mostrado quando vai imprimir e no arquivo em pdf tb não. Rotina de inclusão dos boletos while not sqlCad.Eof do begin sqlCliente.Locate('CLI_ID', IntToStr(sqlCadCRE_CLI.AsInteger),[]); Titulo:= ACBrBoleto1.CriarTituloNaLista; if sqlCadCRE_DATA_VENCIMENTO.Value<date then data_final:=date+1 else data_final:=sqlCadCRE_DATA_VENCIMENTO.AsDateTime; with Titulo do begin LocalPagamento := 'Pagar preferêncialmente nas agências da(o) '+sqlBancosBAN_NOME.AsString; //MEnsagem exigida pelo bradesco Vencimento := data_final; DataDocumento := sqlCadCRE_DATA_EMISSAO.Value; NumeroDocumento := sqlCadCRE_NR_DOC.AsString; EspecieDoc := 'DM'; if sqlBancosBAN_ACEITE.Value=1 then // .Value=True then Aceite := atSim else Aceite := atNao; EspecieDoc := 'R$'; DataProcessamento := Now; NossoNumero := sqlCadCRE_NR_DOC.AsString;//IntToStrZero(sqlCadCRE_NR_DOC.Value,8); Carteira := sqlBancosBAN_CARTEIRA.AsString; ValorDocumento := sqlCadCRE_VALOR_RECEBER.AsCurrency; //100.35 * (I+0.5); PercentualMulta := dm.sqlconfiguracao_geralCG_MULTA.AsCurrency; Sacado.NomeSacado := sqlClienteCLI_NOME.AsString+' - '+sqlclienteCLI_NOME_RED.AsString ; //'Jose Luiz Pedroso'; if Trim(sqlClienteCLI_CNPJ.AsString)=EmptyStr then Sacado.CNPJCPF := sqlClienteCLI_CPF.AsString else //'12345678901' Sacado.CNPJCPF := sqlClienteCLI_CNPJ.AsString; //'12345678901'; Sacado.Logradouro := sqlClienteCLI_ENDERECO.AsString; //'Rua da Consolacao'; Sacado.Numero := sqlClienteCLI_NUMERO.AsString; //'100'; Sacado.Bairro := sqlClienteCLI_BAIRRO.AsString; //'Vila Esperanca'; Sacado.Cidade := sqlClienteCLI_CIDADE.AsString; //'Tatui'; Sacado.UF := sqlClienteCLI_UF.AsString; //'SP'; Sacado.CEP := sqlClienteCLI_CEP.AsString; //'18270000'; ValorMoraJuros := sqlCadCRE_JUROS_DIA.AsCurrency; ValorDesconto := sqlCadCRE_VALOR_DESCONTO.AsCurrency; DataMoraJuros := data_final; DataDesconto := sqlCadCRE_DATA_DESCONTO.AsDateTime; DataProtesto := sqlCadCRE_DATAPROTESTO.AsDateTime; Mensagem.Add(sqlcadCRE_HISTORICO.AsString); end; sqlCad.Next; end; ACBrBoleto1.Imprimir; Se eu incluir até 5 boletos, vai blz. Mas se eu colocar 6 ja acontece isso ai da imagem.

No caso da NFCe deve ser usado o Sem frete ps demais são usados para nfe e cte e mdfe. Salvo engano.

Será que o problema é esse? Meu Windows só tem a opção 3.0 do SSL e eu não achei um meio de colocar o 2.0.

E quando não tem a opção SSL 2.0 só tem a 3.0

Isso foi a primeira coisa que fiz, desativei o Anti-virus por completo.

Eu jogo a toalha!!! Ja sei que é o meu ambiente aqui que ta dando erro de login, pois o mesmo exe que aqui não envia os emails, envia na outra maquina. Ja apaguei todas as dll's recoloquei com os arquivos baixados pelo svn e na minha maquina e de outro cliente continua não enviando. ;(

Bom dia, hoje baixei o manual do Bradesco direto no site, que segue anexo, e me deparei com o seguinte: 1 - 109 a 110 - Identificações de Ocorrência 01..Remessa 02..Pedido de baixa 03..Pedido de Protesto Falimentar 04..Concessão de abatimento 05..Cancelamento de abatimento concedido 06..Alteração de vencimento 07..Alteração do controle do participante 08..Alteração de seu número 09..Pedido de protesto 18..Sustar protesto e baixar Título 19..Sustar protesto e manter em carteira 22..Transferência Cessão crédito ID. Prod.10 23..Transferência entre Carteiras 24..Dev. Transferência entre Carteiras 31..Alteração de outros dados 045..Pedido de Negativação (NOVO) 046..Excluir Negativação com baixa (NOVO) 047..Excluir negativação e manter pendente (NOVO) 68..Acerto nos dados do rateio de Crédito 69..Cancelamento do rateio de crédito. ja no arquivo remessa gerado pelo demo do boleto ta sendo identificado com 02 1000000000000000000000090052200091812 0002050000000010966800000000002 2 02000000000105021700000000459300000000001N260117000000000000005000000000000000000000000000000000000000000000000100084127724234ANDREZA DA SILVA FERREIRA RUA SARDINHA 709 SANTA TEREZA BOA VISTA 69314117 000002 4008-524-0121-08-layout-cobranca-versao-portuguesSS28785.pdf cb010201.rem

Boa tarde, tb estou com problema no arquivo de remessa do Bradesco, no meu caso a mensagem é "- Não foi encontrado nenhum layout para o registro lido", fiz os teste com o meu sistema e tb com Demo do ACBr e a mensagem é a mesma.

Quando vc diz instaladas corretamente o que vc quer dizer? Pq essas dll's não são apenas para constar na pasta?