vinizioWOW

Boa tarde, No Manual de Orientações do Contribuinte, página 66, regra N28 diz que o valor deve ser informado nas seguintes condições: Quando tomador for pessoa Jurídica (CNPJ informado); Tipo de serviço for igual a Transporte de Pessoas ou Excesso de Bagagem; Acredito que nesse caso deveria ter um ajuste na unit pcteCTeW.pas e retirar essa condição de 'inNaoContribuinte' afinal a regra fala em ser pessoa jurídica e não o tipo do contribuinte. Além de retirar a regra do estado do RS. if ((CTe.Imp.infTribFed.vPIS > 0) or (CTe.Imp.infTribFed.vCOFINS > 0) or (CTe.Imp.infTribFed.vIR > 0) or ((CTe.Imp.infTribFed.vINSS > 0) or (InformarINSS = 1)) or (CTe.Imp.infTribFed.vCSLL > 0)) then

Bom dia, Passei pelo mesmo problema da rejeição '760 - INSS deve ser preenchido para tomador pessoa jurídica' ao emitir um CT-e OS. Tomador do estado de MG; Pessoa jurídica; 'tpServ' = 5 - Transporte de Pessoas; Observei no último release que existe na unit pcteCTeW.pas a condição do tomador ser do RS e ser NÃO CONTRIBUINTE. É possível trocar a condição para tomador contribuinte e adicionar a condição de ser de MG também? Cordialmente,

Bom dia Ricardo! Eu já faço dessa forma. Gero o PDF usando o comando ACBrNFe1.NotasFiscais.ImprimirPDF e depois uso um shellexecute execute para abrí-lo.

Boa tarde a todos, Recentemente ao atualizar os fontes do ACBr, alguns clientes que usam fonte ampliada na resolução de tela do Windows começaram a relatar que a geração do DANF-e em Fortes estava saindo distorcida e cortada na margem direita. Eu segui os passos descritos em um post aqui do fórum de 2015 (cito abaixo), porém a geração reduz muito o tamanho e acaba ficando ainda mais distorcida. Algum colega tem alguma sugestão de como resolver? https://www.projetoacbr.com.br/forum/topic/23770-bug-em-todos-os-danfes-fortes-report-em-trunk2/?tab=comments#comment-153436 Grato pela atenção.

Bom dia Cleilson, Entre em contato com a CRISTINA pelo telefones (37) 3322-2149 ou (37) 9 9987-5463 (vivo) para maiores informações. Temos planos bem customizáveis que vai lhe garantir bom retorno de investimento.

OPORTUNIDADE - PARCERIA Temos softwares customizados para integrar com seu ERP: NFC-e, Vendas em Android, SAT, Cotação... CONTATO: [email protected]

Bom dia, Alguns clientes meus me reportaram que não estavam conseguindo ler o código de barras do DANFe retrato gerado pela unit ACBrNFeDANFeRLRetrato.pas do ACBr. Testei com alguns leitores de código de barras nossos, todos configurados em modo padrão de fábrica e realmente não estava lendo. Notei que a propriedade BarCodeType estava configurada para bcCode128C. Mudei para bcEAN128C e consegui ler os códigos gerados no DANFe. Gostaria de verificar com os moderadores se é possível deixar a propriedade BarCodeType como padrão bcEAN128C e confirmar se mais alguém teve esse problema.

Pessoal que respondeu mas não deixou contato. Se ainda tiverem interesse podem entrar em contato pelos canais: Email: [email protected] Celular Vivo/WhatsApp: (37) 9 9987-5463 Fixo: (37) 3322-2149 Falar com Cristina.

Boa tarde, Obrigado pela resposta EmBarbosa.

Boa tarde, Estou com dúvida com relação ao campo 10 - Valor da mercadoria/produto - do registro 60I do Sintegra. http://www.fazenda.mg.gov.br/empresas/legislacao_tributaria/ricms_2002_seco/anexovii2002_2.htm Nova redação dada ao subitem 16.5.1.7 pelo Conv. ICMS 42/09, efeitos a partir de 09.07.09. 16.5.1.7 - CAMPO 10 - Valor unitário líquido (valor bruto diminuído do desconto) da mercadoria/produto com 2 decimais Alguns contadores de clientes meus estão pedindo para informar o valor unitário do item, já outros estão pedindo para informar o valor total do item. Alguém sabe me falar qual a interpretação correta nesse caso? Grato pela ajuda.

Boa noite senhores, Tenho uma aplicação Delphi Android/iOS com alguns PageControls e seus respectivos TabItens, no Android funciona normal, mas no iOS quando faço a transição de um tab para outro, os componentes inseridos nos tabs não atualizam. É como se tivesse somente um TabItem e os componentes desse tabItem sobrepusessem os demais. Alguém já passou por isso?

Senhores, Gostaria de convidá-los a conhecer o Movimento Brasil Eficiente. Consiste numa campanha para conquistar apoiadores ao abaixo-assinado do Movimento Brasil Eficiente pela Simplificação Fiscal e pela Instalação do Conselho de Gestão Fiscal. Com a simplificação fiscal, o Brasil passará a ter um único imposto sobre a circulação, reduziremos drasticamente a burocracia e a quantidade de tributos. Com o Conselho de Gestão Fiscal, o governo irá gastar melhor o dinheiro que arrecada com nossos impostos. Lutamos para reduzir a carga tributária no Brasil e, para que isso ocorra, precisamos primeiro que estas duas medidas sejam adotadas: a simplificação fiscal e o Conselho de Gestão Fiscal. Vamos fazer nossa parte. Ajude divulgando o projeto no seu site, blog, redes sociais e em outros fóruns sobre programação e legislação tributária. https://www.brasileficiente.org.br/assina-brasil?path=%2F Grato pela atenção!

Bom dia, Olhei no meu repositório e só há uma RLMetaVCL.pas. No entanto, consegui resolver alterando a função CanvasGetPixels conforme código abaixo: function CanvasGetPixels(ACanvas: TCanvas; X, Y: Integer): TColor; begin Result := ACanvas.Pixels[X, Y]; end; type TLinePattern = record Count: Byte; Lengths: array[0..5] of Byte; end; const LinePatterns: array[TPenStyle] of TLinePattern = ( (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psSolid (Count: 2;Lengths: (3, 1, 0, 0, 0, 0)), // psDash (Count: 2;Lengths: (1, 1, 0, 0, 0, 0)), // psDot (Count: 4;Lengths: (2, 1, 1, 1, 0, 0)), // psDashDot (Count: 6;Lengths: (3, 1, 1, 1, 1, 1)), // psDashDotDot {$IfDef FPC} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psInsideFrame (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psPattern (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psClear {$Else} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psInsideFrame , (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psUserStyle (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psAlternate {$endif} );

Bom dia amigos, Estou tentando instalar o Fortes Reports no Delphi 2006 pelo frceInstall.exe e o mesmo está me retornando o log: D:\..\FortesReport\Source\RLMetaVCL.pas(678) Error: E2072 Number of elements (11) differs from declaration (9) D:\..\FortesReport\Source\RLMetaFile.pas(1029) Fatal: F2063 Could not compile used unit 'RLMetaVCL' Alguém já passou por este erro que possa me ajudar?

Impressora: Testei com Daruma FS600 e Bematech MP2100. Configurações do componente ACBrECF: IgnorarTags = False.

Olá, Estou tentando imprimir no rodapé do cupom o a frase NOTA LEGAL: ICMS = 0,00 onde a expressão "NOTA LEGAL": deve ser impressa em negrito. O componente não obedece e a impressão não sai em negrito. Verifiquei nos nos fontes do componente e a formatação da tag está correta: '<n>NOTA LEGAL:</n>'. Se colocar um texto qualquer antes do parâmetro do negrito, ele sai certo. Do contrário, não sai.

Olá pessoal, Confirma se meu raciocínio está correto: Dest.indIEDest := inNaoContribuinte; // Quando for pessoa física Dest.indIEDest := inIsento // Quando for pessoa jurídica porém isento, exemplo autarquias públicas, entidades filantrópicas, etc. Dest.indIEDest := inContribuinte; // pessoa jurídica normal. Grato pela ajuda.

Boa tarde, Somente integração.

Bom dia, Temos uma aplicação Android que se conecta à um servidor DataSNAP+MySQL. Estamos tendo um problema quando é necessário reiniciar o servidor DataSNAP por algum motivo, tipo atualização, etc. Se o servidor for reiniciado e a aplicação Android já tiver se conectado a ele anteriormente, quando ela tenta se conectar novamente aparece a seguinte mensagem de erro: Connection Closed GraceFully. Aí tem que ficar fechando e abrindo a aplicação Android. Alguém sabe como resolver este problema? Grato pela atenção. Atenciosamente: Vinício.

Excelente oportunidade! Dispomos de aplicativo de Força de Vendas para Android desenvolvido em Delphi com integração por TXT. Aplicação já rodando em produção em diversos clientes e com excelentes resultados. Preços e condições especiais para parceiros programadores. Link da aplicação na Google Play: https://play.google.com/store/apps/details?id=com.logus.EficazMobile&hl=pt_BR Entre em contato conosco!

Boa tarde, somos da empresa Logus Informática. Temos aplicativo PAF-ECF homologado que pode tranquilamente atender sua demanda. Inclusive no que tange aos recursos da Farmácia popular. Favor enviar os dados para contato para que possamos conversar melhor. Grato. Wagner Quirino [email protected] Celular: 37 9946 2704 Skype: wagner.quirino

Bom dia pessoal, Estou homologando a geração de boletos de um cliente meu utilizando uma conta da Caixa Econômica, porém obtive as seguintes críticas por parte deles: 1 Informamos que não pudemos finalizar a homologação porque a massa de testes NÃO está completa e dois boletos NÃO foram lidos pela leitora. 2 Deverão ser, portanto, enviados novamente: DV geral 6 e 8 – DV do Campo livre 1 e 3 – não foram lidos DV geral 2 e 4 – DV do Campo livre 5 e 7 – não vieram na massa de testes 3 A homologação encontra-se pendente no ValidaBarras aguardando envio para finalização. Vejam abaixo o que se tratam os DV (geral e campo livre). 4 Aguardamos o envio. Anexei abaixo a imagem da linha digitável com a crítica, o arquivo de remessa e o pdf dos boletos respectivos. Alguém pode de dar uma luz? Grato pela atenção. Remessa de testes.rar

Exemplo simples populando um DataSet com o arquivo de retorno: CDSRetorno.Close; CDSRetorno.CreateDataSet; CDSRetorno.Open; CDSRetorno.EmptyDataSet; ACBrBoleto1.ListadeBoletos.Clear; ACBrBoleto1.DirArqRetorno := ExtractFilePath(ArquivoRetorno); ACBrBoleto1.NomeArqRetorno := ExtractFileName(ArquivoRetorno); try ACBrBoleto1.LerRetorno; for i := 0 to ACBrBoleto1.ListadeBoletos.Count-1 do begin if ACBrBoleto1.ListadeBoletos.Objects[i].ValorRecebido > 0 then begin CDSRetorno.Insert; CDSRetorno.FieldByName('NossoNumero').AsString := ACBrBoleto1.ListadeBoletos.Objects[i].NossoNumero; CDSRetorno.FieldByName('NumeroDocumento').AsString := RetiraBrancos(ACBrBoleto1.ListadeBoletos.Objects[i].NumeroDocumento); CDSRetorno.FieldByName('DataVencimento').AsDateTime := ACBrBoleto1.ListadeBoletos.Objects[i].Vencimento; CDSRetorno.FieldByName('DataBaixa').AsDateTime := ACBrBoleto1.ListadeBoletos.Objects[i].DataCredito; CDSRetorno.FieldByName('ValorDocumento').AsFloat := ACBrBoleto1.ListadeBoletos.Objects[i].ValorDocumento; CDSRetorno.FieldByName('ValorBaixa').AsFloat := ACBrBoleto1.ListadeBoletos.Objects[i].ValorRecebido; CDSRetorno.Post; end; end; Result := True; except on e : Exception do begin MessageDlg('Erro ao carregar arquivo de retorno. Contate o Suporte!'+#13+E.Message,mtWarning,[mbOk],0); Result := False; end; end;

Bom dia pessoal, Uma pequena contribuição para o ACBr, que foi solicitada por um cliente nosso que utiliza a geração de boletos por uma conta cooperativa do Sicoob e agora estou repassando para quem tiver interesse. Modifiquei o layout de impressão para ficar semelhante a um que é disponibilizado pelo aplicativo Cedente do Sicoob que é impresso em meia folha (A5). Fast Report 4.75 - Delphi 7 ACBrBoletoFCFR. Solicito aos moderadores que deem uma olhada e se possível adicionem aos fontes. Grato pela atenção. BoletoA5.rar

Boa tarde, Ítalo, deu tudo certo cara. Ainda não testei o retorno pelo componente de dentro da minha aplicação mas pelo XML de retorno deu pra ver que o evento foi registrado com sucesso. Qualquer coisa te reporto. Muito obrigado pela atenção. Atenciosamente: