Painel de líderes

Pessoal, estou migrando tudo para o trunk2, e me deparei com um problema. No trunk1 eu salvava o XML do RPS gerado pelo comando: tabelaxml_rps.value:=ACBrNFSe1.NotasFiscais.Items[i].XML_Rps; Agora no Trunk2 não tenho mais essa opção, ou tenho com outro nome? Vi que tenho as seguintes opções: ACBrNFSe1.NotasFiscais.Items[i].xml; ACBrNFSe1.NotasFiscais.Items[i].XMLOriginal; ACBrNFSe1.NotasFiscais.Items[i].XMLAssinado; ACBrNFSe1.NotasFiscais.Items[i].XMLNFse; No caso, seria o XMLASSINADO? Já achei o link: E vou estar interagindo nele...

@hleorj Sem problemas, acredito que o código que sugeri não está fora do padrão da linguagem que utilizamos e foi a primeira alternativa que me veio a mente. Fique a vontade para mudar para função proposta sem qualquer problema, tanto que o código é uma proposta e sempre vale a implementação final aplicado pelos mantenedores.

@Waldir Paim, function CRTTocRegTrib(const t: TpcnCRT): TpcnRegTrib; const pcnRegTrib: array[TpcnCRT] of TpcnRegTrib = (RTSimplesNacional, RTRegimeNormal, RTRegimeNormal); begin result := pcnRegTrib[t]; end; Melhor manter o padrão, que é a utilização de enumeradores . em do Array.

Boa tarde André, Muito obrigado pela colaboração, já esta disponível.

Partilha de ICMS e CEST ja contemplam ACBrMonitorPLUS. faz tempo.. Assine o SAC e baixe a ultima versão Ou baixe os fontes e compile pelo Lazarus Abs

@Isaque Pinheiro, Achei pertinente continuar nesse post pelo motivo que descrevei abaixo. Fiz a inclusão do campo Vazio no array por motivo dessa informação aqui na unit ACBrEPCBlocos Nela possui essa função : function CstIcmsToStr(AValue: TACBrCstIcms): string; begin Result := CstIcms[ Integer( AValue ) ]; end; Onde a conversão estaria errado sem a inclusão proposta na unit que ele não aplicou. A alteração foi aplicada para contemplar o resultado para essa função : function StrToCstIcms(AValue: String): TACBrCstIcms; var ifor: Integer; begin Result := sticmsNenhum; <<<<retorno para remover avisos da IDE. for ifor := 0 to High(CstIcms) do begin if AValue = CstIcms[ifor] then begin Result := TACBrCstIcms( ifor ); Break; end; end; end;

Boa tarde, Com o Plus eu consegui. Muito obrigado.

Boa tarde! Verifique se a dll libclisitef.so se encontra no caminho informado em Opções de Projeto -> Opções do Compilador -> Bibliotecas (-Fl) . Pode ser que seu arquivo esteja em uma pasta diferente ou o arquivo esteja sem direito de leitura.

Essa exceção é controlada... não vaza para a aplicação... analise os fontes do ACBr

Lembre-se foi feito refactoring e houve muitas mudanças no componente! abra o mesmo e leia!

Bom dia! Provavelmente ele não está conseguindo explicar o que de fato precisa. Infelizmente tem alguns que não conseguem se expressar e acabam ficando para nós a tarefa de até interpretar o que ele está dizendo. Procure levantar exatamente o que ele precisa. Poucos dias alguém me falava assim: o contador disse que o produto é 235,00 a alíquota 18% e o valor do ICMS tem que ser 28,20. Ai entra estes tipos de conversa "tem que mexer no valor porque o sistema calcula o icms de 42,30 e o contador disse que tem que ser 28,20". Ai vc vai ver de fato o que ocorre é que o produto tem um diferimento parcial de 33,33% e neste caso a base de calculo não seria de 235,00 e sim 156,67 que aplicando 18% terá então o valor do icms de 28,20, porém a base não foi simplesmente alterada, existem tags que são preenchidas de modo que os cálculos fiquem corretos, mas eles olham os valores e dizem, "preciso mexer para ficar assim". O que quero dizer é que não existem mudança de valores na louca, porém alguns não conseguem explicar o que de fato precisam e ai você terá que se envolver em uma investigação para levantar estas informações e descobrir o que de fato estão falando. Este é um exemplo do que já presenciei e de fato é legal a mudança nos valores porém com cada tag com a sua devida informação preenchida, do contrário, na louca não é possível, tem que saber o que está sendo feito.

Então anexe ela como sugestão explicando o que é feito e a correção!

Bom dia! Conforme foi publicado, o CEST foi adiado.

Bom ainda nem obrigatório é no xml quem dirá quanto a DANFe! mas não é ele é um código do xml somente

Vamos lá ACBrMonitor e ACBrNFeMonitor não existem mais a meses, ponto final. ACBrMonitorPLUS tem esse bendito campo CEST que é uma string mas onde irão somente números e está lá ! Prod.CEST na classe! dai tem um porem se compila ele basta compilar, se usa os compilado disponibilizado somente ao SAC já tem, aos demais abertos não tem! lembrando que o ACBrSAC é um valor ínfimo e ajuda a manter o projeto!

@Daniel Simoes Conforme descrito no post anterior, não me detive aos avisos de conversão do tipo W1057 e W1058 e com isso consegui remover todos das units da pasta ACBrBoleto. Fiz o máximo para manter as units o mais inalteradas possíveis. Num resumo breve vou tentar descrever as alterações: Remoção de variáveis não utilizadas. Inicialização de variáveis não inicializadas. Adicionei uma função para conseguir override na classe base. Acredito que essas alterações não devam gerar efeitos colaterais algum no funcionamento atual. Segue anexo. ACBrBoleto.zip

Mais um! será que vocês não pesquisam antes de postar?

Sim... foi prorrogado. Mais detalhes ...

Pessoal, foi prorrogada a obrigatoriedade do COD.CEST, para 01/10/2016. CONVÊNIO Cláusula primeira O inciso I da cláusula sexta do convênio ICMS 92, de 20 de agosto de 2015, passa a vigorar com a seguinte redação: "I – ao §1º da cláusula terceira, a partir de 1º de outubro de 2016;". Cláusula segunda Este convênio entra em vigor na data da publicação. D.O.U – Seção 1 – Página 30 – 28/03/2016 http://pesquisa.in.gov.br/imprensa/jsp/visualiza/index.jsp?data=28/03/2016&jornal=1&pagina=30&totalArquivos=140 Fonte: Ana Paula Costa - Coordenadora de Integração Dimep

Tá bem claro no DOU: 01 de Outubro de 2016. Não é para 01/01/2017.

Bom dia, tem sim como resolver isso, existe utilitários que fazem replace dentro dos DFMs, mudando o tipo TBCD para Tfmtbcdfield, veja umas das opções nesse link http://stackoverflow.com/questions/8671119/gexperts-replace-components-expert-doesnt-replace-the-text-in-the-form-file ,

Boa tarde, Pessoal já resolvi, na migração, acabei alterando uma const que armazenava o Sufixo "Estava passando String", assim o componente ficava em loop... causando o travamento do sistema...

Olá, bom dia! Alguém já conseguiu fazer algum CFe através do SAT com a tag CEST informada? campo ID I18 (xCampoDet): preencher com “Cod. CEST”? No última versão do layout da especificação técnica o campo CEST terá efeitos a partir de 01/01/2017, porém conforme Portaria CAT 147/2012 artigo 33B o campo terá efeitos à partir de 01/04/2016.

Só complementando o que o @Ricardo Miquinioty falou, o campo já existe, atualize seu fonte, mas ele só será gerado no prazo estabelecido pelo fisco como mostra a NT acima citada, não antes. Não entendo o porque você não pegam as NT (Leis) para lerem o que é exigido, qual o prazo, ou que deve ser alimentado no campo etc... sempre querem as coisas mastigadas, sem contar que tem centenas de posts falando sobre esse assunto e explicando.

Boa tarde, a SEFAZ que pede para informar nas observações ao fisco(01/04/2016 a 31/12/2016), a partir de 01.01.2017 com a versão 0,08 do layout que vai ter o campo específico como tem a NFe hoje.

Caros, então não há um campo específico para informar o CEST nos componentes Acbr? Tenho que informá-lo nas obserfvações ao fisco?

Olá. Já sei que a nova versão contempla o CEST e funciona perfeitamente com TXT da NF-e. Todos os que usam o ACBrMonitor sabem que a versão para o público só sai a cada três meses. Em um caso de urgência como este (CEST), não sai caro contratar o SAC. Sábado passado paguei o boleto e estou apenas esperando a liberação. Sugiro aos amigos fazer o mesmo.

Sr. Wislei, parabéns pela implementação, usei este código com uma cliente aqui funcionou perfeitamente. obrigado pela contribuição. espero que este código seja em breve incorporado ao trunk vai ser de grande valia.

Veja aqui um site que me deu uma luz sobre esse assunto, nele consegui sanar minhas dúvidas sobre o DIFAL e CEST http://www.asseinfo.com.br/blog/difal-diferencial-de-aliquota-icms/

O MonitorPLUS passou por uma reformulação visual, trouxemos para sua IDE um padrão mais inovador, simulando o metro e ao mesmo tempo facilitando e oferecendo uma melhor navegação nas páginas de configurações disponiveis. O ACBr MonitorPLUS já é um sucesso e um produto de qualidade, onde juntou os recursos de dois monitores, estamos agora trabalhando para que que seu visual fique a altura de seu poder e recursos, agradecemos a todos pelas colaborações e contribuições, principalmente aos assinantes do SAC o qual nos possibilita bancar pessoas para que possa trabalhar nessas melhorias.

Na última versão do layout da especificação técnica o campo CEST terá efeitos a partir de 01/01/2017, porém conforme Portaria CAT 147/2012 artigo 33B o campo terá efeitos à partir de 01/04/2016, entende-se então que a partir de 01/04/2016 será obrigatório, porém no layout da especificação técnica o campo terá efeitos a partir de 01/2017.

No caso de SAT para supermercado, deverá ser informado estes campos apartir de 01/04/2016?

sim ... foi falha minha ao redigir o código no fórum. Obrigado

Não tá errado esta chamada não ? if(cCEST = '') then // se for vazio da add ?? O correto não Seria = if(cCEST <> '') then // se for diferente de vazio ai sim add

Utilizei da seguinte forma, realizei testes com o emulador da SEFAZ e com SAT Tanca(dev) cCEST := getCodigoCEST(iIDCod); // método interno da minha aplicação if(cCEST = '')then begin with Prod.obsFiscoDet.Add do begin xCampoDet := 'Cod. CEST'; xTextoDet := cCEST; end; end;

Verdade Daniel, pra mim era como a NF-e onde os schemas tinham que estar sempre atualizados. Mas obrigado pela info. Nesse caso então Barrys, tenho que admitir, que o problema pode ser com a DLL da bematech. Consulte se no forum alguém que use bematech tenha td funcionando e peça a DLL, quem sabe é a versão da mesma. Eu estava com problema com uma DR700 Le nova, e liguei direto no suporte e então a atendente me enviou um arquivo que não tinha em lugar nenhum pra download e a impressora passou a funcionar. Até mais,

Olá pessoal, sou novo aqui no Fórum e no ACBr, bom, eu estou tentando compilar um projeto, mas ele não está conseguindo encontrar o arquivo ACBrNFeDANFERave.dcu, já tentei procurar ele na pasta do Trunk2 mas também não achei, o projeto que estou tentando compilar é meio antigo, será que tenho que fazer alguma mudança nele?

Segue o link para download da DLL e SO do Sat da Tanca. E também do Software de Ativação em Windows. https://drive.google.com/file/d/0B_eDzQ06HVbmRUl6V25oYkZFQUk/edit?usp=sharing

Por exemplo, na minha aplicação na época que desenvolvi eu precisava pegar o troco retornado pelo sitef. Se você olhar no manual do sitef o retorno do troco vem quando o "TipoCampo" é igual a 130.O Acbr Armazena uma grande parte dos retornos no "Resp". A sequencia indica o cartão que gerou troco. Se foi passado dois cartões, existirá a sequencia 0 e a sequencia 1. Então para pegar o troco total no meu software eu fiz assim: Sequencia := 0; VrTroco := 0; while Trim(DM.AcbrTEF.TEFCliSiTef.Resp.LeInformacao(130, Sequencia).AsString) <> EmptyStr do begin VrTroco := VrTroco + DM.AcbrTEF.TEFCliSiTef.Resp.LeInformacao(130, Sequencia).AsFloat; Inc(Sequencia); end; Então basta você consultar a tabela tipocampo do manual para obter o que você quiser. Talvez você precise alterar o componente para adicionar no RESP o retorno que você precisa. Da uma estudada no componente debugando ele que você vai entender.Além de aprender como ele funciona e se tiver algum problema rapidamente conseguirá resolver.