Ir para conteúdo
  • Cadastre-se

aocampioni

Membros Pro
  • Total de ítens

    219
  • Registro em

  • Última visita

Tudo que aocampioni postou

  1. Estimado, Bom dia. Não é necessário nenhuma mudança, basta no tipo de cobrança selecionar cobCaixaSicob e colocar CR na carteira e configurar o tamanho do nosso número corretamente. Estude os fontes do ACBrBoleto e ACBrCaixaEconomicaSICOB que verás que é possível resolver seu problema. Até mais,
  2. Sim, é correto. No SAT, assim como no ECF, não comporta este tipo de cálculo. Portanto, se um produto tem uma tributação de 12% mas tem redução de 25% em sua base, já faça os cálculos utilizando 9% e envia esses 9% como alíquota efetiva para o SAT. O cst 20 ou 90 o SAT interpretará corretamente mas o retorno será sempre 00. Eu controlo isso apenas no banco de dados mas pro SAT eu envio 00 mesmo. Durante a geração do SPED, atenção, se você gera a partir do banco de dados você deve enviar o TXT de acordo com a informação que você enviou pro SAT, ou seja, vc não vai gerar o c490 com 020 e 12% de efetiva, mas sim com 000 e 9% de efetiva. Fundamento: artigo 15-A da portaria CAT 55/98, artigo 2º da Resolução 10 CGSN e Lei Complementar 123/06. Até mais,
  3. Estimados, Boa tarde. Sim, da mesma forma. Se um item tem tributação 12% mas redução de base de 25% então no ECF, na verdade, ele será tributado a 9%. Tem que ter essa alíquota cadastrada lá. Mas cuidado com o SPED fiscal no no bloco C490: se você monta SPED direto do seu banco de dados, quando você for gerar o arquivo ao encontrar um registro com redução já coloca no arquivo da mesma forma que mandou pra impressora. Até mais,
  4. Boa noite, Para se cadastrar no SGRSAT, além de ser pessoa jurídica tem que ter um dos seguintes CNAE's vinculados ao seu CNPJ: i. 6201-5/00 - Desenvolvimento de programas de computador sob encomenda; ii. 6202-3/00 - Desenvolvimento e licenciamento de programas de computador customizáveis; iii. 6203-1/00 - Desenvolvimento e licenciamento de programas de computador não – customizáveis; iv. 6204-0/00 - Consultoria em tecnologia da informação; v. 6209-1/00 - Suporte técnico, manutenção e outros serviços em tecnologia da informação. Caso contrário, seu cadastro como fornecedor de SAT pode ser rejeitado. Se não me engano, algumas empresas do simples conseguem colocar 6209-1/00 em suas atividades. MEI não aceita. Consulte seu contador. Até mais,
  5. Pessoal, Um detalhe que um colega aqui do forum postou, não lembro o post agora, mas ele disse ter utilizado a função de atualização de software do sat dele (que é bematech) e muitos desses erros deixaram de acontecer. Verifiquem se o software do SAT de vocês está atualizado. Inclusive na própria página do SEFAZ http://www.fazenda.sp.gov.br/sat/ foi PUBLICADO TERMO DE VERIFICAÇÃO FUNCIONAL Nº 153 de 2015 para equipamentos da bematech dizendo que seu software de base foi atualizado. É só uma idéia, quem sabe não resolve a maioria desses problemas. E não se esqueçam de consultar o fabricante sobre o uso dessa opção. Até mais,
  6. Maycoll, Boa noite. Segue um exemplo bem simples, veja se está faltando algo. Gero remessas caixa e santander e está tudo OK. TituloACBr := ACBrBoleto.CriarTituloNaLista; // dias de protestos e carteira de envio TituloACBr.CarteiraEnvio := Iif(sBancoEmite='S', tceBanco, tceCedente); TituloACBr.SeuNumero := '0001'; if Trim(sAceite) = 'SIM' then TituloACBr.Aceite := atSim else TituloACBr.Aceite := atNao; TituloACBr.NumeroDocumento := '0001'; TituloACBr.Sacado.Avalista := ''; TituloACBr.Sacado.NomeSacado := 'SACADO DE TESTE'; TituloACBr.Sacado.CNPJCPF := '00000000000'; // CPF TituloACBr.Sacado.Pessoa := pFisica; TituloACBr.Sacado.Logradouro := sEndereco; TituloACBr.Sacado.Numero := ''; TituloACBr.Sacado.Complemento := ''; TituloACBr.Sacado.Bairro := sBairro; TituloACBr.Sacado.Cidade := sCidade; TituloACBr.Sacado.UF := sEstado; TituloACBr.Sacado.CEP := sCep; TituloACBr.Sacado.Email := sEmail; TituloACBr.Sacado.Fone := sTelefone; TituloACBr.Vencimento := StrToDate('20/08/2015'); TituloACBr.DataDocumento := StrToDate('20/08/2015'); TituloACBr.DataProcessamento := StrToDate('20/08/2015'); TituloACBr.ValorDocumento := 1.00; cInstru1 := ''; cInstru2 := ''; TituloACBr.CodigoMora := '1'; TituloACBr.ValorMoraJuros := 0; TituloACBr.DataMoraJuros := 0; if njuromensal>0 then TituloACBr.PercentualMulta := njuromensal; if nMoraDiaria>0 then begin nValorMora:=(TituloACBr.ValorDocumento*(nMoraDiaria/30))/100; if(nValorMora >= 0.01) then begin TituloACBr.ValorMoraJuros := nValorMora; TituloACBr.DataMoraJuros := TituloACBr.Vencimento+1; end; end; TituloACBr.TipoDiasProtesto := diCorridos; if(iDiasProtesto = 0) then TituloACBr.DataProtesto := 0 else TituloACBr.DataProtesto := StrToDate(FormatDateTime('dd/mm/yyyy', TituloACBr.Vencimento+iDiasProtesto) ); TituloACBr.EspecieDoc := sEspecieDocto; TituloACBr.OcorrenciaOriginal.Tipo := toRemessaRegistrar; TituloACBr.Carteira := sCarteira; TituloACBr.LocalPagamento := sLocalPagto; // nosso numero TituloACBr.NossoNumero := '0000000000000001' TituloACBr.Instrucao1 := sCodInstr1; TituloACBr.Instrucao2 := sCodInstr2; TituloACBr.Parcela := 1; ACBrBoleto.GerarRemessa(15); // decima quinta remessa Verifique e vai postando as dúvidas aí, Até mais,
  7. Marcos, Boa tarde. Não tem cálculo de ST no sat. O código da COFINS e do PIS normal também estão diferentes no que tem nas orientações do que tem que ser preenchido. Use cst 49 para pis e cofins. CFOPs só os 5101 5102 5103 5405 e não tem esses aí que você informou. Você também está usando a tag indRatISSQN como S, aconselho colocar N mesmo porque não sei como funciona o tratamento de serviços no SAT. Dá uma lida em http://www.fazenda.sp.gov.br/sat/duvidas_frequentes/OrientaçõesLeiauteCF-e_v00.06-0 - AD.pdf pra você se orientar melhor. Até mais,
  8. Olá, Boa tarde. Vai ter que contactar o suporte da DIMEP. O erro 4007 refere-se a certificado. Você está tentando ativar em produção utilizando a opção PRODUÇÃO (ATIVADO) ou PRODUÇÃO (DESATIVADO) ? Até mais,
  9. Estimado, Boa tarde. A resposta vei acrescida de 07007 que significa que está com erro de validação de conteúdo. Algo errado na hora de carregar o XML da venda a ser cancelada. Até mais,
  10. De nada. Até mais,
  11. Estimado, Boa tarde. Durante a montagem do XML , na parte dos itens vc deve estar fazendo algo do tipo: Imposto.vItem12741 := (Prod.qCom * Prod.vUnCom) * rAliqImposto / 100; Cria uma variável e acumula os valores calculados pois você deve preencher a tag vCFeLei12741 no final; xImpostoLei12741 := xImpostoLei12741 + Imposto.vItem12741; Daí, quando terminar você preenche a tag vCFeLei12741 Total.vCFeLei12741 := xImpostoLei12741; Ao que parece é somente isso que falta. Teste e retorne, até mais, Igor, rsrs, acredite, foi exatamente o que fiz. Até mais,
  12. Ops, Pessoal, estão certos, o código correto é : mForcasOcultasSAT.Lines.Text := ACBrSAT1.CFeCanc.GerarXML( True ) ; // componente MEMO oculto chaveCancelamento := ACBrSAT1.CFeCanc.infCFe.chCanc; ACBrSAT1.CancelarUltimaVenda( chaveCancelamento, mForcasOcultasSAT.Lines.Text ); if ACBrSAT1.Resposta.codigoDeRetorno = 7000 then begin // cancelado com sucesso .... vai end else begin // erro, tratamento end; Até mais,
  13. Barrys, Boa tarde. Tenta um pouco diferente. Eu deixo um memo oculto na tela e faço como no exemplo do ACBrSAT; Ao invés de : ACBrSAT1.CFeCanc.GerarXML( True ) ; // True = Gera apenas as TAGs da aplicação chaveCancelamento := ACBrSAT1.CFeCanc.infCFe.chCanc; ACBrSAT1.CancelaUltimaVenda; Eu faço: mForcasOcultasSAT.Lines.Text := ACBrSAT1.CFeCanc.GerarXML( True ) ; // componente MEMO oculto chaveCancelamento := ACBrSAT1.CFeCanc.infCFe.chCanc; ACBrSAT1.CancelarUltimaVenda( chaveCancelamento, mForcasOcultasSAT.Lines.Text ); if ACBrSAT1.Resposta.codigoDeRetorno in [0,7000] then begin // cancelado com sucesso .... vai end else begin // erro, tratamento end; Veja aí o que acontece e retorna, Até mais,
  14. Precisando tamus aí. Até mais,
  15. Olá Aocampioni. Para mim continua não funcionando o cancelamento para SAT Elgin, esta na versão 0.06. Como você faz a chamada para o cancelamento. Talvez é alguma configuração no componente que estou esquecendo. Agradeço; Estimado, boa tarde. Quando eu gravo um venda realizada eu salvo num campo o ID de retorno: ACBrSAT.CFe.infCFe.ID. Quando tenho que cancelar eu faço o seguinte procedimento: var sArquivoXML, sChaveCanc : String; begin sArquivoXML := sDiretorioCFeEnviados+'\CFe'+idRetornoSAT+'.XML'; // guardei o ID de retorno quando fiz a venda ACBrSAT.CFe.LoadFromFile( sArquivoXML ); ACBrSAT.CFe2CFeCanc; // memo secreto mCancelamento.Lines.Text := ACBrSAT.CFeCanc.GerarXML(True); // enviar cancelamento // nesse ponto uns dizem que tem que converter o CFe<chavecancelamento> em Cfe<chavecancelamento> só por causa do F maiúsculo,kkkk, // acredite sChaveCanc := ACBrSAT.CFeCanc.infCFe.chCanc; ACBrSAT.CancelarUltimaVenda( sChaveCanc, mCancelamento.Lines.Text ); // pegar retorno if ACBrSAT.Resposta.codigoDeRetorno <> 7000 then MsgErro('Erro cancelamento CUPOM SAT') else // armazeno o caminho do XML de retorno do cancelamento para // enviar ao contador. end; Verifique aí e depois retorne. Lembrando que o prazo de cancelamento de um cupom SAT é de no máximo até 30 min da sua emissão. Até mais,
  16. Pessoal, Eu utilizo o Santander com boleto registrado, remessa e retorno e não estou tendo nenhum problema com as configurações atuais. Minhas configurações vão o dígito da agência sim. Eu configurei desta maneira: ACBrBoleto.ACBrBoletoFC.DirLogo := sPathImagemBol; ACBrBoleto.ACBrBoletoFC.Filtro := fiNenhum; ACBrBoleto.ACBrBoletoFC.LayOut := TACBrBolLayOut( cmbLayoutBoleto1.ItemIndex ); ACBrBoleto.ACBrBoletoFC.MostrarSetup := true; ACBrBoleto.ACBrBoletoFC.SoftwareHouse := variables._DESENVOLVEDOR; ACBrBoleto.Banco.TipoCobranca := cobSantander ; ACBrBoleto.Banco.Numero := 33; ACBrBoleto.Banco.Digito := 7; ACBrBoleto.Banco.Nome := 'Santander'; ACBrBoleto.Banco.TamanhoMaximoNossoNum := 12; if(length(Trim(sOrientacoesBanco)) > 0) then ACBrBoleto.Banco.OrientacoesBanco.Add(sOrientacoesBanco); // minha agencia 06980 ACBrBoleto.Cedente.Agencia := sAgencia ; // 0698 ACBrBoleto.Cedente.AgenciaDigito := sAgenciaDig ; // 0 ACBrBoleto.Cedente.Bairro := sBairroCedente; case cmbCaractCob.ItemIndex of 00 : ACBrBoleto.Cedente.CaracTitulo := tcSimples; 01 : ACBrBoleto.Cedente.CaracTitulo := tcVinculada; 02 : ACBrBoleto.Cedente.CaracTitulo := tcCaucionada; 03 : ACBrBoleto.Cedente.CaracTitulo := tcDescontada; 04 : ACBrBoleto.Cedente.CaracTitulo := tcVendor; else ACBrBoleto.Cedente.CaracTitulo := tcSimples; end; ACBrBoleto.Cedente.CEP := sCepCedente; ACBrBoleto.Cedente.Cidade := sCidadeCedente; ACBrBoleto.Cedente.CNPJCPF := sCnpjCedente; ACBrBoleto.Cedente.CodigoCedente := sCodCedente; ACBrBoleto.Cedente.CodigoTransmissao:= sCodigoTransmite; ACBrBoleto.Cedente.Complemento := ''; ACBrBoleto.Cedente.Conta := sContaCorrente; ACBrBoleto.Cedente.ContaDigito := sContaCorrenteDig; ACBrBoleto.Cedente.Logradouro := sLogradouroCedente; ACBrBoleto.Cedente.Convenio := sConvenio; ACBrBoleto.Cedente.Modalidade := sModalidade; ACBrBoleto.Cedente.NumeroRes := ''; ACBrBoleto.Cedente.ResponEmissao := Iif(sBancoEmite='S', tbBancoEmite, tbCliEmite); ACBrBoleto.Cedente.Nome := sNomCedente; ACBrBoleto.Cedente.Telefone := sTelefoneCedente; ACBrBoleto.Cedente.UF := sUFCedente; if(length(trim(removecaracteresesp(ACBrBoleto.Cedente.CNPJCPF))) > 11) then ACBrBoleto.Cedente.TipoInscricao := pJuridica else ACBrBoleto.Cedente.TipoInscricao := pFisica; ACBrBoleto.Cedente.TipoCarteira := Iif(Trim(sRegistrar)='SIM', tctRegistrada, tctSimples); ACBrBoleto.DataArquivo := Date; ACBrBoleto.NomeArqRemessa := FormatDateTime('DDMMYYYYHHMMSS',Now)+'.TXT'; ACBrBoleto.DirArqRemessa := sPathRemessa; ACBrBoleto.DirArqRetorno := sPathRetorno; ACBrBoleto.ImprimirMensagemPadrao := False; ACBrBoleto.LayoutRemessa := Iif(Pos(sLayoutArqRem,'400')>0,c400,c240); ACBrBoleto.LeCedenteRetorno := false; end; E está tudo funcionando ok. Até mais,
  17. Gean, Olha, quando comecei tive um problema parecido. Eu fazia uma ou duas vendas e na terceira dava pau. Daí fazia novamente do mesmo jeito e dava pau denovo. Saia do programa e entrava novamente e quando eu fazia a venda funcionava. Bem, fiquei louco até fazer como no exemplo do acbrsat, toda vez que ia fazer alguma coisa refazia a configuração do componente e então eu gerava e envia gerava e envia e fiz isso umas 30 vezes e não deu pau nenhum. Então implementei isso no meu programa e funcionou continuamente sem dar mais problemas. Testei uns dois dias seguidos, foi tudo ok, apenas fazendo como no exemplo. Faça igual ao exemplo do acbr, espero que ajude.
  18. 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,
  19. É, Erro 06010 de validação de conteúdo e algo relacionado a criação e geração do XML mesmo, são dados, passei por isso. Não tem muito o que fazer, se estiver usando o monitor, tem que tratar muito bem os dados antes do comando enviarcfe, se não tiver usando o monitor, pega esse exemplo simples e tenta gerar e enviar a partir dele pra ver se funciona. var TotalItem: Double; A: Integer; begin PageControl1.ActivePage := tsGerado; ACBrSAT1.CFe.IdentarXML := True; ACBrSAT1.CFe.TamanhoIdentacao := 3; mVendaEnviar.Clear; // Trasnferindo Informações de Config para o CFe // AjustaACBrSAT; ACBrSAT1.InicializaCFe ; // Montando uma Venda // with ACBrSAT1.CFe do begin ide.numeroCaixa := 1; Dest.CNPJCPF := '13048599000185'; Dest.xNome := 'CONSULT ATECH'; Entrega.xLgr := 'Av. Orestes Quercia'; Entrega.nro := '1757'; Entrega.xCpl := 'piso sup'; Entrega.xBairro := 'Centro'; Entrega.xMun := 'Sao Joaquim da Barra'; Entrega.UF := 'SP'; For A := 0 to 0 do // Ajuste aqui para vender mais itens begin with Det.Add do begin nItem := A+1; Prod.cProd := 'ACBR001'; Prod.cEAN := '6291041500213'; Prod.xProd := 'Assinatura SAC'; prod.NCM := '99'; Prod.CFOP := '5102'; Prod.uCom := 'UN'; Prod.qCom := 1; Prod.vUnCom := 120.00; Prod.indRegra := irTruncamento; Prod.vDesc := 1; with Prod.obsFiscoDet.Add do begin xCampoDet := 'campo'; xTextoDet := 'texto'; end; TotalItem := (Prod.qCom * Prod.vUnCom); Imposto.vItem12741 := TotalItem * 0.30; Imposto.ICMS.orig := oeNacional; // testando como empresa do simples Imposto.ICMS.CSOSN := csosn102; Imposto.PIS.CST := pis49; Imposto.PISST.qBCProd := 0; Imposto.PISST.vAliqProd := 0; Imposto.COFINS.CST := cof49; Imposto.COFINSST.qBCProd := 0; Imposto.COFINSST.vAliqProd := 0; infAdProd := 'Informacoes adicionais'; end; end; Total.DescAcrEntr.vDescSubtot := 1; Total.vCFe := 120.00; Total.vCFeLei12741 := 35.70; with Pagto.Add do begin cMP := mpDinheiro; vMP := 18; end; with Pagto.Add do begin cMP := mpCartaodeCredito; vMP := 100; end; InfAdic.infCpl := 'SAT FISCAL CONSULT ATECH/caSAT Bares e Restaurantes'; end; mVendaEnviar.Lines.Text := ACBrSAT1.CFe.GerarXML( True ); // True = Gera apenas as TAGs da aplicação mLog.Lines.Add('Venda Gerada'); end; Veja aí, coloca pra gerar desse jeito aí e veja se vai. No exemplo SATTeste, configura os dados de entrada 0.06, usar UTF8 e gera e envia. Até mais,
  20. Pessoal, A versão dos dados de entrada está como 0.05 tem que ser como 0.06. Alterem isso, mantenham os schemas atualizados que funciona. Comigo está funcionando o cancelamento. Posso cancelar qualquer cupom SAT com até 30 minutos da emissão. Até mais,
  21. Eu nao faço nemhuma conf a respeito disso, só descompacto os schemas a hierarquia de certificação, tudo, no diretório do sistema. Colo as dlls do fabricante dentro do diretório do programa também e mando ver. Esse path aí é apenas para salvar os XMLS, não tem a ver com schemas, pelo menos eu não faço dessa maneira. Até mais,
  22. Estimado, Bom dia. pelo conteudo alguns cfops ai nao tem no SAT, códigos de CST não previstos e tudo mais. Dá uma lida em OrientaçõesLeiauteCF-e_v00.06-0 - AD.pdf pra ver algumas regras relativas a preenchimento de campos, verás que é bem restrito e o teu software tem que prever algumas situações. Sao erros de conteudo mesmo. Ate mais,
  23. Barrys, Atulalizou os schemas? http://www.fazenda.sp.gov.br/sat/downloads/20150203_XSDs.zip Até mais,
  24. Bom dia a todos, Tenho a impressão pela DR700 funcionando ok. Não é tão rápido mas está a contento. Instalei o SPOOLER da daruma, fiz algumas configurações como qualidade de rascunho pra normal, impressão contínua e por último, usando o tool da dr700 eu mudei algo relacionado à tabela de impressão (não tem como olhar pois não estou na empresa hoje mas este é o email de quem me atendeu com o problema da dr700:>[email protected]). Funciona, mas como os colegas dizem, dá um trabaim. Até mais,
  25. Jcafero, Bom dia! Uma coisa que vejo aqui é que vc usou o CFOP 5403. Não tem isso no SAT. Só 5101 5102 5103 e 5405. E a orientação para PIS e COFINS quando tem ST é preencher com CST 49 ou 99 e base e alíquotas zeradas e você colocou 01. Faz essas modificações aí e teste novamente. Até mais,
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.