Ir para conteúdo
  • Cadastre-se

UEMERSON NEGREIRO DA SILVA

Membros
  • Total de ítens

    37
  • Registro em

  • Última visita

Últimos Visitantes

1.599 visualizações

UEMERSON NEGREIRO DA SILVA's Achievements

Contributor

Contributor (5/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

2

Reputação

2

Community Answers

  1. Boa Tarde.. estou tendo esse Problema ao CriarCobrancaImediata.. qual o procedimento a ser seguido ? já Criei os Client ID, Client Secret, Developer
  2. Ok.. já entrei em contato com o Suporte Técnico do Órgão.. Muito Obrigado
  3. Sim https://colegionotarialdobrasil.freshdesk.com/support/solutions/articles/43000585342-ccn-documentacão-técnica
  4. Bom dia Pessoal estou com a seguintes duvidas.. Tenho que consumir uma API de um determinado Orgão.. Esse seria a integração do a API curl --location --request POST 'https://pessoas-hml.e-notariado.org.br/api/uploads' \ --header 'X-Api-Key: your-app|xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx' \ --form 'file=@/C:/CCN27052020-10.xml' \ --form 'name=CCN27052020-10.xml' \ --form 'contentType=text/xml' Estou tentando montando dessa forma var restClient: TRESTClient; restRequest: TRESTRequest; restResponse: TRESTResponse; begin restClient := TRESTClient.Create(nil); // restClient.Authenticator := HTTPBasicAuthenticator1; // restClient.ContentType := 'application/json'; restRequest := TRESTRequest.Create(restClient); restResponse := TRESTResponse.Create(restClient); try try if wsProxyServer <> '' then begin restClient.ProxyServer := wsProxyServer; restClient.ProxyPort := piProxyPort; restClient.ProxyUsername := wsProxyUsername; restClient.ProxyPassword := wsProxyPassword; end; restClient.BaseURL := edtUploadEndPoint.text; // ==> //'https://pessoas-hml.e-notariado.org.br/api/uploads'; restRequest.Client := restClient; restRequest.Method := rmPOST; RESTRequest.Resource := ''; restRequest.Response := restResponse; restRequest.Params.Add; restRequest.Params[0].ContentType := ctAPPLICATION_X_WWW_FORM_URLENCODED; restRequest.Params[0].Kind := pkURLSEGMENT; restRequest.Params[0].Name := 'X-Api-Key'; restRequest.Params[0].Value :=edtKey.Text; restRequest.Params.Add; restRequest.Params[1].ContentType := ctAPPLICATION_X_WWW_FORM_URLENCODED; restRequest.Params[1].Kind := pkFILE; restRequest.Params[1].Name := 'file'; restRequest.Params[1].Value :=edtFile.text; restRequest.Params.Add; restRequest.Params[2].ContentType := ctAPPLICATION_X_WWW_FORM_URLENCODED; restRequest.Params[2].Kind := pkREQUESTBODY; restRequest.Params[2].Name := 'name'; restRequest.Params[2].Value := ''+EdtNomeArq.Text; restRequest.Params.Add; restRequest.Params[3].ContentType := ctAPPLICATION_X_WWW_FORM_URLENCODED; restRequest.Params[3].Kind := pkREQUESTBODY; restRequest.Params[3].Name := 'contentType'; restRequest.Params[3].Value := 'text/xml'; restRequest.Execute; result := restResponse.Content; except on e: Exception do begin result := 'Erro retornado pelo webservice: '+ e.Message + ' XML: ' + restResponse.Content; end end; finally restClient.Free; end; Ele me retorno o erro 'HTTP/1.1 401 Unauthorized'. O que poderia estar dando de errado ?
  5. Bom dia.. Gostaria de Saber como que faço para assinar arquivo como PDF, jpeg etc ? Pelo acbr tem como Fazer /
  6. Sim e uma particularidade minha... Você poderia me ajudar ?
  7. O xml eu já estou conseguindo assinar ele.... já o PDF que esta meio complicado... Talvez você possa me ajudar Juliomar.. eu estou usando esse Código para poder assinar o PDF... Só que o Validador de assinatura diz que o documento não foi assinado... function TFCenprot.assinar(caminho: string): string; var fs : TFileStream; qt : integer; ch : PChar; msg, content : WideString; SignedData : ISignedData; ISigner : ISigner2; begin { Abre o arquivo original para obter dele o conteúdo a ser assinado } fs := TFileStream.Create (caminho, fmOpenRead); New (ch); repeat qt := fs.Read(ch^, 1); if (qt > 0) then content := content + ch^; until qt = 0; fs.Free; Dispose (ch); if(Certificado = nil) Then buscaceritifcado; ISigner := CoSigner.Create; ISigner.Certificate := Certificado; SignedData := CoSignedData.Create; SignedData.Content := content; msg := SignedData.Sign(ISigner, true, CAPICOM_ENCODE_BASE64 ); fs := TFileStream.Create ('C:\XML\13112019144_Ass.pdf', fmCreate); for qt := 1 to Length (msg) do fs.Write(msg[qt], 2); fs.Free; end;
  8. Bom dia como que faço para assinar Documentos em PDF e XML ?
  9. Boa Tarde.... Eu estou desenvolvendo uma aplicação que vai assinar xml atraves do certificado digital.... eu estou usando a dll CAPICOM... só que esta dando esse erro " Undeclared identifier: 'TSigner' " alguém poderia me ajudar fazendo um favor.. Já declarei na Uses CAPICOM_TLB ,WinINet, JwaWinCrypt Desde já agradeço
  10. Boa tarde o WebService está me retornando este erro "Nao existe licenca valida para este sistema ou a licenca expirou!" Seria Algum problema no Cadastro da empresa o qual o sistema esta rodando ?? Alguém poderia me dar uma dica
  11. Bom dia Estou com dificuldades com relação aos arquivos "Xsd" da pasta Schema para poder fazer a validadeção do xml de nota de serviço.. Onde encontrar sendo o que tem na pasta da Abaco não estão todos conforme mostra a imagem.. Grato Uemerson
  12. Mas isso só esta acontecendo com a empresa que é "3 - Regime Normal" na "1 - Simples Nacional" ele envia de boa... Ou será que a empresa esta com algum problema....
  13. Boa Tarde ao tentar enviar uma nota fiscal de produto esta dando este erro abaixo...... Nota(s) não confirmadas: 73->Rejeicao: Erro nao catalogadoInvalid XPath expression: 'null'. Caused by: null mas o xml e gerado mas não envia como o xml ja esta tudo OK.... O que seria ?? Aguem poderia me dar umas dicas de como proceder...
×
×
  • 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.