Leonardo Gregianin

Já ví sistemas que imprimem o RPS ou o "aviso prévio" que tu disse, mas tem um prazo de validade para converter em nfs-e. O ACBr não faz isto. Quanto o segundo questionamento, além do ACBr gravar os arquivos, tu também pode gravar eles: AcbrNFSe1.NotasFiscais.SaveToFile(path + '\' + numero_do_rps + '-nfse.xml');

Ronnei, Meu código também tinha um try..except, eu tirei e passei uma variável boleana: Retorno := ACBrNFSe1.Enviar(rps,false); Retorno := ACBrNFSe1.ConsultarNFSeporRps(rps, serie, tipo, cnpj, im); Eu gravo no banco de dados o protocolo do envio, ou seja, a nota está em processamento. Depois faço a consulta e se a variável "retorno" voltar "true" eu pego o número da nfs-e senão continua "em processamento".

De acordo com o manual da Abrasf a tag é "OutrasInformacoes" porém ela é reservada para uso da administração fazendária, não adianta enviar alguma informação porque o xml de retorno vêm conforme a prefeitura.

juaumkiko, Será que agora você consegue incluir uma diretiva de compilação para isso?

De acordo com o site da Abrasf já existem as versões 1.0, 2.0, 2.1 e 2.2 e como cada cidade faz do jeito que quer, como é feita a diferenciação no ACBr ou não é preciso fazer nada? Por exemplo a cidade de Barra do Garças-MT está na versão 2.0 enquanto outras estão na 1.0: Produção: http://financas.barradogarcas.com:8080/SCEM/servlet/anfse_barradogarcas?wsdl Homologação: http://virtualserver.dyndns-free.com:8080/SCEMX32JavaEnvironment/servlet/agerarnfse_barradogarcas?wsdl att.

Veja esse tópico sobre o mesmo assunto:

Se em regra o processo é assíncrono, acho que o certo é mesmo separar o envio e o retorno do lote.

Eu não uso o ini no meu programa, quando inicio meu programa eu pego os dados do meu cadastro da empresa e só utilizo quando vou gerar o xml do rps.

No manual de tratamentos de erros está: "E157: Usuário não está autorizado a utilizar esse serviço para esse contribuinte. Solução: Solicite ao contribuinte autorização para utilizar o serviço em seu nome." Se você está utilizando o CNPJ do seu cliente, deve usar também o certificado digital dele.

Insisto e questiono isto porque nas units ACBrNFSeNotasFiscais e ACBrNFSeWebServices estão comentadas as variáveis "Configuracoes.Geral.Salvar" e "Configuracoes.Arquivos.Salvar", com isso sempre gera os arquivos que, em tese, não servem de nada para os clientes. att.

Primeiro você passa o lote, depois você vai incluindo os RPS com o comando "with NotasFiscais.Add.NFSe do", dê uma olhada no programa exemplo: ...\trunk\Exemplos\ACBrNFSe\Delphi\ NotasFiscais.NumeroLote:='1'; while not CDS.Eof do begin with NotasFiscais.Add.NFSe do begin IdentificacaoRps.Numero := FormatFloat('#########0', RPS); IdentificacaoRps.Tipo := trRPS; DataEmissao := Date; ... end; CDS.Next; end;

Testado ok.

Mesmo tópico:

Siga os passo que o Ítalo postou aqui: Para Delphi 2010 você deve trocar no final do pacote ..\trunk\Pacotes\Delphi\ACBrNFe2\ACBrNFSeDanfseQRpkg.dpk: de: vcljpg, QR5RunD7; para: vclimg, QR5RunD2010;

Observei no componente que existe vários lugares onde está comentado as opções "FConfiguracoes.Geral.Salvar" e "FConfiguracoes.WebServices.Salvar" para que gere efetivamente os arquivos .xml, tem algum problema em descomentá-los para utilizar as variáveis "Configuracoes.Arquivos.Salvar := False" e "Configuracoes.Geral.Salvar := False" e não sejam criados estes vários aquivos? Grato.

Dica, principalmente para quem inicia na NFS-e, para buscar o diretório dos schemas corretamente: ACBrNFSe1.Configuracoes.WebServices.CodigoMunicipio := StrToIntDef(CodigoCidade), 0); ACBrNFSe1.Configuracoes.WebServices.SetConfigMunicipio(''); ACBrNFSe1.Configuracoes.Geral.PathSchemas := 'X:\NFSE\Schemas\' + ACBrNFSe1.Configuracoes.WebServices.xProvedor; Label1.Caption := 'Provedor: ' + ACBrNFSe1.Configuracoes.WebServices.xProvedor; Primeiro setar o código da cidade e depois o componente busca o provedor automático e mostra no label. Dúvida: Quando o provedor é ISSNet, o ACBr troca o nome para "ISS.Net", por isso eu preciso trocar o nome do diretório ou no componente para "ISSNet", não daria para ficar um nome padrão? Grato.

Dê uma olhada no demo NFS-e: procedure TfrmDemo_ACBrNFSe.btnImprimirClick(Sender: TObject); begin OpenDialog1.Title := 'Selecione a NFSe'; OpenDialog1.DefaultExt := '*-NFSe.xml'; OpenDialog1.Filter := 'Arquivos NFSe (*-NFSe.xml)|*-NFSe.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrNFSe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); ACBrNFSe1.NotasFiscais.Imprimir; MemoDados.Lines.Add('Arquivo Carregado de: '+ACBrNFSe1.NotasFiscais.Items[0].NomeArq); MemoDados.Lines.Add('Nota Numero: '+ACBrNFSe1.NotasFiscais.Items[0].NFSe.Numero); MemoDados.Lines.Add('Código de Verificação: '+ACBrNFSe1.NotasFiscais.Items[0].NFSe.CodigoVerificacao); MemoResp.Lines.LoadFromFile(ACBrNFSe1.NotasFiscais.Items[0].NomeArq); LoadXML(MemoResp, WBResposta); PageControl2.ActivePageIndex := 1; end; end;

Obrigado você João Henrique.

Os schemas ainda não foram alterados. Alguém sabe qual o contato deve ser enviado isso pro governo?

Bom dia, fiz uma pequena alteração visual no arquivo ACBrDANFeCBRaveRetrato.pas para não mostrar o traço "-" quando não há informação, grato se subirem para o repositorio. --- ACBrDANFeCBRaveRetrato.pas-rev5088.svn000.tmp.pas qui nov 22 12:45:44 2012 +++ ACBrDANFeCBRaveRetrato.pas qui mai 16 09:05:03 2013 @@ -355,7 +355,10 @@ NewLine; if vDuasLinhas then begin - vEnd:=SiteDoEmitente+' - '+EmailDoEmitente; + if (SiteDoEmitente <> '') and (EmailDoEmitente <> '') then + vEnd := SiteDoEmitente+' - '+EmailDoEmitente; + if (SiteDoEmitente = '') and (EmailDoEmitente <> '') then + vEnd := EmailDoEmitente; PrintCenter(vEnd,CenterX); end else

Se alguém puder testar e simular a situação.. agradecido.

Meu problema acontece quando utilizo "ACBrNFe1.NotasFiscais.ImprimirPDF", se eu passo MostrarSetup como "True" não gera o arquivo, se passo "False" gera correto na pasta "PathPDF". Utilizo Delphi 2010, Rave 7.7 e estou com a última atualização do svn de 03/05/2013.

Pelo que lí no Manual de integração da NF-e não há campo específico para observação de cada produto. O que há é que a descrição do produto aceita até 120 caracteres, por isso acredito que seu sistema carrega a descrição do produto e depois as observações relevantes no mesmo campo de descrição.

Carrega o anexo para vermos

Não tive problemas com isso. Primeiro adiciono as duas notas ao componente, envio as duas e depois aparece uma única vez a tela do setup (com Setup ativado), ao mostrar o Preview aparece as duas notas para visualização.