Isaque Pinheiro

ACBr em Firemonkey, 1o demo no repositório

CRT=0 (SimplesNacional) CRT=1 (SimplesExcessoReceita) Aqui da crédito de ICMS por isso ele pede o campo ICMSSN "ICMS do SImples Nacional" No seu caso deve ser "0" O Kiko fez uma observação, olhei direto no código do ACBr, e me baseie pela sequência de tipos "TpcnCRT = (crtSimplesNacional, crtSimplesExcessoReceita, crtRegimeNormal)", mas o correto é TABELA A - Código de Regime Tributário - CRT 1 - Simples Nacional 2 - Simples Nacional - excesso de sublimite da receita bruta 3 - Regime Normal Então o problema não é esse que citei, obrigado Kiko, falha minha.

Anexe seu TXT, aqui para que possamos avaliar e te falar onde está o erro, de bate pronto te pergunto se passou informação para a tag "Emit.CRT".

Pessoal, voltei a dar uma mexida na instalação do ACBr para portabilidade C++ Builder, na compilação foi 100%, mas quando adiciono os componentes que dependem das dll libeay32.dll openssl.dll, ao compilar da um erro, como não sou expert em c++, não sei como resolver, se alguém tiver mais conhecimento e puder ajudar, use o novo ACBrInstall para instalação, abra um projeto em C++ e adiciona ao seu projeto o componente ACBrEAD, e tente compilar com ele, aqui comigo da erro em todos que dependem das units.pas das dll citadas. Estamos (ACBr) hoje para : Lazarus Delphi Firemonkey C++ Builder (quase) Framework ACBr Nosso próximo passo será 64bit. Abraço a todos.

Ok, não fiz atualização hoje, pois não estou no escritório, vamos esperar o Italo se manifestar para saber se ele sabe algo, pois estamos passando por um grande refactoring de código.

Isso me parece erro de fonte não atualizado, não sei se isso é claro para todos, mas quando é feita uma atualização dos fontes, se tiver algum .pas que vc tenha mexido em seu computador, o mesmo pode não ser atualizado ou sofre um merge, atenção a isso.

Meu, 1o vc não pesquisa direito, depois não le o que foi pedido, leia, vc não fez os passo que foi pedido no post.

Não é em todo comando, você tem fazer a checagem antes de abrir um novo cupom, informando assim ao usuário que tem pouco papel, mas quem toma a decisão de trocar ou continuar imprimindo o cupom que acabou de ser aberto é o usuário.

Vc só encontrou esse item na pesquisa? Deve pesquisa pela palavra chave do erro "FormMsgFonte", e olhe e lei post por post que encontrará.

Favor fazer uma pesquisa no fórum, já tem post com a resposta para esse error.

Tem que reinstalar o ACBr pelo ACBrInstall, para que remova a propriedade conforme mudança feita, após a reinstalação é que deve ser feito o procedimento.

Use a pesquisa no fórum que achará a solução.

Esse erro acontece, quando ha algum erro na instalação do Delphi, ou se ele for Trial.

Essa propriedade não foi removida, foi transferida de public, para não aparecer no objeto inspector para compatibilidade com a plataforma Firemonkey. Para resolver o problema abra o Form ou Datamodule que tem o ACBrECF, manda Ignorar Tudo para que o delphi remova do .dtm ou frm, após salve e resolvido. Para acessar essa propriedade, caso use o Form de mensagem interna do ACBrECF, mude-a via código assim: ACBrECF.Formmsgfonte := ????

Pode sim, contamos com sua colaboração, se baseando no código desse que importa o Contribuição, para fazer para o Fiscal.

Faça uma atualização Units e Pacotes foram renomeados, e o pacote já está no ACBrInstall

Você precisou, correu atras e trouxe pronto, eu adicionei ao ACBr Faça o mesmo com chassi que também adiciono

Contribuição adicionada ao ACBrValidador "ACBrValidadorValidarRenavam"

qual o numero do renavam que está testando, vou testar aqui em um demo.

Vê se essa funciona, se funcionar adiciono no ACBr //FUNÇÃO PARA VALIDAR RENAVAM //Basta adaptar a mensagem de erro ao seu estilo. function ValidaRenavam( Num: String ): Boolean; var n1,n2,n3,n4,n5,n6,n7,n8,n9, i: Integer; d1,d2: integer; digitado, calculado: String; Retorno: Boolean; begin try if ( Length( Num ) <> 9 ) then Result := False else begin Retorno := True; for i := 0 to 8 do if ( Num = Replicate( IntToStr(i), 11 ) ) then Retorno := False; if ( Retorno ) then begin n1:=StrToInt(num[1]); n2:=StrToInt(num[2]); n3:=StrToInt(num[3]); n4:=StrToInt(num[4]); n5:=StrToInt(num[5]); n6:=StrToInt(num[6]); n7:=StrToInt(num[7]); n8:=StrToInt(num[8]); n9:=StrToInt(num[9]); d1:=n8*2+n7*3+n6*4+n5*5+n4*6+n3*7+n2*8+n1*9; d1:=11-(d1 mod 11); calculado:=inttostr(d1); digitado:=num[9]; if calculado=digitado then Result := True else Result := False; end else Result := False; end; except Result := False; end; end;

Abre o DataModule ou Form que o componente ACBrNFe esteja, após abri-lo ignore se for preciso, e clique em salvar, que o Delphi irá remover as propriedades, ai pode compilar, mas lembre-se tem que fazer isso em todo lugar que tenha o ACBrNFe nele.

Bom dia Elton, na mudança dos nomes da Units mude também o nome do pacote para "ACBrEPC_Importa", assim que subir essas alterações, adiciono ele ao ACBrInstall.

Bom dia, esse componente é novo, terá que sobre alguns ajustes, além se receber nomes no padrão ACBr, tanto das Units quanto do pacote, já foi passado para quem esta a frente do desenvolvimento, assim que esses passos forem dado, eu adiciono a instalação dele no ACBrInstall.

Corrigido e já disponível no Rep.

Obrigado.