Ir para conteúdo
  • Cadastre-se

ALA

Membros
  • Total de ítens

    2.430
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que ALA postou

  1. Desculpe, mas não consegui entender o que devo fazer p resolver o problema...
  2. Rafael, a tag que vc mencionou eu envio, sempre que CST = 60 // * GRUPO N08- CST 60 - ICMS cobrado anteriormente por substituição tributária else if (ItemNFE.FieldByName('STR_CODIGO').AsString = '60') then begin CST := cst60; ICMS.vBCST := ItemNFE.FieldByName( 'INS_VLR_BASE_CALCULO_ICMSST' ).AsCurrency; ICMS.vICMSST := ItemNFE.FieldByName( 'INS_VLR_ICMSST' ).AsCurrency; ICMS.modBCST := dbisMargemValorAgregado; // 4 // ALA 31/01/2012 - ESTAVA OCORRENDO ERRO NA ALALUX ICMS.vBCSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_VLRBASE' ).AsCurrency; // incluido a pedido de ARS - 19/10/2010 ICMS.vICMSSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_VLRIMPOSTO' ).AsCurrency; // incluido a pedido de ARS - 19/10/2010 ICMS.pST := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_ALIQUOTA' ).AsCurrency; // 4.0 // movido para baixo ICMS.vFCPSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_FCP_VLR' ).AsCurrency; // 4.0 // 4.0 // //movido para baixo ICMS.vBCFCPSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_VLRBASE' ).AsCurrency; // ICMS.vBCFCPSTRet := ItemNFE.FieldByName( 'INS_ICMS_ST_RET_VLR_BASE' ).AsCurrency; // movido para baixo ICMS.pFCPSTRet := NFE.FieldByName( 'NFS_FCP_PERCENTUAL' ).AsCurrency; // #7074/7045 4.0 // ICMS.pRedBCEfet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMS_PERCREDUCAO' ).AsCurrency; ICMS.vBCEfet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMS_VLRBASE' ).AsCurrency; ICMS.pICMSEfet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMS_ALIQUOTA' ).AsCurrency; ICMS.vICMSEfet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMS_VLRIMPOSTO' ).AsCurrency; // #7828 NFe - Está enviando valor de FCP e Base de FCP do ST - solicitação Wanderley// if ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_FCP_VLR' ).AsCurrency > 0 then begin ICMS.vFCPSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_FCP_VLR' ).AsCurrency; // 4.0 ICMS.vBCFCPSTRet := ItemNFE.FieldByName( 'INS_DEMONSTRA_ICMSST_VLRBASE' ).AsCurrency; ICMS.pFCPSTRet := NFE.FieldByName( 'NFS_FCP_PERCENTUAL' ).AsCurrency; end; end
  3. Nao pq a nota foi emitida com 60. E fornecedor quer que seja 60. Pelo que estou vendo aqui, parece que o ACBRNFe não esta gerando as tags..
  4. Estou informando os valores, mas as tags <orig><CST><vBCSTRet><vICMSSTRet><vBCSTDest><vICMSSTDest> não estão sendo geradas.. Alguém sabe o que devo fazer p gerar ? https://www.oobj.com.br/bc/article/rejeição-858-grupo-de-tributação-informado-indevidamente-nitem-nnn-como-resolver-796.html
  5. Boa tarde. Estou informando os valores do ST, mas não estão sendo gerados no XML. A SEFAZ apenas retorna "858-Rejeicao: Grupo de Tributacao informado indevidamente - [nItem: 1]" with Prod.comb do begin // *** 4.0 *** // descANP := ItemNFE.FieldByName( 'ITE_DESC_ITEM_TABELA_SIMP_ANP' ).AsString; pGLP := ItemNFE.FieldByName( 'ITE_PGLP' ).AsCurrency; //Value; pGNn := ItemNFE.FieldByName( 'ITE_PGNN' ).AsCurrency; //Value; pGNi := ItemNFE.FieldByName( 'ITE_PGNI' ).AsCurrency;//value; vPart := ItemNFE.FieldByName( 'ITE_VPART' ).AsCurrency; // *** 4.0 *** // // ** // cProdANP := StrToInt64( lcst_CodigoANP ); CODIF := ItemNFE.FieldByName( 'ITE_NR_REGISTRO_CODIF' ).AsString; qTemp := ItemNFE.FieldByName( 'INS_QTD_COMB_FAT_TEMP_AMBIENTE' ).AsCurrency; //Value; UFcons := Trim( ItemNFE.FieldByName( 'INS_COMB_CONS_UF' ).AsString );//Dest.EnderDest.UF; // TAG de grupo da CIDE - - Ocorrência 0-1 CIDE.qBCprod := ItemNFE.FieldByName( 'INS_CIDE_QTDE_BASE_CALCULO' ).AsCurrency;//Value; CIDE.vAliqProd := ItemNFE.FieldByName( 'INS_CIDE_VLR_ALIQUOTA' ).AsCurrency; //Value; CIDE.vCIDE := ItemNFE.FieldByName( 'INS_CIDE_VLR_IMPOSTO' ).AsCurrency; ; // // TAG de grupo do ICMS - - Ocorrência 1-1 ICMS.vBCICMS := ItemNFE.FieldByName( 'INS_COMB_VLR_BASE_ICMS' ).AsCurrency; ICMS.vICMS := ItemNFE.FieldByName( 'INS_COMB_VLR_ICMS' ).AsCurrency; ICMS.vBCICMSST := ItemNFE.FieldByName( 'INS_COMB_VLR_BASE_ICMS_ST' ).AsCurrency; ICMS.vICMSST := ItemNFE.FieldByName( 'INS_COMB_VLR_ICMS_ST' ).AsCurrency; // TAG de grupo do ICMSST de operação interestadual - - Ocorrência 0-1 ICMSInter.vBCICMSSTDest := ItemNFE.FieldByName( 'INS_COMB_DEST_VLR_BASE_ICMS_ST' ).AsCurrency; ICMSInter.vICMSSTDest := ItemNFE.FieldByName( 'INS_COMB_DEST_VLR_ICMS_ST' ).AsCurrency; // TAG de ICMS para consumo em UF diversa da UF de localização do destinatário do produto - - Ocorrência 0-1 ICMSCons.vBCICMSSTCons := ItemNFE.FieldByName( 'INS_COMB_CONS_VLR_BASE_ICMS_ST' ).AsCurrency; ICMSCons.vICMSSTCons := ItemNFE.FieldByName( 'INS_COMB_CONS_VLR_ICMS_ST' ).AsCurrency; ICMSCons.UFcons := Trim( ItemNFE.FieldByName( 'INS_COMB_CONS_UF' ).AsString ); // DESCRIÇÃO COMPLEMENTAR DO PRODUTO // lcst_ANP_Complementar := 'Código ANP: ' + lcst_CodigoANP; if TRim( ItemNFE.FieldByName( 'ITE_NR_REGISTRO_CODIF' ).AsString ) <> EmptyStr then lcst_ANP_Complementar := lcst_ANP_Complementar + ' - Registro CODIF: ' + ItemNFE.FieldByName( 'ITE_NR_REGISTRO_CODIF' ).AsString; if lcst_Descricao_Produto_Complementar <> EmptyStr then lcst_Descricao_Produto_Complementar := lcst_Descricao_Produto_Complementar + ';' + lcst_ANP_Complementar else lcst_Descricao_Produto_Complementar := lcst_ANP_Complementar; 31181211099682000158550010000329071000329077-nfe - Copia.xml
  6. Boa tarde. Estou tentando emitir uma NF-e de devolução para GLP, mas estou recebendo a msg "858-Rejeicao: Grupo de Tributacao informado indevidamente - [nItem: 1]". Já fiz todos os procedimentos citados nos links postados aqui, mas ainda não funionou.. Anexo o XML que recebi do fornecedor e XML que estou tentando emitir... 31181211099682000158550010000329061000329061-nfe.xml 31181206980064008833550010004466421366062505.xml
  7. Bom dia. O Cliente esta sem internet. Estou com problema para gerar o MDF-e em contingencia aqui em MG. A NF-e foi gerada em Contingência FS-DA. Mas quando tento imprimir o MDF-e em contingencia ocorre erro solicitando o protocolo...
  8. ALA

    Erro Data 30/12/1899

    Ops. Obrigado. Vou verificar...
  9. ALA

    Erro Data 30/12/1899

    Erro ao acessar SAT Bematech. Data retornada 30/12/1899.. sat.txt
  10. Obrigado, vou dar uma olhada sobre isso..
  11. Engraçado, mas não consigo encerrar...
  12. Bom dia. Obrigado pela resposta pessoal. Esta ocorrendo dois problemas.. Quanto tento encerrar o mdf em anexo, primeiro ocorre a msg e depois a msg de Rejeição MDF 1.xml 1-ped-eve-soap.xml 1-eve.xml 1-eve-soap.xml 1-ped-eve.xml
  13. Pessoal estou com esse problema, mas o engraçado que o cliente já emite MDF-e no site da SEFAZ... Mesmo assim e necessário solicitar autorização para emiter MDF-e via WS ?
  14. Poderia liberar as palestras para quem não pode ir ao evento...
  15. Alfredo boa tarde. Eu tb já tentei fazer algo parecido com o que vc esta procurando. Acho que no ACBR vai funcionar apenas se vc realizar a manifestação da nota. Pelo que entendi, vc quer saber se existe alguma NFe emitida para o seu CNPJ, independente da manifestação..
  16. ALA

    Para o SAT

    Pessoal bom dia. A ideia do projeto lib é poder utilizar o ACBr em qualquer linguagem ? Pergunto isso por estamos migrando o nosso ERP de Delphi p Java e hj utilizo vários componentes do ACbr. ACBRNFe, ACBRNFSe, ACBRCTe, ACRBSAT, ACBRECF... etc..
  17. Obrigado pela resposta Amarildo. Já enviei um e-mail p [email protected] que é o responsável por esse WS... Estou aguardando a resposta..
  18. Realizei os testes. Esta ocorrendo o erro abaixo. Mas acho que o problema e reverente a liberação dos dados do cliente na prefeitura.. [Content] Método..... : Enviar Lote Código Erro : Mensagem... : Acesso nao permitido, verifique os dados e certifique-se de possuir permissao para a operacao. Correção... : Provedor... : NFSeBrasil
  19. Ops, obrigado Italo.. A reinstalação e mesmo necessária ?
  20. Estou iniciando a integração com o WS da prefeitura de Matozinhos/MG. Já alterei no Cidades.ini. Existe algo mais que deve ser verificado ?
  21. Bom dia. Não consigo baixar os arquivos das palestras.. "Sorry, you aren't permitted to download this file."
  22. Bom dia. Quando sera disponibilizado os videos sobre o evento ?....
  23. Bom dia. Aconteceu isso comigo. Eu resolvi dessa forma // // CliSiTEF... procedure FinalizaTransacaoSiTefInterativo( smallint : Word; pNumeroCuponFiscal : PChar; pDataFiscal : PChar; pHorario : PChar ); far; stdcall; external 'CliSiTef32I.dll'; // chamo essa função ao iniciar o meu PDV... FinalizaTransacaoSiTefInterativo ( 0, // 0 cancela a transacao, 1 confirma PChar( FieldByName( 'VEN_NUMERO' ).AsString ), '', //pDataFiscal : PChar; '', ); //pHorario : PChar ); far; stdcall; external 'CliSiTef32I.dll'; ShowMessage( 'Todas as Transações TEF referente a última venda foram CANCELADAS.' );
  24. Pelo que sei o ACBRTEFD não esta integrado com a Cappta
  25. ALA

    Cappta

    Bom dia. Tentei utilizar o ACBRTEFD com a dll da Cappta, mas pelo que sei, não existe integração....
×
×
  • 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.