EduardoElias

Regys, Eu nao pretendo usar em outros estados, por enquanto, somente SP. O fato de nao ser aderente ao Paf-ECF me libera de ter que fazer homologacao? Pois estava vendo um site do sefaz sp que so pede o envio de documentos e registro via web. Por isto eu nao entendi Meu software é totalmente android, caixa + pedido (pre venda), mas desdinado ao mercado de SP inicialmente. O que voce pode me dizer sobre isto? Pra mim é muito importante, pois sou um pequeno desenvolvedor e estou voltando para o mercado, entao quero encontrar um caminho curto e de preferencia o menos caro possivel. Uma abraco e obrigado pelo seu tempo. Eduardo

Entao... estou falando de um dispositivo fixo e fixo na loja! Meu aplicativo e totalmente funcional DENTRO do android. Usando banco de dados local, atualizado externamente quando necessario. O impedimento da questao WEB eu entendo a razao. Estou em SP, voce poderia so me orientar como procurar um orgao destes para eu fazer uma tentativa? Eduardo

Existe uma limitacao imposta por algum orgao para isto? Onde posso ler sobre isto? Tecnicamente nao tenho problemas. E quanto a estes microterminais autonomos que usam ECF? Nao seria semelhante? Obrigado por qualquer orientacao.

Obrigado pela sua resposta No entanto fui generico porem existem incompatibilidades: Enquanto usando o java a maquina dalvik roda em "qualquer lugar" por ser nativo o Delphi fica amarrado ao processador. Com os Android Intel no mercado ja nao roda neles. O Firemonkey necessita NEON para rodar (opengl), que os chip Tegra nao suportam. E existem varios bons aparelhos com chip Tegra. Fora a questao do NDK como voce bem falou. O firemonkey esta mais ligado a um engine de jogos/animacao do que um VCL para negocios... uma pena que escolheram este caminho. Mas estou interessado em saber de experiencia de compatibilidade, pois estou muito inseguro em quais modelos usar. Obrigado

Sou usuario do ACBr em outras aplicacoes e estou muito feliz com ele. Porem agora apareceu um projeto que fiz ele ja em parte Nao sei se ele é viavel, mas chegou a hora da verdade para ele: PDV Android. Eu fiz um sistema de pedido super completo no estilo caixa pdv e fui por brincadeira adicionando algumas coisas e por fim coloquei os comandos diretos para uso serial de uma impressora. Tudo funciona maravilhosamente bem. Porem tem a tal de homologacao. Faz anos que sai deste mercado de ECF, deixei alguns softwares de caixa rodando com ACBr que hoje foram homologados. Mas nao acompanhei. Eu instalei a Sweda serial 1 e 2, e varias outras que peguei de fabrica os primeiros modelos... Mas agora gostaria de saber dos colegas. Como funciona, onde tem um passo a passo, sera que aprovaria algo nao windows? Custa? Eu agradeco alguma direcao, mesmo que seja um pouco off topic, porem eu vou me basear no ACBr entao acreditei em postar aqui. Eduardo

Pessoal, Sei que nao eh o enfoque dos forums aqui em geral, mas como sou usuario do ACBr e estamos no mesmo mercado de automacao comercial e bastante provavel que varios aqui ja fizeram seus testes e gostaria de obter uma opiniao. Ja estou fazendo algumas coisas no XE5 para android e eventualmente algumas das quais eu usava o Acbr Eu queria fazer uma pergunta pra turma aqui, de quem ja fez alguma coisinha com XE5/XE6 para android: Qual tablet voce ta usando e como esta a experiencia com ele? EU tive a sorte de ter um nacional aqui que funciona, Positivo ypy10. Ele é fraquinho de tudo, mas compativel com FMX. Um bom que tenho aqui da Toshiba, super rapido, nao funciona, porque é Tegra2 Mas no mercado existem muitos mais coreanos e Chineses do que os top de linha que a Embarcadero homologa. Na realidade estamos em uma canoa furada que estao remendando... Temos que homologar e manter o controle, pois eles saem de mercado, mudando modelos e alguns casos eles mudam o processador e nao mudam o modelo !!! (Samsung gosta de fazer isto). Entao gostaria de pedir pra galera se poderiam me dizer qual a experiencia e com quais conseguiram fazer nem que seja um ola mundo!!! Obrigado

Pessoal, Sou usuario do Acbr no Windows a bom tempo. Mas ja estou fazendo algumas coisas no XE5 para android e eventualmente algumas das quais eu usava o Acbr Eu queria fazer uma pergunta pra turma aqui, de quem ja fez alguma coisinha com XE5/XE6 para android: Qual tablet voce ta usando e como esta a experiencia com ele? EU tive a sorte de ter um nacional aqui que funciona, Positivo ypy10. Ele é fraquinho de tudo, mas compativel com FMX. Um bom que tenho aqui da Toshiba, super rapido, nao roda, porque é Tegra2 Mas no mercado existem muitos mais coreanos e Chineses do que os top de linha que a Embarcadero homologa. Na realidade estamos em uma canoa furada. Temos que homologar e manter o controle, pois eles saem de mercado, mudando modelos e alguns casos eles mudam o processador e nao mudam o modelo !!! (Samsung gosta de fazer isto). Entao gostaria de pedir pra galera se poderiam me dizer qual a experiencia e com quais conseguiram fazer nem que seja um ola mundo!!! Obrigado

Isaque, Desculpe nao retornar antes, fiz uma pequena cirurgia e fiquei fora uma semana. Eu acabei de olhar o codigo, gostei muito da sua implementacao, e creio que seja o caminho para solucionar este tipo de situacoes. Porem fiquei com uma questao que acho que precisa ser alterada, por favor me corrija se estiver errado: Voce colocou a chamada ao Evento fora do loop dos registros C485 (c481). Eu creio que nao deveria ser assim, pois existem diferencas POR CST. Conforme o caso da CST muda o formato. Eu acho que voce deveria chamar o evento a CADA INTERACAO de um registro c485 e c481 passando qual o CST em questao para que eu possa dizer qual o resultado esperado. Como esta eu nao consigo o resultado que coloquei fixo no fonte atual. Se for possivel colocar desta forma, ai sim atende meu caso e acho que de todos os outros.... if Assigned(RegC405.RegistroC485) then begin if Assigned(FOnBeforeWriteRegistroC485) then begin FOnBeforeWriteRegistroC485(NullVL_BC_COFINS, NullALIQ_COFINS, NullQUANT_BC_COFINS, NullALIQ_COFINS_QUANT, NullVL_COFINS); end; for intFor := 0 to RegC405.RegistroC485.Count - 1 do begin with RegC405.RegistroC485.Items[intFor] do begin Add( LFill('C485') + LFill(CstCofinsToStr(CST_COFINS)) + LFill(VL_ITEM,0,2) + DFill(VL_BC_COFINS, 2, NullVL_BC_COFINS) + DFill(ALIQ_COFINS, 4, NullALIQ_COFINS) + DFill(QUANT_BC_COFINS, 3, NullQUANT_BC_COFINS) + DFill(ALIQ_COFINS_QUANT, 4, NullALIQ_COFINS_QUANT) + LFill(VL_COFINS,0, 2, NullVL_COFINS) + LFill(COD_ITEM) + LFill(COD_CTA) ) ; // RegistroC990.QTD_LIN_C := RegistroC990.QTD_LIN_C + 1; end; end; Um abraco, e muito obrigado! Eduardo

Este a versão da gravação do bloco c481 e c485 que consegui aprovação da consultoria fiscal e que foi validada sem problemas, para meu caso especifico. procedure TBloco_C.WriteRegistroC481(RegC405: TRegistroC405); var intFor: integer; bolNull: Boolean; strCST_PIS: string; begin if Assigned(RegC405.RegistroC481) then begin for intFor := 0 to RegC405.RegistroC481.Count - 1 do begin with RegC405.RegistroC481.Items[intFor] do begin bolNull := True; strCST_PIS := CstPisToStr(CST_PIS); // Base aliquota tem que ser zero quando CST = 04 05 06 if (strCST_PIS = '04') or (strCST_PIS = '05') or (strCST_PIS = '06') then begin bolNull := False; end; Add( LFill('C481') + LFill(strCST_PIS) + LFill(VL_ITEM,0,2) + DFill(VL_BC_PIS, 2, bolNull) + DFill(ALIQ_PIS, 4, bolNull) + DFill(QUANT_BC_PIS, 3, true) + DFill(ALIQ_PIS_QUANT, 4, true) + LFill(VL_PIS,0,2) + LFill(COD_ITEM) + LFill(COD_CTA) ) ; // RegistroC990.QTD_LIN_C := RegistroC990.QTD_LIN_C + 1; end; end; // Variavél para armazenar a quantidade de registro do tipo. FRegistroC481Count := FRegistroC481Count + RegC405.RegistroC481.Count; end; end; procedure TBloco_C.WriteRegistroC485(RegC405: TRegistroC405); var intFor : integer; bolNull: Boolean; strCST_PIS: string; begin if Assigned(RegC405.RegistroC485) then begin for intFor := 0 to RegC405.RegistroC485.Count - 1 do begin with RegC405.RegistroC485.Items[intFor] do begin bolNull := True; strCST_PIS := CstCofinsToStr(CST_COFINS); // Base aliquota tem que ser zero quando CST = 04 05 06 if (strCST_PIS = '04') or (strCST_PIS = '05') or (strCST_PIS = '06') then begin bolNull := False; end; Add( LFill('C485') + LFill(CstCofinsToStr(CST_COFINS)) + LFill(VL_ITEM,0,2) + DFill(VL_BC_COFINS, 2, bolNull) + DFill(ALIQ_COFINS, 4, bolNull) + DFill(QUANT_BC_COFINS, 3, True) + DFill(ALIQ_COFINS_QUANT, 4, True) + LFill(VL_COFINS,0,2) + LFill(COD_ITEM) + LFill(COD_CTA) ) ; // RegistroC990.QTD_LIN_C := RegistroC990.QTD_LIN_C + 1; end; end; // Variavél para armazenar a quantidade de registro do tipo. FRegistroC485Count := FRegistroC485Count + RegC405.RegistroC485.Count; end; end; Por favor notem que: DFill(VL_BC_PIS, 2, bolNull) + DFill(ALIQ_PIS, 4, bolNull) + DFill(QUANT_BC_PIS, 3, true) + DFill(ALIQ_PIS_QUANT, 4, true) + esta condicao bolNull somente mantive nos dois primeiros, estavam NOS QUATRO ANTES. E o validador nao aceitava. Tambem notem que o mesmo que fiz para o C481 fiz para o C485, pois as regras sao as mesmas. CST do caso 7 para cima nao é usado aqui, entao nao sei o resultado. E os CST 1, 2 e 3 possuem valores declarados. Agradeco a atencao de todos e grande boa intencao em ajudar. Eduardo

Eu irei postar aqui a minha solucao, para meu caso especifico, assim que terminar os testes. So gostaria de sugerir algo ao forum. Normalmente quando faco compomentes e me deparo em situacoes assim, onde a regra e muito complexa ou nao tenho a solucao completa para ela, eu costumo permitir a definicao de um evento, para que a aplicacao host tome a decisao especifica. Isto nao impede na busca de uma resolucao completa, mas pode ser um mecanismo a ser utilizado de uma forma geral. Sendo assim este evento poderia ser definido como Onc481BeforeWrite (e 485) e passando uma estrutura com valores e alguns flags permitindo dizer se grava ou nao, se zero é nulo ou nao, pra cada valor, e ate um campo, que se atribuido reescreve totalmente a saida, desconsiderando o que foi formatado pelo componente. Um mecanismo deste evitaria os patchs por parte dos usuarios no fonte do acbr, permitindo atualizacoes mais tranquilas. E quanto houver a solucao definitiva, pode-se abandonar o evento. Fica a sugestao...

EMBarbosa, Perdoe me, eu fiz uma pesquisa, mas talvez de uma forma especifica demais e nao vi o que eu buscava. Nao é minha intencao de forma alguma ficar dispersando, pois eu realmente sei que toda ajuda aqui é voluntaria. Tanto que fiz toda a implementacao do SPED usando este maginifico trabalho sem nunca ter postado nada aqui para nao ser pesado. Meu conhecimento "fiscal" é bem raso. Estou me guiando por um contador que entende bem da estrutura do sped. O fato que o codigo atual NAO atende, nao esta sendo aceito pelo validador. Pelo que estou sabendo se o CST <> 01 o resultado da gravacao deveria estar assim: |C481|04|4,00|0|0|||0,00|10093|| Com VL_BC_PIS e ALIQ_PIS gravando 0. Porem o codigo atual grava vazio. Parece que CST = 01 esta certo, pois ai é informado a aliquota que acaba sendo gravada. Obrigado Isaque pela ajuda, no entando sua alteracao esta gravando 0 em todos os campos agora e o validados nao gostou disto. Eduardo

Pessoal, Estou com o seguinte problema: Quando o VL_BC_COFINS ou o VL_BC_PIS respectivamente bloco c481 e c485 estiverem com valor ZERO sao gravados como vazio e o validador versao 2.05 da o erro "Base aliquota tem que ser zero quando CST = 04 05 06" EDIT: O Titulo desta thread parece que esta errada agora, pois verifiquei que sempre grava desta forma indiferente de CST. Estive dando uma olhada pela primeira vez em como o ACBr grava, no caso o c481 mas vale para o c485 tambem: Add( LFill('C481') + LFill(CstPisToStr(CST_PIS)) + LFill(VL_ITEM,0,2) + DFill(VL_BC_PIS, 2, True) + DFill(ALIQ_PIS, 4, True) + DFill(QUANT_BC_PIS, 3, True) + DFill(ALIQ_PIS_QUANT, 4, True) + LFill(VL_PIS,0,2) + LFill(COD_ITEM) + LFill(COD_CTA) ) ; E pelo codigo acima VL_BC_PIS sempre sera gravado como nulo se conter zero. Parece que independente de qualquer outra condicao (achei anteriormente que poderia haver alguma situacao) Porem o Validador esta reclamando desta situacao, somente aceitando quando existe 0 para este campo. O que fiz manualmente para teste. Estao tendo este problema? Como voces fazem neste caso, eu nao estava querendo mexer no codigo do ACBr e ficar com dependencia de sempre alterar! Como faco para forçar o componente gerar zerado e nao vazio? Obrigado! Eduardo