Rafael jorge

Voltei para convenio : 2316276 a carteira esta : 17 alterei para : 1417

so agora o pessoal do suporte respondeu meus email. a resposta foi : eu estava passando isso no convenio : 2316276 que foi o que o meu gerente me informou. vou testar passando esse novo valor. sei nem se o componente vai aceitar uma string desse tamanho. testar e posto aqui. Acabei de testar informando o 002316276001417019 no convenio ele nao gera o código de barra nem a linha digital inteiro. provavelmente dando erro interno. e agora? como eu passo isso tudo?

depois de muito tempo. após apenas recopilar o projeto para um cliente o erro voltou a aparecer. mesmo eu definindo ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := true. nao sei mas o que fazer, do nada começou a aparecer esse erro direto. 41160919158473000140650010000009971000009970-nfe.xml desculpem so agora que vi a descrição do produto esta com "-"

Depois que o ferabram impôs que todo boleto fosse registrado eu to mandando eles. nao consta nenhum. mas os clientes tao conseguindo pagar os boletos sem da rejeição alguns aparecem na parte de cobrança (títulos simples com registro) so apos serem pagos. vou anexar aqui uma remessa com 3 boletos como to enviando ao banco. REMESSA_CONTA DA EMPRESA_22.txt

utilizando o banco do brasil boa tarde, estou criado a remessa normalmente. como o proprio exemplo que tem nos fontes do ACBR. so que quando eu envio a remessa nao da erro nenhum. so que nao aparece nada no retorno. e quando eu vou ver na parte de cobranças os boletos que estão la na parte de dados do pagador nao aparece nada so "Titulo sem existência" Verificando que no boleto tudo esta aparecendo, dados do cliente, endereço, telefone tudo.

Obrigado EliasCesar, me ajudou muito. percebi que a lógica e que ele considera a linha toda uma etiqueta so, quando se trata do tamanho. entao tenho que posicionar certinho usando horizontalmente independente de ter 1,2,3 ou 4 etiquetas por linha. obrigado muito.

Boa noite/dia/tarde estou tendo um problema nao consigo (e nao sei) como configuro o espaçamento entre as etiquetas. o código que eu to usando é esse: AtivarACBrETQ; with ACBrETQ do begin if Modelo = etqPpla then begin ImprimirTexto(orNormal, 2, 1, 2, 180, 15, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 140, 15, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'F', '2', '2', 20, 10, ds.dataset.fieldbyname('codigo_de_barras').asstring, 70); ImprimirTexto(orNormal, 2, 1, 2, 180, 315, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 140, 315, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'F', '2', '2', 20, 315, ds.dataset.fieldbyname('codigo_de_barras').asstring, 70); ImprimirTexto(orNormal, 2, 1, 2, 180, 620, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 140, 620, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'F', '2', '2', 20, 620, ds.dataset.fieldbyname('codigo_de_barras').asstring, 70); end else begin ImprimirTexto(orNormal, 2, 1, 3, 15, 55, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 80, 55, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'E30', '2', '2', 120, 55, ds.dataset.fieldbyname('codigo_de_barras').asstring, 080, becSIM); ImprimirTexto(orNormal, 2, 1, 3, 15, 365, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 80, 365, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'E30', '2', '2', 120, 365, ds.dataset.fieldbyname('codigo_de_barras').asstring, 080, becSIM); ImprimirTexto(orNormal, 2, 1, 3, 15, 670, ds.dataset.fieldbyname('descricao').asstring); ImprimirTexto(orNormal, 2, 1, 1, 80, 670, 'R$ '+currtodb(ds.dataset.fieldbyname('preco_varejo').ascurrency)); ImprimirBarras(orNormal, 'E30', '2', '2', 120, 670, ds.dataset.fieldbyname('codigo_de_barras').asstring, 080, becSIM); end ; Imprimir(StrToInt(eCopias.Text), StrToInt(eAvanco.Text)); Desativar; end; a configuração que eu to usando é essa: modelo : etqPpla dpi : dpi203 avanço : 600 Temperatura : 10 bem esta ficando assim (foto em anexo). Como eu configuro esse espaçamento? a impressora que eu to usando é argox os214 plus USB

obrigado Italo.

obrigado de novo bigwings. resolvi. muito obrigado.

Oi, tudo bom? sou nube, na criação de NFC-e. estou enviando so que esta dando a rejeição cod. Status 394. Nota fiscal sem a informacao de QR-Code estou usando essa rotina antes de enviar o NFC-e: NFe.NotasFiscais.Assinar; NFe.NotasFiscais[0].NFe.infNFeSupl.qrCode := NFe.GetURLQRCode(NFe.NotasFiscais[0].NFe.Ide.cUF, NFe.NotasFiscais[0].NFe.Ide.tpAmb, NFe.NotasFiscais[0].NFe.infNFe.ID, NFe.NotasFiscais[0].NFe.Dest.CNPJCPF, NFe.NotasFiscais[0].NFe.Ide.dEmi, NFe.NotasFiscais[0].NFe.Total.ICMSTot.vNF, NFe.NotasFiscais[0].NFe.Total.ICMSTot.vICMS, NFe.NotasFiscais[0].NFe.signature.DigestValue); como eu crio esse QR-Code? 41160819158473000140650010000000011000000015-nfe.xml o código que eu to usando aqui: Anexe igual fez com o xml

Valeu bigwings. resolveu. agora to barrado na geração do QR-code. achei a rotina GetURLQRCode so que eu nao sei em qual unit esta esse função. Resolvi, era so chamar o propio componente que esse é uma método dele.

Sou novo na emissão do NFC-e, ja emito nfe e muito tempo, mas nfc-e nao. ai meu primeiro nfc-e esta dando o seguinte erro: cod. status 215 - falha no schema XML. ord.sml.sax.SAXParseException; lineNumber:1; colummnNumber: 94; cvc-pattern-valid: value " is not facet-valid with respect to pattern '[0-9]{15}' for type 'TRec'. achei ums post sobre esse erro mas era usando o monitor ja eu uso os componentes direto no meu sistema. em anexo o xml gerado. estou fazendo os testes no estado do PR (parana). 41160819158473000140550010000000011000000012-nfe.xml

cara vc nao define um numeral, vc define pelo tipo ou seja o indiedest aceita incontribuinte, innaocontribuinte e inisento vc define pelo tipo e na hora de gerar o xml o componente é que se vira pra deixar do jeito que o XML precisa (isso falando a grosso modo). ou seja vc nao define indiedest = 1,2 ou 9 e sim como eu falei.

muito obrigado Waldir Paim, Decide Alvarez e sossystem era justamente isso. resolvi fazendo o que vocês informaram e ficou tudo ok. obrigado mesmo.

o código de erro: 1325 -> A SEFAZ do destinatario nao permite contribuinte isento de inscrição estadual Nao, mas pelas regras eu nao tenho que informar assim? vou modificar e ver no que da.

procurei no fórum sim e graças a ajuda do propino fórum chequei nesse código que utilizo. Estou fazendo justamente isso: if cdccliente.fieldbyname('pessoa').asstring = 'F' then begin Dest.indIEDest := inNaoContribuinte; // Quando for pessoa física ide.indFinal := cfConsumidorFinal; // não contribuinte end; IF cdccliente.fieldbyname('pessoa').asstring = 'J' then begin if (cdcCliente.fieldbyname('ie').asstring <> '') and (cdccliente.fieldbyname('ie').asstring <> 'ISENTO') then begin Dest.IE := cdccliente.fieldbyname('ie').asstring; Dest.indIEDest := inContribuinte; ide.indFinal := cfnao; end else begin dest.IE := ''; Dest.indIEDest := inisento; //inNaoContribuinte; //inIsento; ide.indFinal := cfconsumidorfinal; end; end; So que mesmo assim esta dando erro de nao aceitar sem IE. amanha vou tentar novamente com o cliente e passo exatamente a exceção que esta acontecendo quando é um condomínio.

Um cliente nosso esta tentando emitir uma NFE para condomínios, so que esta dando rejeição, esta informando que nao aceita o destinatário sem IE, so que condomínios nao tem inscrição estadual. procurei alguma lei, algo que me explicasse por que ta dando esse erro o que teria que mudar, mas infelizmente nao achei. isso esta acontecendo des do dia 1/7/16. Obrigado a quem puder me ajudar.

Resolvi. mudei meu código assim: if cdccliente.fieldbyname('pessoa').asstring = 'F' then begin Dest.indIEDest := inNaoContribuinte; // Quando for pessoa física ide.indFinal := cfConsumidorFinal; // não contribuinte end; IF cdccliente.fieldbyname('pessoa').asstring = 'J' then begin if (cdcCliente.fieldbyname('ie').asstring <> '') and (cdccliente.fieldbyname('ie').asstring <> 'ISENTO') then begin Dest.IE := cdccliente.fieldbyname('ie').asstring; Dest.indIEDest := inContribuinte; ide.indFinal := cfnao; end else begin dest.IE := ''; Dest.indIEDest := inisento; //inNaoContribuinte; //inIsento; ide.indFinal := cfconsumidorfinal; end; end; muito obrigado a GR@C@ sua ajuda foi muito útil. e valeu carbox, fui atras de mais informações. Obrigado mesmo.

poxa.. ninguém? nem um exemplo de como gerar sem protesto? ou dizer que se eu to fazendo correto? a bronca e que o pessoal la do banco nao diz se aparece ou nao

Fiz como foi passado e so da esse erro agora: 1318-> rejeição: NF-e sem informação da IE do destinatario

também estou sem conseguir nota pra clientes com CNPJ e com IE como isento. tentei fazer assim: se for pessoa fisica eu boto dest.indedest := innaocontribuite e ide.indfinal = cfConsumidorFinal. se for pessoa jurídica eu verifico se tem IE ou nao, se tiver boto Dest.indIEDest := inContribuinte senao eu boto Dest.indIEDest := inNaoContribuinte e ide.indFinal := cfConsumidorFinal; abaixo o treco do código que eu uso: if cdccliente.fieldbyname('pessoa').asstring = 'F' then begin Dest.indIEDest := inNaoContribuinte; // Quando for pessoa física ide.indFinal := cfConsumidorFinal; // não contribuinte end; //tratando o IE para a nota 3.10 if cdccliente.fieldbyname('pessoa').asstring = 'J' then begin Dest.IE := cdccliente.fieldbyname('ie').asstring; Dest.indIEDest := inContribuinte; // pessoa jurídica normal. if (dest.IE = '') or (dest.IE = 'ISENTO') then begin Dest.indIEDest := inNaoContribuinte; //inIsento // Quando for pessoa jurídica porém isento, exemplo autarquias públicas, entidades filantrópicas, etc. ide.indFinal := cfConsumidorFinal; end else dest.indIEDest := inContribuinte; end; só que alguns clientes estão indo a nota, outros nao. o e da o erro original do post. arquem ai sabe como resolver isso?

oi Juliana, tudo bom? o banco é o banco do brasi. no meu caso eu quero que alguns boletos sejam registrados com protesto e outros serem registrados sem protesto. nao sei o que eu devo mudar em cada um. eu enviei uma remessa pro banco e eles nao acharam o boleto ate o dia que foi pago. mas isso foi mes passado. esse mês ja ta valendo que todo boleto tem que ser registrado senão o próprio banco vai rejeitar. nao sei pq meus códigos nao foram anexados. vou colocar de novo: 1) rotina que eu uso para criar os boletos. Titulo := ACBr.CriarTituloNaLista; titulo.DataDocumento := now; titulo.Mensagem.Text := ''; //titulo (conta) if Datanula(CDC_contas.fieldbyname('vencimento_boleto').asdatetime) then titulo.Vencimento := CDC_contas.fieldbyname('vencimento').AsDateTime else titulo.Vencimento := CDC_contas.fieldbyname('vencimento_boleto').AsDateTime; titulo.Carteira := CDC_contas.fieldbyname('carteira').Asstring; titulo.DataProcessamento := Date; titulo.DataDocumento := CDC_contas.fieldbyname('data').AsDateTime; titulo.ValorDocumento := CDC_contas.fieldbyname('valor').AsCurrency; titulo.NossoNumero := CDC_contas.fieldbyname('codigo').AsString; //numero do pedido. titulo.EspecieDoc := 'DM'; titulo.NossoNumero := nossonumero; //colocando o juros diario se tiver if CDC_contas.fieldbyname('juros_da_conta').AsCurrency = 0 then begin titulo.ValorMoraJuros := 0; titulo.ValorAbatimento := 0; end else begin titulo.ValorMoraJuros := CDC_contas.fieldbyname('juros_da_conta').AsCurrency; titulo.ValorAbatimento := 0; titulo.DataMoraJuros := CDC_contas.fieldbyname('vencimento').AsDateTime; titulo.Mensagem.Add('Cobrar juros de '+FormatCurr('R$ #,##0.00',(titulo.ValorMoraJuros * titulo.ValorDocumento)/100)+' por dia de atraso.'); end; //multa //se o boleto ja venceu e ja passou a multa nao cobrar ela novamente no corpo do boleto if CDC_contas.fieldbyname('multa').ascurrency = 0 then begin if CDC_contas.FieldByName('multa_atrazo').AsCurrency <> 0 then begin titulo.PercentualMulta := CDC_contas.fieldbyname('multa_atrazo').AsCurrency; titulo.Mensagem.Add('Cobrar Multa de ' + FormatCurr('R$ #,##0.00',titulo.ValorDocumento*( 1+ titulo.PercentualMulta/100)-titulo.ValorDocumento)+' após o vencimento.'); end else titulo.PercentualMulta := 0; end else titulo.PercentualMulta := 0; titulo.ValorDesconto := CDC_contas.fieldbyname('desconto').AsCurrency; //tirar de percentual pra valor titulo.ValorOutrasDespesas := 0; //descrição da conta no boleto titulo.Mensagem.add(CDC_contas.fieldbyname('referencia').AsString + peganota(cdc_contas.FieldByName('numero').AsInteger,conexao, erro)); titulo.Mensagem.Add(CDC_contas.fieldbyname('instrucoes_boleto').AsString); //sacado titulo.Sacado.NomeSacado := CDC_contas.fieldbyname('Sacado').AsString; titulo.Sacado.CNPJCPF := CDC_contas.fieldbyname('Sacadocnpj').AsString; titulo.Sacado.Logradouro := CDC_contas.fieldbyname('Sacadoendereco').AsString; titulo.Sacado.Numero := CDC_contas.fieldbyname('Sacadonumero').AsString; titulo.Sacado.Bairro := CDC_contas.fieldbyname('Sacadobairro').AsString; titulo.Sacado.Cidade := CDC_contas.fieldbyname('Sacadocidade').AsString; titulo.Sacado.UF := CDC_contas.fieldbyname('Sacadouf').AsString; titulo.Sacado.Email := CDC_contas.FieldByName('sacadoemail').AsString; titulo.Sacado.CEP := CDC_contas.fieldbyname('Sacadocep').AsString; //colocando o dia de protesto se tiver if (CDC_contas.fieldbyname('protestar').asstring = 'S') and (CDC_contas.fieldbyname('dias_protesto').asinteger <> 0) then begin titulo.TipoDiasProtesto := diCorridos; titulo.DataProtesto := titulo.Vencimento + CDC_contas.fieldbyname('dias_protesto').asinteger; if Titulo.Sacado.CEP = '' then begin aviso('O Boleto não pode ser gerado com protesto pois o cliente não possui um CEP cadastrado.'+#13+ 'Por favor verifique o CEP do cliente '+CDC_contas.FieldByName('sacado').AsString+'.', '',maviso); abort; end; end; if tempresa.GetParametros('JUROS_POR_VENCIMENTO_ATUAL', conexao) = 'S' then data_juros := CDC_contas.fieldbyname('vencimento').asdatetime else data_juros := CDC_contas.fieldbyname('vencimento_original').asdatetime; if (data_juros < now) and ComJuros then begin atrz := DaysBetween(now,data_juros); juros := (atrz * (CDC_contas.fieldbyname('JUROS_AO_MES').ascurrency * CDC_contas.fieldbyname('valor_original').ascurrency))/100; multa := ((CDC_contas.fieldbyname('valor_original').ascurrency * CDC_contas.fieldbyname('multa_atrazo').ascurrency)/100); if CDC_contas.findfield('dias_atrazo') <> nil then CDC_contas.fieldbyname('dias_atrazo').asinteger := DaysBetween(now,data_juros); titulo.ValorDocumento := (CDC_contas.fieldbyname('valor_original').ascurrency + multa + juros + CDC_contas.fieldbyname('cartorio').ascurrency + CDC_contas.fieldbyname('desconto').ascurrency + CDC_contas.fieldbyname('abatimento').ascurrency + CDC_contas.fieldbyname('DESPESAS').ascurrency) - CDC_contas.fieldbyname('PAGO_PELO_CLIENTE').ascurrency; end; //cedente acbr.Cedente.Nome := CDC_contas.fieldbyname('nomecedente').AsString; acbr.Cedente.CodigoCedente := cDC_contas.fieldbyname('digitoDoCedente').AsString; //CDC_contas.fieldbyname('codigoDoCedente').AsString; acbr.Cedente.CNPJCPF := CDC_contas.fieldbyname('cedenteCNPJ').AsString; acbr.Cedente.Logradouro := CDC_contas.fieldbyname('cedenteendereco').AsString; acbr.Cedente.NumeroRes := CDC_contas.fieldbyname('cedentenumero').AsString; acbr.Cedente.Complemento := CDC_contas.fieldbyname('cedentecomplemento').AsString; acbr.Cedente.Bairro := CDC_contas.fieldbyname('cedentebairro').AsString; acbr.Cedente.Cidade := CDC_contas.fieldbyname('cedentecidade').AsString; acbr.Cedente.UF := CDC_contas.fieldbyname('cedenteuf').AsString; acbr.Cedente.CEP := CDC_contas.fieldbyname('cedentecep').AsString; //tipo de cobranca if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCODOBRASIL' then acbr.Banco.TipoCobranca := cobBancoDoBrasil; if cdc_contas.FieldByName('tipo_banco').AsString = 'SANTANDER' then acbr.Banco.TipoCobranca := cobSantander; if cdc_contas.FieldByName('tipo_banco').AsString = 'CAIXAECONOMICA' then acbr.Banco.TipoCobranca := cobCaixaEconomica; if cdc_contas.FieldByName('tipo_banco').AsString = 'CAIXASICOB' then acbr.Banco.TipoCobranca := cobCaixaSicob; if cdc_contas.FieldByName('tipo_banco').AsString = 'BRADESCO' then acbr.Banco.TipoCobranca := cobBradesco; if cdc_contas.FieldByName('tipo_banco').AsString = 'ITAU' then acbr.Banco.TipoCobranca := cobItau; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCOMERCANTIL' then acbr.Banco.TipoCobranca := cobBancoMercantil; if cdc_contas.FieldByName('tipo_banco').AsString = 'SICRED' then acbr.Banco.TipoCobranca := cobSicred; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCOOB' then acbr.Banco.TipoCobranca := cobBancoob; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANRISUL' then acbr.Banco.TipoCobranca := cobBanrisul; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANESTES' then acbr.Banco.TipoCobranca := cobBanestes; if cdc_contas.FieldByName('tipo_banco').AsString = 'HSBC' then acbr.Banco.TipoCobranca := cobHSBC; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCODONORDESTE' then acbr.Banco.TipoCobranca := cobBancoDoNordeste; if cdc_contas.FieldByName('tipo_banco').AsString = 'BRB' then acbr.Banco.TipoCobranca := cobBRB; if cdc_contas.FieldByName('tipo_banco').AsString = 'BICBANCO' then acbr.Banco.TipoCobranca := cobBicBanco; if cdc_contas.FieldByName('tipo_banco').AsString = 'BRADESCOSICOOB' then acbr.Banco.TipoCobranca := cobBradescoSICOOB; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCOSAFRA' then acbr.Banco.TipoCobranca := cobBancoSafra; if cdc_contas.FieldByName('tipo_banco').AsString = 'SAFRABRADESCO' then acbr.Banco.TipoCobranca := cobSafraBradesco; if cdc_contas.FieldByName('tipo_banco').AsString = 'BANCOCECRED' then acbr.Banco.TipoCobranca := cobBancoCECRED; 2) comando pra para incluir na remessa: ACBr.DirArqRemessa := caminho_do_arquivo; ACBr.NomeArqRemessa := 'REMESSA_'+campocdc('conta_bancaria','apelido','codigo = '+inttostr(banco),conexao,ultimo_erro)+'_'+inttostr(numeroremessa)+'.txt'; if acbr.Banco.TipoCobranca = cobBancoDoBrasil then acbr.LayoutRemessa := c240; if acbr.Banco.TipoCobranca = cobSantander then acbr.LayoutRemessa := c240; acbr.GerarRemessa(numeroremessa); ai gostaria de saber o que eu tenho que fazer para enviar boletos com protesto e sem protesto pro banco, ja que agora vai ser obrigado o registro de todos os boletos para que o banco nao de rejeição neles.

Estou com uma duvida, como eu crio remessa sem e com protesto? Atualmente eu crio com protesto ou nao de acordo com o banco de dados, se for com protesto entao preencho os dias pra protestar, coloco as variáveis e tudo certinho. Se nao for protestar entao simplesmente nao coloco o dia e etc. Uso o código abaixo para preencher o boleto : anexe o código ai para criar a remessa eu faço: anexe o código ai liguei pro banco e nao acharam meu boleto la. mesmo informando os dias de protesto e etc. a remessa foi registrada tudo ok. so que o pessoal la nao localizou. eu to fazendo algo errado? eu nao passando os dados do protesto vou conseguir registrar o boleto no banco?

Entrei em contato com o banco. o boleto so apareceu la pro pessoal quando foi quitado. Antes disso nao aparecia la. mesmo enviando a remessa. achei muito estranho isso.

essa é a minha carteira. eu vou hoje fazer testes com protesto também.