Italo Giurizzato Junior

Francisco, Você não esta executando o comando: ACBrNFe.NotasFiscais.Clear; Antes de validar a nota ? Pois pela imagem postada note que aparece nota fiscal de numero 0 ZERO.

Estranho, no XML postado, os item contem valor mas falta a quantidade, esta certo isso ? E outra coisa, o destinatário pode ser o próprio emitente?

Boa tarde, Clemente As respostas que você procura estão no Manual de Itegração do Usuário: Manual de Integração versão 4.0.1-NT2009-006 Dezembro 2009

Bom dia Edson, Você pode criar uma imagem (do tamanho do quandro disponivel para o logo e dados da empresa) contendo o logo da empresa e seus dados (Razão Social, Endereço, etc...) e no componente configurar a propriedade para expandir o logo. Desta forma não há necessidade de alterar o código fonte do componente.

Boa tarde Fabricio, No que diz respeito a calculos, a melhor saída é conversar com mais de um contador. Vá aos escritórios de contabilidade, expõe o seu problema, com certeza você vai encontrar alguem que entende do assunto e podera te ajudar. Foi o que eu fiz, conversei com o contador do meu cliente. Desta forma você tira o seu da reta. Espero ter ajudado.

Eric, Eu me referi ao Project Options e não ao Environment Options aba Library campo Library path.

Bom dia Eric, Em sua aplicação, foi colocado: ACBrCTeCAPICOM no campo Conditional defines: (aba Directories/Conditionals, opção Projet Options) ?

Carlos, Quanto ao Emitente, Tomador, Remetente e Destinatário são exatamente o que você colocou em seu poste. Vamos estudar os seguintes casos: Caso 1: Transportadora A vai realizar o transporte da carga cujo o Remetete é a Empresa X e o Destinatário é a Empresa Y. Logo o Emitente é a Transportadora A, o Remetente é o X o Destinatário é o Y e o Tomador é quem vai pagar o frete, portanto pode ser o X ou o Y. Caso 2: Temos duas transportadoras A e B envolvidas no transporte da carga cujo o Remetete é a Empresa X e o Destinatário é a Empresa Y. Neste caso temos que dividir o transporte em duas etapas e consequentemente temos 2 Conhecimentos. Primeira Etapa Conhecimento emitido pela Transportadora A: Emitente: Transportadora A Remetente: Empresa X Destinatário: Empresa Y Tomador do Serviço: Empresa X, Empresa Y ou Recebedor Recebedor: Transportadora B Segunda Etapa Conhecimento emitido pela Transportadora B: Emitente: Transportadora B Remetente: Empresa X Destinatário: Empresa Y Tomador do Serviço: Empresa X, Empresa Y ou Expedidor Expedidor: Transportadora A Temos ai um caso de redespacho. Espero ter ajudado.

Boa tarde Carlos, Tirando o Expedidor e o Recebedor, o resto esta tudo certo, esses 2 eles aparecem quando ocorre o redespacho, caso contrario eles não são informados. O mais triste é que no manual de integração não deixa claro quem é quem. Espero ter ajudado.

Boa tarde Eric, Os componentes de terceiros não são compativeis com o Delphi 7 (no minimo) ?

Fabricio, O componente ACBrNFe você consegui compilar e instalar? O que esta faltando é o ACBrNFeDANFeQR ? Estranho, no meu ACBrNFeDanfeQRpkg.dpk não contem o vcljpg na lista dos requeridos. (Deve ser porque eu utilizo o Delphi 7) Esperimente excluir da pasta ...\Projects\Bcl os arquivos referentes ao DANFe.

Fabricio, Cheque se na pasta Lib, encontra-se a vcljpg.dcp e a qrpt.dcp. Pois segunda a imagem postada, a mensagem de erro é uma e a linha em vermelho (a que provavelmente provocou o erro) não tem muito a ver com a mensagem. No Delphi 6 o Quick Report é instalado automaticamente, você esta utilizando o QR que veio com ele ou instalou uma versão mais recente em outra pasta ?

Bom dia Fabricio, Verifique se no library path, consta o caminho da pasta Lib, pois o vclx e FileCtrl estão nesta pasta. Espero ter ajudado.

Bom dia Runner, A principio o Delphi 7, com o Quick Report versão 3 (ou superior), e lógico os componentes do ACBr para o CTe.

Boa tarde Runner, No que diz respeito ao ACBrCTe, não existe uma DLL ou LIB, apenas os componentes para o Delphi.

Ronaldo quanto ao erro: Ancestor for 'QRCTe' not found É o seguinte: deve ter ocorrido algum erro ao executar a aplicação, justamente no fonte ACBrCTeDACTeQRRetrato, como ele depende do ACBrCTeDACTeQR o erro acima é mostrado. Você esta com os fontes atualizados? Ao clicar no OK da tela de mensagem de erro: Ancestor for 'QRCTe' not found É mostrado a linha que contem o erro, qual é?

Bom dia Henrique, O problema é o seguinte: o campo indTot (Página 122 do Manual) indica, se o valor do item (vProd) entra no valor total da NF-e ou não. É um campo numérico de tamanho 1 e pode assumir os seguintes valores: 0 = o valor do item não compõe o valor total da NF-e; 1 = o valor do item compõe o valor total da NF-e; Muito bem, foi criado um tipo e 2 funções no fonte: pcnConversao Tipo: TpcnIndicadorTotal = (itSomaTotalNFe, itNaoSomaTotalNFe ); Funções: // 117b - Indicador de soma no total da NFe ************************************** function indTotToStr(const t: TpcnIndicadorTotal): string; begin result := EnumeradoToStr(t, ['0', '1'], [itNaoSomaTotalNFe, itSomaTotalNFe]); end; function StrToindTot(var ok: boolean; const s: string): TpcnIndicadorTotal; begin result := StrToEnumerado(ok, s, ['0', '1'], [itNaoSomaTotalNFe, itSomaTotalNFe]); end; Como você pode ver a primeira função converte os valores: itNaoSomaTotalNFe, itSomaTotalNFe nos caracteres: 0 e 1 respectivamente. Já a segunda função realiza a operação inversa. Apesar de estar escrito no manual que o campo é numérico o caracter zero representa o numero zero. No fonte pcnNFeW (procedure GerarDetProd, campo indTot) é utilizado a função indTotToStr ou seja o retorno da função é String, portanto o primeiro paramentro do Gerardor.wCampo tem que ser tcStr. Já no fonte pcnNFeR a linha: (*I17b*)NFe.Det.Prod.IndTot := StrToindTot(ok,Leitor.rCampo(tcDe2, 'indTot')); esta errada, porque a função Leitor.rCampo esta retornando um valor numérico com 2 casas decimais e esse valor esta sendo usado em uma função cujo dado de entrada é String. Portanto o correto é: (*I17b*)NFe.Det.Prod.IndTot := StrToindTot(ok,Leitor.rCampo(tcStr, 'indTot')); No mesmo fonte (pcnNFeR) notei outros casos: São eles: (*B18*) NFe.Ide.NFref.RefNF.Modelo := StrToIntDef(Leitor.rCampo(tcInt, 'mod'),55); (*N12a*)NFe.Det.Imposto.ICMS.CSOSN := StrToCSOSNIcms( ok,Leitor.rCampo(tcInt, 'CSOSN')); Peço ao Daniel ou André que analise o caso.

Pela mensagem de erro postada inicialmente temos 3 erros: ERRO: Falha na validação dos dados da nota 1162 TAG: ID:B12/cMunFG(Código do Município FG) - Conteúdo inválido. TAG: ID:I11/vProd(Valor Total Bruto dos Produtos ou Serviços) - Numero máximo de casas decimais permitidas 2. '4011' violates pattern constraint of '[0-9]{2}|[0][1-9][0-9]{6}|[1-9][0-9]{7}'. The element '{http://www.portalfiscal.inf.br/nfe}NCM' with value '4011' failed to parse. No campo cMunFG - Conteudo Inválido. (erro 1) No campo vProd - Numero máximo de casas decimais permitidas 2. (erro 2) No campo NCM - contem o valor 4011 sendo que tem que ter 2 ou 8 digitos. (erro 3) A solução que te passei é para resolver o erro 2, já os demais você deve checar. No caso do campo cMunFG (código do Município de Ocorrência do Fato Gerador) é composto por 2 dados (primeiro 2 digitos: código da UF), (segundo 5 digitos: código do município). Quanto ao NCM existe uma tabela em PDF chamada Tabela de Produtos NCM com os códigos, descrição do produtos e unidade de medida. Espero ter ajudado.

Boa tarde, o campo verProc é usado para você informar a versão da sua aplicação, não tem nada a ver com a versão do XML ou forma de envio, normal, SCAN DPEC, ...

Essa função apenas converte um valor Float em String segundo a mascara, esperimente usar o RoundTo.

Boa tarde, elovegun Quanto ao valor esperimente utilizar a função RoundTo( variavel, -2) Sendo que -2 significa arredondar para 2 casas decimais.

No fonte pcnNFeW da pasta ...\fontes\PCN2, contem um bug: A linha a baixo esta com o primeiro parametro errado: Gerador.wCampo(tcInt, 'I17b', 'indTot ', 01, 01, 1, indTotToStr(nfe.Det.Prod.IndTot), DSC_INDTOT); O correto é: Gerador.wCampo(tcStr, 'I17b', 'indTot ', 01, 01, 1, indTotToStr(nfe.Det.Prod.IndTot), DSC_INDTOT); []s

Atendendo uma solicitação no Mantis #613, estou implementando novos tipos. Isso vai impedir o preenchimento errado de diversos campos do CT-e. A implementação vai ocorrer aos poucos, durante o final de janeiro e inicio de fevereiro, pretendo concluir o mais breve possível. Durante esse periodo vou disponibilizar as implementações, é bem provável que os usuários do componente terão que efetuar alterações em suas aplicações. Exemplo: compl.Entrega.TipoData := 0; //Sem Data Definida deverá ser alterado para: compl.Entrega.TipoData := tdSemData;

Você esta trabalhando somente com o CT-e ou com a NF-e também? Se esta trabalhando com a NF-e, teve o mesmo problema?

Talvez a versão 5 do QR para o Delphi 2010, não possui essa propriedade. Esta disponível para baixar o DACTe gerado com a versão 3 do QR. []s