Miriane Rogério

Muito obrigado. Deu certo aqui. Só tive que colocar fpDuplicataMercantil.

Tem algum exemplo de como colocar isto na minha rotina? Não encontrei no exemplo que tenho aqui.

Img.bmp Eu queria colocar a imagem do erro aqui, mas acho que só vai como arquivo. Img.bmp

Ola, amigos. Na ve310 tudo ok. Testando a ve400 tenho este problema cannot be empty according to the dtd/schema. Já vi vários tópicos falando sobre isto inclusive um de 2012 outro do Régys dizendo para assinar antes. Me desculpem mas não consegui entender nenhum. Eu envio assim: ACBrNFe1.configuracoes.Geral.ModeloDF := moNFe; ACBrNFe1.Enviar(nFiscal, true); Por favor, se alguém puder me explicar o que devo fazer eu agradeço.

Resolvido... var OK : boolean;beginCST : = StrToCSTICMS(OK, query1['cst']) ;end; Obrigada.

Ola! with ICMS do begin // 0-Tributado if Query3['tipProd'] = 0 then begin CST := CST1; CSOSN := CSOSN1; Como converto: CST1 de string para TpcnCSTIcms. e CSOSN1 de string para TpcnCSOSNIcms. Obrigada.

Estou com o mesmo problema.

Alguém teria um tutorial de instalação do MAC virtual no windows e configurando o mesmo para compilar aplicativo IOS. Obrigada.

Vou fazer. Obrigada Italo. Italo, Atualizei e tudo funcionou certinho. Mais uma vez muito obrigada.

Obrigada.

Oi, Vocês tiveram alguma solução para este problema. Acabei de atualizar e aconteceu o mesmo comigo. Obrigada.

Após atualizar o ACBr aconteceu isto: is used but not declared in the DTD/Schema. Vi algumas coisas antigas aqui no forum, mas não entendi. Por favor, se alguém puder me ajudar. Obrigada.

Ola! Estou utilizando o ACBrCargaBal, porem no meu arquivo TXITENS não aparece a informação nutricional. O que estou fazendo de errado? A balança que estou utilizando é TOLEDO. Desde já agradeço a todos

Olá, communication error 9997 timeout during operation. Estou tendo este erro no meu sistema, já vi algumas coisas na internet mas não me ajudou. No exemplo ACBrSAT funciona, coloquei tudo que encontrei mas mesmo assim não imprime. Obrigada.

Olá, Por favor, alguém teria um manual detalhado do exemplo do ACBrSat. Tem muita coisa la que não estou entendendo. Preciso saber pra que serve cada campo. Obrigada.

O problema era no Delphi mesmo. Resolvido. Obrigada.

Olá! Estou tentando reinstalar o ACBr. 1º Removi todos os Library 2º Removi todos os ACBr no Component 3º Executei apagarAcbr 4º Executei o ACBrInstall_Trunk2 Até ai tudo deu certo compilou e instalou. O problema é que ele não criou os bpl na pasta LibD23 e quando abro o Delphi ele pede os arquivos que deveria estar nesta pasta. Segue imagem do problema. Desde já agradeço a todos. Obrigada.

Ítalo, com esta explicação tudo funcionou certinho. Muito obrigada.

Agnaldo, obrigada pela atenção. Tentei utilizar sua rotina acima mas deu erro desconhecido.

Ítalo, deu certo. Aproveitando a oportunidade queria saber se existe a possibilidade de executar o processo normal porem não visualizar e nem imprimir automaticamente as notas ou seja só gerar o PDF. Muito obrigada.

Já fiz isto e o problema continua. Aparentemente o problema é no CNPJ mas já tentei de tudo e nada da certo.

Estava funcionando normal, isto aconteceu depois que atualizei o ACBr. Desde já agradeço pela ajuda. Obrigada.

Ola! Por favor, como coloco o desconto na sub. tributária? Prod.nItem := aNumIten; Prod.cProd := formatfloat('00000', Query3['codigo']); Prod.cEAN := Query3['barra']; Prod.xProd := Query3['descricao']; Prod.NCM := Query3['ncm']; Prod.EXTIPI := ''; Prod.CFOP := Query3['cfop']; Prod.uCom := Query3['unidade']; Prod.qCom := Query3['quant']; Prod.vUnCom := Query3['unita']; Prod.vProd := Query3['valor']; Prod.cEANTrib := ''; Prod.uTrib := Query3['unidade']; Prod.qTrib := Query3['quant']; Prod.vUnTrib := Query3['unita']; Prod.vFrete := 0; Prod.vSeg := 0; Prod.vDesc := (dm.tab_rec['valordesconto'] * dm.tab_rec['quant']) / maximo1; TotDesc := TotDesc + Prod.vDesc; with Imposto do begin with ICMS do begin if Query3['tipProd'] = 3 then begin CST := cst10; CSOSN := csosn201; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := Query3['valor']; ICMS.pICMS := Query3['aliqicms']; ICMS.vICMS := (Query3['valor'] * Query3['aliqicms']) / 100; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := Query3['mva']; ICMS.pRedBCST := 0; ICMS.vBCST := Query3['valor'] + ((Query3['valor'] * Query3['mva']) / 100); ICMS.pICMSST := Query3['icmsint']; ICMSInt := (ICMS.vBCST * Query3['icmsint']) / 100; ICMSExt := (Query3['valor'] * Query3['icmsext']) / 100; ICMS.vICMSST := ICMSInt - ICMSExt; ICMS.pRedBC := 0; TotICMS := TotICMS + ICMS.vICMS; TotProdST := TotProdST + ICMS.vBCST; TotICMSST := TotICMSST + ICMS.vICMSST; end; end; end; end; Query3.next; end; Total.ICMSTot.vBCST := TotProdST; Total.ICMSTot.vST := TotICMSST; Total.ICMSTot.vProd := dm.tab_rec['valorfatura']; Total.ICMSTot.vFrete := 0; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := TotDesc; Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := 0; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vOutro := 0; Total.ICMSTot.vNF := dm.tab_rec['valorfatura'] - TotDesc + TotICMSST; Total.ISSQNtot.vServ := 0; Total.ISSQNtot.vBC := 0; Total.ISSQNtot.vISS := 0; Total.ISSQNtot.vPIS := 0; Total.ISSQNtot.vCOFINS := 0; Total.retTrib.vRetPIS := 0; Total.retTrib.vRetCOFINS := 0; Total.retTrib.vRetCSLL := 0; Total.retTrib.vBCIRRF := 0; Total.retTrib.vIRRF := 0; Total.retTrib.vRetPrev := 0; Desde já agradeço a todos. Obrigada

Boa tarde Italo, Na pasta Notas eu tenho (610-nfse.xml), não imprime e nem visualiza. Na pasta anterior Arquivo eu tenho (5838997-lista-nfse.xml), esta sim, imprime visualiza normal. No envio de um arquivo com cinco notas o componente imprime apenas uma e salva apenas uma em pdf. O que estou fazendo para resolver isto: ACBrNFSe1.Enviar(vNumLote); Com o comando acima ele visualiza apenas a primeira nota, fecho a visualização e executo o comando abaixo. ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile(ACBrNFSe1.Configuracoes.Arquivos.PathSalvar + ACBrNFSe1.NotasFiscais.Items.NFSe.Protocolo + '-lista-nfse.xml'); ACBrNFSe1.NotasFiscais.Imprimir; ACBrNFSe1.NotasFiscais.ImprimirPDF; Com este comando consigo imprimir todas as notas e salvar em pdf. O meu sistema é escolar e emite dependendo da escola de 500 a 1000 nota por mês. No meu cadastro eu salvo o número da nota fiscal e quando o cliente quisesse imprimir uma segunda via o sistema ia na pasta NFSe localizava a nota e imprimia. Agora tenho que salvar o número do protocolo e se o cliente quiser imprimir ele tem que abrir todas as notas do lote e achar a que ele quer para imprimir. Isto porque o XML que aparece na pasta Notas não imprime. Outra coisa quando peço para salvar o número da nota o componente só me mostra a primeira as outras fica em branco. Estou utilizando o Fortes Report e quando determino para imprimir direto ele mostra a tela de impressão nota por nota. Queria que fosse igual ao QReport imprimisse todas de uma só vez. (Nunca usei o Fortes Report) Por favor, me de uma luz, não sei se continuo com a migração para o trunk2. Obs.: Você ficou de me mandar um cópia do QReport para instalar no trunk2 ([email protected]) Obrigada pela atenção.