Claudio Stein Junior

Segue as informações abaixo. Nome do Pacote: QuickReport5 Components Caminho: C:\Program Files\Borland\Delphi 7\Bin\QR5DesignD7.bpl Obrigado

Obrigado Juliomar aquele erro foi solucionado. Em seguida deu alguns erros relacionados ao QuickReport 5.02. Então segui as dicas do arquivo Property_Does Not Exist.txt e resolvi o problema. Agora eu não entendo é que possuo o QuickReport 5.02 instalado com o Delphi 7, mas mesmo assim precisei remover as propriedades? Porque isso acontece?

Boa tarde precisei reinstalar o ACBR e obtive a mensagem de erro "ancestor for frmdacteqr not found" Abri os arquivos correspondentes ao relatório e foi solicitado para remover o componente do canhoto. Removi e em seguida precisei subtrair o código abaixo para o DACTE aparecer if (FResumoCanhoto) then qrlResumoCanhotoCTe2.Caption := getTextoResumoCanhoto else qrlResumoCanhotoCTe2.Caption := ''; Em seguida funcionou. Minha dúvida é este código vai fazer falta? Porque eu tive este erro? Tem alguma outra maneira de sanar este erro sem remover o componente? Obrigado

Obrigado Italo, funcionou.

Olá amigos tenho uma situação que está me incomodando. Uma transportadora de São Paulo vai realizar um frete para um tomador também de São Paulo com frete "A PAGAR", o destinatário é o próprio tomador e o remetente é de Cuiabá - Mato Grosso do Sul. Estou utilizando o CFOP 5353 - transporte para comércio estadual Cidade Origem - Cuiabá - MT Cidade Destino - São José do Rio Preto - SP Está dando erro de "CFOP Inválido", mas se o tomador é de SP, a operação não deve ser estadual? O que devo fazer para corrigir? Obrigado

Ok obrigado pela dica, pelo visto vamos conviver com esse erro quando estivermos depurando o programa.

Valeu obrigado, mas bem que isto poderia ser mais fácil com uma tabela pré-definida do próprio governo.

Como assim, o que tem a ver o internet explorer na jogada, pois eu uso o 8 e dá erro.

Pessoal, meu cliente carrega veículos novos em caminhão cegonha. É necesário informar a tag cCor (informar a cor do veículo. código de cada montadora), só que não sei onde encontro esta tabela, já vasculhei na net e nada, será que tem algum problema eu usar código próprio, exemplo Vermelho - VERM Verde -VERD Azul - AZUL Amarelo - AMAR e assim por diante, pois é muito difícil descobrir estes códigos, sei que vem no manual de cada carro, mas se tivesse uma tabela facilitaria bastante. Como vocês estão fazendo nesse caso? Obrigado

Ocorre tb no Demo.

Valeu pela dica do debug, eu estava com a linha abaixo no meu fonte, na procedure TfrmDemo_ACBrCTe.LerConfiguracao ACBrCTe1.DACTe.PathPDF := edtPathLogs.Text; Após rastrear a propriedade PathPDF descobri o problema. Obrigado

Olá eu estou tentando gerar o PDF do CTE no seguinte caminho: PathPDF:= C:\Ideal Contabil x\Executavel\CTE\pdfs\ mas não estou conseguindo, ele está gerando o arquivo na seguinte pasta: C:\Ideal Contabil x\Executavel\CTE\XML que no caso é a pasta do PathSalvar que contém IncludeTrailingPathDelimiter('C:\Ideal Contabil x\Executavel\CTE\XML');\ Não sei o que faço pois o componente está configurado certo Agradeço quem souber a resposta.

Consegui arrumar após reinstalar a capicom e reiniciar o computador.

Mais uma coisa, estou usando o webservice de SP, exemplo se a nota é 1, digo que o lote tb é 1, se a nota é 2 digo que o lote é 2, além disso estou enviando como forma de emissão normal, como mostra abaixo, o problema mesmo é a comunicação. if rgFormaEmissao.ItemIndex = 0 then Ide.tpEmis:=teNormal

Olá estou com um problema com o CT-E da ACBR, estou conseguindo validar os dados, tudo certinho mas quando tento enviar ou verificar o status do serviço obtenho a seguinte mensagem: - O sistema não pode encontrar o arquivo especificado. - URL:https://nfe.fazenda.sp.gov.br/cteWEB/services/cteStatusServico.asmx - SOAPAction:http://www.portalfiscal.inf.br/cte/wsdl/CteStatusServico/cteStatusServicoCT O que pode estar acontecendo? Obrigado

Eu estou com esse problema da mensagem, também cai no cálculo da chave. A mensagem é gerada apenas quando estou com o Delphi aberto. No cliente ele gera tudo normal e não apresenta a mensagem, mas mesmo assim ela me incomoda. Segue codigo do erro function ValidarChave(const chave: string): boolean; var i: integer; begin result := false; if (copy(chave, 1, 3) <> 'NFe') and (copy(chave, 1, 3) <> 'CTe') then exit; try i := 0; if GerarDigito(i, copy(chave, 4, 43)) then //erro aqui result := i = StrToInt(chave[length(chave)]); if result then result := ValidarCodigoUF(StrToInt(copy(somenteNumeros(chave), 1, 2))); if result then result := ValidarAAMM(copy(somenteNumeros(chave), 3, 4)); if result then result := ValidarCNPJ(copy(somenteNumeros(chave), 7, 14)); except result := false; end; end; Agradeço se alguém descobrir. Obrigado

Resolvi, estava passando 55 para o código do país quando o mesmo é 1058. Desculpe a falha. Obrigado

Olá estou com problemas no tomador4, em modo de homologação meu CNPJ, cidade, UF ficam errados <toma4> <toma>4</toma> <CNPJ>00000000000000</CNPJ> <IE>268003080110</IE> <xNome>A. DAHER & CIA LTDA</xNome> <fone>1788888888</fone> <enderToma> <xLgr>AV. LUIZ LEMOS DE TOLEDO SOUCA</xLgr> <nro>1000</nro> <xCpl>ED. JARDIM 4. ANDAR</xCpl> <xBairro>JD. MARIN</xBairro> <cMun>9999999</cMun> <xMun>EXTERIOR</xMun> <CEP>15501007</CEP> <UF>EX</UF> <cPais>0055</cPais> <xPais>BRASIL</xPais> </enderToma> </toma4> O CNPJ fica zerado, cMun, UF e XMun também ficam errados como se fosse exterior, não consigo pegar a cidade corretamente, o que pode estar acontecendo? Obrigado

Resolvi o problema abrindo os dois forms, o retrato após o 1 form que contêm o quickreport que é o pai sem fechar o primeiro form. O estranho é que tive vários erros de propriedades usando o quickreport 5.02 com Delphi 7, mas removi as mesmas e deu certo. Obrigado.

Ok obrigado.

Valeu!

Olá estou usando o componente de Demo e alterando o mesmo e consta como forma de envio as seguintes opcoes no form: 1 = Normal 4 = EPEC 5 = Conting. FSDA 7 = SVC-RS 8 = SVC-SP Para estes itens respectivos estou fazendo da seguinte forma: if rgFormaEmissao.ItemIndex = 0 then Ide.tpEmis:=teNormal; //1 = Normal else if rgFormaEmissao.ItemIndex = 1 then Ide.tpEmis:=teDPEC //4 = EPEC else if rgFormaEmissao.ItemIndex = 2 then Ide.tpEmis:=teFSDA //5 = Conting. FSDA else if rgFormaEmissao.ItemIndex = 3 then Ide.tpEmis:=teSVCRS //7 = SVC-RS else if rgFormaEmissao.ItemIndex = 4 then Ide.tpEmis:=teSVCSP; 8 = SVC-SP Gostaria de saber se as correspondências estão corretas. Obrigado

Como conseguiu resolver, estou com o mesmo erro.

Qual o link correto para resolver este problema?