Ir para conteúdo
  • Cadastre-se

Antonio Carlos L

Membros
  • Total de ítens

    570
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Antonio Carlos L postou

  1. movido para : http://www.projetoacbr.com.br/forum/topic/24797-função-para-validar-chave-acesso/
  2. Posso estar equivocado, mas acredito que impressoras NÃO FISCAIS em comunicação direta, sem a DLL do fabricante, não de retorno.
  3. Postado 9 Dez 2014 - Sergioguedes Disse : "Ainda devendo o modelo da minha implementação vou tentar fazer isso em breve, vou compartilhar o meu modelo porque acho que vocês podem me ajudar eu posso muita pessoas também." Caro Sergio, a sua implementação esta em algum local diferente do ACBr, ou não existe ?
  4. Pessoal coloquei a imagem em anexo para ficar mais fácil o entendimento. Querem que eu exiba em um DBGrid da forma abaixo, pelo que vejo ele permite uma dupla linha e a concatenação de Fields e texto. Na paleta JvDatControls encontrei o UltimateGrid, mas ele não permite isso. Alguma luz ?
  5. Oi Regys , estou vendo o manual 6.0 da NFe e estou com dúvida de como realizar o calculo dos impostos Por isso preciso ver um exemplo pois não sei se todas as Tags N12 a N23 são preenchidas
  6. Caros amigos, Não sei se a formula : vRateado = vItem x ( vDescontoOuFrete / vTotalNota) é a melhor solução para utilizar. Como sabemos o frete e/ou desconto compõe a base de calculo dos tributos. 1 - Ai como fazer o desconto do produto X dar certinho o que o cliente quer se ele quer simplesmente no final da nota lançar o desconto e apertar o botãozinho mágico ? 2 - Uso o Firebird 2.5 e queria saber se deixar para o banco fazer contas onde vai surgir arredondamento acaba sendo um tiro no pé ?
  7. Caros haveria a possibilidade do envio de um XML ( ou parte de um XML ) que registrasse a venda de um produto entre estados distintos onde o emissor efetue o recolhimento da ST. Obrigado. Antonio Carlos
  8. Pessoal, mal saiu em 27/07 a NT2015/002 com muito pouco tempo para testes e implementar, sai outra em 26/08 NT2015/003 e essa é uma doideira com o mesmo prazo. Estão tornando a coisa cada vez mais enrolada. São tantas regras e exceções que fica muito complicado mesmo a um sistema prever de forma automatizada tudo. Agora entendo porque o emissor gratuito deixa por conta do usuario o preenchimento dos tributos. Antonio Carlos
  9. Ok, Italo, fiz um novo post, obrigado. Mas poderia me dizer por favor se no exemplo de NFe : a - o checkBox cbxAtualizarXML é obsoleto ? b - na aba arquivos, existem muitos Paths, porém varrendo o código não vejo chamada a esses, eles são obsoletos ? c - se assim forem posso enviar sugestão para serem removidos do demo ?
  10. Caros eu estou desenvolvendo a emissão da NFe e NFCe usando um certificado A1. Estou usando CAPICOM, o componente possui a propriedade Senha em certificado Gostaria de saber de algum colega que tem um certificado A3 se ao ser colocado nesta propriedade a Senha do cartão ou token o componente trata essa chamada ao certificado possibilitando que o usuário não tenha que ficar digitando a senha. Obrigado. Antonio Carlos
  11. Obrigado Italo pela resposta. Entendido em relação a propriedade SalvarEvento O checkBox do exemplo cbxAtualizarXML então é obsoleto ? Mudando o assunto, uso CAPICON e estou fazendo a carga do banco de dados das configurações quer seja para NFe como NFCe with ACBrNFe.Configuracoes.Certificados do begin NumeroSerie := DataSet.FieldByName('NFE_CERT_NUM_SERIE').AsString; Senha := DataSet.FieldByName('NFE_CERT_PASSWD').AsString; end; Como uso um certificado A1, não tive como testar, mas se eu usar um A3 e tiver passado a senha do certificado na chamada o componente vai fazer isso ?
  12. Caros nos Demos existe cbxAtualizarXML.Checked entretanto esse cxb não altera valor algum no ACBrNFe ele deveria estar ligado a alguma property ? Fui re-compilar um demo personalizado do trunk2 com o ACBr atual e deu o erro : Error reading ACBrNFe1.Configuracoes.Arquivos.SalvarCCeCanEvento SalvarCCeCanEvento Property does not exist essa property foi excluida ou trocou de nome ? Abraços. Antonio Carlos
  13. NO DELPHI XE Ao ser selecionado pelo ACBrInstall_trunk2 o DANFe Fortes o pacote Compiling package C:\MyLIB\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBr_NFeDanfeRL.dpk não compila devido a falha : C:\MyLIB\ACBr\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLPaisagem.pas(53) Fatal: F1026 File not found: 'Vcl.Imaging.jpeg.dcu' Compilation failure {$IF CompilerVersion >= 22} Vcl.Imaging.jpeg, {$ELSE} jpeg, {$IFEND} Alterado para {$IF CompilerVersion > 22} Vcl.Imaging.jpeg, {$ELSE} jpeg, {$IFEND} Compila normalmente.
  14. Alguem poderia responder ?
  15. DETECTADO O PROBLEMA E ENCONTRADO SOLUÇÃO !!! CULPADO : ACBrNFeDANFEFR AMBIENTE : Windows 7 32bits, Delphi XE Enterprise, ACBr Trunk2, Fast Report 5.1.9 PROJETO : Demo ACBr trunk2 PROBLEMA : Projeto ACBr Demo abre e é compilado normalmente, abre e fecha sem problemas em tempo de execução. O projeto ao ser fechado na IDE exibe mensagem de Access Violation variando o endereço. PASSOS DADOS PARA IDENTIFICAÇÃO : 1 - Criado um novo projeto , colocado um componente ACBrNFe, projeto compilado normalmente e fechou normalmente em tempo de projeto. 2 - Acrescentado um componente ACBrNFeDANFEFR, projeto compilado normalmente e projeto ao ser fechado na IDE exibe mensagem de Access Violation 3 - Criado um novo projeto , colocado componentes da paleta FastReport, o projeto é compilado normalmente e fechou normalmente em tempo de projeto. 4 - Baixado o trunk2 de 12/08/2015 , compilado e instalado, teste passo 2 efetuado, o mesmo problema encontrado. 5 - Em máquina virtual que possui o delphi com o trunk antigo, o projeto Demo ACBr NFe abre e fecha sem problemas usando o DANFE FastReport SOLUÇÃO A - Baixado no GitHub o Fortes Report Community, compilado e instalado; B - Removido TODOS os componentes da ACBr, recompilado usando o instalador_trunk2 , marcado apenas os relatórios do Fortes Report C - Alterado no exemplo ACBr Demo NFe o gerador para o ACBrNFeDANFeRL , compilado com sucesso, abre e fecha sem erro em tempo de projeto. POSSÍVEIS CAUSAS E CONSIDERAÇÕES O Delphi XE por padrão não vem como Fast Report apenas com o Rave, pode ser que a versão Fast Report 5.1.9 tenha alguma diferença da versão Default. Como o erro não ocorre no trunk apenas no trunk2 e qualquer outro projeto que use o Fast Report abre e fecha normalmente em tempo de projeto e execução, não dá para atribuir ao Fast Report o problema. Lembrei do problema recorrente de tentar atribuir um FastFile em tempo de projeto travando tudo, que pode estar relacionado ao problema descrito, e considerando que o trunk2 não vai dar continuidade ao Rave entendo que a solução é passar a utilizar o Fortes Report Community que nunca usei e parece ter modelos pré-definidos internamente. Aproveitando, onde tem um tutorial de Fortes Report se precisarmos de dar ajuste fino ?
  16. Oi Regys obrigado pela atenção. Conforme expliquei o AC ocorre em tempo de PROJETO e somente ao fechar o projeto do DEMO do ACBRNFe Nenhum outro Projeto ocorre o erro. Eu não instalei os geradores de relatório do FastReport do ACBr pois não consigo instar o pacote. Mas eu abro os DEMOS do FAstReport, compilo, fecho, saio do tempo de projeto e não ocorre erro, abro e saio de projetos que contem o FastReport e não tem AC. E confesso que sou ignorante e não sei como fazer um DEBUG em tempo de projeto.
  17. Caros, como o erro ocorre também Access violation at address 00000000 in module "bds.exe". Read of address 00000000 No quality central informa que é erro provocado por componente, e o erro ocorre no demo, creio que algo no componente esteja tentando instanciar algo não existe. Não tenho a minima ideia de como fazer um trace em tempo de projeto, já em em tempo de execução isso não ocorre. Já experimentei trocar de Debug para release e ocorre o mesmo. Verifiquei com o Syntax Check e também nada.
  18. Caros esta ocorrendo Access Violation ao fechar o projeto do DEMO trunk2 na ide do delphi Xe O endereço muda, no caso dessa vez a informação era Access Violation at address D7140000. read of address D7140000 colei abaixo, mas o executável não gera o mesmo erro. Nenhum outro projeto ao ser fechado gera erro. Sugestões ? Antonio Carlos (D713F000){bds.exe } [D7140000] [500553CB]{rtl150.bpl } SysUtils.TryEncodeTime (Line 13694, "SysUtils.pas" + 9) + $3 [1A58146A]{frx15.bpl } Frxclass.TfrxComponent.GetAllObjects + $16 [1A59192D]{frx15.bpl } Frxclass.TfrxReport.SetParentReport + $2F9 [50037544]{rtl150.bpl } System.@GetMem (Line 3693, "System.pas" + 20) + $0 [5003BFF6]{rtl150.bpl } System.@NewUnicodeString (Line 16751, "System.pas" + 10) + $0 [50037560]{rtl150.bpl } System.@FreeMem (Line 3768, "System.pas" + 20) + $0 [5003C4B3]{rtl150.bpl } System.@UStrAsg (Line 17757, "System.pas" + 42) + $0 [1A590FDD]{frx15.bpl } Frxclass.TfrxReport.DoClear + $95 [1A5911F0]{frx15.bpl } Frxclass.TfrxReport.Clear + $0 [1A580D5C]{frx15.bpl } Frxclass.TfrxComponent + $18 [1A590DD6]{frx15.bpl } Frxclass.TfrxReport + $12 [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [108EDA9A]{ACBr_NFeDanfeFR.bpl} Acbrnfedanfefrdm.TACBrNFeFRClass + $E [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [108EEAE9]{ACBr_NFeDanfeFR.bpl} Acbrnfedanfefr.TACBrNFeDANFEFR + $11 [500ADF7F]{rtl150.bpl } Classes.TComponent.DestroyComponents (Line 12319, "Classes.pas" + 10) + $6 [500ADCCB]{rtl150.bpl } Classes.TComponent.Destroy (Line 12192, "Classes.pas" + 3) + $2 [5027B4C7]{vcl150.bpl } Controls.TControl.Destroy (Line 5234, "Controls.pas" + 24) + $7 [5003A0D0]{rtl150.bpl } System.TObject.FreeInstance (Line 11050, "System.pas" + 2) + $2 [5003A79E]{rtl150.bpl } System.@ClassDestroy (Line 12163, "System.pas" + 0) + $2 [5009E688]{rtl150.bpl } Classes.TPersistent.Destroy (Line 4406, "Classes.pas" + 3) + $6 [5027FCBC]{vcl150.bpl } Controls.TWinControl.Destroy (Line 8227, "Controls.pas" + 34) + $9 [5034D618]{vcl150.bpl } Forms.TScrollingWinControl.Destroy (Line 2666, "Forms.pas" + 3) + $7 [5034E8B9]{vcl150.bpl } Forms.TCustomForm.Destroy (Line 3306, "Forms.pas" + 32) + $A [21054DE0]{designide150.bpl} Proxies.DestroyHook (Line 280, "Proxies.pas" + 2) + $6 [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [223FBD56]{delphivclide150.bpl} VCLFormDesigner.TVCLRootDesigner.FreeRoot (Line 519, "VCLFormDesigner.pas" + 0) + $2 [2107F2F2]{designide150.bpl} ComponentDesigner.TComponentRoot.InternalDeinitializeDesigner (Line 4477, "ComponentDesigner.pas" + 26) + $B [210816D1]{designide150.bpl} ComponentDesigner.TComponentRoot.Close (Line 5296, "ComponentDesigner.pas" + 4) + $5 [21B8DCF8]{delphicoreide150.bpl} DelphiModule.TPascalCodeMgrModHandler.Destroyed (Line 694, "DelphiModule.pas" + 11) + $5 [20A76BD5]{coreide150.bpl} DocModul.TCodeIDocModule.NotifyDestroyed (Line 2421, "DocModul.pas" + 1) + $14 [210646A9]{designide150.bpl} ToolUtils.ForEach (Line 90, "ToolUtils.pas" + 5) + $F [20A76B46]{coreide150.bpl} DocModul.TCodeIDocModule.NotifyDestruction (Line 2405, "DocModul.pas" + 1) + $F [20A73AE8]{coreide150.bpl} DocModul.TDocModule.BeforeDestruction (Line 986, "DocModul.pas" + 13) + $9 [5003A7FD]{rtl150.bpl } System.@BeforeDestruction (Line 12216, "System.pas" + 10) + $0 [208AC24E]{coreide150.bpl} SourceModule.TSourceModule.Create (Line 423, "SourceModule.pas" + 30) + $C8 [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [20A74CA4]{coreide150.bpl} DocModul.WalkDependencies (Line 1613, "DocModul.pas" + 8) + $5 [20A74CED]{coreide150.bpl} DocModul.TDocModule.WalkDependencies (Line 1622, "DocModul.pas" + 0) + $1 [20A73DDF]{coreide150.bpl} DocModul.TDocModule.Close (Line 1094, "DocModul.pas" + 12) + $3 [20841331]{coreide150.bpl} ProjectModule.TBaseProject.BeforeDestruction (Line 1027, "ProjectModule.pas" + 34) + $6 [21B13075]{delphicoreide150.bpl} BaseDelphiProject.TBaseDelphiProject.BeforeDestruction (Line 1521, "BaseDelphiProject.pas" + 4) + $2 [5003A7FD]{rtl150.bpl } System.@BeforeDestruction (Line 12216, "System.pas" + 10) + $0 [21B1034A]{delphicoreide150.bpl} BaseDelphiProject.TBaseDelphiProject.Destroy (Line 784, "BaseDelphiProject.pas" + 0) + $A [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [2081B1E7]{coreide150.bpl} ProjectGroup.TProjectGroup.BeforeDestruction (Line 999, "ProjectGroup.pas" + 50) + $2 [5003A7FD]{rtl150.bpl } System.@BeforeDestruction (Line 12216, "System.pas" + 10) + $0 [2081AF6A]{coreide150.bpl} ProjectGroup.TProjectGroup.Destroy (Line 934, "ProjectGroup.pas" + 0) + $2 [5003A118]{rtl150.bpl } System.TObject.Free (Line 11069, "System.pas" + 1) + $4 [208211DA]{coreide150.bpl} ProjectGroup.TProjectGroupWrapper.Close (Line 2749, "ProjectGroup.pas" + 2) + $5 [0041CB1F]{bds.exe } AppMain..{Generics.Defaults}TComparer<IDEDesktopComboBox.TDesktopComboBox> (Line 2071, "Generics.Collections.pas" + 0) + $190 [0041CC4C]{bds.exe } AppMain..{Generics.Defaults}TDelegatedComparer<IDEDesktopComboBox.TDesktopComboBox> (Line 2071, "Generics.Collections.pas" + 0) + $2BD [0041D86D]{bds.exe } Sanctuary.MD5.Transform (Line 295, "Sanctuary.MD5.pas" + 24) + $19 [500AED6F]{rtl150.bpl } Classes.TBasicAction.Execute (Line 12988, "Classes.pas" + 3) + $7 [5026AA15]{vcl150.bpl } ActnList.TContainedAction.Execute (Line 448, "ActnList.pas" + 8) + $2C [5026B7F0]{vcl150.bpl } ActnList.TCustomAction.Execute (Line 1094, "ActnList.pas" + 7) + $8 [500AEC33]{rtl150.bpl } Classes.TBasicActionLink.Execute (Line 12917, "Classes.pas" + 2) + $7 [21773505]{vclactnband150.bpl} ActnMenus.TCustomActionMenuBar.ExecAction (Line 1071, "ActnMenus.pas" + 6) + $D [21774D5C]{vclactnband150.bpl} ActnMenus.TCustomActionMenuBar.TrackMenu (Line 1837, "ActnMenus.pas" + 19) + $15 [21778386]{vclactnband150.bpl} ActnMenus.TCustomActionMainMenuBar.TrackMenu (Line 3574, "ActnMenus.pas" + 5) + $3 [217730C9]{vclactnband150.bpl} ActnMenus.TCustomActionMenuBar.CMItemClicked (Line 950, "ActnMenus.pas" + 3) + $4 [5027DF6C]{vcl150.bpl } Controls.TControl.WndProc (Line 7074, "Controls.pas" + 91) + $6 [50282830]{vcl150.bpl } Controls.TWinControl.WndProc (Line 9831, "Controls.pas" + 144) + $6 [21774E72]{vclactnband150.bpl} ActnMenus.TCustomActionMenuBar.WndProc (Line 1876, "ActnMenus.pas" + 25) + $4 [50281ED0]{vcl150.bpl } Controls.TWinControl.MainWndProc (Line 9552, "Controls.pas" + 3) + $6 [500AFA64]{rtl150.bpl } Classes.StdWndProc (Line 13491, "Classes.pas" + 8) + $0 [50278AA6]{vcl150.bpl } Controls.FindControl (Line 3378, "Controls.pas" + 6) + $9 [50358AF7]{vcl150.bpl } Forms.TApplication.ProcessMessage (Line 9760, "Forms.pas" + 23) + $1 [50358B3A]{vcl150.bpl } Forms.TApplication.HandleMessage (Line 9790, "Forms.pas" + 1) + $4 [50358E65]{vcl150.bpl } Forms.TApplication.Run (Line 9927, "Forms.pas" + 26) + $3
  19. Obrigado Régys, Utilizando o Demo, eu fiz assim : ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True; with ACBrNFe1.WebServices.StatusServico do begin Executar; iStat := cStat; end; if iStat <> 107 then begin MessageDlg('WebService da Sefaz não está em operação,'+ #10#13+'a nota não poderá ser enviada !',mtError,[mbOk],0); end else begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.GerarNFe; try Retorno := ACBrNFe1.Enviar(vNumLote,True); except on e: Exception do begin // foi preciso esse bloco para poder pegar o protocolo do envio pois caso contrário era exibido uma caixa de mensagem // do componente e se fosse necessário consultar porque da falha não havia como GravaLog('Protocolo : '+Protocolo); GravaLog('cStat : '+cStat); GravaLog('xMotivo : '+xMotivo); Showmessage('Erro : '+E.message); end; end; if Retorno then begin with ACBrNFe1.WebServices.Retorno do begin GravaLog('tpAmb : '+TpAmbToStr(tpAmb)); GravaLog('verAplic : '+verAplic); GravaLog('ChaveNFe : '+ChaveNFe); GravaLog('Recibo : '+Recibo); GravaLog('Protocolo : '+Protocolo); iStat := cStat; GravaLog('cStat : '+IntToStr(iStat)); GravaLog('xMotivo : '+xMotivo); GravaLog('cUF : '+IntToStr(cUF)); GravaLog('cMsg : '+IntToStr(cMsg)); end; if iStat <> 100 then begin MessageDlg(' Nota não autorizada : '+IntToStr(iStat)+xStat,mtError,[mbOk],0); end else begin with ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe do begin GravaBanco( chNFe, dhRecbto, nProt, digVal, cStat, xMotivo, ACBrNFe1.NotasFiscais.Items[0].NomeArq); end; Estou usando o ambiente de Homologação no RJ que usa os webServices de RS, é muito rápido o processo ate aparecer o Danfe, Questões : A - Como em teste é muito rápido onde pode ocorrer demora em resposta e como tratar ? B - Para simular erro nos dados do XML eu fiz um loop de 5 produtos e em todos eles coloquei um valor incorreto de ICMS o retorno ERRO: Nota(s) não confirmadas: 56->Rejeicao: Valor do ICMS difere do produto BC e Aliquota Usei o validador da SEFAZ RS e também obtive o mesmo erro. Se o retorno é padrão como o emissor gratuito faz para indicar quais itens ocorre o erro ? C - No DANFE do ACBrNFeDANFeESCPOS1 na NFCe o valor dos tributos desaparecem se colocarmos informações adicionais a serem impressas como aqui no RJ que tem que aparecer ALERJ e PROCON .... o único jeito é colocar os impostos detalhado , mas tem o seguinte problema, tem vFed, vEst, vMuni mas não tem para produto importado, como fazer ?
  20. Caros estou usando o exemplo do ACBr e nele tentando pegar os retornos da NFe Quando em TForm1.ACBrNFe1StatusChange(Sender: TObject); begin case ACBrNFe1.Status of stNFeStatusServico : begin // Gravar retorno usando o mesmo utilizado em MemoDados.Lines.Add('tpAmb: ' +TpAmbToStr(ACBrNFe1.WebServices.StatusServico.tpAmb)); MemoDados.Lines.Add('verAplic: ' +ACBrNFe1.WebServices.StatusServico.verAplic); MemoDados.Lines.Add('cStat: ' +IntToStr(ACBrNFe1.WebServices.StatusServico.cStat)); MemoDados.Lines.Add('xMotivo: ' +ACBrNFe1.WebServices.StatusServico.xMotivo); ... end; o resultado é tpAmb=1 verAplic= cStat=0 xMotivo= cUF=0 dhRecbto=30/12/1899 tMed=0 dhRetorno=30/12/1899 xObs=
  21. Oi Juliomar, obrigado pelo retorno Eu que estava acostumado a gerar TXT para o emissor gratuito da sefaz , posso dizer que quando peguei o exemplo do componente e ACBrNFe1.Enviar(vNumLote,True e simplesmente piscou e la estava o Danfe. Nossa !!!! Parabéns a vocês. Pode ser que para vocês do ACBr que estão há muito tempo lidando com isso essa compreensão seja tranquila, mas se houvesse um manual e diagrama de eventos seria mais fácil a compreensão. Por exemplo : Na consulta a Status fica claro como ver o retorno e ate mesmo armazenar. Mas na forma da emissão acima, ACBrNFe1.Enviar(vNumLote,True) o processo não é passo a passo, ou seja, não envio comando, recebo, trato retorno e efetuo o processo posterior, e não fica claro onde estão os retornos. Vi que o componente tem um evento no exemplo que dispara uma tela de status seria ali ? Uma nota autorizada e impressa as informações estão em memória ate a próxima emissão ? Qual método pega o nome do XML ? Na tela de comunicação que aparece do componente ela é meio cinza apagada, essa cor pode ser mudada ? Seria nos fontes ? Obrigado, Antonio Carlos
  22. doidopb , sobre o problema Agora com o FortesReport Community Edition, o erro mudou, mas ainda dá erro C:\ACBR\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLRetrato.pas(1) Error: Illegal character in input file: 'ï' ($EF) C:\ACBR\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLClass.pas(126) Fatal: Could not compile used unit '..\..\..\..\..\..\..\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLRetrato.pas' Compilation failure Se você abrir http://www.projetoacbr.com.br/forum/topic/23290-delphi-7-abrrnfedanferlpaisagempas-solucao/ tem sua resposra
  23. Caros, utilizando do trunk2 e do exemplo de NFe. 1 - Penso em antes de enviar a NFe fazer uma consulta ao Status para ver se o serviço está em operação. O Status 107 é o único que permite a emissão em operação Normal ? 2 - Verifiquei que se não marcar o cbxVisualizar o componente vai mostrando o resultado em uma janela com o nome da aplicação, e se ACBrNFe1.Enviar(vNumLote,True) o Danfe é impresso, tudo muito rápido. Se a nota for rejeitada é exibido alguma mensagem ? Gera algum tipo de código de erro e como pego essa informação ? Preciso pegar as informações de protocolo de autorização, recibo, etc.. , após a impressão é possível pegar essas informações ? Como faço para pegar o nome do XML de forma automatizada ? Tem um roteiro STEP BY STEP ? 3 - Se no componente ACBrNFeDANFEFR1.FastFile eu colocar o nome do arquivo de relatório da erro direto, consigo se passar em tempo de execução, qual meu erro ? 4 - Como no mesmo sistema tem NFe e NFCe, penso em ter dois Datas Modules diferentes e neles colocar dois componentes ACBrNFe com ACBrNFeDANFeESCPOS1 e ACBrNFeDANFEFR1 para separar mais o código, isso causa algum conflito ou erro ? Obrigado. Antonio Carlos
  24. Oi Juliomar, obrigado pela atenção, são os relatórios do Fast Report Funciona 100% no trunk mas no trunk 2 não instala, no log não informa erro dentro dos pacotes dos relatórios referentes a esse pacote, a mensagem é que falta um arquivo do Fast Report ( fs.bpl ) Funciona o Trunk 2 no Fast report no Xe , entretanto no Xe o Fast é versão 5
×
×
  • 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.