Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

TRodrigues_

Membros
 Perfil  Explorar Conteúdo

  • Total de ítens

    23

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Tudo que TRodrigues_ postou

  1. TRodrigues_
    @Juliomar Marchettimuito obrigado, eu ja ia pedir para o pessoal responsavel entrar em contato com a embarcadeiro. Ah, é possivel usar normalmente a tela, basta clicar "não" umas 8x. Valeu pelo suporte, pode fechar o post.
  2. TRodrigues_
    @Renato Rubinho Desabilitei o welcome, a tela principal ficou igual a imagem em anexo, porem o problema continua, estou achando que o problema não esta nesta tela e nem é na Url, pq esta aparecendo erro em https://blogs.embarcadero.com/community/, e esta pagina esta funcionando corretamente.
  3. TRodrigues_
    Daniel é no welcome do delphi. Juliomar, a versão é original , o erro começou aparecer a 1 mes atras em todas as licenças do delphi 10 seattle. Aparecem 5 erros e todos tem relação com jquery. Estou pesquisando como resolver, mas até o momento não encontrei.
  4. TRodrigues_
    Pessoal, sempre que acesso o delphi o erro acima aparece, alguem ja passou por isso? sabe me explicar como resolver? Att
  5. TRodrigues_
    Srs bom dia! Estou tentando enviar email com anexo utilizando API com metodo PUT, porem retorna bad requestion, algo poderia me ajudar, segue minha função abaixo: function enviaremailS3_2({sCodAdm, sURL, sToken, assunto, corpoHtml, Destinatarios, Anexos : String}): Integer; var iRetorno: Integer; sURLDownload: String; Parametros : TIdMultipartFormDataStream; HTTPClient : TIdHTTP; begin iRetorno := 0; Parametros := TIdMultiPartFormDataStream.Create; HTTPClient := TIdHTTP.Create; try try Parametros.AddFormField('iCodAdm', '4'); Parametros.AddFormField('Assunto', 'Extrato'); Parametros.AddFormField('Corpo', '<body>Extrato de Comissao</body>'); Parametros.AddFormField('Destinatarios', '[email protected]'); Parametros.AddFile('Anexos', 'D:\CSV\DocumentosS3\1400000014_87138.pdf'); HTTPClient.Request.CustomHeaders.Clear; HTTPClient.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' + sToken; HTTPClient.Request.Accept := 'application/json'; HTTPClient.Request.ContentType := 'application/x-www-form-urlencoded'; HTTPClient.Request.ContentEncoding := 'multipart/form-data'; sURLDownload := HTTPClient.Put('https://webapihomologacao.com.br/api/v1/EnvioEmail/EnviarEmailAmazon',Parametros); if HTTPClient.ResponseCode = 200 then Result:= 0 else Result:= 1; except on E: Exception do begin Result := -1; end; end; finally FreeAndNil(Parametros); FreeAndNil(HTTPClient); end; end;
  6. TRodrigues_
    Pessoal bom dia! Alguem ja integrou delphi 10 com SharePoint? Preciso fazer a integração mais não estou conseguindo encontrar suporte. Att
  7. TRodrigues_
    Pessoal, bom dia! Preciso fazer upload de arquivos via api. Para api passo os seguintes parametros: eTipoRotinaArquivo, SubPasta e Arquivo. A função abaixo funciona perfeitamente no Delphi 10.4, mas no delphi seatle não funciona, pois ele não possui addfile no RESTRequest, gostaria de saber se tem alguma forma de resolver isso. //Função funcionando no delphi 10.4 function enviarreceberS3(Metodo, Tipo, extArq, sURL, sToken, sOrigem, sDestino, sNomeArquivo: AnsiString; Memo : TMemo): Integer; var iRetorno: Integer; sURLDownload, sDirDownload: String; vRestClient : TRESTClient; vRestResponse : TRESTResponse; vRestRequest : TRESTRequest; Enco_dedc : String; vJason : String; begin {//Metodo 0. GET 1. PUT 2. POST } vRestClient := TRESTClient.Create(nil); vRestResponse := TRESTResponse.Create(nil); vRestRequest := TRESTRequest.Create(nil); try try vRestClient.Accept := 'application/json, text/plain; q=0.9, text/html;q=0.8'; vRestClient.ContentType := 'application/json;odata=verbose;charset=utf-8'; vRestClient.AcceptCharset := 'UTF-8, *;q=0.8'; vRestClient.AcceptEncoding := 'identity'; vRestClient.AcceptEncoding := 'deflate, gzip, *;q=0'; vRestRequest.Client := vRestClient; vRestRequest.Accept := 'application/json'; vRestRequest.Response := vRestResponse; vRestClient.BaseURL := UTF8ToUnicodeString(sURL); //'https://minhaapihomologacao.empresa.com.br/api/v1/arquivo' vRestRequest.AddAuthParameter( 'Authorization', 'Bearer ' + UTF8ToUnicodeString(sToken), TRESTRequestParameterKind.pkHTTPHEADER); case strtoint(Metodo) of 0 : vRestRequest.Method := rmGET; 1 : vRestRequest.Method := rmPUT; 2 : vRestRequest.Method := rmPOST; end; if metodo = '0' then else begin vRestRequest.AddParameter('eTipoRotinaArquivo','4'); vRestRequest.AddParameter('SubPasta','SubPastaTeste'); vRestRequest.AddFile('Arquivo',sOrigem); //Delphi Seatle não tem addfile end; vRestRequest.Execute; if (vRestResponse.StatusCode = 200) then begin sURLDownload := ReplaceStr(vRestResponse.JSONText,'"',''); memo.Text := ReplaceStr(vRestResponse.JSONText,'"',''); if Metodo = '0' then begin sURLDownload := ReplaceStr(sURLDownload,'\',''); if not DirectoryExists(sDestino) then ForceDirectories(sDestino); //sDirDownload := UTF8ToUnicodeString(sDestino)+UTF8ToUnicodeString(sNomeArquivo); sDirDownload := UTF8ToUnicodeString(sDestino)+UTF8ToUnicodeString(sNomeArquivo); iRetorno:= UrlDownloadToFile(nil, PChar(sURLDownload), PChar(sDirDownload), 0, nil); Result:= iRetorno; end; Result:= iRetorno; end else Result:= 1; except on E: Exception do begin Result := -1; end; end; finally FreeAndNil(vRestClient); FreeAndNil(vRestResponse); FreeAndNil(vRestRequest); end; end; Desde ja agradeço
  8. TRodrigues_
    Italo, obrigado pela informações. Renato, eu fiz isso, mas não consegui identificar nada de diferente no campo descrição. Segue anexo XML do site da prefeitura. 20028803_2_831200.xml
  9. TRodrigues_
    Srs bom dia! Alguem utiliza servidor ISSNet? Sabe me informar qual caracter utilizar para informar quebra de linha no xml? Estou usando o ; (ponto e virgula),porem so funciona para emissão do PDF local, quando acesso o site da prefeitura e envio ou gero pdf da nota, a quebra de linha não funciona. Desde ja agradeço
  10. TRodrigues_
    Bom dia Italo! Estou usando o AcbrNFSex, baixei em 20/05/23. Então, eu ja baixei uma nota da prefeitura, coloquei os dados iguais, a unica diferença é q minha nota é homologação e a que baixei da prefeitura esta em produção. Na primeira tentativa que eu fiz de enviar o RPS, deram varios erros, e o problema era que para enviar homologação eu tinha que informar a serie = '8'. Ja conferir ate com a ficha cadastral, então estou achando que é alguma informação q esta faltando ou algum dado que tenho q informar diferente para fazer a homologação.
  11. TRodrigues_
    Italo obrigado pelo suporte. Estou usando delphi 10.2 com acbrNFSe. Ja progredi bastante, agora aparece o seguinte erro: Erro(s): Código : E035 Mensagem: Código de tributação inexistente.(Numero RPS: 12) Correção: Consulte a legislação vigente para saber o Código de tributação que deverá ser informado. --------- Código : L003 Mensagem: O Código de tributação informado não pertence a este contribuinte.(Numero RPS: 12) Correção: Consulte junto a prefeitura de seu município o código vigente. --------- O Problema é q ja consultei na prefeitura o codigo, entrei com o cadastro do cliente. Informe o codigo no acbr e mesmo assim o erro persiste.
  12. TRodrigues_
    Infelizmente me enviaram alguns modelos de XML e um PDF com 3 Paginas, que não tem quase nada de informação, explica apenas como cadastrar o ambiente de homologação. O Manual, eu li da ABRASF 2.04. Mandei uma msg para eles, pq preciso saber como homologar um cnpj que ja estava em produção.
  13. TRodrigues_
    Pessoal bom dia! Preciso emitir NFSe de Ribeirão Preto e tenho as seguintes duvidas: 1 - Certificado Digital, tenho que pegar algum gratuito na prefeitura ou uso o .pfx do e-cnpj do emissor? 2 - Tenho q emitir uma grande quantidade de NFSe por mes, porem posso emitir tudo em dia(s) específicos, é mais aconselhável gerar RPS ou emitir direto NFSe sem o RPS? 3 - Se tiver alguma outra dica para emissão ficarei grato.
  14. TRodrigues_
    Pessoal, vi que não respondi. Deu td certo, obrigado a todos!
  15. TRodrigues_
    Limpei tudo e deu certo. Obrigado. Agora fui fazer um teste usando o FortesReport e esta ocorrendo os seguinte erros na unit ACBrBoletoFCFortesFr; [dcc32 Error] ACBrBoletoFCFortesFr.pas(464): E2003 Undeclared identifier: 'fpAbout' [dcc32 Error] ACBrBoletoFCFortesFr.pas(481): E2003 Undeclared identifier: 'lCarne' [dcc32 Error] ACBrBoletoFCFortesFr.pas(537): E2003 Undeclared identifier: 'lPadraoEntrega' [dcc32 Error] ACBrBoletoFCFortesFr.pas(537): E2008 Incompatible types [dcc32 Error] ACBrBoletoFCFortesFr.pas(628): E2003 Undeclared identifier: 'pFisica' [dcc32 Error] ACBrBoletoFCFortesFr.pas(629): E2003 Undeclared identifier: 'pJuridica' [dcc32 Error] ACBrBoletoFCFortesFr.pas(639): E2003 Undeclared identifier: 'MensagemCompensacao' [dcc32 Error] ACBrBoletoFCFortesFr.pas(639): E2066 Missing operator or semicolon [dcc32 Error] ACBrBoletoFCFortesFr.pas(652): E2003 Undeclared identifier: 'atSim' [dcc32 Error] ACBrBoletoFCFortesFr.pas(652): E2250 There is no overloaded version of 'IfThen' that can be called with these arguments [dcc32 Error] ACBrBoletoFCFortesFr.pas(677): E2030 Duplicate case label [dcc32 Error] ACBrBoletoFCFortesFr.pas(770): E2003 Undeclared identifier: 'pFisica' [dcc32 Error] ACBrBoletoFCFortesFr.pas(771): E2003 Undeclared identifier: 'pJuridica' [dcc32 Error] ACBrBoletoFCFortesFr.pas(803): E2003 Undeclared identifier: 'atSim' [dcc32 Error] ACBrBoletoFCFortesFr.pas(803): E2250 There is no overloaded version of 'IfThen' that can be called with these arguments [dcc32 Error] ACBrBoletoFCFortesFr.pas(838): E2003 Undeclared identifier: 'pFisica' [dcc32 Error] ACBrBoletoFCFortesFr.pas(839): E2003 Undeclared identifier: 'pJuridica' [dcc32 Fatal Error] uBoleto.pas(123): F2063 Could not compile used unit 'ACBrBoletoFCFortesFr.pas' Failed Elapsed time: 00:00:01.5 Vi que no Interfaces --> uses falta ACBrBoletoConversao, mas mesmo colocando a unit, ainda consta o erro: [dcc32 Error] ACBrBoletoFCFortesFr.pas(464): E2003 Undeclared identifier: 'fpAbout' [dcc32 Error] ACBrBoletoFCFortesFr.pas(639): E2003 Undeclared identifier: 'MensagemCompensacao' [dcc32 Error] ACBrBoletoFCFortesFr.pas(639): E2066 Missing operator or semicolon [dcc32 Fatal Error] uBoleto.pas(123): F2063 Could not compile used unit 'ACBrBoletoFCFortesFr.pas' Failed Elapsed time: 00:00:03.5
  16. TRodrigues_
    @Diego Foliene obrigado, o problema com provider foi resolvido. Agora aparece a seguinte msg de erro: --------------------------- bds.exe - Ponto de entrada não encontrado --------------------------- Não foi possível localizar o ponto de entrada do procedimento @Frxbarcode2drtti@initialization$qqrv na biblioteca de vínculo dinâmico D:\Projetos\Componentes\trunk\Delphi 10\Acbr\Lib\Delphi\LibD23\Win32\DCLACBr_NFeDanfeFR.bpl. --------------------------- OK --------------------------- Será algum problema com o FastReport? Tenho ele instalado e utilizo normalmente em outras situações.
  17. TRodrigues_
    Pessoal boa tarde! Fui instalar o acbr e ocorre o seguinte erro: Base\Provedores\ACBrNFSeXProviderManager.pas(110) Fatal: F2613 Unit '..\..\..\..\Fontes\ACBrDFe\ACBrNFSeX\Provedores\ISSCamacari.Provider.pas' not found. Como resolver? Att
  18. TRodrigues_

    Envio de Boletos AWS SES

    um tópico no fórum postou TRodrigues_ ACBrBoleto

    Bom dia Pessoal. Estou tendo problemas para autorizar chave ses no aws, retorna o seguinte erro: <ErrorResponse xmlns="http://ses.amazonaws.com/doc/2010-12-01/"> <Error> <Type>Sender</Type> <Code>SignatureDoesNotMatch</Code> <Message>The request signature we calculated does not match the signature you provided. Check your AWS Secret Access Key and signing method. Consult the service documentation for details.</Message> </Error> <RequestId>64b7ea46-b298-499f-ac54-883388df8e4c</RequestId> </ErrorResponse> Solicitação enviada: Host:email.us-east-1.amazonaws.com X-Amz-Date:20230125T134635Z Authorization:AWS4-HMAC-SHA256 Credential=AKIAW3PQ2JI6G7XXXXXX/20230125/us-east-1/ses/aws4_request,SignedHeaders=Host;X-Amz-Date,Signature=a7a4c072ed2d17cc7fda4e03a04096ce3244e8bf3ce8a2e18bdc13287853842f Alguém ja passou por esse problema, consegue me ajudar? Estou a 2 dias tentando resolver isso e nada. Acredito q o erro esta na solicitação
  19. TRodrigues_
    Como eu configuro o componente para não usar mais a libCapicom, o q tenho q mudar na tela abaixo
  20. TRodrigues_
    Juliomar boa tarde. Obrigado por responder... sim, já verifique a documentação e nela contem o Anexo VII que informa os grupos e campos que não podem ser alterados, e esse grupo e campo não consta no anexo VII, portanto acredito que possa sofrer alterações. Ainda continuo com o problema se souber outra forma para corrigir dados do xObs por favor me informe.
  21. TRodrigues_

    Rejeição Cce - Cte

    um tópico no fórum postou TRodrigues_ ACBrCTe

    Boa tarde galera, td joia? Estou tentando gerar uma carta de correção para alterar a observação de um CTe, mas da erro de rejeição informando que o campo [xObs] informado não existe, porem esse campo existe no cte, estou preenchendo os campos da seguinte forma: grupoalterado = 'compl' campoalterado='xObs' valoralterado = Texto nitemalterado = 1 onde estou errando? Desde já agradeço. Rodrigo Tavares
  22. TRodrigues_
    Não estou conseguindo instalar os componentes ACBR, não instalar automaticamente pelo ACBRInstall e nem manualmente. Esta ocorrendo varios erros em linhas de codigo do pacote da NFe e CTe. Utilizo os componentes a varios anos e é a primeira vez q não instala corretamente. Ocorreu alguma atualização recentemente?
  23. TRodrigues_
    Srs. boa noite. Estou tentando emitir um cte de complemento de valores que incluir varios ctes a ser complementado, informei todas as chaves dos ctes a ser complementado os campos da prestacao e os campos do imposto, porem no remetente ele fica pedindo que informe o documento (nfe, nf ou outro), tem que informar todas as Nfes referentes aos ctes que estou complementado? Desde ja agradeço pela atenção. Rodrigo Rodrigues
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...