Valmir Gomes Ribeiro
-
Total de ítens
71 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Valmir Gomes Ribeiro
-
-
-
-
8 horas atrás, Juliomar Marchetti disse:
Sim continua a funcionar no Delphi 7 e vai seguir por muito tempo
Fiz a atualização do componente, (obrigado), porem a minha etiqueta a margem dela continua saindo errado mandando a foto em anexo para voce olhar, obrigado antecipadamente, sim a margem esquerda esta 0.
-
15 horas atrás, Juliana Tamizou disse:
Boa tarde.
Observe como é feito no demo.
Att.
bom dia, eu vi, so uma coisa, o acbr ainda compila para o delphi 7, pois na versao que tenho não tem a propriedade margem esquerda, se ele ainda compila resolvido o problema, caso ele não compile mais tem o acbretq separado ?
-
tem como mexer na margem esqueda da etiqueta ?
-
// acertar quebras de linhas e abertura e fechamento da lista de parametros
ParamAdic := StringReplace(Trim(ParametrosAdicionais.Text), sLineBreak, ';', [rfReplaceAll]);
ParamAdic := '['+ ParamAdic + ']';if NaoEstaVazio(CNPJEstabelecimento) and NaoEstaVazio(CNPJSoftwareHouse) then
ParamAdic := ParamAdic + '[ParmsClient=1='+CNPJEstabelecimento+';2='+CNPJSoftwareHouse+']';debuguei e vi esta linha acho que é neste
ParamAdic := '['+ ParamAdic + ']'; que ta gerando seria isto ?
-
daniel segue o log, obrigado antecipadamente.
-
boa tarde, estou usando o acbrtef clisitef dll, e esta dando este erro, segundo eles é que esta indo colchetes demais
CliSiTef DoExibeMsg: Oper: opmOK Mensagem: Terminal inoperante, CNPJ/CPF divergente
ParametrosAdicionais: [][ParmsClient=1=10758937000184;2=01965166000105]
disse que nao tinha essas [] iniciais e não to sabendo como tirar -
-
Bom dia não fiz nenhuma mudança no meu codigo e agora esta dando Falha no reconhecimento da autoria ou da integridade do arquivo digital
ja atualizei o acbr e os schemas, e não mudei nada no codigo.
-
-
baixei aqui e queria saber quando desses .fr3 tem esta informação correta
-
qual o modelo amigo que posso usar ? que tem essa informação ?
-
Fast report
Quanto a homologação dos boletos, precisaremos ajustar os pontos abaixo:
RECIBO DO PAGADOR
Informar o endereço do cedente.
FICHA DE COMPENSAÇÃO
Local de Pagamento – alterar para a expressão “PREFERENCIALMENTE NAS CASAS LOTÉRICAS ATÉ O VALOR LIMITE”.
Informar o endereço do cedente.
Alterar na 1ª linha do campo Instruções a expressão para “Texto de Responsabilidade do Beneficiário ou Cedente”.
Alterar a expressão “Pagador/Avalista” para “Sacador/Avalista”.
Alterar o Campo ”(+)Mora/Multa” para “(+)Mora/Multa/Juros”
este do texto de responsabilidade do beneficiário ou cedente não consegui nenhum que tenha isso
-
existe algum boleto ja com todas estas caracteristicas no acbrboleto,
sacador/avalista, endereco do cedente, mora/multa/juros e texto de responsabilidade do beneficiario ou cedente.
por encontrei um mas esta ultima opção de texto de responsabilidade do benefciario ou cedente não esta assim e a caixa ela implica com isso.
-
Daniel amigo, me diz o nome da unit, pois to vendo de varios tipo autar, cappta, banese mas não vi nada da scope ou getcard, me auxilia se puder por favor, obrigado.
-
Oi daniel tudo bem, mas esta dentro do trunk do acbr, onde posso encontrar, gostaria de ver a questão do cancelamento, pois a getcard trabalha com o Controle e não com o nSU como as outras.
-
No acbrtef já tem esta classe, o tef da getcard scope ?
-
eu vou re-instalar o acbr do zero novamente, mas realmente nao sei o que é, so fiz atualizar o acbr e agora tudo que tava funcionando normalmente dar este erro com todos os certificados, e aquele trecho era para mostrar que do nada ele limpava a variavel e nao gravava o arquivo assinado ocasionando aquele erro.
-
nao entendi juliomar.
-
nesta rotina abaixo
// XML já deve estar em UTF8, para poder ser assinado //
XMLUTF8 := ConverteXMLtoUTF8(XMLStr);with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do
begin
FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'NFe', 'infNFe');
// SSL.Assinar() sempre responde em UTF8...
FXMLOriginal := FXMLAssinado;Leitor := TLeitor.Create;
try
leitor.Grupo := FXMLAssinado;
NFe.signature.URI := Leitor.rAtributo('Reference URI=');
NFe.signature.DigestValue := Leitor.rCampo(tcStr, 'DigestValue');
NFe.signature.SignatureValue := Leitor.rCampo(tcStr, 'SignatureValue');
NFe.signature.X509Certificate := Leitor.rCampo(tcStr, 'X509Certificate');
finally
Leitor.Free;
end;// Se for NFCe, deve gera o QR-Code para adicionar no XML após ter a
// assinatura, e antes de ser salvo.
// Homologação: 01/10/2015
// Produção: 03/11/2015if (NFe.Ide.modelo = 65) then
begin
with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do
begin
NFe.infNFeSupl.qrCode := GetURLQRCode(NFe.Ide.cUF, NFe.Ide.tpAmb,
onlyNumber(NFe.infNFe.ID),
trim(IfThen(NFe.Dest.idEstrangeiro <> '', NFe.Dest.idEstrangeiro, NFe.Dest.CNPJCPF)),
NFe.Ide.dEmi, NFe.Total.ICMSTot.vNF,
NFe.Total.ICMSTot.vICMS, NFe.signature.DigestValue,
NFe.infNFe.Versao);if NFe.infNFe.Versao >= 4 then
NFe.infNFeSupl.urlChave := GetURLConsultaNFCe(NFe.Ide.cUF, NFe.Ide.tpAmb, NFe.infNFe.Versao);GerarXML;
end;
end;if Configuracoes.Arquivos.Salvar and
(not Configuracoes.Arquivos.SalvarApenasNFeProcessadas) then
begin
if NaoEstaVazio(NomeArq) then
Gravar(NomeArq, FXMLAssinado)
else
Gravar(CalcularNomeArquivoCompleto(), FXMLAssinado);
end;
end;eu debuguei e vi que ate onde ta em negrito esta variavel FXMLAssinado esta com o xml la, depois que chega no FXMLAssinado ta em branco ai so grava no arquivo <?xml version="1.0" encoding="UTF-8"?>
-
Grande Juliomar, agora de cabelo curto, irmão ver bem, não mudei nada o meu programa só fiz atualizar o acbr, a rotina que tenho é bem simples, tipo
try
FDataModule.ACBrNFe.NotasFiscais[0].NFe.Ide.dSaiEnt := Now;
FDataModule.ACBrNFe.NotasFiscais[0].NFe.Ide.hSaiEnt := Now;
FDataModule.ACBrNFe.NotasFiscais[0].NFe.Ide.dEmi := Now;fCaixa.labelMensagens.Caption := 'Gerando Nfc-e...';
Application.ProcessMessages;
FDataModule.ACBrNFe.NotasFiscais.GerarNFe;fCaixa.labelMensagens.Caption := 'Assinando Nfc-e...';
Application.ProcessMessages;
FDataModule.ACBrNFe.NotasFiscais.Assinar;fCaixa.labelMensagens.Caption := 'Validando Nfc-e...';
Application.ProcessMessages;
FDataModule.ACBrNFe.NotasFiscais.Validar;fCaixa.labelMensagens.Caption := 'Enviando Nfc-e...';
Application.ProcessMessages;
if FDataModule.ACBrNFe.Enviar(1,true,true) thenja debuguei e no gerarnfe, ta tudo na memoria, quando ele assina que volta para o xmlassinado fica somente esta duas tags
outra amigo, eu pego agora o mesmo programa que tava funcioando, so faco recompilar e dar este erro.
- 1
-
-
Bom Dia, sobre o cancelamento descobri junto com o pessoal do desenvolvimento da getcard, existe uma opção no gerenciador padrão deles que faz com que a confirmação seja confirmada ou fique pendente, to mandando a foto anexo, com ela desmarcada o acbr consegue fazer o NCN normalmente, agradecer a atenção a todos e deixar aqui por que acredito que outros sistemas também tenham este problema e desenvolveram alguma rotina.
- 2
- 1
AcbrEtq no delphi 7 - Configuração Margem Esquerda
em ACBrSerial
Postado
Problema resolvido, obrigado