Ir para conteúdo
  • Cadastre-se

Luiz Carlos de Lima

Membros Pro
  • Total de ítens

    565
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Luiz Carlos de Lima postou

  1. Boa tarde Juliomar, Sim, ja testei para buscar a IE. Mas não consegui encontrar o retorno para o Regime de Apuração como tem no ACBrLib o RegApur. Documento := '05.017.780/0016-82'; ACBrNFe.Configuracoes.WebServices.Salvar := true; ACBrNFe.Configuracoes.WebServices.UF := 'MG'; //UF; ACBrNFe.WebServices.ConsultaCadastro.UF := 'MG'; //UF; ACBrNFe.WebServices.ConsultaCadastro.CNPJ := Documento; ACBrNFe.WebServices.ConsultaCadastro.Executar; IE := ACBrNFe.WebServices.ConsultaCadastro.IE;
  2. Boa tarde Lucimauro, primeiramente agradeço o retorno. Eu não uso o Monitor, será que consigo usar este componente na minha aplicacao delphi? Sabe onde posso pegar documentaçao para dar uma estudada? Grato
  3. Bom dia, Estou precisando de um componente para buscar o Regime Fiscal e a IE de empresas na Sefaz ou em outro lugar. Alguem teria para vender. Grato Luiz
  4. Aqui carregou > ACBrNFe.WebServices.ConsultaCadastro.RetConsCad.IE Quanto a segunda questao para ver se a empresa é do simples, alguma sugestão?
  5. Bom dia, Realmente Faltava, mas continua não carregando. Veja este CNPJ abaixo, consulta pelo portal da NFe traz as informações: Nome da Empresa: RIO BRANCO ALIMENTOS S/A UF: MG - 31 CNPJ: 05.017.780/0016-82 Inscrição Estadual (IE): 4811767451053 Situação IE: Habilitado Tipo IE: IE Normal CNAE Principal: 154700 Pelo Componente: Documento := '05.017.780/0016-82'; ACBrNFe.WebServices.ConsultaCadastro.UF := 'MG'; ACBrNFe.WebServices.ConsultaCadastro.CNPJ := Documento; ACBrNFe.WebServices.ConsultaCadastro.Executar; IE := ACBrNFe.WebServices.ConsultaCadastro.IE; teste := ACBrNFe.WebServices.ConsultaCadastro.xMotivo; Retorno: IE='' xMotivo = 'Consulta cadastro com uma ocorrencia'
  6. 1 - Oi Diego, não retorna nada. Será que é necessário que o CNPJ tenha movimentação ou estou fazendo algo errado. 2 - Também parece que não tem a informação se é participante do Simples nesta Classe. Documento := '12026383000156'; ACBrNFe.WebServices.ConsultaCadastro.UF := 'SP'; ACBrNFe.WebServices.ConsultaCadastro.CNPJ := Documento; IE := ACBrNFe.WebServices.ConsultaCadastro.IE; teste := ACBrNFe.WebServices.ConsultaCadastro.xMotivo; teste := ACBrNFe.WebServices.ConsultaCadastro.versao; Observação: passei toda a configuração para o componente igual ao envio da NFe e nada.
  7. Boa tarde, Temos alguma ferramenta para consultar Insc. Estadual e se é optante do Simples, visto que o ACBrConsultaCNPJ nao nos traz.
  8. Juliomar, Cheguei a apagar toda a pasta que contem o ACBr, e baixei tudo de novo, atualizando para apagar oa antigos. Diego, em execução normal realmente nao dá o erro. Pra mim está resolvido. Grato.
  9. Boa tarde, Começou a dar uma mensagem "Atualize o Captcha" ao chamar o ACBrConsultaCNPJ1.Consulta(EditCNPJ.Text, EditCaptcha.Text), usando o Delphi. Atualizei o ACBr, agora está Dando ........'*******' is not a valid date and Time ao chamar o componente. Se voce optar em continuar, os dados são carregados. Debuguei e cheguei até esta linha : FDataSituacaoEspecial := StringToDateTimeDef(LerCampo(Resposta,ACBrStr('DATA DA SITUAÇÃO ESPECIAL')),0); da funçao > TACBrConsultaCNPJ.Consulta
  10. Grato pessoal, apaguei os DCUs das aplicacoes e resolveu o problema.
  11. F2051 Unit ACBrJSON was compiled with a different version of JsonDataObjects_ACBr.TJsonBaseObject.Parse Boa tarde, Após atualizar o ACBr começou a dar o erro acima ao compilar o delphi Xe6. Atualizei com opcao de remover arquivos antigos, tambem Apaguei toda a pasta e baixei tudo novamente mas continua o problema.
  12. Consegui ajustar o modelo, obrigado.
  13. Ainda não consegui corrigir o modelo, por isso estou tentando mandar direto para a impressora para ver se resolve as margens.
  14. Oi Juliomar, 1 ) Como disse anteriormente uso o FastReport. 2) não entendi o que quiz dizer (configura o componente de impressão diretamente), já não estou passando a configuraçao conforme mostrei acima? 3) Passo o nome da impressora como faço para imprimir o CTe (ACBrCTeDacteFR.Impressora := vDrivePrinterCTe);
  15. Boa tarde Rubinho, ACBrMDFe1.Manifestos.Assinar; ACBrMDFe1.Manifestos.Validar; ACBrMDFe1.Consultar; ACBrMDFe1.DAMDFE.MostraSetup := False; ACBrMDFe1.DAMDFE.Impressora := vDrivePrinterCTe; ACBrMDFe1.Manifestos.Imprimir; Estou fazendo Assim, mas continua mostrando na tela e nao enviando direto para a impressora.
  16. Bom dia, Alguém pode me passar modelo de como passar os parâmetros para mandar direto para impressora, pois não consegui descobrir. Desde já agradeço pela ajuda.
  17. FastReport. Tentei configurar mas tem umas linhas que não consigo movimentar. O problema é que não conheço muito o FastReport. Só me diga uma coisa, tem como passar parâmetro para mandar direto para impressora a impressora?
  18. Boa tarde, O DAMDFe ao ser impresso pelo "ACBrMDFe1.Manifestos.Imprimir" visualiza na tela normal, mas ao ser impresso fica cortando no lado esquerdo em qualquer impressora. Isso faz tempo que acontece, mas só agora fui notificado na barreira. mdfe impressao cortada.pdf
  19. Pedi para testarem todos os drives, o ppEscPosStar funcionou. Grato pela atencao
  20. Não, o cliente é de outro estado. Eu não tenho desta impressora para testar. Mas meu sistema funciona a bastante tempo com a bematech e nunca tive problema.
  21. sim, inclusive ja emitem BPe por outra sistema.
  22. Estamos tentando imprimir o BPe em uma Elgin i7, i9, ja testamos vários drive e não da certo, principalmente não imprime QRCode . ppEscPosEpson: FPosPrinterClass := TACBrEscPosEpson.Create(Self); ppEscBematech: FPosPrinterClass := TACBrEscBematech.Create(Self); ppEscDaruma : FPosPrinterClass := TACBrEscDaruma.Create(Self); ppEscVox : FPosPrinterClass := TACBrEscElgin.Create(Self); ppEscDiebold : FPosPrinterClass := TACBrEscDiebold.Create(Self); ppEscEpsonP2 : FPosPrinterClass := TACBrEscEpsonP2.Create(self); ppCustomPos : FPosPrinterClass := TACBrEscCustomPos.Create(self); ppEscPosStar: FPosPrinterClass := TACBrEscPosStar.Create(Self); ppEscZJiang: FPosPrinterClass := TACBrEscZJiang.Create(Self); ppEscGPrinter: FPosPrinterClass := TACBrEscGPrinter.Create(Self); ppEscDatecs: FPosPrinterClass := TACBrEscDatecs.Create(Self); ppExterno: FPosPrinterClass := FModeloExterno; o único drive que tem algum relacionamente com a elgin é ppEscVox mas tb não emite correto.
  23. Foi o que pedi para fazerem, mas disseram não foi resolvido. Vou insistir nisso. Grato pela atencao.
  24. Bom dia, Estou implantando o BPe em um cliente que ainda tem máquinas com o W7, e está retornando está mensagem. No W10 isso não acontece, estou enviando com as configrações abaixo: pACBrBPe.Configuracoes.Geral.SSLLib := libWinCrypt; pACBrBPe.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; pACBrBPe.Configuracoes.Geral.SSLHttpLib := httpWinHttp; pACBrBPe.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; pACBrBPe.SSL.SSLType := LT_TLSv1_2; Obrigado pela atenção
  25. Com base em NFe , registro C100, o valor informado no campo VL_DOC é o valor liquido e no campo VL_ITEM é sem o desconto, ou seja, bruto. Acredito que como tem o campo de desconto, fazem a relação item - desconto = total doc Esta é a posição do meu contador, fica aí caso ajude alguém com esta dúvida.
×
×
  • 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.