Ir para conteúdo
  • Cadastre-se

Mega Online

Membros Pro
  • Total de ítens

    497
  • Registro em

  • Última visita

Tudo que Mega Online postou

  1. Bom dia Senhores, Utilizo o ACBrNFeMonitor2(0.9.05.4). Quando faço a primeira tentativa de cancelamento de um CTe o monitor me retorna somente "ERRO:" isso na primeira tentativa, na segunda tentativa o cancelamento ocorre normalmente. Aconteceu alguns casos de o monitor retornar "ERRO:" e no site da sefaz o CTe ser cancelado. Anexo a mensagem no monitor. Alguém já passou por isso? Obrigado!
  2. Confirmei no PVA e realmente não tem a opção de lançar os registros C800 e C810. liguei para o Escritório e vamos entregar para eles os registros C860, C870... que já estão prontos no ACBr. Muito obrigado.
  3. Obrigado, vou aguardar, assim que vocês finalizarem a programação me avisem que tem um escritório de contabilidade me cobrando este bloco.
  4. Segue anexo. ACBrEPCBloco_C.pas ACBrEPCBloco_C_Class.pas
  5. Bom dia, meus fontes estão atualizados, inclusive baixei a nova verção no \trunk2 e não encontrei nada programado para geração dos blocos C800 e C810 do SPED Pis/Cofins, no arquivo ACBrEPCBloco_C_Class.pas não existe a programação WriteRegistroC800 e nem WriteRegistroC810, alguma previsão para o desenvolvimento? pois no arquivo ACBrEPCBloco_C.pas até está programado para alimentar os dados, só não gera no TXT. Conforme abaixo no arquivo ACBrEPCBloco_C.pas está desenvolvido. TRegistroC800 = class private FCOD_MOD : string; FCOD_SIT : TACBrCodSit; FNUM_CFE : Integer; FDT_DOC : TDateTime; FVL_PIS : Variant; FVL_COFINS : Variant; FVL_CFE : Variant; FCNPJ_CPF : String; FNR_SAT : String; FCHV_CFE : String; FVL_DESC : Variant; FVL_MESC : Variant; FVL_OUT_DA : Variant; FVL_PIS_ST : Variant; FVL_ICMS : Variant; FVL_COFINS_ST : Variant; FRegistroC820 : TRegistroC820List; FRegistroC830 : TRegistroC830List; FRegistroC810 : TRegistroC810List; public constructor Create; virtual; /// Create destructor Destroy; override; /// Destroy property COD_MOD : String read FCOD_MOD write FCOD_MOD; property COD_SIT : TACBrCodSit read FCOD_SIT write FCOD_SIT; property NUM_CFE : Integer read FNUM_CFE write FNUM_CFE; property DT_DOC : TDateTime read FDT_DOC write FDT_DOC; property VL_CFE : Variant read FVL_CFE write FVL_CFE; property VL_PIS : Variant read FVL_PIS write FVL_PIS; property VL_COFINS : Variant read FVL_COFINS write FVL_COFINS; property CNPJ_CPF : String read FCNPJ_CPF write FCNPJ_CPF; property NR_SAT : String read FNR_SAT write FNR_SAT; property CHV_CFE : String read FCHV_CFE write FCHV_CFE; property VL_DESC : Variant read FVL_DESC write FVL_DESC; property VL_MESC : Variant read FVL_MESC write FVL_MESC; property VL_OUT_DA : Variant read FVL_OUT_DA write FVL_OUT_DA; property VL_ICMS : Variant read FVL_ICMS write FVL_ICMS; property VL_PIS_ST : Variant read FVL_PIS_ST write FVL_PIS_ST; property VL_COFINS_ST : Variant read FVL_COFINS_ST write FVL_COFINS_ST; property RegistroC810 : TRegistroC810List read FRegistroC810 write FRegistroC810; property RegistroC820 : TRegistroC820List read FRegistroC820 write FRegistroC820; property RegistroC830 : TRegistroC830List read FRegistroC830 write FRegistroC830; end; // Registro C800 - Lista TRegistroC800List = class(TObjectList) private function GetItem(Index: Integer): TRegistroC800; procedure SetItem(Index: Integer; const Value: TRegistroC800); public function New: TRegistroC800; property Items[Index: Integer]: TRegistroC800 read GetItem write SetItem; end; //REGISTRO C810: DETALHAMENTO DO CUPOM FISCAL ELETRÔNICO (CÓDIGO 59) – PIS/PASEP E COFINS TRegistroC810 = class private fCFOP : string; fVL_ITEM : Currency; fCOD_ITEM : string; fCST_PIS : TACBrSituacaoTribPIS; fVL_BC_PIS : Variant; fALIQ_PIS : Variant; fVL_PIS : Variant; fCST_COFINS : TACBrSituacaoTribCOFINS; fVL_BC_COFINS : Variant; fALIQ_COFINS : Variant; fVL_COFINS : Variant; fCOD_CTA : string; public property CFOP : string read FCFOP write FCFOP; property VL_ITEM : Currency read FVL_ITEM write FVL_ITEM; property COD_ITEM : string read FCOD_ITEM write FCOD_ITEM; property CST_PIS : TACBrSituacaoTribPIS read FCST_PIS write FCST_PIS; property VL_BC_PIS : Variant read FVL_BC_PIS write FVL_BC_PIS; property ALIQ_PIS : Variant read FALIQ_PIS write FALIQ_PIS; property VL_PIS : Variant read FVL_PIS write FVL_PIS; property CST_COFINS : TACBrSituacaoTribCOFINS read FCST_COFINS write FCST_COFINS; property VL_BC_COFINS : Variant read FVL_BC_COFINS write FVL_BC_COFINS; property ALIQ_COFINS : Variant read FALIQ_COFINS write FALIQ_COFINS; property VL_COFINS : Variant read FVL_COFINS write FVL_COFINS; property COD_CTA : string read FCOD_CTA write FCOD_CTA; end; // Registro C810 - Lista TRegistroC810List = class(TObjectList) private function GetItem(Index: Integer): TRegistroC810; procedure SetItem(Index: Integer; const Value: TRegistroC810); public function New: TRegistroC810; property Items[Index: Integer]: TRegistroC810 read GetItem write SetItem; end;
  6. Mega Online

    Acesso a Homologação

    Bom dia, Desculpe se existe algum tópico a respeito, procurei e não encontrei. Estou começando a desenvolver a NFS-e para o provedor GINFES, quando envio o rps (homologação) me retorna a seguinte mensagem: CNPJ não encontrado na base de dados. Como faço para liberar o acesso em homologação? Obrigado!
  7. Obrigado Italo.
  8. Mega Online

    Retorno do ACBrNFSe

    Boa Tarde, Gostaria de saber se existe alguma propriedade para pegar o código de retorno do webservice após enviar uma NFS-e. Exemplo: (Código Erro : E10) Após enviar uma NFS-e: Código Erro : E10 Mensagem... : RPS ja informado. Correção... : Para essa Inscricao Municipal/CNPJ ja existe um RPS informado com o mesmo numero, serie e tipo. Provedor... : Fiorilli Código Erro : Mensagem... : Correção... : Provedor... : Fiorilli Esse exemplo eu sei tratar no meu sistema(duplicidade), mas existe uma tabela da ABRASF com vários erro e alertas e com base nesses erros e alertas eu trataria no meu sistema de acordo com cada código de retorno. Obrigado!
  9. Boa Tarde Italo, O suporte da Fiorilli me retorno com a seguinte resposta: Erro E99 - Verifique se a tag ValorIss está com valor maior que a tag ValorServicos, ou seja, se o imposto tem valor maior que o serviço realizado. Erro L82 - Acerte o valor da tag do erro acima e verifique se o valor liquido não será menor que o valor dos serviços menos a soma dos descontos. Erro L63 - Verifique se a tag CodigoTributacaoMunicipio possui 13 caracteres, lembrando que essa tag é composta pelo código da atividade + código desdobro. Segue imagem em anexo de como visualizar essa informação. Ajustei e resolveu. Obrigado pela atenção.
  10. Boa Tarde Senhores, Estou usando o Demo do NFS-e para a cidade de Fernandópolis e após enviar os dados através dos botões [Gerar e Enviar um RPS] ou [Gerar e Enviar Lote - Sincrono] recebo a seguinte mensagem: Código Erro : E99 Mensagem... : Valor da retencao devera ser inferior ou igual ao valor dos servicos. Correção... : Provedor... : Fiorilli Código Erro : L82 Mensagem... : O Valor Liquido da nota nao pode ser menor que zero(0). Correção... : Provedor... : Fiorilli Código Erro : L63 Mensagem... : O Codigo de Tributacao do Municipio incorreto. Correção... : Provedor... : Fiorilli No Demo esta assim: Servico.Valores.OutrasRetencoes := 0.00; Servico.Valores.ValorLiquidoNfse := 1685.50; Servico.CodigoTributacaoMunicipio := '3504800'; Alguém sabe o que pode ser? Obrigado!
  11. Boa tarde, Para o estado de São Paulo, eu consegui, depois de credenciar e gerar o token, no site do sefaz: http://www.nfce.fazenda.sp.gov.br/NFCePortal Segue anexo, print das telas do processo. Utilizar os 8 primeiros dígitos do CNPJ do cliente + ano 2015 e inserir na aba WebService --> NFC-e --> Token do ACBrMonitor;
  12. Estou fazendo a manifestação do destinatário e está me retornando o seguinte erro: espaço insuficiente de armazenamento para concluir a operação Alguma sugestão?
  13. Bom dia, Estou com o mesmo problema e há 2 dias venho lendo fórum e nada. Verifiquei caracteres especiais e esta tudo ok. Referente ao cadastro no sefaz, tenho a informação de que, quando homologação é só pegar os 8 primeiros dígitos do CNPJ do cliente + o ano 2014 (Ex: 117729202014), e utilizar no campo Token. Estava com esse erro na verificação do "Status de Serviço", resolvi preenchendo os campos Token e IdToken, nas configurações do ACBrMonitor, agora porem estou com a mesma mensagem na transmissão do XML NFCe. Mensagem de erro: Rejeição: XML da área de dados com codificação diferente de UTF-8 Arquivo xml em anexo. Obs: estou tentando emitir uma NFC-e no estado de SP, no ambiente de Homologação, nosso sistema já funciona normalmente para o estado do MT. 35150611772920000144650010000000201000000202-nfe.xml
  14. Mega Online

    Sat Teste

    Foi identificado que algumas máquinas, o executável é finalizado ao abrir e o problema estava no gds32, do sistema do Banco do Brasil, devido a existência do componente "TWebBrowser" na aplicação, ao retira-la o executável SAT abriu corretamente. Quando este processo estiver rodando nos processos do Windows, o aplicativo é finalizado: gbpsv.exe (G-Buster Browser Defense - Service)
  15. Obrigado Daniel, deu certo... deixei configurado: LarguraBobina = 305 Esquerda = 3 Direita = 6
  16. Mega Online

    Impressao Do Sat

    Pessoal, bom dia, Estou utilizando as funções abaixo, para efetuar a impressão do CFe via D-SAT, onde em tela (preview), esta sendo gerado corretamente, porem na impressão, esta sendo cortado 7 colunas na direita, gerando espaço na esquerda. PrepararImpressaoESCPOS; ACBrSAT1.ImprimirExtrato; A impressora que estou utilizando é a Elgin - VOX. Obs: segue anexo (Impressao_Preview.png); Alguém poderia me ajudar?
  17. Ricardo, verifiquei no exemplo do ACBrSAT, e alimentei o evento ACBrSAT1GravarLog na minha aplicação, tendo o retorno: NumeroSessao: 928302 - Resposta:928302|06010|1203|Rejeição: Emitente não autorizado para uso do SAT.|| acho que deu certo, vou verificar agora este retorno. obrigado.
  18. Ok, Juliomar, obrigado e desculpa. Segue anexo: XML_SAT_VENDA.xml. XML_SAT_VENDA.xml
  19. Pessoal, estou com o seguinte erro: 6010 - Erro de validação do conteúdo, ao utilizar a função ACBrSAT1.EnviarDadosVenda(); Segue abaixo o xml gerado, não estou conseguindo encontrar onde possa estar o conteúdo inválido:
  20. blz Evandro muito obrigado.
  21. Mega Online

    Sat - Funcoes

    Bom dia, Duvida: Toda vez que eu for utilizar a função "SAT.CriarEnviarCfe", eu devo utilizar antes as 3 funções: SAT.inicializar SAT.Ativar SAT.AssociarAssinatura ou seja, a cada enviou de CFe, devo antes chamar as funções acima? ou utilizo as 3 funções acima, somente na abertura da minha aplicação?
  22. Mega Online

    Sat Teste

    Daniel, minha maquina esta doida, do nada, parou o problema... o antivirus já estava desabilitado.... estava executando eles a parte. Se voltar a acontecer, volto a postar aqui. obrigado.
  23. Boa Tarde Miguel, Exatamente, bem observado, verifiquei com o Banco e o correto é o CNAB400, eu estava utilizando o 240 a pedido do meu cliente. Juliana, Obrigado por sua atenção!! Obrigado Miguel!
  24. Ola, klipvirtual, então eu troquei pela função e deu certo: mVenda.Lines.Text := ACBrSAT1.CFe.GerarXML(True); // True = Gera apenas as TAGs da aplicação
  25. Mega Online

    Sat Teste

    Pessoal, estou fazendo uma aplicação, utilizando o componente do ACBrSAT para comunicação com o D-Sat, me espelhando nos fontes do "SAT Teste", contido na pasta padrão "...\Exemplos\ACBrSAT\Delphi", porem tanto minha aplicação quanto o "SAT Teste", ao abrir o executável, ele em segundos se fecha sozinho. Olhei o fonte, debugando e não encontrei nada que força o fechamento da aplicação, será que é alguma configuração nos componentes utilizados: ACBrSAT1, ACBrSATExtratoESCPOS1 e ACBrSATExtratoFortes1?
×
×
  • 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.