FGGLUIZ

Boa tarde. A forma de envio da CCe esta sendo modificado, veja o Demo e compare com o seu código. Qualquer coisa retorne. Fábio

Antonio Carlos, dê uma olhada no demo ACBrNFE a maneira de envio da CCe e veja que esta diferente do seu código, modifique para esta nova versão, porque a partir de agora estarão entrando novos eventos e a forma antiga será desabilitada em breve. Outro que esta também funcionando e o "cancelamento" por evento (pelo menos para São Paulo). Qualquer dúvida escreva. Fábio

Michel, deixe as DLL´s na raiz do seu software e faça um teste. Fábio

Rodrigo, no arquivo .FR3 não tem classe, somente o relatório, você deve passar os parametros do seu sistema através de frxDB* do próprio FastReport para alimentar os campos frx*View, veja o relatório que você vai entender. Fábio

Juliana, por gentileza, poderia subir a correção do arquivo BOLETOFR.FR3 em anexo, assim quem estiver com versões anteriores do Delphi não vai ocorrer mais este tipo de erro no FastReport. Obrigado. Fábio BoletoFR.rar

Jairo, você fez certo em abrir, só que não esta na procedure, esta no "Page1". Eu alterei o arquivo e estou anexando aqui, faça um teste e retorne para poder solicitar a atualização nos fontes. No aguardo. Fábio Olá Fábio, MUUIITTOOO obrigado! Deu certinho, só peço mais 1 coisa pra você, como procedo para que o campo "Nosso Número" seja preenchido corretamente, pois ele fica zerado, ainda não descobri como fazer. Abração ! Juliana ou Regys, por gentileza, poderia subir a correção do arquivo BOLETOFR.FR3 em anexo, assim que estiver com versões anteriores do Delphi não vai ocorrer mais este tipo de erro. Jairo, de uma olhada no Demo, o campo "Nosso Número" esta em negrito, como você esta iniciando agora, você vai ter que fazer alguns testes, o Demo vai ser sua melhor opção, use também a ferramenta de busca do forum. Abraço. Fábio var Titulo : TACBrTitulo; begin Titulo := ACBrBoleto1.CriarTituloNaLista; with Titulo do begin Vencimento := StrToDate(edtVencimento.Text); DataDocumento := StrToDate(edtDataDoc.Text); NumeroDocumento := edtNumeroDoc.Text; EspecieDoc := edtEspecieDoc.Text; if cbxAceite.ItemIndex = 0 then Aceite := atSim else Aceite := atNao; DataProcessamento := Now; NossoNumero := edtNossoNro.Text;

Jairo, você fez certo em abrir, só que não esta na procedure, esta no "Page1". Eu alterei o arquivo e estou anexando aqui, faça um teste e retorne para poder solicitar a atualização nos fontes. No aguardo. Fábio BoletoFR.rar

Amigo, estive olhando e alguns Delphi c/ FastReport vai gerar estes erros, porque o arquivo BOLETOFR.FR3 esta com a propriedade DisplayFormat errada em quase todo os Views, por exemplo: no Memo45 esta como dd/mm/yyyy. Para resolver isso, você deverá ver todos os Views e corrigir eles. Eu tenho duas versões do Delphi, a versão 7 esta gerando este erro a outra não. Espero ter ajudado. Fábio Olá, Ajudou sim, afinal toda a ajuda está sendo m]bem vinda ! Mas desculpe minha ignorância, mas onde posso alterar o formato destes views para corrigir ? Aguardo Jairo, e só você adicionar em qualquer formulário "frxReport", abrir o "BOLETOFR.FR3" e editar. Se você não conseguir, avise que tento alterar para você até segunda-feira. Fábio

Olá, Continua dando o mesmo erro, pois não consegui definir ainda qual o campo ou variável está com conversão incorreta, porém achei importante lhe passar mais detalhes do erro, acredito que você conseguirá me ajudar com esta informação. Amigo, estive olhando e alguns Delphi c/ FastReport vai gerar estes erros, porque o arquivo BOLETOFR.FR3 esta com a propriedade DisplayFormat errada em quase todo os Views, por exemplo: no Memo45 esta como dd/mm/yyyy. Para resolver isso, você deverá ver todos os Views e corrigir eles. Eu tenho duas versões do Delphi, a versão 7 esta gerando este erro a outra não. Espero ter ajudado. Fábio

"ALA", em minhas aplicações eu sempre faço uma consulta no serviço, até para saber se esta ativa, assim você pega a data/hora atual do SEFAZ. Veja: if not (ACBrNFe1.WebServices.StatusServico.Executar) then begin raise exception.Create(ACBrNFe1.WebServices.StatusServico.Msg); end; Inté + Fábio

Amigo, tente isso: infEvento.dhEvento:=ACBrNFe1.WebServices.StatusServico.dhRecbto; //Usando data/hora SEFAZ Inté + Fábio

Amigos, baseado no modelo do "jrs.santos" estou anexando em Fast Report, gostei muito do layout e então implementei. Grande abraço. Fábio CCE.rar

Amigos, tem alguns sistemas operacionais que dão certo outros não, mas na maioria e só seguir este Repositório de Certificados -> "Autoridades de Certificação Raiz Confiáveis" que nosso amigo "Arce" indicou.. Testado no "Win XP e Win Vista".

Segue um exemplo: http://pt.wikipedia.org/wiki/Cadastro_d ... C3.ADgitos

O Sefaz de SP solucionou o problema, fiz o teste e funcionou. Fábio

Amigos, entrei em contato com a Sefaz de SP e eles informou que eles identificaram o erro e que estão corrigindo para suportar a nova cadeia de valores, mais sem previsão de quando isso estara pronto. Enquanto isso vamos aguardando. Fábio

nando40rj, bom dia. De uma olhada abaixo, sua vUnCom e vUnTrib estão diferentes. 353.4700000000 353.4712000000 Fábio

Danielsk8, o nosso amigo brsamn, já deu a dica: Simples Nacional: Impostos.ICMS.CSOSN = CSOSN101, CSOSN102, CSOSN103, CSOSN201, CSOSN202, CSOSN203, CSOSN300, CSOSN400, CSOSN500 e CSOSN900. Regime Normal: Imposto.ICMS.CST = CST00, CST10, CST20, CST30, CST40, CST41.......ETC. Outra dica e você olhar o Manual de Integração Contribuinte, lá você vai encontrar para cada tipo de impostos o que deve ou não ser destacado e outras coisinhas mas.... Espero ter ajudado. Fábio

Suzaku, e o seguinte: Estas mensagens que esta gerando e devido a versão do Delphi que vc usa. Quando foi criado o Package para NFE a pessoa que criou estava usando uma versão do Delphi que vc não usa. Por tanto, você deve alterar na instalação do Package a versão do seu Delphi (FastReport), por exemplo: Eu uso o Delphi 7, o FastReport que deve estar no Package: e frx7, frxDB7, frxe7, fs7 e no lugar do img.vcl vc inclui o vcljpg.vcl Faça isso que vai dar certo. Espero ter ajudado. Fábio

Nonilton, veja a versão do seu Delphi, este erro normalmente e a versão na instalação.

Gustavo, boa tarde. O link que tenho para homologação e produção são os mesmos para Americana: https://nfse.americana.sp.gov.br/WSNacional/nfse.asmx Veja com a prefeitura como efetuar esta comunicação. Qualquer dúvida poste ai. Fábio Gabriel

Italo, boa noite. Vc chegou a postar o Demo no branches ? O que esta no branches não esta seguindo toda a homologação ate agora. Att. Fábio [email protected]

Italo, boa tarde. Por gentileza, disponibilizar no branches o exemplo Demo para teste, o exemplo disponível não esta executando corretamente. Att. Fábio Gabriel [email protected]

Segue uma pequena lista das Prefeituras e seus Provedores: Obs: Veja também o layout de sua cidade, como o nosso amigo Italo Jr disse, porque mesmo assim pode mudar. 5100250 Alta Floresta/MT (ISS.NET) 3501608 Americana/SP (TIPLAN) 5201108 Anápolis/GO (ISS.NET) 3502101 Andradina/SP (ISS.NET) 3300100 Angra dos Reis/RJ (TIPLAN) 5201405 Aparecida de Goiânia/GO (ISS.NET) 3503208 Araraquara/SP (GINFES) 2800308 Aracaju/SE (WebISS) 3105608 Barbacena/MG (WebISS) 3300407 Barra Mansa/RJ (TIPLAN) 1501402 Belém/PA (DSF) 3300456 Belford Roxo/RJ (GINFES) 3106200 Belo Horizonte/MG 4302105 Bento Gonçalves/RS (Abaco) 5002209 Bonito/MS (ISS.NET) 3509502 Campinas/SP (DSF) 5002704 Campo Grande/MS (DSF) 4106407 Cornélio Procópio/PR (Betha) 4104808 Cascavel/PR (ISS.NET) 3115300 Cataguases/MG (GINFES) 3513009 Cotia/SP (GINFES) 4306106 Cruz Alta/RS (ISS.NET) 5103403 Cuiabá/MT (ISS.NET) 4106902 Curitiba/PR 4107207 Dois Vizinhos/PR (Equiplano) 5003702 Dourados/MS (ISS.NET) 3301702 Duque de Caxias/RJ (TIPLAN) 4107652 Fazenda Rio Grande/PR (Betha) 2304400 Fortaleza/CE (GINFES) 3516200 Franca/SP (GINFES) 4108403 Francisco Beltrão/PR (Equiplano) 3127701 Governador Valadares/MG (ISSIntel) 3518800 Guarulhos/SP (GINFES) 3519071 Hortolândia/SP (GINFES) 4109807 Ibiporã/PR (Equiplano) 3131307 Ipatinga/MG (GINFES) 3302007 Itaguaí/RJ (TIPLAN) 3133808 Itaúna/MG (WebISS) 3523909 Itu/SP (GINFES) 3524402 Jacareí/SP (ISS.NET) 3136207 João Monlevade/MG (WebISS) 2507507 João Pessoa/PB (GINFES) 3525904 Jundiaí/SP (GINFES) 3137601 Lagoa Santa/MG (GINFES) 3302403 Macaé/RJ (TIPLAN) 2704302 Maceió/AL (GINFES) 3302601 Mangaratiba/RJ (TIPLAN) 3530607 Mogi das Cruzes/SP (ISS.NET) 5005707 Naviraí/MS (ISS.NET) 5006002 Nova Alvorada do Sul/MS (ISS.NET) 3303401 Nova Friburgo/RJ (WebISS) 3303500 Nova Iguacu/RJ (DSF) 5106232 Nova Olímpia/MT (ISS.NET) 3533908 Olímpia/SP (GINFES) 3147105 Pará de Minas/MG (GINFES) 2208007 Picos/PI (ISSIntel) 2925303 Porto Seguro/BA (ISSIntel) 3541000 Praia Grande/SP (ISS.NET) 3541505 Presidente Venceslau/SP (ISS.NET) 5107040 Primavera do Leste/MT (Ábaco) 2611606 Recife/PE 3304201 Resende/RJ (TIPLAN) 3543402 Ribeirão Preto/SP (GINFES) 5007208 Rio Brilhante/MS (ISS.NET) 3304524 Rio das Ostras/RJ (TIPLAN) 3304557 Rio de Janeiro/RJ 4214805 Rio do Sul/SC (Betha) 3156700 Sabará/MG (WebISS) 2927408 Salvador/BA 4316907 Santa Maria/RS (ISS.NET) 3547809 Santo André/SP (GINFES) 3548906 São Carlos/SP (GINFES) 3548708 São Bernardo do Campo/SP (GINFES) 3549805 São José do Rio Preto/SP (GINFES) 4125506 São José dos Pinhais/PR (GINFES) 2111300 São Luís/MA (DSF) 3550308 São Paulo/SP 3551504 Serrana/SP (ISS.NET) 5007901 Sidrolândia/MS (ISS.NET) 3552205 Sorocaba/SP (DSF) 5107925 Sorriso/MT (ISS.NET) 5107958 Tangará da Serra/MT (ISS.NET) 3554003 Tatuí/SP (GINFES) 2211001 Teresina/PI (DSF) 3305802 Teresópolis/RJ (WebISS) 4127700 Toledo/PR (Equiplano) 3169307 Três Corações/MG (ISS.NET) 3170107 Uberaba/MG (WebISS) 3170206 Uberlandia/MG (DSF) 4128104 Umuarama/PR (GINFES) 4128203 União da Vitória/PR (Betha) 5108402 Varzea Grande/MT (ISS.NET) 1100304 Vilhena/RO (ISS.NET) 3557105 Votuporanga/SP (GINFES) 4219507 Xanxerê/SC (ISS.NET)

Amigo, vou dar um exemplo que tem na minha aplicação, o resto você vai ter que implementar. Observação: Não deixe de implementar com Try, assim vc vai verificando os motivos de erros em todos os andamentos (Valida / Assinar / Outros). Try ACBrNFe1.WebServices.Envia(XXXX); ACBrNFe1.NotasFiscais.SaveToFile; case ACBrNFe1.WebServices.Retorno.cStat of 100: // NOTAS FISCAIS CORRETAS begin // Seu Código end; // Outros Case (Conforme post anteriores, veja no manual do Sefaz os Status); Except on E:Exception do begin // Apaga todos os registros do banco de dados NFiscal e NFiscal Item // Itens NFiscal XXXXXX.First; While not XXXXXX.Eof do begin // Seu código; end; XXXXXXX.Cancel; ShowMessage(E.Message); raise Exception.Create('Erro no Envio/Recepção para criação do XML da NF-e' + #13 + 'Erro Original:' + E.Message + #13 + 'Processamento interrompido. Refaça a NF-e!'); end;