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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...