Jump to content

datilas

Membros
  • Posts

    485
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by datilas

  1. Algum de voces esta conseguindo fazer Cancelamento com o provedor Iss.net pois estou tentando e o retorno é : Cancelamento - Arquivo Fora De Estrutura
  2. Estou com o mesmo problema com IssNet Cuiabá-MT a IssNet me enviou um arquivo de exemplo e pelo que vi esta faltando o ACBR assinar o arquivo será que alguem pode nos ajudar?
  3. comigo deu o mesmo erro eu resolvi assim foi só comentar a linha 427 - 428 - 429 da unit ACBrNFSeWebServices ai funcionou espero que te ajude if not (FProvedor in [proGovBr, proSimplISS, proAbaco]) then begin if not InternetSetOption(Data, INTERNET_OPTION_CLIENT_CERT_CONTEXT, PCertContext, Sizeof(CERT_CONTEXT)*5) then begin // if Assigned(TACBrNFSe( FACBrNFSe ).OnGerarLog) // then TACBrNFSe( FACBrNFSe ).OnGerarLog('ERRO: Erro OnBeforePost: ' + IntToStr(GetLastError)); // raise Exception.Create( 'Erro OnBeforePost: ' + GetLastErrorText {IntToStr(GetLastError)} ); end; end;
  4. Mas quando eu uso Gerar e Enviar Lote Aparece Erro: OnBeforePost: Autorização do cliente não esta configurado nesse computador
  5. esse mesmo erro esta nesse topico
  6. Estou tentando emitir nota para cidade de Cuiabá-MT mas aparece essa mensagem de erro já troquei de certificado e o erro continua o mesmo alguém já passou pro isso?
  7. eu fiz esse processo mais deu erro na unit ACBrNFSeDANFSeRLRetrato.pas na linha 340 case FNFSe.Servico.Valores.IssRetido of stRetencao : qrlISSReter.Caption := 'Sim';//Astrogildo em 13/12/12 stNormal : qrlISSReter.Caption := 'Não';//Astrogildo em 13/12/12 stSubstituicao : qrlISSReter.Caption := 'ST';//Astrogildo em 13/12/12 end; eu mudei para: case FNFSe.Servico.Valores.IssRetido of stRetencao : rllISSReter.Caption := 'Sim'; stNormal : rllISSReter.Caption := 'Não'; stSubstituicao : rllISSReter.Caption := 'ST'; // stRetencao : qrlISSReter.Caption := 'Sim';//Astrogildo em 13/12/12 // stNormal : qrlISSReter.Caption := 'Não';//Astrogildo em 13/12/12 // stSubstituicao : qrlISSReter.Caption := 'ST';//Astrogildo em 13/12/12 end; ai sim funcionou. Peço para que atualizem o svn para evitar erros em atualizações futuras.
  8. aqui logo depois do evento se o Cstat for diferente de 501 eu consunto o xml original se o retorno for 101 eu atualizo as tabelas
  9. Aqui logo depois do evento eu faço uma consulta no xml original ai o retorno vem 101 cancelamento homologado, e faz todos os processos como antes
  10. boa tarde eu sei que este forum é sobre o ACBR mas não sei mais onde procurar onde eu trabalho em uma empresa onde meu computador é totalmente bloqueado, não tem rede, e tem um cadeado nele para não poder ser aberto, tudo isso por segurança dos fontes , mas eu preciso Trabalhar com a NFe que precisa de internet, minha pergunta é. vcs tem alguma ideia de como eu poderia trabalhar com internet, sem que eu tenha a possibilidade de copiar os fontes do programa, algum serviço, ou aplicativo?
  11. Você já viu se a imagem esta no formato .bmp isso aconteceu comigo apenas uma vez porque a imagem estava no formato .jpg eu tentei alterar a extensão mas o erro continuou então eu abri a imagem com o paint fui no salvar como e salvei como .bmp ai funcionou.
  12. Mas eu atualizei pelo svn Como faço para ter essa unit atualizada?
  13. Estou tentando instalar a ultima versão do acbr que até o momento pelo svn é a revisão 4133 sempre instalei o acbr manualmente toda vez que tem atualização eu atualizo no meu projeto tambem mas dessa vez não esta funcionando tambem ja tentei pelo acbr install e ao intalar o acbr serial mostra esse erro [Error] ACBrECFBematech.pas(1530): Undeclared identifier: 'RoundABNT' [Fatal Error] ACBrECF.pas(1006): Could not compile used unit '..\..\Fontes\ACBrSerial\ACBrECFBematech.pas' e ao intalar o acbr tcp mostra esse erro [Error] ACBrSocket.pas(640): Too many actual parameters [Error] ACBrSocket.pas(647): Undeclared identifier: 'DecodeToSys' [Error] ACBrSocket.pas(697): Too many actual parameters [Error] ACBrSocket.pas(701): Undeclared identifier: 'DecodeToSys' [Fatal Error] ACBrTCP.dpk(48): Could not compile used unit '..\..\Fontes\ACBrTCP\ACBrSocket.pas' alguem pode me ajudar?
  14. datilas

    ACBrSMS

    obrigado pela atenção fico no aguardo.
  15. datilas

    ACBrSMS

    e quanto ao nivel de sinal? eu gostaria de saber qual o nivel de sinal maximo pois eu gostaria de usar um progressbar para mostrar o nivel de sinal eu ja testei varias operadoras com este mesmo modem o nivel de sinal fica entre 13,99 e 15,99 dependendo da operadora
  16. datilas

    ACBrSMS

    Estou usando o huawei E303 mas no acbr sms eu configuro como generico
  17. datilas

    ACBrSMS

    ACBrSMS.pasSegue a unit alterada Gostaria de compartilhar uma função que fiz pois quando eu usava a função ACBrSMS1.Operadora ela me retornava 72405 pesquisando na internet eu achei uma tabela onde estão os codigo MMC MNC das operadoras http://www.my-cool-sms.com/pt/mensagens-preco-mensagens-pre-pago-mensagens-porta/brasil-sms-apps-mcc-mnc-networks então eu vi que 72405 é igual a Claro e assim por diante então eu alterei a unit ACBrSMS e adicionei a função ACBrSMS1.OperadoraNome function TACBrSMS.OperadoraNome: String; Const MMC = '724'; begin if (Operadora = MMC+'02') Or (Operadora = MMC+'03') Or (Operadora = MMC+'04') Or (Operadora = MMC+'08')then Result := 'TIM' else if Operadora = MMC+'05' then Result := 'CLARO' else if (Operadora = MMC+'06') Or (Operadora = MMC+'10') Or (Operadora = MMC+'11') Or (Operadora = MMC+'23')then Result := 'VIVO' else if Operadora = MMC+'07' then Result := 'SERCOMTEL' else if Operadora = MMC+'15' then Result := 'CTBC CELULAR' else if (Operadora = MMC+'16') Or (Operadora = MMC+'24') Or (Operadora = MMC+'31')then Result := 'OI' else if Operadora = MMC+'37' then Result := 'AEIOU' else Result := ''; end;
  18. datilas

    ACBrSMS

    Eu gostaria de saber qual o nivel de sinal maximo pois gostaria de usar um progressbar para mostrar o nivel de sinal
  19. Aqui onde ue trabalho só aconteceu com o A1
  20. Aqui a gente grava o N° de serie do certificado no banco e quando o cliente vai emitir a nota nos apontamos para o N° de serie referente a cada empresa Ex: Quando vai emitir da EMPRESA1 ACBrNFe1.Configuracoes.Certificados.NumeroSerie := Query1.FieldByName('NS_CERTEMP1').AsString; Quando vai emitir da EMPRESA2 ACBrNFe1.Configuracoes.Certificados.NumeroSerie := Query1.FieldByName('NS_CERTEMP2').AsString;
  21. eu gostaria de saber se o projeto ACBR ja tem ou vai ter suporte ao firemonkey
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.