Ir para conteúdo
  • Cadastre-se

NatanaB

Membros
  • Total de ítens

    54
  • Registro em

  • Última visita

Tudo que NatanaB postou

  1. Olá! Consegui fazendo o seguinte: Declarei as seguintes variáveis: EmitXML : TEmit; ctxRtti : TRttiContext; typeRtti : TRttiType; propRtti : TRttiProperty; e depois do método LoadFromFile: for J := 0 to ACBrNFeXML.NotasFiscais.Count - 1 do begin with ACBrNFeXML.NotasFiscais.Items[J].NFe.Ide do begin with ACBrNFeXML.NotasFiscais.Items[J].NFe.Emit do begin EmitXML := TEmit.Create; typeRtti := ctxRtti.GetType(EmitXML.ClassType); EmitXML := ACBrNFeXML.NotasFiscais.Items[J].NFe.Emit; for propRtti in typeRtti.GetProperties do ShowMessage(propRtti.GetValue(EmitXML).ToString); end; end; end; Obrigada!
  2. Boa noite! Obrigada Juliomar Vou mostrar aqui pra vocês o método encontrado... procedure TFrmLeituraXML.getPropList(Classe: TClass); var T: TRttiType; P: TRttiProperty; Ctx: TRttiContext; begin Ctx := TRttiContext.Create; Memo1.Lines.Clear; T := Ctx.GetType(Classe); for P in T.GetDeclaredProperties do Memo1.Lines.Add(P.Name); end; Para Chamar a procedure em um botão por exemplo: getPropList(pcnNFe.TIde); Obs: declarar System.RTTI e pcnNFe Agora estou pesquisando como buscar os valores... Encontrei este método: ctxRtti := TRttiContext.Create; typeRtti := ctxRtti.GetType( pcnNFe.TIde. ClassType ); for propRtti in typeRtti.GetProperties do Memo1.Lines.Add(propRtti.Name+':'+ propRtti.PropertyType.ToString +'='+ propRtti.GetValue(pcnNFe.TIde).ToString); ctxRtti.Free; porém acusa o seguinte erro: This form of method call only allowed for class methods or constructor Alguém sabe a causa?
  3. Boa noite pessoal! Estou usando o Acbr para carregar um XML de NFe, e posteriormente, trabalhar com os dados dentro do sistema. Para isso, utilizo o método ACBrNFeXML.NotasFiscais.LoadFromFile, que me permite acessar todos os valores das tags deste xml... Dentro do bloco Ide, por exemplo, obtenho os valores... QryRecebeXML.FieldByName('CUF').AsInteger := cUF; QryRecebeXML.FieldByName('CNF').AsInteger := cNF; QryRecebeXML.FieldByName('NATOP').AsString := natOp; desta maneira, relaciono cada tag e faço a inserção no meu banco de dados... Existe alguma forma de fazer algo dinâmico, por exemplo, algum laço para que pudesse passar por todas as tags de Ide sem ter que relacionar uma a uma? Não sei se consegui expressar corretamente minha dúvida... Desde já agradeço...
  4. Boa tarde Pessoal... também tenho a mesma dúvida do colega Cris... seria ótimo se tivesse uma forma de retornar os eventos...
  5. Bom dia pessoal! Foi feita a reinstalação do Delphi Rio 10.3 no meu computador, e após isso, funcionou tudo normalmente pelo instalador do Acbr! Portanto, havia algo de errado na instalação do Delphi. Agradeço a todos pela ajuda! Excelente semana a todos!
  6. ok, então vou verificar esta questão e depois informo aqui...obrigada.
  7. Esta parte não sei te dizer, pois não fiz a instalação...porém ele está registrado normalmente...
  8. Obrigada Juliomar, porém fiz este teste também de colocar no C:\ Seguem prints...
  9. Olá Daniel! Sempre faço da seguinte maneira: crio uma pasta, e seleciono a opção SVN Checkout...conforme o anexo...
  10. Bom dia Pessoal. Tenho no meu computador duas versões de Delphi, Seattle e Rio 10.3, a instalação no Seattle está ok, porém quando abro o AcbrInstall_Trunk2, não aparece a versão do Rio. Obs: cada versão do delphi tem sua pasta do Acbr, C:\Program Files (x86)\Embarcadero\Studio\20.0\Componentes\Acbr - Rio e C:\Program Files (x86)\Embarcadero\Studio\17.0\Componentes\Acbr - Seattle. Estou executando como administrador, e também me certifiquei que as pastas estão com controle total de permissão. Os arquivos são atuais, baixados hoje. Alguém pode ajudar nesta situação? Desde já agradeço.
  11. Ok Daniel. Realmente BigWings, nos ajustes que eu estava fazendo, alterei a pasta de Schemas para uma pasta local, antes estava um caminho pela rede do cliente. Agradeço a todos pela ajuda.
  12. Olá Daniel. Sim, o QRCode está configurado para 2.0. Vou explicar aqui o que fizemos para funcionar. Primeiro pegamos as dlls da pasta DLLs\OpenSSL\1.1.1.4\x86 e da pasta DLLs\LibXml2\x86 e colamos para as pastas system32 e syswow64 do cliente. Fazendo isso, enviou cupom, porém quando informei dados de cliente, dava Schema inválido. (OS schemas que estavam sendo usados eram os da pasta Exemplos\ACBrDFe\Schemas\NFe). Neste momento estava usando a propriedade SSLXmlSignLib = xsLibXml2. Após, troquei esta propriedade para xsMsXML, então funcionou perfeitamente. O motivo de não funcionar com xsLibXml2 talvez tenha sido referente as dlls? algo que não fiz corretamente? Agradeço a ajuda de todos.
  13. Sim, copiei todas para a pasta SysWow64 do cliente...
  14. Boa tarde pessoal! Estou com o seguinte problema...estou tentando enviar NFCe no meu cliente com OpenSSL...usamos Delphi... Mesmo pelo Demo do ACBR dá o erro Falha na validação dos dados da nota 1824 Element {} qrcode: ...is not a valid value of the local atomic type. (imagem em anexo) No meu PC Windows 10, enviamos NFCe, tudo certo, pelo Demo com as mesmas configurações, sempre usando os Schemas da pasta do Acbr...e envia normalmente. Meu cliente tem Windows 7 Ultimate SP1...é a diferença. Alguém pode ajudar?
  15. Boa tarde! Continua cortando a impressão. Com a propriedade "FormularioContinuo" True, imprime os 30 cm, e com a propriedade "FormularioContinuo" False, imprime os 30 cm (40 itens) e acrescenta apenas o QrCode. Fontes atualizados hoje...
  16. Boa tarde! Estou com este problema. Não resolveu criando papel de tamanho personalizado. Alguma sugestão? Desde já agradeço.
  17. Bom dia! Estou com este problema de Ancestor for RLNFe not found, porém no meu caso migramos o projeto de Turbo Delphi para Delphi Seattle, portanto o Seattle foi instalado, o ACBr e o Fortes foram baixados e instalados do zero, eles estão os dois atualizados... existe algo a fazer a não ser desinstalar e instalar novamente o Fortes e ACBr já que recém foi feito isso? Agradeço desde já.
  18. Obrigada Maico Luis! Resolveu meu problema.
  19. Pessoal, descobri o que era... a tag acima desta, do condutor, não estava sendo criada, o que é obrigatório, por isso dava o erro.
  20. Olá pessoal! Sobre o problema acima relatado pelo itamarluiz Alguém tem a solução? Desde já agradeço
  21. Italo, obrigada mais uma vez pela sua ajuda! Estava faltando eu alimentar o componente com as informações: ACBrNFSe1.Configuracoes.Geral.Emitente.CNPJ := NotaFiscal.FieldByName('OUT_EMI_CNPJCPF').AsString; ACBrNFSe1.Configuracoes.Geral.Emitente.InscMun := NotaFiscal.FieldByName('OUT_EMI_IM').AsString; ACBrNFSe1.Configuracoes.Geral.Emitente.RazSocial := NotaFiscal.FieldByName('OUT_EMI_RAZAOSOCIAL').AsString; Agora está enviando normalmente, só estou ajustando as demais ações... Muito obrigada mesmo!
  22. Bom dia Italo, agradeço sua resposta... Todos os meus fontes de todas as pastas estão atualizados... O estranho é o seguinte, pelo Demo do Acbr está enviando normalmente....estou debugando e o meu sistema e o demo passam pelas mesmas linhas... Tanto a parte de assinar, quanto enviar.... vou anexar todos os xml que gerou... Agradeço a ajuda 6-env-lotS.xml 6-env-lotS-soap.xml 6-lista-nfse.xml 6-lista-nfse-soap.xml
  23. Boa tarde pessoal! Estou tentando enviar para o provedor Tecnos e me retorna a seguinte mensagem: Sequencia de entrada nao estava em um formato incorreto. Tentei olhar o xml mas não encontrei nada de diferente. Agradeço desde já se alguém puder ajudar! 5RPS-rps.xml
  24. Ok hleorj! Vou continuar na busca da real solução. Qualquer novidade postarei. Grata
  25. Bom dia pessoal! Encontrei a mesma situação...mas a diferença é que meu cliente não aceita deixar em 100%... Caso alguém descobrir a causa disso, por favor poste aqui! Grata
×
×
  • 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...