Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

clube mobile


Cursos grátis para toda base ACBr
+ Promoção Clube Mobile para o ACBr Pro

Saiba mais

adriano santos

click.png

click.png

click.png

click.png

click.png

click.png

Larry

Membros
  • Content Count

    113
  • Joined

  • Last visited

Community Reputation

22 Excellent

1 Follower

About Larry

  • Rank
    Membro

Profile Information

  • Sexo
    Masculino
  • Location
    sp

Recent Profile Visitors

1,531 profile views
  1. Não precisa ter domínio não. O campo "Common Name" é opcional e você pode colocar qualquer coisa.
  2. Terminei o código para o button13 do teste que anexei (Consulta Lista de Boletos Inter) que ainda não estava pronto: procedure TForm1.Button13Click(Sender: TObject); var JsonStreamRetorno,JsonStreamEnvio: TStringStream; lista1:tstringlist; valor:real; texto:string; Parametros:string; begin Memo1.Clear; lista1:=tstringlist.create; JsonStreamRetorno := TStringStream.Create(''); lista1.text:='';//memo3.text; JsonStreamEnvio := TStringStream.Create(lista1.text); IdHttp1.Request.CustomHeaders.Clear; IdHTTP1.Request.CustomHeaders.Ad
  3. Ja fiz coisa muito parecida usando TRESTClient, TRESTRequest e TRESTResponse para outra api. Segue um trecho do código: RESTClient1.BaseURL:='url'; RESTRequest1.Method:=TRESTRequestMethod.rmPOST; RESTRequest1.Body.ClearBody; RESTRequest1.Body.Add('Content-Type:application/json'); RESTRequest1.Body.Add('Authorization: 13245'); RESTRequest1.Body.Add('Accept:application/json'); RESTRequest1.Body.Add('{'); RESTRequest1.Body.Add(' "sendSmsRequest": {'); ....... try RESTRequest1.Execute; jValue:=RESTResponse1.JSONValue; except on E:erestexce
  4. obs: se der erro no comando openssl.exe digita: set OPENSSL_CONF=C:\OpenSSL-Win32\bin\openssl.cfg
  5. Primeiro tem que criar os arquivo do certificado. No exemplo que vou postar tem que colocar no formcreate o numero da conta e o caminho de 3 dos arquivos criados. No memo3 tem que substituir alguns campos com os dados corretos: 1) Crie o aplicativo dentro do banco Inter a) Digite o seguinte comando no console (evite acentos): openssl req -new -newkey rsa:2048 -nodes -keyout nomearquivo.key -out nomearquivo.csr b) Nos campos solicitados, insira as informações: Country Name (código do país): as duas letras que representam o país internacionalmente. Ex: BR é
  6. Consegui fazer inclusão, consulta e download pdf com a api do Inter. Se aguem quiser me avisa que faço um passo a passo.
  7. Larry

    Consumo indevido

    Boa tarde, Desde ontem estou com vários cliente recebendo a mensagem de consumo indevido ao emitir a nf-e. Faço a consulta ao status de serviço apenas ao emitir a primeira nfe. E após a emissão não faço consulta do status da nfe. Alguém sabe o que poderia ser?
  8. É para gerar o xml em um computador e enviar para outro computador imprimir o sat.
  9. Bom dia, Segue os arquivos anexado. O arquivo "arqcfe.xml" contem um xml com a tag ICMS preenchida e após os comandos abaixo o arquivo "novocfe.xml" é criado com a tag ICMS vazia: ACBrSAT1.CFe.Clear; //ACBrSAT1.InicializaCFe; ACBrSAT1.CFe.LoadFromFile('c:\teste\arqcfe.xml'); ACBrSAT1.CFe.GerarXML(True); ACBrSAT1.CFe.SaveToFile('c:\teste\novocfe.xml'); Observação: se a linha do InicializaCFe for descomentada a tag do ICMS é gerada com os dados originais preenchidos. arqcfe.xml novocfe.xml
  10. Eu salvo o xml em disco ou no banco de dados antes de enviar e posteriormente carrego esse xml para enviar ao sat. Só que ao carregar o xml se eu não utilizar a função InicializaCFe, quando executo a função GerarXML a tag do ICMS fica vazia.
  11. Bom dia, Percebi um problema na seguinte situação: - Se eu gerar o xml e em seguida rodar um ACBrSAT1.CFe.GerarXML(True) ocorre tudo bem - Porem se antes do "GerarXML" eu fizer um ACBrSAT1.CFe.SaveToFile, depois um ACBrSAT1.CFe.Clear e depois um ACBrSAT1.CFe.LoadFromFile a tag ICMS esta preenchida, mas ao rodar o GerarXML a tag ICMS fica vazia. A propriedade Config.Emit_cRegTrib foi preenchida corretamente. E se antes do LoadFromFile e rodar um ACBrSAT1.InicializaCFe funciona normalmente. Então é por causa do InicializaCFe mesmo?
  12. Boa dia, nada pelo jeito, segue informação da pagina deles: Importante: Para ter acesso a API Informações de Produtos a empresa precisa ser associada à GS1 Brasil ou ter sido indicada por alguma associação parceira. Caso tenha dúvidas, entre em contato com [email protected]
  13. Quero mudar sim, só preciso uma impressora empresta para testar. Obrigado.
  14. E antes de imprimir o cupom sat usando o ACBrSATExtratoFortes se eu ler printers.Printer.PageWidth recebo 2892 e após o cupom sat recebo 893. OBS: neste caso o teste foi em uma impressora jato de tinta configurada para papel A4.
  15. Tive o mesmo problema: Após imprimir o cupom sat usando o ACBrSATExtratoFortes, se eu imprimir um relatório logo em seguida usando o quickreport funciona normalmente. Mas se eu imprimir um cupom sat usando o ACBrSATExtratoFortes e logo em seguida imprimir um relatório direto na porta (writeln) fica tudo pequeno. Resolvi o problema fazendo um quickreport1.prepare num relatório em branco após a impressão do cupom sat.
×
×
  • Create New...