Ir para conteúdo
  • Cadastre-se

edulamy

Membros
  • Total de ítens

    182
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que edulamy postou

  1. Boa tarde, Não sei se estou desobedecendo alguma regra do forum, me desculpem, porém já pesquisei em diversos lugares e não encontro uma solução para isso. Preciso acessar o TJT do Estado do Rio de Janeiro, para fazer consulta aos processos e este me retornar as informações do processo, andamento, etc. Se alguém já passou por esta situação e poderia dar uma luz.
  2. Estou com um problema com a impressão da DANFE utilizando Fortes, não imprime de forma alguma o protocolo informado, com isso é impresso que a NF ainda não foi enviada ao SEFAZ. ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(Tbl_NFNFE_XML.AsString); ACBrNFeDANFeRL1.ProtocoloNFe := Tbl_NFPROTOCOLO_NFE.AsString; ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt := Tbl_NFPROTOCOLO_NFE.AsString; ACBrNFe1.DANFE.Logo := Q_EmpresaLOGOTIPO.AsString; ACBrNFeDANFeRL1.NumCopias := 2; ACBrNFe1.Configuracoes.Geral.Salvar := False; ACBrNFe1.Configuracoes.Arquivos.PathSalvar := FMenu1.tbl_espaCAMINHO_ARQUIVOS.AsString; ACBrNFe1.NotasFiscais.Imprimir;
  3. Para resolver meu problema de cancelamento foi necessário informar o parâmetro Servico.CodigoMunicipio, fiz o processo de cancelamento sem carregar o XML da NF, somente informando os parâmetros abaixo: with ACBrNFSe1.NotasFiscais.Add do begin NFSe.Numero := nfseNumero; NFSe.IdentificacaoRps.Numero := rpsNumero; NFSe.IdentificacaoRps.Serie := serie; NFSe.IdentificacaoRps.Tipo := trRPS; NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj := dm.cnpj; NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal:= dm.im; NFSe.PrestadorServico.Endereco.CodigoMunicipio := dm.cMunicipio; NFSe.MotivoCancelamento := sMotivo; NFSe.Servico.CodigoMunicipio := codigoMunicipio; // codigo referente ao municipio de prestação end;
  4. Estou com o mesmo problema, não consigo cancelar (Congonhas-MG - Betha) Método..... : Cancelar NFS-e Código Erro : E42 Mensagem... : Código do município da prestação do serviço inválido. Correção... : Informe o código do município onde foi prestado o serviço, conforme Tabela de Municípios do IBGE. Provedor... : Betha Método..... : Cancelar NFS-e Código Erro : Mensagem... : Correção... : Provedor... : Betha 5413-nfse.xml
  5. Não consigo tambem fazer a instalação, ja foram excluidos os arquivos mencioandos, limpado o regedit, limpado library path, excluidos os arquivos referentes ao ACBR antigo e mesmo assim continuo com esta mensagem: [Error] OpenSSLExt.pas(69): Invalid compiler directive: 'MODE' [Error] OpenSSLExt.pas(70): Invalid compiler directive: 'Packrecords' [Fatal Error] OpenSSLExt.pas(82): File not found: 'DynLibs.dcu' Já não sei mais o que fazer, vou voltar para trunk anterior...
  6. Boa tarde, Já procurei na busca do forum e no componente, e verifiquei que não possui nenhuma informação para o município de Congonhas/MG, vocês poderiam incluir? A prefeitura utiliza o Betha para receber os arquivos XML. Se precisar de mais informações para isso e só falar que corro atrás. Por conta propria eu inclui apenas o codigo IBGE do municipio para a interface Betha no componente, mas como não consigo testar pois não tenho o certificado, não sei se falta mais alguma coisa. 3118007 Congonhas/MG
  7. Bom dia, Tive reclamação de clientes referente ao desalinhamento dos campos referentes ao ICMS (Base, aliquota e Valor), onde estes estavam sendo impressos fora de seus campos. Olhando a unit ACBrCTeDACTeQRRetrato, verifiquei que na linha 1951 existia este IF, que estava desta forma: if (Copy(FCTe.infCTe.versao, 1, 1) = '1') then alterei ele para: if (Copy(FCTe.infCTe.versao, 1, 1) = '2') then E meu problema estava resolvido, poderiam verificar e caso eu estiver certo fazer a correção na Unit para que os demais usuários do componente não tenham este mesmo problema. Obrigado! ACBrCTeDACTeQRRetrato.pas
  8. Desconsiderar, estava guardando a chave da CT-e com um numero menor de caracteres.
  9. Eder, você não esta enviando o xml como evento, a rotina de cancelamento não funciona mais na versão 2.0
  10. Estou um problema na validação do Schema, abaixo o trecho de codigo: ACBrCTe1.EventoCTe.Evento.Clear; with ACBrCTe1.EventoCTe.Evento.Add do begin InfEvento.tpEvento := teCancelamento; InfEvento.chCTe := qEnviadasCHAVE_CTE.AsString; InfEvento.dhEvento := now; InfEvento.nSeqEvento := 1; //InfEvento.DescEvento := 'Cancelamento'; InfEvento.detEvento.xJust := Justificativa; InfEvento.detEvento.xCondUso := ''; infEvento.CNPJ := fproc.RemoveChar(DmConexao.tbl_empresaCGC.AsString); infEvento.cOrgao := FProc.UFparaCodigo(dmConexao.tbl_empresaCOD_UF.Asstring); infEvento.detEvento.nProt := qEnviadasPROTOCOLO_CTE.AsString; end;
  11. este cupom fiscal possui uma chave, será que se enviar como NF-e dará problema, vi que na opção outros não tem como enviar a chave. Estou aguardando ele me enviar o XML gerado pelo sistema antigo, para saber como ele gera esta informação.
  12. edulamy

    Ct-E Com Cupom Fiscal

    Boa tarde, Alguem poderia me auxiliar com esta questão, possuo um cliente que transporta produtos mas o tomador utiliza cupom fiscal ao invés de nota fiscal eletronica, como esta deve ser identificada no conhecimento eletronico?
  13. Bom dia, Atualizei o componente para a versão 2.0 e esta apresentando erro no locRet, ja fiz as adequações para o funcionamento, porem este ainda esta apresentando erro. Ele esta dentro de with infCTeNorm.infDoc.infNF.Add do. O que pode estar errado ou esta informação não existe mais na versão 2.0? with infCTeNorm.infDoc.infNF.Add do begin nRoma := QryCtrcItemNUM_ROMANEIO.AsString; nPed := QryCtrcItemNUM_PEDIDO.AsString; serie := QryCtrcItemSERIE.AsString; nDoc := QryCtrcItemNOTA_FISCAL.AsString; dEmi := QryCtrcItemDATA.AsDateTime; vBC := RoundTo(QryCtrcItemVAL_BASE_ICMS.AsFloat, -2); vICMS := RoundTo(QryCtrcItemVAL_ICMS.AsFloat, -2); vBCST := RoundTo(QryCtrcItemVAL_BASE_ICMSST.AsFloat, -2); vST := RoundTo(QryCtrcItemVAL_ICMSST.AsFloat, -2); vProd := RoundTo(QryCtrcItemVLR_PRODUTO.AsFloat, -2); vNF := RoundTo(QryCtrcItemVAL_NF.AsFloat, -2); nCFOP := QryCtrcItemCFOP.AsInteger; nPeso := RoundTo(QryCtrcItemPESO.AsFloat, -2); PIN := QryCtrcItemPIN_SAFRAMA.AsString; // Local de Retirada if trim(QryPrincipalCNPJ_REMETENTE.AsString)<>'' then begin locRet.CNPJCPF := FProc.RemoveChar(QryPrincipalCNPJ_REMETENTE.AsString); locRet.xNome:=copy(QryPrincipalRAZAO_REMETENTE.AsString,1,60); locRet.xLgr:=QryPrincipalEND_REMETENTE.AsString; if (trim(QryPrincipalNumero.AsString)<>'') then locRet.nro:=QryPrincipalNumero.AsString else locRet.nro:='S/N'; locRet.xCpl:=QryPrincipalComplemento.AsString; locRet.xBairro:=QryPrincipalBairro.AsString; CodigoMunicipio:= FProc.ObterCodigoMunicipio(QryPrincipalMUN_REMETENTE.AsString, QryPrincipalUF_REMETENTE.AsString); locRet.cMun:=CodigoMunicipio; locRet.xMun:=QryPrincipalMUN_REMETENTE.AsString; locRet.UF:=QryPrincipalUF_REMETENTE.AsString; end; end;
  14. edulamy

    Bloco D200

    Ok, ja estou me localizando, no caso é o bloco D100(este tem o identificador se é tomador ou prestador), D190... Obrigado!!!
  15. edulamy

    Bloco D200

    Estou procurando na net e encontrei este documento, deve ser referente a isso que estou falando: http://www1.receita.fazenda.gov.br/sistemas/sped-fiscal/download/GUIA_PRATICO_DA_EFD-Versao2.0.12.pdf Existe no componente o objeto para geração deste arquivo? Tem a ver com o Sintegra?
  16. edulamy

    Bloco D200

    A duvida é que eles não emitem NF, pois a propria CT-e e a "NF" deles e nela é apenas descontado o ICMS. Vou tentar me comunicar com o contador deles, pois sou de SP e ele em ES. Obrigado por enquanto. Por favor não encerrar o topico pois vou verificar as informações e repassar por aqui.
  17. edulamy

    Bloco D200

    Recebi este comunicado: Olá CONTRIBUINTE do ICMS no ES. De acordo com o Art. 758-A do RICMS/ES e com a revogação da Portaria 05-R/2012 pela Portaria 06-R/2013, a partir de 01/01/2014 todos os contribuintes do ICMS no ES, exceto aqueles optantes pelo Simples Nacional, estão obrigados à Escrituração Fiscal Digital – EFD. A partir dessa obrigatoriedade ficam vedadas as escriturações fiscais em papel dos livros registros de Entradas, Saídas, Apuração do ICMS, Apuração IPI, Inventário e do CIAP. Em anexo o pdf original. Como devo proceder para gerar este arquivo, podem me dar uma luz? Obrigado! Comunicado - Obrigatoriedade EFD - 01-01-14.pdf
  18. edulamy

    Bloco D200

    Isso, pois não tem o bloco D200 para incluir as informações referente ao CT-e, pois no Espirito Santo toda empresa que for tributada o ICMS é obrigada a fazer EFD, e como é uma transportadora, precisa informar o bloco D200 pois ela é a prestadora de serviço. O componente tem apenas o bloco D100 que é referente ao tomador de serviço.
  19. edulamy

    Bloco D200

    Estou desenvolvendo uma rotina para geração do arquivo para o Sped EFD para prestação de serviço de transporte de cargas, referente ao ICMS, para Conhecimento de Transporte Eletrônico, procurei no exemplo e no componente mas este não possui o bloco D200. Alguém teria um exemplo de quais os blocos que devem ser enviados nos arquivos ou algum exemplo do arquivo gerado? @edulamy [email protected] REGISTRO D200: RESUMO DA ESCRITURAÇÃO DIÁRIA – PRESTAÇÃO DE SERVIÇOS DE TRANSPORTE - NOTA FISCAL DE SERVIÇO DE TRANSPORTE (CÓDIGO 07) E CONHECIMENTOS DE TRANSPORTE RODOVIÁRIO DE CARGAS (CÓDIGO 08), CONHECIMENTO DE TRANSPORTE DE CARGAS AVULSO (CÓDIGO 8B), AQUAVIÁRIO DE CARGAS (CÓDIGO 09), AÉREO (CÓDIGO 10), FERROVIÁRIO DE CARGAS (CÓDIGO 11), MULTIMODAL DE CARGAS (CÓDIGO 26), NOTA FISCAL DE TRANSPORTE FERROVIÁRIO DE CARGA (CÓDIGO 27) E CONHECIMENTO DE TRANSPORTE ELETRÔNICO – CT-e (CÓDIGO 57).
  20. Mas o bloco D não possui item 200, como deve-se proceder? LeoSlander, você teria um exemplo de quais os blocos que devem ser enviados nos arquivos ou algum exemplo do arquivo gerado? @edulamy [email protected]
  21. Bom dia a todos, Ontem participei de um curso para apresentação e explicação do eSocial ministrado por um consultor da Ford do Brasil, que participa do piloto do projeto junto com outras empresas de grande porte. O inicio do envio dos arquivos XML, inspirado na NFE, terá inicio em Jan/2014, no inicio a obrigatoriedade do envio das informações via eSocial será feito por faixas de faturamento da empresa, pois querem testar primeiro com grandes movimentações e com tudo homologado, iram iniciar com as pequenas, pode existir uma prorrogação neste prazo, mas é algo que eles não querem que aconteça. A SEFIP/GFIP será extinta em Jul/2014. O Manual atual de integração esta na versão 1.00, porem já esta pronta a versão 1.01 que esta sendo homologada antes de ser liberada para o usuario final, estão fazendo isso pois alguns dados estavam sendo obrigatorios e viram que no mundo real isso não ocorreria. Tendo mais algumas novidades vou contribuindo. http://www.esocial.gov.br/doc/Manual%20de%20Orientacao%20do%20eSocial%20_%20versao%201.0.pdf
  22. No exemplo não ocorre o problema não sei dizer se o problema é a quantidade de registros, no exemplo eu utilizo apenas um registro e no meu sistema são mais de 2000.
  23. Vou verificar. e posto o resultado.
  24. Bom dia, Estou com problema na geração do arquivo, pois estou utilizando os registros 70/71, dentro da função LimpaRegistros existem dois comandos FRegistros70.Clear e FRegistros71.Clear, quando o sistema passa for essas funções causa access violation, comentei as duas e quando eu fecho o Form é a apresentada a seguinte mensagem de erro: Access violation at address 00000100. Read of address 00000100. Estou utilizando o comando Action := caFree; no OnClose do Form.
  25. Era esse um dos problemas... obrigado!! pode encerrar o topico
×
×
  • 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.