GONDIM

Não tinha colocado, valeu parece que deu certo, pelo menos gerou como o zero agora. Abraços

Boa tarde, estou gerando o arquivo pelo componente ACBR ele gera a primeira linha abaixo: 75600000 241858598000131 0426410000000553603 EFICAZ TESTE SICOOB 12708202014535600000508100000 no banco gera esta: 75600000 241858598000131 04264100000005536030EFICAZ LIMPEZA CONSERVACAO E SICOOB 12408202015214400000208100000 eles estão falando que esta faltando um zero onde este sublinhado em vermelho, neste caso eu não sei como proceder pois o componente gera o arquivo automático. em anexo os dois arquivos. Alguém pode me ajudar, por favor. BB_REMESSA_NRO_5_ACBR.TXT EFICAZ LIMPEZA-CORRETO VALIDADO PELO BANCO.TXT DADOS BANCARIOS TESTE EFICAZ.docx

Valeu obrigado

Boa tarde, consegui ler o arquivo se você quiser pode te passar o código manda seu e-mail que passo para você. abraços

Pessoal, boa tarde, Preciso gerar o boleto da Sicoob e no componente achei estas três opções cobBancoDoBrasilSICOOB, cobBradescoSICOOB, cobCaixaSicob e realmente não sei qual a diferença entre eles. No caso os boletos da Sicoob esta atrelado a algum banco como vou saber qual destes que cliente vai utilizar. Desde já agradeço.

Juliana, boa tarde, Os campos estão sendo preenchidos desta forma ACBrBoleto1.Cedente.Convenio := 2985086 ACBrBoleto1.Cedente.Modalidade := 035 Titulo:= ACBrBoleto1.CriarTituloNaLista; Titulo.Carteira := 17 Seria a forma correta ou tenho que trocar ACBrBoleto1.Cedente.Modalidade := 035 por ACBrBoleto1.Cedente.Modalidade := 17

Pessoal enviei o arquivo de remessa do banco do brasil e mandei para homologação, eles me retornaram estes erros: 1. Arquivo teste “BB_REMESSA_NRO_7_07-12-2018_12-01-09.TXT” analisado com base nos dados acima, com as seguintes inconsistências: > Segmento R < Lote 0001 > -------------------------------------------------------------------- Posições 067 a 074: Preencher com a data de cobrança da multa; Deverá ser posterior ao vencimento do título. > Segmento S < Lote 0001 > -------------------------------------------------------------------- Posições 018 a 018: Preencher com '8' para Bloqueto por email. Esse segmento é utilizado no Banco do Brasil somente para informar o email de Pagadores que receberão seus títulos por email. Para isso, é necessário o cadastramento prévio dessa opção no seu convênio de cobrança junto ao Banco do Brasil. Nesse caso, solicite a sua agência de relacionamento Posições 021 a 160: Informar o endereço de email do cliente; Pode ser informado mais de um, usando ' (sinal gráfico apóstrofo) Favor efetuar os ajustes no seu programa próprio e nos responder anexando novo arquivo remessa para continuidade do atendimento. 2. Inconsistências na diagramação dos boletos Ficha de Compensação - CARTEIRA: Informe código da modalidade de cobrança utilizada para a emissão do boleto, ou seja: 17 Ficha de Compensação - ACEITE: Informe 'N' Após ajuste das inconsistências apontadas acima podem encaminhar boletos para processo produtivo-impressão/expedição. Salientamos que, no processo produtivo, é de responsabilidade da empresa o correto preenchimento ou a ausência de dados nos campos da diagramação do boleto, em virtude de questões legais, fiscais, etc. Os boletos recebidos estão homologados/validados (por amostragem): Linha digitável: validado Código de Barras: validado Nosso Número: validado Caso não seja identificado retorno desta mensagem com arquivo modificado, no prazo de 5 dias corridos, o protocolo será encerrado em nossos sistemas. Gentileza, ao responder, conservar histórico desse mail. Atenciosamente, Cenop Brasília - Suporte Técnico 0800 729 0001 (Opções 8,4,1,5) - Demais localidades 4004 0001 (Opções 8,4,1,5) - Capitais [email protected] Antes de imprimir, pense em sua responsabilidade com o meio ambiente BB_REMESSA_NRO_7_07-12-2018_12-01-09.TXT boletos teste fernandes e aguiar 07-12-2018.pdf

Pessoal boa tarde, Alguém conseguiu verificar, ou pode me indicar quem possa ter feito. Abraços

bom dia, Alguém conseguiu gerar o boleto da Umicred de minas banco 136.

Pessoal estou tentando ler o arquivo abaixo em delphi 7 com este código abaixo, só que esta gerando erro, alguém pode me ajudar: VAR JsonStream : TStringStream; Retorno : String; lHTTP: TIdHTTP; ja: TlkJSONobject; jl: TlkJSONlist; I : Integer; jsonRaiz :TlkJSONObject; Status,Motivo:String; Pedido: String; begin JsonStream:= TStringStream.Create(''); ja := TlkJSONobject.Create; jl := TlkJSONlist.Create; try { JsonStream conterá os dados JSON requisitados :} lHTTP.Get('http://painel.accon.io/fornace/wspartners/RecuperaDetalhesPedido.php?loja_id=3&ped_id=13487&salt=7ba7b2b55deb612f', JsonStream); JsonStream.Position := 0; Memo1.Lines.Clear; Memo1.Text := JsonStream.ReadString(JsonStream.Size); jsonRaiz := TlkJSON.ParseText(Memo1.Text) as TlkJSONObject; if(jsonRaiz <> nil)then begin jl :=jsonRaiz.Child[0].Field['dados'] as TlkJSONlist;/* neste local gera o erro for i := 0 to jl.Count-1 do begin pedido := VarToStr(jl.Child.Field['PED_ID'].Value); Status := VarToStr(jl.Child.Field['PED_STATUS'].Value); end; end; finally JsonStream.Free(); lHTTP.Free; end; este o arquivo: {"pedido":{"dados":{"PED_ID":"13487","PED_STATUS":"A","PED_DES_ID":"0","PED_DATA":"2018-05-14 16:43:30","PED_DATA_MOVIMENTO":"2018-05-14 00:00:00","PED_CLI_ID":"9469","PED_ORIGEM":"TGO","PED_OBS":"","PED_NOME_BALCAO":"TESTE ACCON","PED_PGTO_DESC":"Dinheiro","PED_VLR_PRODUTOS":"53.9","PED_VLR_DESCONTO":"0","PED_VLR_ACRESCIMOS":"0","PED_TAXA_ENTREGA":"0","PED_VLR_PEDIDO":"53.9","PED_VLR_PAGO":"100","PED_VLR_RECEBIDO":"100","PED_VLR_TROCO":"46.1","PED_CPF":"","PED_ECOMMERCE_PREPAGO":"N","PED_ECOMMERCE_PAYMENT_ID":"","PED_ECOMMERCE_PAYMENT_CARD":"","PED_ECOMMERCE_PAYMENT_TID":""},"itens":[{"PIT_PED_ID":"13487","PIT_ITEM":"3","PIT_PROD_ID":null,"PIT_DESCRICAO":"GRD Frango","PIT_COMBO":"0","PIT_ADICIONADO":"Sem Borda Recheada ","PIT_RETIRADOS":"","PIT_QTD":"1","PIT_FRACAO":"1","PIT_PRC_UNITARIO":"53.9","PIT_PRC_FRACAO":"53.9","PIT_PRC_TOTAL":"53.9","PIT_VLR_ADC":"0","PIT_VLR_ICM":"53.9","PIT_VALOR_DESCONTO":"0"}],"cliente":{"CLI_ID":"9469","CLI_NOME":"TESTE ACCON","CLI_DATA_CADASTRO":"2018-03-19 19:03:23","CLI_OBSERVACAO":"","CLI_CPF_CGC":"71667660187","CLI_EMAIL":"[email protected]","CLI_FONE":"11973973382"},"clienteendereco":{"CDA_ID":"9806","CDA_CLI_ID":"9469","CDA_LOGRADOURO":"Rua Bento Ferreira 75","CDA_CEP":"38060240","CDA_COMPLEMENTO":"","CDA_NUMERO":"","CDA_CIDADE":"Uberaba","CDA_BAIRRO":"Merces","CDA_PAIS":"MG","CDA_REFERENCIA":"BR","CDA_APTO_SALA":""}}}

bom dia, Onde posso baixar o componente para ler o objeto json para delphi 7

Pessoal, bom dia, Primeiramente me desculpe pelo post anterior, mas achei que poderia ajudar. Fiz algumas alterações na unit UnicredRS mas continua gerando erro conforme enviado pelo validador do banco descrito abaixo Estou colocando a unit modificada em anexo para verificar se podem ajudar . Abraços. ACBrBancoUnicredRSINFORSERVICE.pas

boa tarde, Tendei de várias formas nenhuma delas funcionou.

Bom dia, Alguém conseguiu verificar sobre a geração o boleto da UNICRED de Minas, ou sabe o que posso fazer pois o componente gera para o banco 99 e em minas o banco é 136 com formato diferente. Abraços.

Boa tarde, Continuo com o mesmo problema, alguém pode me ajudar. Agradeço antecipadamente.

Boa tarde, pela sua unit foi gerado o seguinte boleto em anexo. O banco me enviou que a linha digitável após validação esta diferente, favor ver o anexo. Preciso fazer alguma configuração antes ? Agradeço antecipadamente. LINHA DIGITAVEL.bmp Boleto - UNICRED Ag_5821-1 Conta_000000080975-6.pdf

boa tarde peguei sua unit esta faltando duas uses uses Classes, SysUtils, Contnrs, ACBrBoleto,ACBRValidador,UFrmFiltroRemessa,Vcl.Dialogs; poderia me ajudar ? seria estas duas : UFrmFiltroRemessa,Vcl.Dialogs;

Boa tarde, Estou gerando o boleto da Unicred para banco numero 136, é totalmente diferente no componente cujo o banco é 091, pois o numero de dígitos são 11 para nosso numero o que afeta todo o arquivo, alguém conseguiu fazer para Unicred de minas gerais banco 136. Agradeço antecipadamente.

Bom dia, Sobre o boleto da Unicred no componente esta desta forma cobUnicredRS, existe alguma diferença para estado de Minas Gerais. Outro detalhe alguém tem a logo do banco em preto e branco que é impresso no boleto. Agradeço a atenção.

Bom dia, vou te mandar meu código, já deu certo. O erro é porque você tem que preencher ou a data do protesto ou a data da baixa da uma olhada abaixo. Espero ter ajudado.

Pessoal, boa tarde, Gerei o arquivo de remessa da caixa e enviei para teste me retornaram o seguinte erro abaixo. Segue análise: Segmento P 36.3P Código p/ Protesto Código para Protesto 221 221 1 - Num C026 Conteudo Atual:3 Obs:Favor escolher entre protesto ou devolução. 38.3P Código p/ Baixa/Devolução Código para Baixa/Devolução 224 224 1 Conteudo Atual:2 Boleto Agência / Código Beneficiário Conteudo Atual:0161/6575226-4 Conteudo Esperado:0161/657522-6 (este erro já consegui resolver) mandei uma mensagem para o suporte e me responderam: "deve escolher o prazo do boleto para expirar, ou seja o prazo de validade deste boleto Protesto vai a cartório automaticamente e devolução o boleto apenas expira e perde a validade. mas precisa escolher o prazo que é de 5 a 90 dias" Agora eu não sei como casar estes campos solicitados. vou mandar os arquivos em anexo da remessa e do boletos. Se alguém pode me ajudar. CAIXA_REMESSA_NRO_6_10-07-2017_14-11-09.TXT CAIXA_BOLETOS_PDF_REMESSA_NRO_6_10-07-2017_14-03-14.pdf

Boa tarde, estou com algumas duvidas e não achei no fórum: Estou como algumas duvidas no NFC-E: 1- Quando tenho acréscimo e desconto sobre o item mais acréscimo e desconto no total da venda como vou casar os campos: Prod.vUnCom := casa com o valor unitário do produto apenas ou adiciona o acréscimo e desconto do item Prod.vProd := casa com o valor unitário do produto vezes quantidade apenas ou adiciona o acréscimo e desconto item Prod.vOutro := caso tenha colocado o valor do vUnCom igual ao valor do produto, o vOutro seria o valor do acréscimo do item mais o valor do acréscimo geral rateado Prod.vDesc := caso tenha colocado o valor do vUnCom igual ao valor do produto, o vDesc seria o valor do desconto do item mais o valor do acréscimo geral rateado Na parte dos impostos Quando a alíquota do produto for FF ou NN qual o valor da alíquota será utilizado para o calculo do imposto se existir calculo para empresas do Simples Nacional ? Caso tenha que gerar o calculo quando CSOSN for 201 ou 202 será executado calculo do imposto normal, com todos os campos preenchidos sendo empresa do Simples Nacional: ICMS.Orig := OrigProdAux;//qryVendasRealizadasCD_ORIGEMPRODNFE.AsVariant; ICMS.CSOSN := csosn201; ICMS.modBCST := qryVendasRealizadasDS_MODALBCICMSST.AsVariant; Vrretorna := FloatToStrf(qryVendasRealizadasVR_MVA.AsVariant,ffnumber,15,4); ICMS.pMVAST := StrToFloat(TiraApenasPonto(Vrretorna)); Vrretorna := FloatToStrf(qryVendasRealizadasVR_REDUCALCICMS.AsVariant,ffnumber,15,4); ICMS.pRedBCST := StrToFloat(TiraApenasPonto(Vrretorna)); Vrretorna := FloatToStrf(VerificaTerceiraCasa5(qryVendasRealizadasVR_BASEICMSST.AsVariant),ffnumber,15,4); ICMS.vBCST := StrToFloat(TiraApenasPonto(Vrretorna)); Vrretorna := FloatToStrf(qryVendasRealizadasVR_ALIQUOTAICMS.AsVariant,ffnumber,15,4); ICMS.pICMSST := StrToFloat(TiraApenasPonto(Vrretorna)); Vrretorna := FloatToStrf(VerificaTerceiraCasa5(qryVendasRealizadasVR_ICMSST.AsVariant),ffnumber,15,4); ICMS.vICMSST := StrToFloat(TiraApenasPonto(Vrretorna)); ICMS.pCredSN := 0; ICMS.vCredICMSSN := 0; CODCSOSN := qryVendasRealizadasDS_CDCSOSN.AsString; VRBASEICMSST := VRBASEICMSST + VerificaTerceiraCasa5(qryVendasRealizadasVR_BASEICMSST.AsFloat); VRICMSST := VRICMSST + VerificaTerceiraCasa5(qryVendasRealizadasVR_ICMSST.AsFloat);

Pessoal boa tarde, Estou com o seguinte problema: Recebi do meu cliente as seguinte informações: CONTA: CAIXA ECONOMICA FEDERAL AG.1839 C/C.1716-6 (não existe digito da agencia - coloquei zero) NR.CONVENIO:nt NR.CARTEIRA:nt MODALIDADE/VARIAGCO:nt ESPECIE:DM MOEDA: R$ VALOR MORA DIARIA:0,05 VALOR MULTA:2,98 NR.CEDENTE:1839.870.00000543-2(coloquei o numero do cedente apenas 870000005432 pois 1839 seria a agencia) NR.DIGITOS NOSSO NUMERO:16(o componente aceita no máximo 15 ele colocou 16) Em anexo tem dois boletos um gerado pelo sistema da caixa e o outro gerado pelo componente, verifiquei que a numeração dos boletos são diferentes o da caixa começa com 10490 o do componente começa 10497. Outro detalhe no campo agencia/ código beneficiário o da caixa gera 1839.870.00000543-2 o do componente gera 1839/870000005432-1 ele cria um digito verificador a mais, quando tento pagar o boleto ele retorna o seguinte mensagem cedente não localizado. O que estou fazendo errado por favor? CAIXA_BOLETOS_PDF_REMESSA_NRO_2_01-10-2015_15-49-04.pdf KI SALGADO AGOSTO.pdf CAIXA_BOLETOS_PDF_REMESSA_NRO_3_05-10-2015_11-33-27.pdf

Pessoal, bom dia, Estou fazendo a geração dos boletos da caixa economica, os campos que foram passados como exemplo foram: AG.1839 C/C.1716-6 NR.CEDENTE:1839.870.00000543-2 O problema que ocorre é que não tem digito verificador da agencia e o componente pede este campo como obrigatório, conforme comando abaixo: if (Cedente.Nome= '') or (cedente.Conta = '') or ((Cedente.ContaDigito ='') and (Banco.TipoCobranca <> cobBanestes)) or (Cedente.Agencia = '') or ((Cedente.AgenciaDigito = '') and (Banco.TipoCobranca <> cobBanestes)) then raise Exception.Create(ACBrStr('Informações do Cedente incompletas')); Alguém sabe como proceder ou posso colocar o digito da agencia como zero. Obs: estou enviando novamente a mesma pergunta pois estava como problemas ontem para digitar o texto. Abraços.

CAIXA BOLETO.txt CAIXA BOLETO.txt BOLETO CAIXA PREENCHER DADOS .txt