Fernando Massa

Boa tarde pessoal na unit ACBrCaixaEconomica tem valores fixos para alguns campos, mas o pessoal do suporte aqui na empresa começou a ter rejeição de boletos e acabamos constatando pelo layout da caixa que os valores estão errados. Segue um print que mostra as 2 alterações aqui abaixo os valores no layout da caixa

Valeu!! vou fazer esse teste. abraço.

é... vou ler os artigo e avaliar se tomo este "outro" caminho. É que eu queria fazer o meio termo entre uma classe e um componente. E pode ser esse o problema. Pode que o melhor seria fazer realmente um novo componente, com todas as suas propriedades e tal... ou o frame que vc me falou. Valeu mesmo pela ajuda!

kkkk, tu ta falando de empresas que planejam os desenvolvimentos que tem projetos.... QUE SONHO !!!! aqui é "Tudo nas coxa" eles não entendem o que significa PLANEJAR. Não sabem avaliar custos nem nada. EM fim... história triste que nem vem ao caso falar sobre.

É... realmente Tframe parece mais fácil, mas não é a solução que estou procurando. Queria aproveitar para fazer esta classe, que é um tipo de coisa que não tinha feito ainda após tentos anos desenvolvendo em Delphi. Normalmente a gente faz classes para tratar dados, nada visual. Tentei seguir a mesma lógica mas não sei por que estou empacando nesta parte.

pois é Juliomar... concordo contigo sobre o uso do trello e tal. Mas a diretoria me pediu pra fazer isso.... eu só obedeço. E falei o mesmo que vc sobre o assunto mas me falaram que eles mesmo assim querem desenvolver isso no nosso sistema interno. Sobre o TFrame vou ver como funciona. Vou pesquisar sobre isso e vejo.

Oi Pessoal, aproveitando que tem gente aqui que manja pra caramba de Delphi, peço ajuda para esta questão. Fiz uma classe que herda de TWinControl, mas me da erro no destroy e la só estou dando free nos componentes criados. O que preciso é o seguinte: Quero criar um panel que tem um outro panel dentro dele com um edit e um botão. A intenção é fazer como se fosse uma coluna com um título na parte superior. Pois vou montar tipo um Clone do TRELLO. E esse é a parte da coluna. Segue o código da minha classe: Assim até eu crio N colunas... meio que está funcionando, mas na hora de fechar, acsses violation pra tudo quanto é canto! kkkk imagino que a questão seria gerenciar os N panels criados. De certo na hora de destruir ta tentando destruir o mesmo mais de uma vez... em fim. Qualquer ajuda é bem vinda. unit UColKanban; interface uses System.SysUtils, Vcl.Graphics, System.Classes, Vcl.Controls, Vcl.ExtCtrls, WinApi.Messages, Vcl.StdCtrls; Type TColunaKanban = class(TWinControl) private { Private declarations } FCol : TPanel; FEdtTitulo : TEdit; FTituloPanel : TPanel; public constructor Create(AOwner: TComponent); override; destructor Destroy; override; { Public declarations } published { Published declarations } end; var ColunaKanban : TColunaKanban; implementation { TColunaKanban } constructor TColunaKanban.Create(AOwner: TComponent); begin inherited Create(AOwner); FCol := TPanel.Create(AOwner); FCol.Parent := AOwner as TWinControl; FCol.Left := 10000; FCol.Align := alLeft; FCol.caption := ''; FCol.Color := clGreen; FTituloPanel := TPanel.Create(AOwner); FTituloPanel.Parent := (FCol); FTituloPanel.Align := alTop; FTituloPanel.Height := 45; FTituloPanel.Visible := true; FTituloPanel.Color := clRed; FEdtTitulo := TEdit.Create(AOwner); FEdtTitulo.Parent := (FTituloPanel); FEdtTitulo.Width := 290; FEdtTitulo.Top := 12; FEdtTitulo.Left := 8; FEdtTitulo.Visible := true; end; destructor TColunaKanban.Destroy; begin FTituloPanel.Free; FEdtTitulo.Free; FCol.Free; inherited; end; end. Assim chamo ele no fonte.

era isso mesmo!!! valeu. Tava indo nulo, pois não tinha a informação no banco de dados, e como estava baixando muita coisa, dava Time OUT na conexão e não gravava o NSU recebido da SEFAZ. Verifiquei via Debug o NSU de retorno, e gravei no banco. Deu certinho.

Valeu Juliomar! Ali até estamos mandando a última NSU, na variável "AuxUltNsu" que recebe de uma função que faz a consulta, mas vou debugar pra ver que numero que está enviando ali. Pode que o erro esteja nesse ponto e está indo vazio ou coisa do tipo.

Paulo, não leva a mal, mas vc está descaracterizando meu Post. Quem sabe vc abre um post com essa pergunta. Assim não mistura os assuntos. Tentei meio que levar na boa antes, mas fica ruim se vc ficar aproveitando meu post pra tirar uma outra duvida sua que não se relaciona.

Não tem nada a ver com o assunto... Mas fiquei curioso . Se tiver como saber quero saber também. Mas algo me diz que sempre a consulta sem manifestação é resumida. E depois da manifestação vem o completo.

No nosso sistema tem a baixa em lote que sempre baixa todas as notas dos últimos 180 dias aproximadamente. Gostaria de saber se tem uma maneira de limitar essa baixa em lote para consultar somente as de certo período. Funções usadas: ACBrNFe.DistribuicaoDFe(Filial.IBGE_UF, Filial.CNPJ, AuxUltNsu, '', ''); (denrto de um loop) ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[x].resDFe.chDFe ===> ( Limitado num If <> '' ) Esse comandos ali... (até onde entendo) consultam e baixam os XMLs Nas minhas pesquisas aqui no fórum, não achei nenhuma pergunta similar ou que fale de limitação com respeito a baixa em lote.

Amigo, vou imprimir o que vc escreveu acima e emoldurar pra colocar aqui na empresa. Pois isso que vc falou é o que a galera "do meu lado" está tentando fazer, mas a empresa tem uma cultura muito diferente e mesmo sendo evidente que isso prejudica, está difícil de mudar. Imaginem só.... Já ocorreu (a um ano atrás) de ter que atualizar vários clientes, mais de uma vez, num único dia. Por falta de testes nas alterações do sistema. Em fim, agora já melhorou muito, isso mas ainda temos um caminho a trilhar para que todos entendam que liberar uma versão para o cliente é algo sério que está diretamente relacionado com a reputação da empresa.

Estou gostando do resultado, também as respostas do EMBarbosa bem ponderada, mas claro, a ideia aqui seria sempre pensando na versão que está no cliente. Em certo momento ocorreu de ser gerada uma versão quase todo dia porque tinha alterações no ACBR, mas eu sou da opinião que se não deu problema no cliente, e tudo está fluindo bem, da pra esperar uma semana. até porque vejo que a equipe do ACBR não trabalha com os prazos esgoelados. E estas questões da receita sempre tem um prazo generoso de adaptação. Resumindo. Não vai deixar de funcionar nada no cliente por causa de alterações que ocorreram no ACBR, se são muitas ou poucas, se é arquivo de danfe.fr3 (por causa de alguma alteração) ou se são arquivos de "Schemas" novos. Essas alterações não vão ter impacto, imediato no cliente. Não à motivo para ficar desesperado. Se colocar essas atualizações 1 vez por semana no cliente, está bem de boa.

Aqui na empresa baixamos os fontes do svn://svn.code.sf.net/p/acbr/code/trunk2 e alguns colegas defendem que devemos atualizar esses fontes diariamente e outros 1 vez por semana. O que vcs recomendam? Estou tentando gerar uma enquete mas não sei se deu certo.

Bom dia, estava com um problema praticamente idêntico e realmente o que estava faltando era fazer a manifestação. Olha nos exemplos do acbr na pasta Delphi tem o ACBrNFe_Exemplo.dproj Lá tem na aba consulta o botão consulta pela chave. Vc precisa do retorno dessa função para saber o numero do lote no qual se encontra a NFe que vc quer baixar e assim usar a função que faz a manifestação. No meu caso no fonte ficou assim. ACBrNFe.EnviarEvento(ACBrNFe.WebServices.Consulta.procEventoNFe.Count + 1) Para muitas coisas é necessária a realização da manifestação, como para "Carta de correção" por exemplo. No exemplo que mencionei, tem a aba Distribuição DFe que apresenta exemplos que ajudam. Desculpa não poder colocar aqui como está no nosso fonte, pois não tenho autorização da empresa pra isso, e já levei xixi por postar um print de tela de parte do nosso fonte mesmo que não tivesse na da que comprometesse algo. Tomara que ajude.

Oi Pessoal, muito obrigado por toda a ajuda, descobri que exatamente como os colegas estavam falando, não estava sendo realizada a manifestação pela função : ACBrNFe.EnviarEvento(ACBrNFe.WebServices.Consulta.procEventoNFe.Count + 1) Onde ACBrNFe.WebServices.Consulta.procEventoNFe.Count + 1 seria o numero do lote onde se encontra a nfe. Consegui corrigir.

Italo, valeu pela tua resposta e estou garimpando neste código (que não é meu, por isso a dificuldade) para ver se as coisas estão ocorrendo na ordem certa. 1 - Coloquei um Breackpoint em todos os lugares onde é usada a função ACbrNFe.EnviarEvento() e vi que no processo que estou executando, ela não é usada. * Só para esclarecer a situação: Eu estou como empresa Cartosul, recebendo da empresa Irani uma mercadoria. Já estou com a danfe na mão e por algum motivo não recebi o email com o xml, mas ele está la na sefaz no ambiente nacional (já verifiquei isso) daí no sistema, insiro a chave da NFe e clico no botão Buscar NFe que tem a função de fazer a requisição dessa nota e baixar o xml para daí ler ele e preencher toda a NF de entrada (tomaticamente ). Se entendi corretamente o que vc falou, antes daquela sequencia de comandos que coloquei acima na imagem eu tenho que enviar o ACbrNFe.EnviarEvento() com o código 210200 (pelo que li no post que o colega acima mencionou) e daí sim faço a ACBrNFe.DistribuicaoDFePorChaveNFe() e o resto? Fiz uma bisca aqui no fórum e vi que tem mais uma pessoa com o mesmo problema, quase idêntico ao meu, se não for o mesmo. (Rogério Braga) Tem um post (pergunto pois não achei) que mostre como enviar corretamente a manifestação e depois baixar a nota corretamente? Vou ir tentando aqui se conseguir posto o meu resultado.

oi, valeu pelo link, li tudo o que estava lá e comparei com o nosso fonte, mas vi que estamos fazendo a manifestação corretamente. Note que na imagem mostro sublinhado em vermelho onde enviamos o comando com a manifestação. Verifiquei pelo debug e está enviando corretamente o estado, cnpj e chave de NFE. Sublinhado em azul, a parte que verificando o retorno, salva na pasta configurada os arquivos lidos. E É nessa parte que ele salva aquele arquivo "Resumido" como eu disse que tem imagem no post acima, que não é o XML completo. Não sei se antes disso deveria ter algum outro comando?? Não estamos usando a manifestação por NSU como falou lá no link, mas acredito que nesta caso não se aplica, pois temos os dados para a manifestação principal. Tô bem perdidinho

Obrigado por responder BigWings. Pelo que vc me falou, o componente deveria já salvar no HD o XML correto. Mas o que está sendo salvo é outra coisa. note que esse arquivo está com 1kb o conteúdo dele é isto aqui: que certamente não é o XML xompleto. Eu até tenho o XML completo que recebi por e-mail. Mas quando tento baixar pelo acbr me da isso? O que estou fazendo errado? certamente é uma falha minha, pois se não imagino que muita gente teria o mesmo problema.

Debugando mais um pouco, vi que o arquivo é salvo com o seguinte comando: WriteToTXT(ArqNFe, ConverteXMLtoUTF8(ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[i].XML), False, False); Mas para todos os efeitos, o que ali ta salvando é o que já está em memória do que foi "baixado" da sefaz. é isso?

Isto ocorre quando tento buscar na receita uma nota de entrada. O sistema até busca uns XML mas não são os XMLs completos com a nota, parece que só tem um cabeçalho no máximo umas 10 linhas e só. O nome do arquivo baixado é 42201192791243000294550050003642631780409544-nfe.xml e tem só 603 bytes o arquivo correto deveria ter 8KB Pode consultar, verá que a nota existe, mas não sei por que ao tentar baixar está baixando esse arquivo incorreto??? ¯\_(º.º)_/¯ Agradeço qualquer dica ou ajuda.

Oi, podem encerrar este post, era problema lá na e-frete no ambiente de homologação. Eles já corrigiram.

Oi Pessoal, hoje de boa estava fazendo testes com o validando CIOT em Homologação e depois de atualizar os fontes do ACBR parei de receber o "Token" olhando o xml de retorno, nem trouxe a tag. Alguém ai passou por isso ou tem uma ideia do que possa ser?

Robson, quando me deu esse erro, no envio do proprietário, fiz o seguinte: Cadastrei outro proprietário da lista no xls que eles proporcionam (vou anexar aqui pelas duvidas que vc não tenha ele). Cuide para pegar "Ativos". é importante que os dados de Banco, conta corrente e essas coisas sejam válidos. Não da pra colocar qualquer gambiarra lá que não aceita. Tem que ter numero de CPF válido, CNH válida, etc.... tudo certinho. Muitos dados têm no XLS mas outros eu coloquei meus dados mesmo. Tudo isso vale para motorista também. Vi seu XML , vou apontar umas coisas que vi: Falta : RNTRC do contratado, Tem que ter ObservacoesAoTransportador e ObservacoesAoCredenciado (sim, ridículo, mas tem que ter) [até acho que esse é seu problema] O FAX pode ficar "0" espero ter ajudado. Tabela dados dev.xls