Maurício Sareto
-
Total de ítens
499 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Maurício Sareto
-
-
-
Pessoal estou com um grande problema que a dias não consigo resolver, um cliente fez uma venda para um cliente seu no cupom fiscal e o mesmo quiz devolver a mercadoria, não tendo mais como cancelar o cupom, tentamos fazer uma nota de devolução, mas ao vincular o cupom igual nas notas de saída me retorna um erro não catalogado.
O xml esta em anexo, se alguem conseguir me ajudar ficarei muito grato...
Obrigado
-
Logo após o problema relatado @italojjr da erro na seguinte procedure da unit ACBrCTeDACTeQRRetrato, mas precisamente nas linhas em negrito;
procedure TfrmDACTeQRRetrato.qrb_01_ReciboBeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
begin
inherited;
PrintBand := (QRCTe.PageNumber = 1) and (FCTe.Ide.modal <> mdAereo) and (FPosRecibo = prCabecalho);
//Rodrigo DSP 22/01/2014 11:22:47: impressao do canhoto - Cabecalho.
if (FResumoCanhoto) then
qrlResumoCanhotoCTe.Caption := getTextoResumoCanhoto
else
qrlResumoCanhotoCTe.Caption := '';
qrlSerie2.Caption := IntToStr(FCTe.Ide.serie); // FormatFloat( '000', FCTe.Ide.serie);
qrlNumCte2.Caption := FormatFloat( '000,000,000', FCTe.Ide.nCT );
// TpcteTipoCTe = (tcNormal, tcComplemento, tcAnulacao, tcSubstituto);
qrb_01_Recibo.Enabled := (FCTe.Ide.tpCTe = tcNormal) or (FCTe.Ide.tpCTe = tcComplemento);
end;Obrigado
-
Isso esta dando no Exemplo...
É assim mesmo?
-
A impressão do cancelamento deu certo, mas depois que atualizei os fontes começou a dar o problema na hora de imprimir o DACTE...
Mensagem é a seguinte: Error Creating Form: Ancestor For 'TFrmDacteQR' not Found.
Isso no exemplo...
Já aconteceu com alguém?
Obrigado
-
Primeiro passo:
========================================================================
Utilizando o Delphi abra o fonte: ACBrCTeDACTeQR que encontra-se na pasta ...\Fontes\ACBrCTe
Se aparecer uma tela informando que a propriedade não existe, clique em ignorar todas.
Mantendo o ACBrCTeDACTeQR aberto, abra o fonte: ACBrCTeDACTeQRRetrato que encontra-se na mesma pasta.
Clique em ignorar todas se aparecer a tela informado que a propriedade não existe.
========================================================================
Segundo Passo:
========================================================================
Selecione o objeto QRCTe que encontra-se no form: frmDACTeQR.
Altere o valor das propriedades Left e Top para um valor entre 0 e 10, desde que seja diferente do atual.
Exemplo: Se os valores atuais é 2 (dois) tanto par Left quanto para Top altere para 3 (tres).
Inclua uma linha em branco no código onde não vai interferir em nada, por exemplo entre interface e uses.
Não me pede para ignorar nada, fiz os outros passos mas o erro continua...
Estranho que a impressão do DACTE ocorre sem problemas, porém, a impressão do evento nem no exemplo não funciona...
-
Obrigado pela sua resposta Italo.
Isso exato versão 2.00...
Porém quando eu tento fazer conforme o exemplo (já tinha observado isso) da um erro dizendo que Property continuous does not exist...
-
Gostaria de saber se é possivel implementar a impressão do evento de cancelamento de CT-e? Já tentei de todas as formas que eu conheço mas não obtive exito. Quando enviou o comando para a impressão ele parece que carrega mas não abre o preview se o ct-e estiver cancelado, diferente de quando esta autorizado, ele mostra o preview e imprime sem problemas...
Obrigado
-
Régys estou com erro nessa função ao testar o demo, tentei trocar de modem para ver se resolve mas não deu certo, estou usando modem da daruma...
// Enviar a mensagem *********************************************************
Cmd := Trim(AMensagem) + CTRL_Z;
Self.EnviarComando(Cmd);
if not Self.ATResult then
raise EACBrSMSException.Create(FALHA_ENVIAR_MENSAGEM + sLineBreak + fpUltimaResposta);O erro é o seguinte:
Não é possivel enviar a mensagem de texto.
ERROR
Aguardo resposta
-
Régys, boa tarde....
Já teve alguma vez problema de Acesso negado ao mandar o ACBRSms Ativar??
Até
-
Agora começaram a vir os problemas... Régys ao tentar trocar de bandeja tenho um retorno de que o modelo só possui uma bandeja, mas estou usando um modem da daruma com dois chips, e no demo ele altera entre uma bandeja e outra sem problemas, você saber me informar o que pode ocasionar esse problema??
Desculpe pelo transtorno...
-
certo... eu aguardo...
-
As mensagens enviadas geralmente é a aplicação que controla.
As mensagens recebidas ainda não foi implementada a lista, mas ele já baixa um .txt com as mensagens recebidas, falta popular uma lista (que já está pronta) e apagar o arquivo.
Certo, ao tentar abrir no demo o formulário ListaMensagem, ele da erro na propriedade ListaMensagem, sabes me dizer o porque?
-
Bom dia Régys, até agora tudo caminhando como deve, o modem se comportando de maneira correta e não obtive mais erros...
Gostaria de tirar algumas duvidas...
Existe maneira de listar as mensagem enviadas?
Existe maneira de listar as mensagem recebidas pelo modem?
-
while not (dmSistema.CdsContatos.Eof) do
begin
if(grupo = dmSistema.CdsContatosGRUPO.Value)then
begin
with LoteMsgs.Add do
begin
Telefone := limpaString(dmSistema.CdsContatosFONE.Text);
Mensagem := Memo1.text;
end;
end;
dmSistema.CdsContatos.Next;
end;
Estou incluindo o fone e a mensagem...
da erro aqui
// Enviar a mensagem *********************************************************
Cmd := Trim(AMensagem)+ CTRL_Z;
Self.EnviarComando(Cmd);
if not Self.ATResult then
raise EACBrSMSException.Create(FALHA_ENVIAR_MENSAGEM + sLineBreak + fpUltimaResposta);
-
Eu estou tendo muitas dificuldades em trabalhar com o acbrSMS...
Ontem testei de todas as maneiras para acha a solução que você postou, as primieras que tentei enviar dava erro, depois começou enviar de uma hora para outra, agora da falha ao definir número do destinatário, as vezes da indice da mensagem invalida. De 10 sms que eu tento mandar 1 da certo...
-
Descubri qual é o problema Régys, só não consegui resolver...
Estou fazendo um rotina e adicionando o numero do fone e a mensagem assim... limpaString é uma função que eu uso para tirar caracteres que não quero usar na string...
LoteMsgs.Add.Telefone := limpaString(dmSistema.CdsContatosFONE.Text);
LoteMsgs.Add.Mensagem := Memo1.Text;o primeiro número ele leva certo, o segundo ele leva sem nada, mas estou passando corretamente os numeros....
O problema acredito que esteja aqui
TotalMensagensLote := ALote.Count;
for I := 0 to TotalMensagensLote - 1 doDeveria ser igual a 2 o ALote mas esta gerando como 4...
-
Sim Régys também achei que poderia ser isso o problema, mas ai testei de fone por fone enviando de um por um o lote que eu tinha passado e o sistema enviou normalmente...
Estou achando estranho ele enviar a mensagem em branco mesmo dando o erro...
-
Galera, agora estou com outro problema no envio de lote... Ao enviar normal ele manda a mensagem normal, mas quando tento enviar um lote de mensagem ele me retorna erros, manda a mensagem para alguns destinatários mas manda sem conteúdo, manda uma mensagem em branco...
Retorna os seguintes erros:
Classe: EACBrSMSException - Falha ao definir o número de telefone do destinatário.
Classe: EACBrSMSException - Falha ao definir o número de telefone do destinatário.
Ja envia uma por uma para todos os destinatários, deu tudo certo...
Se alguem puder me ajudar, Obrigado...
-
Obrigado Régys ja consegui Resolver...
Obrigado mesmo assim
-
Duvida ja esclarecida, o envio de mensagem não necessita de DDD
Obrigado
-
Pessoal estou homologando um sistema para o envio de SMS usando modem Daruma.
Gostaria de saber qual o formato do numero do celular do destinatário que eu devo informar para o envio da mensagem? E se tem como alterar entre um tipo e outro, como por exemplo, com DDD ou sem DDD?
Agradeço respostas
Att.
Erro Ao Enviar Nfe De Devolução Com Cf Referenciado
em ACBrNFe
Postado
Para a geração e envio do XML não utilizo acbr não, bom vou rever as tags...
Obrigado