Pedro_Manoel

boa tarde. Juliana, pela linha digitavel foi possivel fazer o pagamento da parcela mas pelo codigo de barras não... então colocamos uma função que faz o desenho do codigo de barras, com isso foi possivel fazer o pagamento do boleto pelo codigo de barras e linha digitavel perfeitamente... se vc quiser que eu anexo a função para analize me avise.. eu postei em outro topico o leiaut do boleto com algumas alterações para homologação da caixa vc conseguiu dar uma analizada nele para disponibilizar para todos..... Sem mais Desde ja Agradeço.

BOA TARDE A TODOS.. ESTOU COM UM PROBLEMA MTO SERIO COM OS BOLETOS DA CEF (SOCOB) , USANDO O QUIQREP PARA IMPRESSAO E LAYOUT PADRÃO... A LINHA DIGITAVEL FICA CERTINHA MAS O COD DE BARRAS NÃO PASSA NAS LEITORAS... ALGUEM JA TEVE ESTE PROBLEMA CASO SIM ME AUXILIE ESTOU NO AGUARDO.... SEM MAIS

boa tarde Juliana {Montando Campo Livre} CampoLivre := ANossoNumero + ACBrTitulo.ACBrBoleto.Cedente.Agencia + ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente; não tem necessidade de fazer isso na montagem do campo livre pq o certo do cod do cedente é ser AAAAOOOCCCCCCCC A agencia O operacao C cod cedente com isso a montagem do campo livre esta certa. caso contrario o campo Agencia/Cod Cedente estaria errado pq o copy é a partir da posicao 5 que é pulando o cod da agencia.

bom dia no caso da CaixaEconomica quantos dig são o cod do cedente pq o que o banco nos passa 16 digitos exmplo: 3127870000001047 o certo seria sem os 4 primeiros que é a agencia ficando somente 870000001047 sem mais estou no aguardo...

Bom dia! segue as correções SICOB e Economica, em ambos foram feitas as verificações de pessoa fisica ou juridica eu estou com um problema meio grave eu uso para geração do boleto o quiq rep. e o cod de barras não esta lendo... pelo banco mas a linha digitavel esta correta.. caso alguem tenha passado por isso e saiba como resolver me avise!! sem mais. ACBrCaixaEconomica.pas ACBrCaixaEconomicaSICOB.pas

Bom dia ! Gostaria de saber se vc estão usando o Fort Repot ou Quiq pq eu estou com problema com o cod de barras do quiq o banco não consegue fazer a leitura do cod de barras.... eu fiz algumas alterações no layout do boleto para homologação da caixa .... foi colocado uma opção de colocar a logo da empresa no boleto...

bom dia estou com o mesmo problema para o boleto sigcb. O banco não consegue fazer a leitura do cod de barras alguem ja teve este problema??? sem mais desde ja agradeço.

qual o topico ? que vc esta falando

boa tarde !! estou fazendo a Homologação dos boletos da caixa economica federal. eu passo o layout (padrão) na impressao do boleto e e modelo de ACBrCaixaEconomica. O boleto é impresso certo não corta o cod de barras e o tamanho esta certo mas a leitora de cod de barras não le o boleto, caso mandar pagar pela linha digitavel da certinho mas o cod de barras da problema alguem ja teve este problema.... sem mais estou no aguardo.

Bom dia !! Alguem saberia me dizer oque são estes tipos de retorno ( TituloEmSer , toRetornoRecebimentoInstrucaoConcederAbatimento, toRetornoTituloSustadoJudicialmente)? desde ja agradeço.

bom dia . Obrigado pela resposta.

Boa tarde! Tem alguma propriedade que retorne o nosso numero formatado(nossonumero impresso no boleto), logo apos a geração do mesmo. pois na hora de processar o arquivo de retorno eu vou precisar ter o nosso numero salvo para comparar com o do retorno. desde ja agradeço . Sem mais

codigo do ACBRBoleto. " rCNPJCPF := trim( Copy(ARetorno[1],19,15)) ; rCNPJCPF := RightStr(rCNPJCPF,14) ; with ACBrBanco.ACBrBoleto do begin if (not LeCedenteRetorno) and (rCNPJCPF <> OnlyNumber(Cedente.CNPJCPF)) then raise Exception.Create(ACBrStr('CNPJ\CPF do arquivo inválido')); " quando ele verifica a variavel rCNPJCPF com o que foi passado de parametro da erro pq a variavel é preenchida com as 14 posições do retorno que preenche com 0 a esquerda caso for um cpf numca vai ser validado. if lenght(Cedente.CNPJCPF)>11 then begin rCNPJCPF := trim( Copy(ARetorno[1],19,15)) ; rCNPJCPF := RightStr(rCNPJCPF,14) ; end else begin rCNPJCPF := trim( Copy(ARetorno[1],22,11)) ; rCNPJCPF := RightStr(rCNPJCPF,11) ; end; with ACBrBanco.ACBrBoleto do begin if (not LeCedenteRetorno) and (rCNPJCPF <> OnlyNumber(Cedente.CNPJCPF)) then raise Exception.Create(ACBrStr('CNPJ\CPF do arquivo inválido'));

Deu certo pessoal eu removi e instalei novamente e deu certo... mto obrigado

Precisei formatar a minha maquina. e agora estou instalando novamente os compomentes quando eu vo compilar o ACBRNFE ele apresenta este erro em anexo

"Na verdade o componente para Nota Fiscal de Serviço Eletrônica é o ACBrNFSe e não o ACBrNFE." eu poderia usar o acbrnfe para emissao de nfe conjugada e somente serviço. Pq é nela que eu estou tendo o problema que no item que é "Serviço" esta levando uma cst na danfe mas no XML não aparece inf de cst ja olhei o codigo mas não passa inf para situação tributaria.. sem mais, desde ja agradeço

boa tarde mto obrigado pela ajuda, eu ja estava ficando quase loko com este erro deve ser por isso que eu não consegui encontrar o erro antes .... sobre o new tiro de todos os registros..... obrigado.

este é o arquivo gerado.. |M200|343,59|0,00|0,00|343,59|0,00|0,00|343,59|0,00|0,00|0,00|0,00|343,59| |M210|01|293040,02|20823,48|1,65|||343,59|0,00|0,00|0,00|0,00|343,59| |M600|1582,58|0,00|0,00|1582,58|0,00|0,00|1582,58|0,00|0,00|0,00|0,00|1582,58| |M610|01|293040,02|20823,48|0,00|||1582,58|0,00|0,00|0,00|0,00|1582,58| eu passei na mão a aliq de cofins mas mesmo assim ele passo zerado... eu não achei de onde ele faz isso.... estou no aguardo....

bom dia seguem abaixo os registros M200,M210,M600,M610... eu estou passando a aliquota de pis e cofins mas ele so leva para o arquivo a aliq de pis a de cofins fica em branco.... eu dei uma olhada no demo e esta igual. desde ja agradeço // só é usado pra empresas lucro real with RegistroM200New do begin {02} VL_TOT_CONT_NC_PER := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100)); {03} if vlcredNC =0 then VL_TOT_CRED_DESC := 0 else VL_TOT_CRED_DESC := vlcredNC; {04} VL_TOT_CRED_DESC_ANT := 0; {05} VL_TOT_CONT_NC_DEV := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100))-vlcredNC; {06} VL_RET_NC := 0; {07} VL_OUT_DED_NC := 0; {08} VL_CONT_NC_REC := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100))-vlcredNC; {09} VL_TOT_CONT_CUM_PER := 0; {10} VL_RET_CUM := 0; {11} VL_OUT_DED_CUM := 0; {12} VL_CONT_CUM_REC := 0; {13} VL_TOT_CONT_REC := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100))-vlcredNC; // só é usado pra empresas lucro real with RegistroM210New do begin {02} COD_CONT := ccNaoAcumAliqBasica; {03} VL_REC_BRT := vlBC; {04} VL_BC_CONT := vlBcPis; {05} ALIQ_PIS := aliqpis; {06} QUANT_BC_PIS := 0; {07} ALIQ_PIS_QUANT := 0; {08} VL_CONT_APUR := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100)); {09} VL_AJUS_ACRES := 0; {10} VL_AJUS_REDUC := 0; {11} VL_CONT_DIFER := 0; {12} VL_CONT_DIFER_ANT:= 0; {13} VL_CONT_PER := StrToCurr(FormatCurr('#####0.00',(vlBcPis*aliqpis)/100)); end; end; ///cofins with RegistroM600New do begin {02} VL_TOT_CONT_NC_PER := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100)); {03} if vlcredNC =0 then VL_TOT_CRED_DESC := 0 else VL_TOT_CRED_DESC := vlcredNC; {04} VL_TOT_CRED_DESC_ANT := 0; {05} VL_TOT_CONT_NC_DEV := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100))-vlcredNC; {06} VL_RET_NC := 0; {07} VL_OUT_DED_NC := 0; {08} VL_CONT_NC_REC := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100))-vlcredNC; {09} VL_TOT_CONT_CUM_PER := 0; {10} VL_RET_CUM := 0; {11} VL_OUT_DED_CUM := 0; {12} VL_CONT_CUM_REC := 0; {13} VL_TOT_CONT_REC := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100))-vlcredNC; with RegistroM610New do begin {02} COD_CONT := ccNaoAcumAliqBasica; {03} VL_REC_BRT := vlBC; {04} VL_BC_CONT := vlBcCofins; {05} ALIQ_COFINS := aliqCofins; {06} QUANT_BC_COFINS := 0; {07} ALIQ_COFINS := 0; {08} VL_CONT_APUR := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100)); {09} VL_AJUS_ACRES := 0; {10} VL_AJUS_REDUC := 0; {11} VL_CONT_DIFER := 0; {12} VL_CONT_DIFER_ANT:= 0; {13} VL_CONT_PER := StrToCurr(FormatCurr('#####0.00',(vlBcCofins*aliqCofins)/100)); end; end;

Obrigado pela resposta verdade no arquivo não tinha a aliq de cofins coloquei na mão salvei, paro de dar os erros... Mas estou com problema, eu estou passando a aliqcofins(%) no bloco mas ele não esta passando a inf para o registro ... O meu calculo de pis cofins não é por unidade então teria que passar a aliq em %.... Pelo que eu estou vendo ele esta entendendo que calculo fosse por unidade mas não é, as inf estão corretas e mesmo assim ele passa zerado a aliq.... Vc ja teve este problema ?? Desde ja agradeço... MODERAÇÃO:Favor não postar com todas as letras em MAIÚSCULO, como se estivesse com o Caps Lock ligado. Assim parece que está gritando.

boa tarde obrigado pela resposta, mas quando eu não passo o M610, ele da outro erro que o registro filho do M600 não foi gerado..... e a minha base de dados só tem inf com cstpis e cstcofins 01 estou no aguardo.

estou com este problema e não consigo resolver estou colocando a tela de erro....

EMBarbosa valeu ....eu atualizei o ACBR e este erro foi corrigido.... mas pintou um outro problema..no m200 campo VL_TOT_CONT_NC_PER (02) eu estou passando '0' pq a minha empresa é lucro presumido (cumulativo), e ele esta levando informação sozinho...sem eu passar.... caso mais alguem ja tenha tido este problema. estou no aguardo.

boa tarde estou com um problema pois o meu arquivo esta gerando o registro m211 e m611 sendo que não poderia pq a minha empresa não é cooperativa e eu não estou passando os registros em momento algum esta gerando sozinho no registro 0000 no campo 13 IND_NAT_PJ eu estou passando 00 ...sendo que para entrar no m211 teria que passar 01 neste campo.... alguem ja teve este problema.... feliz 2012 a todos..... desde ja agradeço

boa tarde ... sim notas de entrada são de compras... vc pode usar tando a consolidada quando a individual ... pelo que eu pesquisei todos estão preferindo o modo individual pq ele leva mais inf ao arquivo...tanto um quanto o outro vão esta certos...