Ir para conteúdo
  • Cadastre-se

dev botao

Acbrsat + D-Sat(Dimep)


netstart
  • Este tópico foi criado há 3386 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

O que pude ver a principio pelo aplicativo que estou fazendo, os dados da Dimep são:

 

CNPJ desenvolvedor: 16716114000172
CNPJ contribuinte: 61099008000141
Assinatura: SGR-SAT SISTEMA DE GESTAO E RETAGUARDA DO SAT
Codigo de Ativação: 123456789
 
Declaração de Funções:  (Algumas)
 
    function TesteFimAFim(numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; dadosVenda : PAnsiChar) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function AtivarSAT( numeroSessao: Longint; subComando : Longint; codigoDeAtivacao: PAnsiChar; CNPJ: PAnsiChar; cUF : Longint ) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function EnviarDadosVenda(numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; dadosVenda : PAnsiChar) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function CancelarUltimaVenda(numeroSessao : Longint; codigoAtivacao: PAnsiChar; chave: PAnsiChar; dadosCancelamento : PAnsiChar) : PAnsiChar ; stdcall;  External 'dllsat.dll';
    function ConsultarNumeroSessao(numeroSessao : Longint; cNumeroDeSessao : Longint) : PAnsiChar ; stdcall;  External 'dllsat.dll';
    function ConsultarStatusOperacional( numeroSessao : Longint; codigoDeAtivacao : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function ExtrairLogs( numeroSessao : Longint; codigoDeAtivacao : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function BloquearSAT( numeroSessao : Longint; codigoDeAtivacao : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
    function DesbloquearSAT( numeroSessao : Integer; codigoDeAtivacao : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
 
    function TrocarCodigoDeAtivacao( numeroSessao : Longint; codigoDeAtivacao : PAnsiChar; opcao : Longint; novoCodigo : PAnsiChar; confNovoCodigo : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
 
    function AssociarAssinatura( numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; CNPJvalue : PAnsiChar; assinaturaCNPJs : PAnsiChar ) : PAnsiChar ; stdcall; External 'dllsat.dll';
 
    function ConsultarSAT( numeroSessao : Longint ) : PAnsiChar ; stdcall; External 'dllsat.dll';

 

 

 

 

Estão funcionando, por exemplo:

 

Consulta SAT:

 

  Retorno.Clear;
  wResultado:=ConsultarSAT(Random(999999));
  retorno.lines.add(wResultado);
 
 
Consulta Estado Operacional:
 
  Retorno.Clear;
  wResultado:= ConsultarStatusOperacional(Random(999999),PAnsiChar('123456789'));
  retorno.lines.add(wResultado);
 
Extrair Logs:
 
  Retorno.Clear;
  wResultado:= ExtrairLogs(Random(999999),PAnsiChar('123456789'));
  retorno.lines.add(wResultado);
 
 
Ativar Sat:
 
  Retorno.Clear;
  wResultado:=AtivarSAT(Random(999999),1,PAnsiChar('123456789'),PAnsiChar('61099008000141'),35);
  retorno.lines.add(wResultado);
 
Enviar Venda:
 
var
 wCaminho,wVenda:string;
begin
 
 
   If OpenDialog.Execute = True Then wCaminho:=OpenDialog.FileName;
 
   DadosVenda.Clear;
   DadosVenda.Lines.LoadFromFile(wCaminho);
   wVenda:=DadosVenda.Text;
 
   wVenda:=StringReplace(wVenda, #39, '"', [rfReplaceAll, rfIgnoreCase]);
 
   wResultado:=EnviarDadosVenda(Random(999999),PAnsiChar('123456789'),PAnsiChar(wVenda));
 
  retorno.lines.add(wResultado);
 
 
Teste Fim a Fim:
 
var
 wXML:String;
 wConta:Integer;
begin
 
 
  Retorno.Clear;
  wResultado:= TesteFimAFim(Random(999999), PAnsichar('123456789'), PAnsiChar(DadosVenda.Text));
  retorno.lines.add(wResultado);
 
 
 
 
Porem as funções EnviarDadosVenda e TesteFimAFim retornão erro 1999 (Segundo o Marlus da Dimep é erro de Estrutura de XML) porem o XML é o que eles mandam mesmo e que
valida na aplicação de exemplo deles.
 
Enviei um email para o mesmo analisar o XML e a estrutura para verificar e ficou de me responder.. Vou aguardar.
Link para o comentário
Compartilhar em outros sites

O erro que sempre retorna ao passar o XML:  013018|06010|1999|Rejeição: Erro não identificado|||

 

Segundo o Marlus, pode ser que a função esta passando como PAnsiChar como segue abaixo:

 

function EnviarDadosVenda(numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; dadosVenda : PAnsiChar) : PAnsiChar ; stdcall; External 'dllsat.dll';

 

 

E o Sat Aceita o arquivo codificado como UTF8, por isso ele da problema na estrutura do XML...  Mas estou na luta tentando efetuar a conversão para

UTF8 mas ainda não tive resultados, deu o mesmo erro....

 

   wVenda:=UTF8Encode(wVenda);
   wResultado:=EnviarDadosVenda(Random(999999),PAnsiChar('123456789'),wVenda);
 
E na função declarei como String ao invés de PAnsiChar.  
 
Alguem tem alguma dica?
Link para o comentário
Compartilhar em outros sites

Ai galerinha fiz algumas mudanças e deu certo a questão do PAnsiChar e UFT8Encode: Segue como ficou.

 

Alterei a chamada da Função para:
 
function EnviarDadosVenda(numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; dadosVenda : UTF8String) : PAnsiChar ; stdcall; External 'dllsat.dll';
 
 
E na passada da Função:
 
   wResultado:=EnviarDadosVenda(Random(999999),PAnsiChar('123456789'),UTF8Encode(wVenda));
 
E deu certo.
 
 
Ele retorna Criptografado com Base64, a partir dai é descriptografar e gerar o XML e o QRCode para geração da impressão... Preciso tratar as demais funções que recebem o texto do XMl para UTF8 tmb.
Mas a ideia é a mesma...
 
Só lembrando que não estou utilizando componente algum do ACBR, mas em teoria até mesmo para o ACBR a ideia é a mesma.
 
Retorno:
 
114542|06000|0000|Emitido com sucesso + conteúdo notas|||PENGZT48aW5mQ0ZlIElkPSJDRmUzNTE0MTE2MTA5OTAwODAwMDE0MTU5OTAwMDAwOTczMDAwMDEzMjU0MjkxMCIgdmVyc2FvPSIwLjA2IiB2ZXJzYW9EYWRvc0VudD0iMC4wNiIgdmVyc2FvU0I9IjAxMDAwMCI+PGlkZT48Y1VGPjM1PC9jVUY+PGNORj4yNTQyOTE8L2NORj48bW9kPjU5PC9tb2Q+PG5zZXJpZVNBVD45MDAwMDA5NzM8L25zZXJpZVNBVD48bkNGZT4wMDAwMTM8L25DRmU+PGRFbWk+MjAxNDExMTk8L2RFbWk+PGhFbWk+MTYxNjAxPC9oRW1pPjxjRFY+MDwvY0RWPjx0cEFtYj4yPC90cEFtYj48Q05QSj4xNjcxNjExNDAwMDE3MjwvQ05QSj48c2lnbkFDPlNHUi1TQVQgU0lTVEVNQSBERSBHRVNUQU8gRSBSRVRBR1VBUkRBIERPIFNBVDwvc2lnbkFDPjxhc3NpbmF0dXJhUVJDT0RFPmJKdUgyR2E5ZFYrZXd1RzkwYnlNcEhaOGhPczBreHZIZzlpME9nVXAvMVA0UytSemlrazdXYWtSS0ZqSXF6cWJ6MWxnNWwxbFNsR0ZXMzhYdzJqMlkvTktCNmFjUmNjbG9xYXhKLzQrajgwVUtWc0MwRzl3MmdGMTRYNEpCVzk4djIyV01ZcDV5RmNkK0tGVXMydWIxajAyTlprSjBSQllpRXVEbTlxNWdxM0YrbWhlRDk3dTJvSUJVOERldHhTSXEzcUR0YjdmMTVraTljZThldDhBN2FxaHU5SkI3cWh0dUI3N3h3TG43Um0rYzVuQ05UanB0RDlSN09helRSTTArMDNGcGRKRXlBY3EvV0dpelY0b3lRSE1xTGxqR2FFOW5HRGpicXl3ZzVTdWJwb3pTYlJPTHJBRTF6VnJ6UHJyUzV1UCtjR2xMaW5zM0FQQUNyTVZwUT09PC9hc3NpbmF0dXJhUVJDT0RFPjxudW1lcm9DYWl4YT4xMTU8L251bWVyb0NhaXhhPjwvaWRlPjxlbWl0PjxDTlBKPjYxMDk5MDA4MDAwMTQxPC9DTlBKPjx4Tm9tZT5ESU1BUyBERSBNRUxPIFBJTUVOVEEgU0lTVEVNQVMgREUgUE9OVE8gRSBBQ0VTU08gTFREQTwveE5vbWU+PHhGYW50PkRJTUVQPC94RmFudD48ZW5kZXJFbWl0Pjx4TGdyPkFWRU5JREEgTU9GQVJSRUo8L3hMZ3I+PG5ybz44NDA8L25ybz48eENwbD45MDg8L3hDcGw+PHhCYWlycm8+VkwuIExFT1BPTERJTkE8L3hCYWlycm8+PHhNdW4+U0FPIFBBVUxPPC94TXVuPjxDRVA+MDUzMTEwMDA8L0NFUD48L2VuZGVyRW1pdD48SUU+MTExMTExMTExMTExPC9JRT48SU0+MTIzMTIzPC9JTT48Y1JlZ1RyaWI+MzwvY1JlZ1RyaWI+PGNSZWdUcmliSVNTUU4+MTwvY1JlZ1RyaWJJU1NRTj48aW5kUmF0SVNTUU4+TjwvaW5kUmF0SVNTUU4+PC9lbWl0PjxkZXN0PjwvZGVzdD48ZGV0IG5JdGVtPSIxIj48cHJvZD48Y1Byb2Q+MDE8L2NQcm9kPjx4UHJvZD5DYXJuZTwveFByb2Q+PENGT1A+NTAwMDwvQ0ZPUD48dUNvbT51bjwvdUNvbT48cUNvbT4xLjAwMDA8L3FDb20+PHZVbkNvbT4yLjEwMDwvdlVuQ29tPjx2UHJvZD4yLjEwPC92UHJvZD48aW5kUmVncmE+QTwvaW5kUmVncmE+PHZJdGVtPjIuMTA8L3ZJdGVtPjwvcHJvZD48aW1wb3N0bz48SUNNUz48SUNNUzAwPjxPcmlnPjA8L09yaWc+PENTVD4wMDwvQ1NUPjxwSUNNUz41LjAwPC9wSUNNUz48dklDTVM+MC4xMDwvdklDTVM+PC9JQ01TMDA+PC9JQ01TPjxQSVM+PFBJU0FsaXE+PENTVD4wMTwvQ1NUPjx2QkM+Mi4xMDwvdkJDPjxwUElTPjEuMDAwMDwvcFBJUz48dlBJUz4yLjEwPC92UElTPjwvUElTQWxpcT48L1BJUz48UElTU1Q+PHZCQz4xLjEwPC92QkM+PHBQSVM+MS4wMDAwPC9wUElTPjx2UElTPjEuMTA8L3ZQSVM+PC9QSVNTVD48Q09GSU5TPjxDT0ZJTlNBbGlxPjxDU1Q+MDE8L0NTVD48dkJDPjEuMDA8L3ZCQz48cENPRklOUz4xLjAwMDA8L3BDT0ZJTlM+PHZDT0ZJTlM+MS4wMDwvdkNPRklOUz48L0NPRklOU0FsaXE+PC9DT0ZJTlM+PC9pbXBvc3RvPjwvZGV0Pjx0b3RhbD48SUNNU1RvdD48dklDTVM+MC4xMDwvdklDTVM+PHZQcm9kPjIuMTA8L3ZQcm9kPjx2RGVzYz4wLjAwPC92RGVzYz48dlBJUz4yLjEwPC92UElTPjx2Q09GSU5TPjEuMDA8L3ZDT0ZJTlM+PHZQSVNTVD4xLjEwPC92UElTU1Q+PHZDT0ZJTlNTVD4wLjAwPC92Q09GSU5TU1Q+PHZPdXRybz4wLjAwPC92T3V0cm8+PC9JQ01TVG90Pjx2Q0ZlPjIuMTA8L3ZDRmU+PC90b3RhbD48cGd0bz48TVA+PGNNUD4wMTwvY01QPjx2TVA+MzMuMDA8L3ZNUD48L01QPjx2VHJvY28+MzAuOTA8L3ZUcm9jbz48L3BndG8+PC9pbmZDRmU+PFNpZ25hdHVyZSB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC8wOS94bWxkc2lnIyI+PFNpZ25lZEluZm8geG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvMDkveG1sZHNpZyMiPjxDYW5vbmljYWxpemF0aW9uTWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvVFIvMjAwMS9SRUMteG1sLWMxNG4tMjAwMTAzMTUiPjwvQ2Fub25pY2FsaXphdGlvbk1ldGhvZD48U2lnbmF0dXJlTWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvMjAwMS8wNC94bWxkc2lnLW1vcmUjcnNhLXNoYTI1NiI+PC9TaWduYXR1cmVNZXRob2Q+PFJlZmVyZW5jZSBVUkk9IiNDRmUzNTE0MTE2MTA5OTAwODAwMDE0MTU5OTAwMDAwOTczMDAwMDEzMjU0MjkxMCI+PFRyYW5zZm9ybXM+PFRyYW5zZm9ybSBBbGdvcml0aG09Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvMDkveG1sZHNpZyNlbnZlbG9wZWQtc2lnbmF0dXJlIj48L1RyYW5zZm9ybT48VHJhbnNmb3JtIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvVFIvMjAwMS9SRUMteG1sLWMxNG4tMjAwMTAzMTUiPjwvVHJhbnNmb3JtPjwvVHJhbnNmb3Jtcz48RGlnZXN0TWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvMjAwMS8wNC94bWxlbmMjc2hhMjU2Ij48L0RpZ2VzdE1ldGhvZD48RGlnZXN0VmFsdWU+UDQ0MEJiSUoyZldROThiK2xkTHdJZ0dYR1JBcVNTWElvMlJCSkx4MEd0UT08L0RpZ2VzdFZhbHVlPjwvUmVmZXJlbmNlPjwvU2lnbmVkSW5mbz48U2lnbmF0dXJlVmFsdWU+Z3B6c2xhMHhVZ3F5QWxXN21hTGM3bGZGaHg1YVp6M0FnNml5NWF5M3E2djR0MG9RTnhvcHphNEwxQnV5U2FRS0lNUHczRWZmeEljSmNQT1ZRSGN0N1VKOHhLbjVhd0NCVzBsV3VDZlQ2MjJXL2lWRFBGRlpQSnJEa0xnZk5lT3FoK3U4eGdNQ2lJZHRDdEluQW0wcys3UVE2MktiSEdSUnVTSnAwTDZmdy9EdWF1WVNqa3hBeVFvN2p0T3pUY1JianJyKzJjU3pURVhZQ1VpYlVCckhLV3g1K0NNR3BJRVZsWG10Rjk0U3J3WkhZcHI1a1dUNzZkMGl3V3pLTE9SYUhZcWRyTlUreW1zczNSUXhGNkg4WUtCRmVyWWtEMXhxeVNERzdKMTNzVXdHWUNnZ2xWK3ZsWGtJUGNkU0tEVktTVEV0dVZjWStsT0J3b25NSDduY3pRPT08L1NpZ25hdHVyZVZhbHVlPjxLZXlJbmZvPjxYNTA5RGF0YT48WDUwOUNlcnRpZmljYXRlPkxTMHRMUzFDUlVkSlRpQkRSVkpVU1VaSlEwRlVSUzB0TFMwdERRcE5TVWxITm1wRFEwSk9TMmRCZDBsQ1FXZEpVV1pKU3psTlRVcG9abmd5Ukd0T1FVcE5aa2xsVW5wQlRrSm5hM0ZvYTJsSE9YY3dRa0ZSYzBaQlJFSnVEUXBOVVhOM1ExRlpSRlpSVVVkRmQwcERWV3BGTVUxRVRVZEJNVlZGUTJoTmMxVXlWbXBqYlZZd1dWaEtjRmxUUW10WlUwSkhXVmh3YkdKdFVtaEpSMUoyRFFwSlJWWjZaRWRHYTJKNVFtdGFVMEpVV1ZjNFoxVkhSakZpUnpoNFNWUkJaa0puVGxaQ1FVMVVSMFZHUkVsR1RrSldRMEpyV2xOQ1ZWcFlUakJhVTBKVURRcFNWVnBDVjJsQ1ZGVkVRV1ZHZHpCNFRrUkZlRTFFVVhkTlJFRjNUVVJDWVVaM01IaFBWRVY0VFVSSmVVMTZWVFZPVkd4aFRVbEliazFSYzNkRFVWbEVEUXBXVVZGSFJYZEtRMVZxUlZOTlFrRkhRVEZWUlVOQ1RVcFZNa1oyU1VaQ2FHUlhlSFpOVWtWM1JIZFpSRlpSVVV0R1FXaFVVbFZhUWxkcE1WUlZSRVZRRFFwTlFUQkhRVEZWUlVONFVVZFJWVTEwVlRCR1ZVMVRaM2RLWjFsRVZsRlJURVpDT1VKa1dGSnNZbTVTY0ZreVJtdGllVUozWWpOSloxRldTV2RWTUZaSERRcFJWbTluVlRGQloxVXdSbFZOVW5kM1IyZFpSRlpSVVV4R1FrMTRUa1JGTVUxVVJUTlBSR04zVFZSQk0wMXFVVFZPVkZGNVRWSkpkMFZCV1VSV1VWRkdEUXBGZDJzMVRVUkJkMDFFUVRWT2VrMTRVa1JDUTBKblRsWkNRVTFVVHpCU1NsUlZSbFJTUlZaT1VsVjRVRlZGYkU1U1ZUVlZVVlpPU2xVeFVrWlVWVVpVRFFwU1JWWlJWREExVlZRd1ZrSlJNRlpVVlRBNVRWWkZVa0pQYWxsNFRVUnJOVTFFUVRSTlJFRjNUVlJSZUUxSlNVSkpha0ZPUW1kcmNXaHJhVWM1ZHpCQ0RRcEJVVVZHUVVGUFEwRlJPRUZOU1VsQ1EyZExRMEZSUlVGclJGTk9ObE5sUjBWbmNHZFRkbTE1V2toMmRsaDBiME4wUkZJNFltRTBNRTFwVWtOckswcG9EUXBCVTB0Q1oycHpTREZPYjFSS1dYTk5VSGcwU2l0SFdsZzFPSFJ6TUUxWVlWVXlla3RpWVM5RWVqTlVXazVKYXpndmNIUk9ibVI0VG5wRVJtNVpXamhyRFFwdlkwaGpiSFYxWmsxbk9IVmFhRWg0Tm5GemJua3lOR2s0TDJsMU0xWkxLM2x5VUZkSlVYVktSVTUzY1VwUVZYbDRWMHc0TWk5UVRFNXVLMWQzVTNBMERRcHBZakpuVldGbGFHZG1URzFUUTJKdVlVSkpOWEF3UTJGUFkybFhSemRPWWpaMVV6STFNMU41Vm1GVWNFRktUV2d3UjJWMlRVcE9SMUpZTWtoaVl6WkJEUW8yVW1sNFVFdEdTVlJzTjJ0RmNWQm9VRFZ2TlVwMVJXWnRLMGx4UldoSWVtTlpjbTVqVW14U1N6UlNWbUZWYUhCWFlXUnVRVGx1VlRZNGFIVkdVbGR6RFFveU5WbGxSSFZJVG5OdGFqaG9Za0p1WjNveFNVcEhMM1p0TmxaWmJtMVhLME1yYVZwcFlYZENkSGhsTkZGM1NVUkJVVUZDYnpSSlEwUjZRME5CWjNOM0RRcEtRVmxFVmxJd1VrSkNNSGRITmtGYVFtZFdaMVJCUlVSQk5rRlJRa0UwTWsxVVFUVlBWRUYzVDBSQmQwMUVSVEJOVkVGS1FtZE9Wa2hTVFVWQmFrRkJEUXBOUVRSSFFURlZaRVIzUlVJdmQxRkZRWGRKUmpSRVFXWkNaMDVXU0ZOTlJVZEVRVmRuUWxOUFQxVkZRVmhRU3pSQ1pIRnZZbHBwTlVGVlduUmliVkJtRFFwQmFrSnlRbWRPVmtoU09FVmFSRUpwVFVkRFoxaHhRbU5vYkhCdlpFaFNkMDlwT0haWlYwNTZXVmhSZEdSSFZucGtSMVYxWVZjeGQyTnRWblZqTWtaMkRRcGFiV3hxWVZkR2MweHRUblppVXpWcFkyazVlVnBZUW5aak1td3dZak5LY0dKNU9YTlpNMGwyV1ZkT2VsbFlVbnBhVjFwb1pXNU9kMHd5Um1wak1rWXdEUXBqTWxadFdWaHdlbU5IVG5saVF6VnFZMjEzZDJWM1dVUldVakJuUWtoUmQyTnFRbmRDWjJ0eVFtZEZSVUZaU0hOTVVVMTNXWHBDYUVKblozSkNaMFZHRFFwQ1VXTkRRVkphVm1GSVVqQmpSRzkyVERKR2FtTXlSakJNYld4MFkwaEtiR0p1VG1oaU1scHdXVEpzYUdKRE5XcGlNakIxV1c1SmRtTnRWbmRpTTA1d0RRcGtSemw1WVZjNGRscElRbXBNTWtacVl6SkdNR015Vm0xWldIQjZZME01YTJOSFRtWlpWMDU2V1ZoU2VscFhXbWhsYms1M1RHNUNhMXBxUVZSQ1owNVdEUXBJVTFWRlJFUkJTMEpuWjNKQ1owVkdRbEZqUkVGcVEwSndkMWxKUzNkWlFrSlJWVWhCVVVWRloxcHZkMmRhWTNkWWQxbEpTM2RaUWtKUlZVaE5RVXRIRFFwVk1tZ3daRWhDZWs5cE9IWlpWMDU2V1ZoUmRHUkhWbnBrUjFWMVlWY3hkMk50Vm5Wak1rWjJXbTFzYW1GWFJuTk1iVTUyWWxNMWFXTnBPWGxhV0VKMkRRcGpNbXd3WWpOS2NHSjVPV3BhV0Vvd1lWZGFjRmt5Um10aU0wMTJXVmRPZWxsWVVYUmtSMVo2WkVkVmRXTkVaR3BOUkZGSFEwTnpSMEZSVlVaQ2VrRkNEUXBvYVdodlpFaFNkMDlwT0haaU1rNTZZME14ZDJGWGVIWmtRelZ3WWxoQ2VWcFhOWHBaVnpsdFlWZE9jRmxYZDNWWk1qbDBURzFLZVUxQk1FZERVM0ZIRFFwVFNXSXpSRkZGUWtOM1ZVRkJORWxEUVZGRGVteHhSa1ZOU1hCRGFGTjJMMWRwYUdSUFUxQXdiRFpKUkVKdFFYbExiVmREYXpSTE5tc3ZhRTlrVVZCRURRcGxUMk5PTTNCelZHbGtNSHBqV1dkUGJYSndSVkl4U0c1SU5VNXBUVk5vYmtKa2JsaDNNMWgwYzJSSk9URkNNakV6U0ZKNVEyUk9UWEU0UjNsS2JuWnJEUXB1VkdGdFZtNTBhM1l6VEcxdlZ6WkJTa3BRZURSRlpFTkJlVTB3YUVsTU1VeHhUbGRWTUc5VGNFeENPV3N2TWpCc2NFVllaVkIwVWs1dWNXeEZOMkZURFFwd1dIWlVXVzlrZUZOcFVGSXpjVFkxWlZaMlpsWkNVemx4SzJoYUwzWmxTMVZHVERoRmNXbElkRlZWTW1wNlVteFZXSEJxT1haM2Npc3liRE5KYUVVM0RRb3JXRnBRVG1GSlZYZHZhMk5zTWsxMVUyWldNVkEzUm5GM1dFZGlWMGhPYUdwNWRrWk9TVGw2U2xacVExbFFhM2g1YjI1WGRsSjRiakpXU1RGb1pqVnpEUXBoVVhwdFNIWjFjWGxtTm5kaVVrVm9iMVJzZDBFek9FZHFhemcyUzA1NmIxQlhaakJPVDJKU2JuUnhaWGQ2WVVacU9Ya3JOM3ByWjJzMlRsVnZSbXhFRFFwbFoyeFNZMDFSZEM5MVpsY3laVmR2Tm5ScGIyOXdlbTVXVUdGelQwMXpNR3BaVUZKdmVuSkdXSEI0VVRaV2JscHdZbFJhYlhoYVRpOVpRWE1yUldoMURRcFFiRFIwTTNvelZUWXpOeTlVV21sS1VsaFFiekl6UTNodFEySmFlR3RYV210cVdXbDJSakV5TXk5cGFWUnNVbEJDTlVKYU4wMHlWWE5YVmtocGIybG9EUW95UTJNeldXODBOMjlrUjBkSE4wVkRZVXgwUmtOd2QwWkNUSE5PYmtrMmIyb3hlRzVMU0VGWlNrUndkMWt4TURjdlpEQmtZMWszTjBWRGVXeEVaRmhZRFFvdlRqUTFZazB6SzA5WFkycGFVbFZxUmtNMldEbFpjVnBITVdSS2FqSnFjM1J6UW1VNGVDOUNWVmR0U3pjek1rRXdTV1prWWxkSVVFUnJRVFV4WVVoRURRcDVVMlJXU0hkRmRETlBhV0ZSU0VKTE9FMXNSV2RCTkRoa1JIZEZOM2hGVTFSMk9XSmphVkpCZGpRd2RXODBSRGhXYWtNNU9VazVkekZpYldJM1p6MDlEUW90TFMwdExVVk9SQ0JEUlZKVVNVWkpRMEZVUlMwdExTMHREUW90TFMwdExVSkZSMGxPSUVORlVsUkpSa2xEUVZSRkxTMHRMUzBOQ2sxSlNVY3hha05EUWt3MlowRjNTVUpCWjBsUlVXdDBWMGw2V2tzclUxcE5kQ3R3TVdoUmQyTmFWRUZPUW1kcmNXaHJhVWM1ZHpCQ1FWRXdSa0ZFUTBJTkNtcEVSVXhOUVd0SFFURlZSVUpvVFVOUmJFbDRUbFJCZWtKblRsWkNRVzlVVEVaT2JGa3pTbXhrUjBaNVlWZEZaMXBIUldkU2JVWTJXbGMxYTFsVFFtc05DbUo1UWtaak0xSm9Xa2M0WjFwSFZXZFZNa1oyU1VaQ2FHUlhlSFpOVlZsM1VrRlpSRlpSVVVSRmVqRkNVWGxDVTFsWGJEWkpSMUpzU1VaU2JHTXpVbXdOQ2tsR1RteFpNMHBzWkVkR2VXRlhSV2RhUjBWblVtMUdObHBYTld0WlUwSnJZbmxDUm1NelVtaGFSemhuV2tkVloxVXlSblpKUmtKb1pGZDRkazFDTkZnTkNrUlVSWGxOVkVsNFRXcEJkMDFFUVhkTlJtOVlSRlJKZVUxVVNYaE5ha2w2VGxSck1VOVdiM2RhZWtWTVRVRnJSMEV4VlVWQ2FFMURVV3hKZUU1VVFYb05Da0puVGxaQ1FXOVVURVpPYkZrelNteGtSMFo1WVZkRloxcEhSV2RTYlVZMldsYzFhMWxUUW10aWVVSkdZek5TYUZwSE9HZGFSMVZuVlRKR2RrbEdRbWdOQ21SWGVIWk5VMFYzU0hkWlJGWlJVVVJGZUdoQ1VYbENWRkZXVVdkYVIxVm5Wa2RXZW1SSFZXZFZNRlpIVVZadloxVXhRWGRuWjBscFRVRXdSME5UY1VjTkNsTkpZak5FVVVWQ1FWRlZRVUUwU1VORWQwRjNaMmRKUzBGdlNVTkJVVVJ1VVRWRlNUaHpLMHMyYnpRdkwzUnBNbU40VEZNMWQzVmpWa0pYY0ROdGRDc05DbFJ6VUdkR09XOW9kU3QxUlhscVltZEdjamxXU3pWcWEwUnpabmh0VDI1bGNYTXhjbEZ1TWpGclRtSm1ha05tZG5OYWJFVnBjRWtyZGtoM1UyaDRkVlVOQ2tOSE0yMUtVR1JxUWxremVVTnZOWHBXYlVoUllYcExiWEpZS3pGSlRFdHNZVmwxV1dSeWNrdDBibU5ZTDBwNE9XRnhSV1pXVUhvMGQydzNkRzl2VlhRTkNtRjRlREZWYm05R1ZtbHFaMDFrY1hBck5IVlBSR3RIVVdSMlYwUnZRU3RHTVhoNWVWbE9jREpXWjJOa2IxbGhlVWRUUkZGb2RYUjBXbEJpT0VsdVdUQU5DbXRVY3psbVpuSkVUbXBEY0hZNGNIbDRjRzFJU25GVU1XTndZbEZPTldsaVRXVXZNV2QwVVU4dk1HbFRSV2xvT1dOclVuUXhPVWRvTWtORGNrZEdZek1OQ2tGSFlXWjJha3d6WTFkNmFITm5UbE56ZFhCd1ZGUkZjVXBKVGpoSlZ6TXlLMkptVUdvM1lVeHZTMGszTURjelNtbENURTlCTTJWMVJqSlVXak5LYW5VTkNucFJTSEpaYUdWTFl6SjJjV2h1TjBWSllsQXpSVGRIZEc1eGJ6ZDVRV2dyTjNCemQyRTJMMmRDWVhkRlNtNDVTVGt5Y0haWVdYSk5lSHBTUm05Sk1Dc05DbFJIZWpsSWNqUm1kRUl3U1VsT1JUTndiVTVDT0ZORU1GRkdSV042Y1dselNGSndjREY0WjNreGExVXJabEJqU21kWmFqTnNVVXRVYURkRlkwNTVkMGtOQ2xVclFsRndOR0pTWTIxR2JERkRVSEZJUjA4NFFsZHBibVpKVFhSM2NVdFhWRGh4U2tkUVJISk1OVFZXWVd4MWIxWjVlbk5EU1RCS1pTODVaVFJvYTFJTkNrcHZVbUpIUTBVeGFXbDVPRGxJV0ZWa2NrUXlOVk5HTDBOSmIwcHRRa1JHYlhkRGNTdDBLMEk1WnpkWE1XWXJTR3B4YjA1eGFWZFRTbkI1V25wTGNXOE5Da3B6UWxGUFNIWkxabTR4U1NzcmN6VTFjWGxWTDFjeE4zcFhkbkZ6Tm1aVldYb3daa1YyTDJ4TFVsVnRXamswZFRoMmFra3ZiV0ZxVDFsaFRXODJhV29OQ214cVNYUTRWRk5WTkZGSlJFRlJRVUp2TkVsQ1ZtcERRMEZXU1hkRWQxbEVWbEl3VkVGUlNDOUNRVlYzUVhkRlFpOTZRMEpuVVZsRVZsSXdaMEpJYjNjTkNtVkVRakpDWjJ0eVFtZEZSVUZaU0hOTVVVMTNZVlJDYmtKblozSkNaMFZHUWxGalEwRlNXbUpoU0ZJd1kwUnZka3d5Um1wak1rWXdURmhTYkdNelVtd05Da3h0YkhSalNFcHNZbTVPYUdJeVduQlpNbXhvWWtNMWFtSXlNSFZaYmtsMlkyMVdkMkl6VG5Ca1J6bDVZVmM0ZGxwSVFtcE1Na1pxWXpKR01HTXlWbTBOQ2xsWWNIcGpRemxyWTBkT1psbFhUbnBaV0ZKNldsZGFhR1Z1VG5kTWJrSnJXbXBDY2tKblRsWklVamhGV2tSQ2FVMUhRMmRZY1VKamFHeHdiMlJJVW5jTkNrOXBPSFpaVjA1NldWaFJkR1JIVm5wa1IxVjFZVmN4ZDJOdFZuVmpNa1oyV20xc2FtRlhSbk5NYlU1MllsTTFhV05wT1hsYVdFSjJZekpzTUdJelNuQU5DbUo1T1hOWk0wbDJXVmRPZWxsWVVucGFWMXBvWlc1T2Qwd3lSbXBqTWtZd1l6SldiVmxZY0hwalIwNTVZa00xYW1OdGQzZEVaMWxFVmxJd1VFRlJTQzhOQ2tKQlVVUkJaMFZIVFVJd1IwRXhWV1JFWjFGWFFrSlRUMDlWUlVGWVVFczBRbVJ4YjJKYWFUVkJWVnAwWW0xUVprRnFRV1pDWjA1V1NGTk5SVWRFUVZjTkNtZENWRlpyU21GdmRXZFpiR05oTHpobVpWaDFiM04zVWpSSlpESjJla0ZPUW1kcmNXaHJhVWM1ZHpCQ1FWRXdSa0ZCVDBOQlowVkJjbk53WTBwR1puUU5Da2htTWxwUU5uYzFlRmxGYlhRM1owczVLMEZ0VlhGT2JIbHhhVk5wT0RGWVdYbEpjMHN3ZHl0U2FVRkNjREpPV25SS01FRnhUMVZLY0ZkMGIzaFRSRVlOQ2pJdk0zVmpURXhvZW1jd00zSk5Ua3RIUTNWNVMwUjFWRXRDU0hwclpIRXlTa2dyVVVKd1dFOUZRWE5uU0VaQldqaHBibTVXYlRORmNHSk5UREExZW5ZTkNrTk5ORE5VWWxWNGVqUmhhRVpaVEhSclpWVnZXR2N5VVhSamRFcEpkMlpWT0c1cE9UWjNUekF2VVZaNFRYVjZlWGhuWTNFM1dFcG1WRVppZWpCbGVUa05Da3h2VXpKbVpqSm1NbWw1ZFhwRFREZzJRMGRTWlRGMmJqVkdVRFZCWkhCTFNUTkJjV1J2UVhNeVZVZG1abWQ1WTNGNVZEVldhRnBvU21GWFdtZFRaVTROQ25GTVUyUm5Nazk1WmtGdWRWbG1abUpPUTBGRlJreERObXRIYWxCcFYwaFdiVkJLYzJWVlRsRndXVWxYTWpOdVRXVmxNRlp0WmpNeWFEQlZVMGxTUmtjTkNrdzVkMDFtUTFKaGNIcHVhVlpVYkZvM2JVWlJLMXBMVGsxVk9XUlFibWwzUjNoVE9FaEdaemRzTjFWaldtUmhWbWxwU0VsU2RHUkhVMGg2VjFSSFRGSU5DazgxV0hGdFdHSmplbXhrSzBkSU1tTkNiVVJMZURWR2RHYzBWVXBqTUhCTlkwNXlaMmRCTkhGYWJGZ3pRVTA0ZFdzM04xbERibmRrZVhCMVdqVlNMMmtOQ2l0dFYyOU1jMmR2ZFVNeWVscFJTMmRXTTNjeFMwbG5kaTlGWnpObk0xQm1iR2x6UXpGUU9GcDVheTgxWjFKeVEwVnBWR05aYVVkdVRraE5lWG94WTBVTkNtWTVka1JSVkhCSk9HY3dabUZyZVhWM1ozRjJNMkp3WW0xb1FUSk5MM1JHU3pGMWExQXlMMDFaVEROdlRHOHJWemwzZFV4NFlUaFJOalpVVGxwVlIyd05DbGxrTjFod2RVcGlXbEp1VWtKclYzWnlWbVJ2VUdoUFJ6WnljMUJXVGxOck9VSkRabVpzY0RRd01HbFpaRVYyVjFWdGFVbGFSazFPTVVZMmNscFJiMmdOQ210UVpuQkNRa0YyWW1aQ1pVMWhhV1E0VUROVWFERnNTVGN4ZDNSVGRqRXJhRGxqUFEwS0xTMHRMUzFGVGtRZ1EwVlNWRWxHU1VOQlZFVXRMUzB0TFEwS0xTMHRMUzFDUlVkSlRpQkRSVkpVU1VaSlEwRlVSUzB0TFMwdERRcE5TVWxIZW1wRFEwSk1ZV2RCZDBsQ1FXZEpVVUZwU3pKRWFWVTJZMWRPYzJSMGJ6WkJWVGx1YTJwQlRrSm5hM0ZvYTJsSE9YY3dRa0ZSTUVaQlJFTkNEUXBxUkVWTVRVRnJSMEV4VlVWQ2FFMURVV3hKZUU1VVFYcENaMDVXUWtGdlZFeEdUbXhaTTBwc1pFZEdlV0ZYUldkYVIwVm5VbTFHTmxwWE5XdFpVMEpyRFFwaWVVSkdZek5TYUZwSE9HZGFSMVZuVlRKR2RrbEdRbWhrVjNoMlRWVlpkMUpCV1VSV1VWRkVSWG94UWxGNVFsTlpWMncyU1VkU2JFbEdVbXhqTTFKc0RRcEpSazVzV1ROS2JHUkhSbmxoVjBWbldrZEZaMUp0UmpaYVZ6VnJXVk5DYTJKNVFrWmpNMUpvV2tjNFoxcEhWV2RWTWtaMlNVWkNhR1JYZUhaTlFqUllEUXBFVkVWNVRWUkplRTFxUVhkTlJFRjNUVVp2V0VSVVRYbE5WRWw0VFdwSmVrNVVhekZQVm05M1oxbDNlRU42UVVwQ1owNVdRa0ZaVkVGclNsTk5WRlYzRFFwTmQxbEVWbEZSUzBWNWVGUmFWMDU1V2xoU2FHTnRiR2hKUjFKb1NVVmFhR1Z0Vm5WYVIwVm5Xa2M0WjFKWVRqQlpWMUoyU1VkU2JFbEdUbWhpZVVKUkRRcFpXRlp6WW5wR1IwMUZVVWRCTVZWRlFYaE5PVkZWVFdkVmJVWndaV2xDYTFwVFFsVmFXRTR3V2xOQ1ZGcFhUbmxhV0ZKb1kyMXNhRWxIVW1oSlJWcG9EUXBsYlZaMVdrZEZaMXBIT0dkU1dFNHdXVmRTZGtsSFVteEpSazVvWW5sQ1VWbFlWbk5pZWtORFFXbEpkMFJSV1VwTGIxcEphSFpqVGtGUlJVSkNVVUZFRFFwblowbFFRVVJEUTBGbmIwTm5aMGxDUVU1T1ltbExabTFyT0ZaVFIwSnNibTh4V0hWWU5YQm9hV3gzVDNsUlZtSnlOR1owYzFOR2RtOTJObEZCVEM4NURRcEdTV0Z3ZWxKRWN6RldkbU5TYUZSblFYVm5LMU15YzNSVlJpOWlVMmRRWTJKbE9XeFRUa2xtTTNneVkwOVRSVWcxWkV0TVUyWkVXalZ3WVVZMlUzbDJEUXBwVDA1clMwbFdaRTk1TUc1SGNVSXZaamRtTXpCdFpEbE1VMFl3WWsxYWJ6STJibVJQTlhWaWFrOU5VM1pyY2pCemRHcDJjWE16UjJJMk5qUlBOM2MxRFFwbmVubFJjVlZtTjFaS1ZUSldOWGhNTnpBdllXOUlZbXA0VVRaWmNGbElhRFZVT0hobFVFVjJhVWROZUhob2JXOWpkbVZyTUdWSWJYaGFNVnBCUm5kbURRcG1iV3BhY0dkdEt6TkJiV1VyUVdKMVowSXhjVmxrT1RkWFFsVmpMMUkyY2xZelNGVkphRXRNZG1zd1FtTXlRazVUUVdwS1ZITnRVbEpvTm5oaU5VVlBEUXBJVjNVNFNqbFZPVE5QVkRCdFEwUlRMMGMwZWtGd0t6SXdWbFZhVGxONVdIb3pka2h2ZHpOV1FrRTBjazQzVlV0aFRWQTRVMEZHY1dKUWQycFFhR1kyRFFwV2VVaGFTa2hHZVVscmFteFZMMDlsT0drNGFGSm9aU3QxUzBsdWVtMWtVa2xuYTNGcVF6UktZbE00TDBoS2QxcENlV0oxY2xodFpsWm5aMEp5V2pjeURRcDFTV3hJZVdaTFFXVnZaRTgySzFWdWRrOVJVVE5rVVhOTGMyaHNTMmwyZFVOS2VuWlpiSEJVWVc1VmJIbFVlWEoxZDBaV0wwMHpiSFZ3VlhWc1NrSjJEUW9yUlZwdVkySjNMMGd5VDFWR1NVOTVjeXRtYVVscWJ5OXlVQ3RWVkVWdVJUQmFlRXhNV1daTlNFNUlibTk1UmtaV1dsaFhNRmxMU1ZaMmQyOVZNRWd5RFFwTU5FRmxjbmx6V1d4ek5HcEhXV3A2UlhVMlRYSm9ORmwyU3k5RmEycEdRbmhzZVZGeFFpdHJMelpaY0haRVVFZEJSV05EV0V4bE0weFlaeTlHUjBSTERRcFZkalJTU2pSSE1YZDNXR0pEVTBscGRTdHNUM2hJUW5keGEzRmpZV28wWlZSNGFHUnlZWFpGWm1wNFVEazFaWEJDTjNBNVoxSlhaWGhMU1daQlowMUNEUXBCUVVkcVoyZEZiMDFKU1VKS1JFRlFRbWRPVmtoU1RVSkJaamhGUWxSQlJFRlJTQzlOU0hOSFFURlZaRWxCVWpCTlNFbDNZMEZaU2t0M1dVSkNRVWRDRFFvM1F6QkRUVWROZDFsUldVbExkMWxDUWxGVlNFRm5SVmRXVjJnd1pFaEJOa3g1T1doWk0wNW9aRU14TUZwWVRqQmFVelZ3WWxoQ2VWcFhOWHBaVnpsdERRcGhWMDV3V1ZkM2RWa3lPWFJNYlVwNVRETktiR05IT1hwaFdGSjJZMjFzZGt3eVVuZFplVGxvV1ROT2JGcHRSalpqTTBGMldraENhbGd5Um1wak1sWnREUXBaV0hCNlkwTTFkMXBIV1hkYVVWbEVWbEl3WmtKR05IZFlSRUpoYjBacFoxWnZXbFZoU0ZJd1kwUnZka3d5Um1wak1rWXdURmhTYkdNelVteE1iV3gwRFFwalNFcHNZbTVPYUdJeVduQlpNbXhvWWtNMWFtSXlNSFZaYmtsMlkyMVdkMkl6VG5Ca1J6bDVZVmM0ZG1KSFRubE1Na1pxWXpKV2JWbFljSHBqUXpsb0RRcFpNMDVzV20xR05tTXpRbXBqYlhkMVdUTktjMDFCTkVkQk1WVmtSSGRGUWk5M1VVVkJkMGxDUW1wQlpFSm5UbFpJVVRSRlJtZFJWVEZhUTFkeFRHOUhEUXBLV0VkMkwwZ3piRGR4VEUxRlpVTklaSEk0ZDBSUldVcExiMXBKYUhaalRrRlJSVTVDVVVGRVoyZEpRa0ZGYWxoaVNGaEdOR3hYVkVGRFNISjBNblIzRFFveWFtUnllbTVxTTFGSmRuaE5XbEJ0VlZkdVIwbFJSVWRKSzBRNFNYWlJURTFNV0RKR2QycEVSVk5rTDBKS1VYbElUSE0zWTFBdmREUnhlRXN5ZW1aSURRbzJkbGR2UzFGNGNHbGpRVTVDYkVoWk1FbzFabFpWWjBwdFFYUjJiV2xDYnpWNVUyRnViSE4yZWsxdlpDdDNVMHBVVDJaRVpqQm5Na3RJWm1oWk1razJEUXBJUkdSemNXUm9TMk00VEZNdldDdEJlblJpVmtWWVQxazRjMXBJVnpoTWJVOXBPRkkwV1c5aFltWkVZMkZEZERCc2IyaEdRekZtUnpWM1JIQTFPVzF0RFFwV2REQXpUa3haYUhaaWFUTkRkRU5ZUkhkMVEzWm1ORGhqV213dmIxVldkSEZwTkhBemJpdERTazVxYkROME4wWkJNRVprTUdkclZHMXdjVXRFWW5vd0RRcFNiRVp0ZGpVemVWazBjak5wVDJOQ2RVNU5aVzkxUkRFdmMwUXlZa0pyVTAxRFUzbEZMMHBZUjNaUVZEQlVOamhWWWtsR1REZEhiWEV4ZDFoM2NrRkNEUXBzWkV4eVFqSkJSMEZFYlhkWFpYYzBlbXhuVmpKMVNqTm5Va3BaTDJSU1NVVlNNVkZyU0VWNmRFUlJRVGhuYm5GdFdrcHRNVmcxV1dsQmMzaHZUa3BHRFFwQmMyWkNOVVZVUlRNNVRrOW5Na2xKY2pRNFZ6UXdTalZPVVdSS2NHUjBiSEZTYlhBek5qRlBVRWw1VG5wV05HWTVOemt4YmtaVmFHZFBPVnBrWVZKNURRcG9NWGs0TjNGWFNHVkpNMlpQUzFkR09XZHBTalUwTlVFNVMwZ3ZhV296Tm5GQ1dsUm9SazlFVEUwd1JXZFJOVFJHWjFsQ0wwcEhRMFZyYkZCVGRrb3JEUXBNWVZsRFFXWnlTak5qV0ZkNksyNW9UbEJNZVhoTk5VTkJUMmR1Vm1sR1JXZG1SVTVtUmtadlJpczRjVzFJU1U5RU5sVllabkExUzFKalNrd3pjRGhrRFFwWlVWYzJWVzlzUTJ0cGFIVXdVekZFUjJoRmEwcDZSMDVXT1ZkMVRVRTRUMWxXUVd0Uk5ESjBhMlZSZDFnNU5WRlJhV053TkZwVGFHaHlSbkJLVVZOSERRb3pTbEZNV0VkdmFqYzRPWEp4UjNOcVQyNHhiRTFuYnpNTkNpMHRMUzB0UlU1RUlFTkZVbFJKUmtsRFFWUkZMUzB0TFMwPTwvWDUwOUNlcnRpZmljYXRlPjwvWDUwOURhdGE+PC9LZXlJbmZvPjwvU2lnbmF0dXJlPjwvQ0ZlPg==|20141119161601|CFe35141161099008000141599000009730000132542910|2.10|61099008000141|bJuH2Ga9dV+ewuG90byMpHZ8hOs0kxvHg9i0OgUp/1P4S+Rzikk7WakRKFjIqzqbz1lg5l1lSlGFW38Xw2j2Y/NKB6acRccloqaxJ/4+j80UKVsC0G9w2gF14X4JBW98v22WMYp5yFcd+KFUs2ub1j02NZkJ0RBYiEuDm9q5gq3F+mheD97u2oIBU8DetxSIq3qDtb7f15ki9ce8et8A7aqhu9JB7qhtuB77xwLn7Rm+c5nCNTjptD9R7OazTRM0+03FpdJEyAcq/WGizV4oyQHMqLljGaE9nGDjbqywg5SubpozSbROLrAE1zVrzPrrS5uP+cGlLins3APACrMVpQ==
Link para o comentário
Compartilhar em outros sites

Teste FimAFim:

 

function TesteFimAFim(numeroSessao : Longint; codigoDeAtivacao: PAnsiChar; dadosVenda : UTF8String) : PAnsiChar ; stdcall; External 'dllsat.dll';

 

wResultado:=TesteFimAFim(Random(999999),PAnsiChar('123456789'),UTF8Encode(wXML));

 

 

Lembrando que a Assinatura no XML para Teste FimAFim precisa sem completada com zeros a esquerda até 344 caracteres.

 

Exemplo:

 

<signAC>SGR-SAT SISTEMA DE GESTAO E RETAGUARDA DO SAT00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000</signAC>

 

 

 

868614|09000|Emitido com sucesso|||PENGZT48aW5mQ0ZlIElkPSJDRmUzNTE0MTE2MTA5OTAwODAwMDE0MTU5OTAwMDAwOTczMDAwMDAwMzA3NTYyMiIgdmVyc2FvPSIwLjA2IiB2ZXJzYW9EYWRvc0VudD0iMC4wNiIgdmVyc2FvU0I9IjAxMDAwMCI+PGlkZT48Y1VGPjM1PC9jVUY+PGNORj4zMDc1NjI8L2NORj48bW9kPjU5PC9tb2Q+PG5zZXJpZVNBVD45MDAwMDA5NzM8L25zZXJpZVNBVD48bkNGZT4wMDAwMDA8L25DRmU+PGRFbWk+MjAxNDExMTk8L2RFbWk+PGhFbWk+MTY0OTE5PC9oRW1pPjxjRFY+MjwvY0RWPjx0cEFtYj4yPC90cEFtYj48Q05QSj42MTA5OTAwODAwMDE0MTwvQ05QSj48c2lnbkFDPlNHUi1TQVQgU0lTVEVNQSBERSBHRVNUQU8gRSBSRVRBR1VBUkRBIERPIFNBVDwvc2lnbkFDPjxhc3NpbmF0dXJhUVJDT0RFPmFXaUFJaWV5eTdjV3Q1aHl3WnlEM0paMzdWVUo5QW8vek03S1FDQ3I5NlN1WEZUWmxwL1ZZamUwbitHT29DRHVPWG8yUnVjbytlaVE1QXVQb0NyelRZR1VjaEp0V2IzbFd2TTZkek9aSXVQRHFQYVhvVjdWTXlEQkFQT2FiN1FDYXhoT1FUL2tiTTBOZk16TzZtM1RVYUhxb0R0N0xsc0czcUduMHAvdnZhcGtMVHJha3RMOVU0VUdlclV2S2JDekhPMFVnbWI1Vmpha3FTVDgxak5ReXFaaEFEb3pmME9YUHlteUZWYXhGL3hpd1crREptYXplN1NxMjZHbUs0M3BuNlBVYjNlUDdCWDNjMmpkNFRJV2dmV3BxdGN4UkRvQ0R2dFlucCtudkpTTnlqcmNzSWgzOW03R0hoL2toZVBJMHBjZ1lNaW1RbDF1YThvcVhiRUY5UT09PC9hc3NpbmF0dXJhUVJDT0RFPjxudW1lcm9DYWl4YT4xMTU8L251bWVyb0NhaXhhPjwvaWRlPjxlbWl0PjxDTlBKPjYxMDk5MDA4MDAwMTQxPC9DTlBKPjx4Tm9tZT5ESU1BUyBERSBNRUxPIFBJTUVOVEEgU0lTVEVNQVMgREUgUE9OVE8gRSBBQ0VTU08gTFREQTwveE5vbWU+PHhGYW50PkRJTUVQPC94RmFudD48ZW5kZXJFbWl0Pjx4TGdyPkFWRU5JREEgTU9GQVJSRUo8L3hMZ3I+PG5ybz44NDA8L25ybz48eENwbD45MDg8L3hDcGw+PHhCYWlycm8+VkwuIExFT1BPTERJTkE8L3hCYWlycm8+PHhNdW4+U0FPIFBBVUxPPC94TXVuPjxDRVA+MDUzMTEwMDA8L0NFUD48L2VuZGVyRW1pdD48SUU+MTExMTExMTExMTExPC9JRT48SU0+MTIzMTIzPC9JTT48Y1JlZ1RyaWI+MzwvY1JlZ1RyaWI+PGNSZWdUcmliSVNTUU4+MTwvY1JlZ1RyaWJJU1NRTj48aW5kUmF0SVNTUU4+TjwvaW5kUmF0SVNTUU4+PC9lbWl0PjxkZXN0PjwvZGVzdD48ZGV0IG5JdGVtPSIxIj48cHJvZD48Y1Byb2Q+MDE8L2NQcm9kPjx4UHJvZD5DYXJuZTwveFByb2Q+PENGT1A+NTAwMDwvQ0ZPUD48dUNvbT51bjwvdUNvbT48cUNvbT4xLjAwMDA8L3FDb20+PHZVbkNvbT4yLjEwMDwvdlVuQ29tPjx2UHJvZD4yLjEwPC92UHJvZD48aW5kUmVncmE+QTwvaW5kUmVncmE+PHZJdGVtPjIuMTA8L3ZJdGVtPjwvcHJvZD48aW1wb3N0bz48SUNNUz48SUNNUzAwPjxPcmlnPjA8L09yaWc+PENTVD4wMDwvQ1NUPjxwSUNNUz41LjAwPC9wSUNNUz48dklDTVM+MC4xMDwvdklDTVM+PC9JQ01TMDA+PC9JQ01TPjxQSVM+PFBJU0FsaXE+PENTVD4wMTwvQ1NUPjx2QkM+Mi4xMDwvdkJDPjxwUElTPjEuMDAwMDwvcFBJUz48dlBJUz4yLjEwPC92UElTPjwvUElTQWxpcT48L1BJUz48UElTU1Q+PHZCQz4xLjEwPC92QkM+PHBQSVM+MS4wMDAwPC9wUElTPjx2UElTPjEuMTA8L3ZQSVM+PC9QSVNTVD48Q09GSU5TPjxDT0ZJTlNBbGlxPjxDU1Q+MDE8L0NTVD48dkJDPjEuMDA8L3ZCQz48cENPRklOUz4xLjAwMDA8L3BDT0ZJTlM+PHZDT0ZJTlM+MS4wMDwvdkNPRklOUz48L0NPRklOU0FsaXE+PC9DT0ZJTlM+PC9pbXBvc3RvPjwvZGV0Pjx0b3RhbD48SUNNU1RvdD48dklDTVM+MC4xMDwvdklDTVM+PHZQcm9kPjIuMTA8L3ZQcm9kPjx2RGVzYz4wLjAwPC92RGVzYz48dlBJUz4yLjEwPC92UElTPjx2Q09GSU5TPjEuMDA8L3ZDT0ZJTlM+PHZQSVNTVD4xLjEwPC92UElTU1Q+PHZDT0ZJTlNTVD4wLjAwPC92Q09GSU5TU1Q+PHZPdXRybz4wLjAwPC92T3V0cm8+PC9JQ01TVG90Pjx2Q0ZlPjIuMTA8L3ZDRmU+PC90b3RhbD48cGd0bz48TVA+PGNNUD4wMTwvY01QPjx2TVA+MzMuMDA8L3ZNUD48L01QPjx2VHJvY28+MzAuOTA8L3ZUcm9jbz48L3BndG8+PC9pbmZDRmU+PFNpZ25hdHVyZSB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC8wOS94bWxkc2lnIyI+PFNpZ25lZEluZm8geG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvMDkveG1sZHNpZyMiPjxDYW5vbmljYWxpemF0aW9uTWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvVFIvMjAwMS9SRUMteG1sLWMxNG4tMjAwMTAzMTUiPjwvQ2Fub25pY2FsaXphdGlvbk1ldGhvZD48U2lnbmF0dXJlTWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvMjAwMS8wNC94bWxkc2lnLW1vcmUjcnNhLXNoYTI1NiI+PC9TaWduYXR1cmVNZXRob2Q+PFJlZmVyZW5jZSBVUkk9IiNDRmUzNTE0MTE2MTA5OTAwODAwMDE0MTU5OTAwMDAwOTczMDAwMDAwMzA3NTYyMiI+PFRyYW5zZm9ybXM+PFRyYW5zZm9ybSBBbGdvcml0aG09Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvMDkveG1sZHNpZyNlbnZlbG9wZWQtc2lnbmF0dXJlIj48L1RyYW5zZm9ybT48VHJhbnNmb3JtIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvVFIvMjAwMS9SRUMteG1sLWMxNG4tMjAwMTAzMTUiPjwvVHJhbnNmb3JtPjwvVHJhbnNmb3Jtcz48RGlnZXN0TWV0aG9kIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvMjAwMS8wNC94bWxlbmMjc2hhMjU2Ij48L0RpZ2VzdE1ldGhvZD48RGlnZXN0VmFsdWU+eFRUTjJDeCtXQXpwNHpVTmhONnVad1J5Y0tINXRGZENoOGtzVHF2VU8vVT08L0RpZ2VzdFZhbHVlPjwvUmVmZXJlbmNlPjwvU2lnbmVkSW5mbz48U2lnbmF0dXJlVmFsdWU+RS9jMCtma25Qd0JsaDdmVDRuL21qVDd6MXZyWmdwY3FLTkpaZE9zamxxeTVjODEyUjN4N1kwSVpwWkthQ3lJUTZBYTFmMVJpMzBKeWdRSHc1UmtvZTY0R3oyZVh1WFRpVEZCNWdNb2pvRTQzREN5RC95OW45Y04vV0FZTWRzTThNMWsvZi8rU0dMcnAvYWcvUXZHQkZlb0MwVHlZWTczV3BFazQ3UUo2NWtEQStXRjhIMlV6TGd2QmpIYmY5M3BIZW5OOUxTQXVLemtMWGIrOTR6cUJRdXZycDA3VWtlZ0JwZ2RuMU9vUUt6Ulh1UnMrTUZjRkhhcDNzNXdtWG1WbEZ3WEtRR1cwSllCdzdCZW44OWZPTkc0Zm5GbDRleXBSQU1vVHJka3BjRzlJZG0zblZoVXhYQ2ppOWpHaUVkV3ZFMmRDeTFRVE42SXFjbi93QkZ5dEFBPT08L1NpZ25hdHVyZVZhbHVlPjxLZXlJbmZvPjxYNTA5RGF0YT48WDUwOUNlcnRpZmljYXRlPkxTMHRMUzFDUlVkSlRpQkRSVkpVU1VaSlEwRlVSUzB0TFMwdERRcE5TVWxITm1wRFEwSk9TMmRCZDBsQ1FXZEpVV1pKU3psTlRVcG9abmd5Ukd0T1FVcE5aa2xsVW5wQlRrSm5hM0ZvYTJsSE9YY3dRa0ZSYzBaQlJFSnVEUXBOVVhOM1ExRlpSRlpSVVVkRmQwcERWV3BGTVUxRVRVZEJNVlZGUTJoTmMxVXlWbXBqYlZZd1dWaEtjRmxUUW10WlUwSkhXVmh3YkdKdFVtaEpSMUoyRFFwSlJWWjZaRWRHYTJKNVFtdGFVMEpVV1ZjNFoxVkhSakZpUnpoNFNWUkJaa0puVGxaQ1FVMVVSMFZHUkVsR1RrSldRMEpyV2xOQ1ZWcFlUakJhVTBKVURRcFNWVnBDVjJsQ1ZGVkVRV1ZHZHpCNFRrUkZlRTFFVVhkTlJFRjNUVVJDWVVaM01IaFBWRVY0VFVSSmVVMTZWVFZPVkd4aFRVbEliazFSYzNkRFVWbEVEUXBXVVZGSFJYZEtRMVZxUlZOTlFrRkhRVEZWUlVOQ1RVcFZNa1oyU1VaQ2FHUlhlSFpOVWtWM1JIZFpSRlpSVVV0R1FXaFVVbFZhUWxkcE1WUlZSRVZRRFFwTlFUQkhRVEZWUlVONFVVZFJWVTEwVlRCR1ZVMVRaM2RLWjFsRVZsRlJURVpDT1VKa1dGSnNZbTVTY0ZreVJtdGllVUozWWpOSloxRldTV2RWTUZaSERRcFJWbTluVlRGQloxVXdSbFZOVW5kM1IyZFpSRlpSVVV4R1FrMTRUa1JGTVUxVVJUTlBSR04zVFZSQk0wMXFVVFZPVkZGNVRWSkpkMFZCV1VSV1VWRkdEUXBGZDJzMVRVUkJkMDFFUVRWT2VrMTRVa1JDUTBKblRsWkNRVTFVVHpCU1NsUlZSbFJTUlZaT1VsVjRVRlZGYkU1U1ZUVlZVVlpPU2xVeFVrWlVWVVpVRFFwU1JWWlJWREExVlZRd1ZrSlJNRlpVVlRBNVRWWkZVa0pQYWxsNFRVUnJOVTFFUVRSTlJFRjNUVlJSZUUxSlNVSkpha0ZPUW1kcmNXaHJhVWM1ZHpCQ0RRcEJVVVZHUVVGUFEwRlJPRUZOU1VsQ1EyZExRMEZSUlVGclJGTk9ObE5sUjBWbmNHZFRkbTE1V2toMmRsaDBiME4wUkZJNFltRTBNRTFwVWtOckswcG9EUXBCVTB0Q1oycHpTREZPYjFSS1dYTk5VSGcwU2l0SFdsZzFPSFJ6TUUxWVlWVXlla3RpWVM5RWVqTlVXazVKYXpndmNIUk9ibVI0VG5wRVJtNVpXamhyRFFwdlkwaGpiSFYxWmsxbk9IVmFhRWg0Tm5GemJua3lOR2s0TDJsMU0xWkxLM2x5VUZkSlVYVktSVTUzY1VwUVZYbDRWMHc0TWk5UVRFNXVLMWQzVTNBMERRcHBZakpuVldGbGFHZG1URzFUUTJKdVlVSkpOWEF3UTJGUFkybFhSemRPWWpaMVV6STFNMU41Vm1GVWNFRktUV2d3UjJWMlRVcE9SMUpZTWtoaVl6WkJEUW8yVW1sNFVFdEdTVlJzTjJ0RmNWQm9VRFZ2TlVwMVJXWnRLMGx4UldoSWVtTlpjbTVqVW14U1N6UlNWbUZWYUhCWFlXUnVRVGx1VlRZNGFIVkdVbGR6RFFveU5WbGxSSFZJVG5OdGFqaG9Za0p1WjNveFNVcEhMM1p0TmxaWmJtMVhLME1yYVZwcFlYZENkSGhsTkZGM1NVUkJVVUZDYnpSSlEwUjZRME5CWjNOM0RRcEtRVmxFVmxJd1VrSkNNSGRITmtGYVFtZFdaMVJCUlVSQk5rRlJRa0UwTWsxVVFUVlBWRUYzVDBSQmQwMUVSVEJOVkVGS1FtZE9Wa2hTVFVWQmFrRkJEUXBOUVRSSFFURlZaRVIzUlVJdmQxRkZRWGRKUmpSRVFXWkNaMDVXU0ZOTlJVZEVRVmRuUWxOUFQxVkZRVmhRU3pSQ1pIRnZZbHBwTlVGVlduUmliVkJtRFFwQmFrSnlRbWRPVmtoU09FVmFSRUpwVFVkRFoxaHhRbU5vYkhCdlpFaFNkMDlwT0haWlYwNTZXVmhSZEdSSFZucGtSMVYxWVZjeGQyTnRWblZqTWtaMkRRcGFiV3hxWVZkR2MweHRUblppVXpWcFkyazVlVnBZUW5aak1td3dZak5LY0dKNU9YTlpNMGwyV1ZkT2VsbFlVbnBhVjFwb1pXNU9kMHd5Um1wak1rWXdEUXBqTWxadFdWaHdlbU5IVG5saVF6VnFZMjEzZDJWM1dVUldVakJuUWtoUmQyTnFRbmRDWjJ0eVFtZEZSVUZaU0hOTVVVMTNXWHBDYUVKblozSkNaMFZHRFFwQ1VXTkRRVkphVm1GSVVqQmpSRzkyVERKR2FtTXlSakJNYld4MFkwaEtiR0p1VG1oaU1scHdXVEpzYUdKRE5XcGlNakIxV1c1SmRtTnRWbmRpTTA1d0RRcGtSemw1WVZjNGRscElRbXBNTWtacVl6SkdNR015Vm0xWldIQjZZME01YTJOSFRtWlpWMDU2V1ZoU2VscFhXbWhsYms1M1RHNUNhMXBxUVZSQ1owNVdEUXBJVTFWRlJFUkJTMEpuWjNKQ1owVkdRbEZqUkVGcVEwSndkMWxKUzNkWlFrSlJWVWhCVVVWRloxcHZkMmRhWTNkWWQxbEpTM2RaUWtKUlZVaE5RVXRIRFFwVk1tZ3daRWhDZWs5cE9IWlpWMDU2V1ZoUmRHUkhWbnBrUjFWMVlWY3hkMk50Vm5Wak1rWjJXbTFzYW1GWFJuTk1iVTUyWWxNMWFXTnBPWGxhV0VKMkRRcGpNbXd3WWpOS2NHSjVPV3BhV0Vvd1lWZGFjRmt5Um10aU0wMTJXVmRPZWxsWVVYUmtSMVo2WkVkVmRXTkVaR3BOUkZGSFEwTnpSMEZSVlVaQ2VrRkNEUXBvYVdodlpFaFNkMDlwT0haaU1rNTZZME14ZDJGWGVIWmtRelZ3WWxoQ2VWcFhOWHBaVnpsdFlWZE9jRmxYZDNWWk1qbDBURzFLZVUxQk1FZERVM0ZIRFFwVFNXSXpSRkZGUWtOM1ZVRkJORWxEUVZGRGVteHhSa1ZOU1hCRGFGTjJMMWRwYUdSUFUxQXdiRFpKUkVKdFFYbExiVmREYXpSTE5tc3ZhRTlrVVZCRURRcGxUMk5PTTNCelZHbGtNSHBqV1dkUGJYSndSVkl4U0c1SU5VNXBUVk5vYmtKa2JsaDNNMWgwYzJSSk9URkNNakV6U0ZKNVEyUk9UWEU0UjNsS2JuWnJEUXB1VkdGdFZtNTBhM1l6VEcxdlZ6WkJTa3BRZURSRlpFTkJlVTB3YUVsTU1VeHhUbGRWTUc5VGNFeENPV3N2TWpCc2NFVllaVkIwVWs1dWNXeEZOMkZURFFwd1dIWlVXVzlrZUZOcFVGSXpjVFkxWlZaMlpsWkNVemx4SzJoYUwzWmxTMVZHVERoRmNXbElkRlZWTW1wNlVteFZXSEJxT1haM2Npc3liRE5KYUVVM0RRb3JXRnBRVG1GSlZYZHZhMk5zTWsxMVUyWldNVkEzUm5GM1dFZGlWMGhPYUdwNWRrWk9TVGw2U2xacVExbFFhM2g1YjI1WGRsSjRiakpXU1RGb1pqVnpEUXBoVVhwdFNIWjFjWGxtTm5kaVVrVm9iMVJzZDBFek9FZHFhemcyUzA1NmIxQlhaakJPVDJKU2JuUnhaWGQ2WVVacU9Ya3JOM3ByWjJzMlRsVnZSbXhFRFFwbFoyeFNZMDFSZEM5MVpsY3laVmR2Tm5ScGIyOXdlbTVXVUdGelQwMXpNR3BaVUZKdmVuSkdXSEI0VVRaV2JscHdZbFJhYlhoYVRpOVpRWE1yUldoMURRcFFiRFIwTTNvelZUWXpOeTlVV21sS1VsaFFiekl6UTNodFEySmFlR3RYV210cVdXbDJSakV5TXk5cGFWUnNVbEJDTlVKYU4wMHlWWE5YVmtocGIybG9EUW95UTJNeldXODBOMjlrUjBkSE4wVkRZVXgwUmtOd2QwWkNUSE5PYmtrMmIyb3hlRzVMU0VGWlNrUndkMWt4TURjdlpEQmtZMWszTjBWRGVXeEVaRmhZRFFvdlRqUTFZazB6SzA5WFkycGFVbFZxUmtNMldEbFpjVnBITVdSS2FqSnFjM1J6UW1VNGVDOUNWVmR0U3pjek1rRXdTV1prWWxkSVVFUnJRVFV4WVVoRURRcDVVMlJXU0hkRmRETlBhV0ZSU0VKTE9FMXNSV2RCTkRoa1JIZEZOM2hGVTFSMk9XSmphVkpCZGpRd2RXODBSRGhXYWtNNU9VazVkekZpYldJM1p6MDlEUW90TFMwdExVVk9SQ0JEUlZKVVNVWkpRMEZVUlMwdExTMHREUW90TFMwdExVSkZSMGxPSUVORlVsUkpSa2xEUVZSRkxTMHRMUzBOQ2sxSlNVY3hha05EUWt3MlowRjNTVUpCWjBsUlVXdDBWMGw2V2tzclUxcE5kQ3R3TVdoUmQyTmFWRUZPUW1kcmNXaHJhVWM1ZHpCQ1FWRXdSa0ZFUTBJTkNtcEVSVXhOUVd0SFFURlZSVUpvVFVOUmJFbDRUbFJCZWtKblRsWkNRVzlVVEVaT2JGa3pTbXhrUjBaNVlWZEZaMXBIUldkU2JVWTJXbGMxYTFsVFFtc05DbUo1UWtaak0xSm9Xa2M0WjFwSFZXZFZNa1oyU1VaQ2FHUlhlSFpOVlZsM1VrRlpSRlpSVVVSRmVqRkNVWGxDVTFsWGJEWkpSMUpzU1VaU2JHTXpVbXdOQ2tsR1RteFpNMHBzWkVkR2VXRlhSV2RhUjBWblVtMUdObHBYTld0WlUwSnJZbmxDUm1NelVtaGFSemhuV2tkVloxVXlSblpKUmtKb1pGZDRkazFDTkZnTkNrUlVSWGxOVkVsNFRXcEJkMDFFUVhkTlJtOVlSRlJKZVUxVVNYaE5ha2w2VGxSck1VOVdiM2RhZWtWTVRVRnJSMEV4VlVWQ2FFMURVV3hKZUU1VVFYb05Da0puVGxaQ1FXOVVURVpPYkZrelNteGtSMFo1WVZkRloxcEhSV2RTYlVZMldsYzFhMWxUUW10aWVVSkdZek5TYUZwSE9HZGFSMVZuVlRKR2RrbEdRbWdOQ21SWGVIWk5VMFYzU0hkWlJGWlJVVVJGZUdoQ1VYbENWRkZXVVdkYVIxVm5Wa2RXZW1SSFZXZFZNRlpIVVZadloxVXhRWGRuWjBscFRVRXdSME5UY1VjTkNsTkpZak5FVVVWQ1FWRlZRVUUwU1VORWQwRjNaMmRKUzBGdlNVTkJVVVJ1VVRWRlNUaHpLMHMyYnpRdkwzUnBNbU40VEZNMWQzVmpWa0pYY0ROdGRDc05DbFJ6VUdkR09XOW9kU3QxUlhscVltZEdjamxXU3pWcWEwUnpabmh0VDI1bGNYTXhjbEZ1TWpGclRtSm1ha05tZG5OYWJFVnBjRWtyZGtoM1UyaDRkVlVOQ2tOSE0yMUtVR1JxUWxremVVTnZOWHBXYlVoUllYcExiWEpZS3pGSlRFdHNZVmwxV1dSeWNrdDBibU5ZTDBwNE9XRnhSV1pXVUhvMGQydzNkRzl2VlhRTkNtRjRlREZWYm05R1ZtbHFaMDFrY1hBck5IVlBSR3RIVVdSMlYwUnZRU3RHTVhoNWVWbE9jREpXWjJOa2IxbGhlVWRUUkZGb2RYUjBXbEJpT0VsdVdUQU5DbXRVY3psbVpuSkVUbXBEY0hZNGNIbDRjRzFJU25GVU1XTndZbEZPTldsaVRXVXZNV2QwVVU4dk1HbFRSV2xvT1dOclVuUXhPVWRvTWtORGNrZEdZek1OQ2tGSFlXWjJha3d6WTFkNmFITm5UbE56ZFhCd1ZGUkZjVXBKVGpoSlZ6TXlLMkptVUdvM1lVeHZTMGszTURjelNtbENURTlCTTJWMVJqSlVXak5LYW5VTkNucFJTSEpaYUdWTFl6SjJjV2h1TjBWSllsQXpSVGRIZEc1eGJ6ZDVRV2dyTjNCemQyRTJMMmRDWVhkRlNtNDVTVGt5Y0haWVdYSk5lSHBTUm05Sk1Dc05DbFJIZWpsSWNqUm1kRUl3U1VsT1JUTndiVTVDT0ZORU1GRkdSV042Y1dselNGSndjREY0WjNreGExVXJabEJqU21kWmFqTnNVVXRVYURkRlkwNTVkMGtOQ2xVclFsRndOR0pTWTIxR2JERkRVSEZJUjA4NFFsZHBibVpKVFhSM2NVdFhWRGh4U2tkUVJISk1OVFZXWVd4MWIxWjVlbk5EU1RCS1pTODVaVFJvYTFJTkNrcHZVbUpIUTBVeGFXbDVPRGxJV0ZWa2NrUXlOVk5HTDBOSmIwcHRRa1JHYlhkRGNTdDBLMEk1WnpkWE1XWXJTR3B4YjA1eGFWZFRTbkI1V25wTGNXOE5Da3B6UWxGUFNIWkxabTR4U1NzcmN6VTFjWGxWTDFjeE4zcFhkbkZ6Tm1aVldYb3daa1YyTDJ4TFVsVnRXamswZFRoMmFra3ZiV0ZxVDFsaFRXODJhV29OQ214cVNYUTRWRk5WTkZGSlJFRlJRVUp2TkVsQ1ZtcERRMEZXU1hkRWQxbEVWbEl3VkVGUlNDOUNRVlYzUVhkRlFpOTZRMEpuVVZsRVZsSXdaMEpJYjNjTkNtVkVRakpDWjJ0eVFtZEZSVUZaU0hOTVVVMTNZVlJDYmtKblozSkNaMFZHUWxGalEwRlNXbUpoU0ZJd1kwUnZka3d5Um1wak1rWXdURmhTYkdNelVtd05Da3h0YkhSalNFcHNZbTVPYUdJeVduQlpNbXhvWWtNMWFtSXlNSFZaYmtsMlkyMVdkMkl6VG5Ca1J6bDVZVmM0ZGxwSVFtcE1Na1pxWXpKR01HTXlWbTBOQ2xsWWNIcGpRemxyWTBkT1psbFhUbnBaV0ZKNldsZGFhR1Z1VG5kTWJrSnJXbXBDY2tKblRsWklVamhGV2tSQ2FVMUhRMmRZY1VKamFHeHdiMlJJVW5jTkNrOXBPSFpaVjA1NldWaFJkR1JIVm5wa1IxVjFZVmN4ZDJOdFZuVmpNa1oyV20xc2FtRlhSbk5NYlU1MllsTTFhV05wT1hsYVdFSjJZekpzTUdJelNuQU5DbUo1T1hOWk0wbDJXVmRPZWxsWVVucGFWMXBvWlc1T2Qwd3lSbXBqTWtZd1l6SldiVmxZY0hwalIwNTVZa00xYW1OdGQzZEVaMWxFVmxJd1VFRlJTQzhOQ2tKQlVVUkJaMFZIVFVJd1IwRXhWV1JFWjFGWFFrSlRUMDlWUlVGWVVFczBRbVJ4YjJKYWFUVkJWVnAwWW0xUVprRnFRV1pDWjA1V1NGTk5SVWRFUVZjTkNtZENWRlpyU21GdmRXZFpiR05oTHpobVpWaDFiM04zVWpSSlpESjJla0ZPUW1kcmNXaHJhVWM1ZHpCQ1FWRXdSa0ZCVDBOQlowVkJjbk53WTBwR1puUU5Da2htTWxwUU5uYzFlRmxGYlhRM1owczVLMEZ0VlhGT2JIbHhhVk5wT0RGWVdYbEpjMHN3ZHl0U2FVRkNjREpPV25SS01FRnhUMVZLY0ZkMGIzaFRSRVlOQ2pJdk0zVmpURXhvZW1jd00zSk5Ua3RIUTNWNVMwUjFWRXRDU0hwclpIRXlTa2dyVVVKd1dFOUZRWE5uU0VaQldqaHBibTVXYlRORmNHSk5UREExZW5ZTkNrTk5ORE5VWWxWNGVqUmhhRVpaVEhSclpWVnZXR2N5VVhSamRFcEpkMlpWT0c1cE9UWjNUekF2VVZaNFRYVjZlWGhuWTNFM1dFcG1WRVppZWpCbGVUa05Da3h2VXpKbVpqSm1NbWw1ZFhwRFREZzJRMGRTWlRGMmJqVkdVRFZCWkhCTFNUTkJjV1J2UVhNeVZVZG1abWQ1WTNGNVZEVldhRnBvU21GWFdtZFRaVTROQ25GTVUyUm5Nazk1WmtGdWRWbG1abUpPUTBGRlJreERObXRIYWxCcFYwaFdiVkJLYzJWVlRsRndXVWxYTWpOdVRXVmxNRlp0WmpNeWFEQlZVMGxTUmtjTkNrdzVkMDFtUTFKaGNIcHVhVlpVYkZvM2JVWlJLMXBMVGsxVk9XUlFibWwzUjNoVE9FaEdaemRzTjFWaldtUmhWbWxwU0VsU2RHUkhVMGg2VjFSSFRGSU5DazgxV0hGdFdHSmplbXhrSzBkSU1tTkNiVVJMZURWR2RHYzBWVXBqTUhCTlkwNXlaMmRCTkhGYWJGZ3pRVTA0ZFdzM04xbERibmRrZVhCMVdqVlNMMmtOQ2l0dFYyOU1jMmR2ZFVNeWVscFJTMmRXTTNjeFMwbG5kaTlGWnpObk0xQm1iR2x6UXpGUU9GcDVheTgxWjFKeVEwVnBWR05aYVVkdVRraE5lWG94WTBVTkNtWTVka1JSVkhCSk9HY3dabUZyZVhWM1ozRjJNMkp3WW0xb1FUSk5MM1JHU3pGMWExQXlMMDFaVEROdlRHOHJWemwzZFV4NFlUaFJOalpVVGxwVlIyd05DbGxrTjFod2RVcGlXbEp1VWtKclYzWnlWbVJ2VUdoUFJ6WnljMUJXVGxOck9VSkRabVpzY0RRd01HbFpaRVYyVjFWdGFVbGFSazFPTVVZMmNscFJiMmdOQ210UVpuQkNRa0YyWW1aQ1pVMWhhV1E0VUROVWFERnNTVGN4ZDNSVGRqRXJhRGxqUFEwS0xTMHRMUzFGVGtRZ1EwVlNWRWxHU1VOQlZFVXRMUzB0TFEwS0xTMHRMUzFDUlVkSlRpQkRSVkpVU1VaSlEwRlVSUzB0TFMwdERRcE5TVWxIZW1wRFEwSk1ZV2RCZDBsQ1FXZEpVVUZwU3pKRWFWVTJZMWRPYzJSMGJ6WkJWVGx1YTJwQlRrSm5hM0ZvYTJsSE9YY3dRa0ZSTUVaQlJFTkNEUXBxUkVWTVRVRnJSMEV4VlVWQ2FFMURVV3hKZUU1VVFYcENaMDVXUWtGdlZFeEdUbXhaTTBwc1pFZEdlV0ZYUldkYVIwVm5VbTFHTmxwWE5XdFpVMEpyRFFwaWVVSkdZek5TYUZwSE9HZGFSMVZuVlRKR2RrbEdRbWhrVjNoMlRWVlpkMUpCV1VSV1VWRkVSWG94UWxGNVFsTlpWMncyU1VkU2JFbEdVbXhqTTFKc0RRcEpSazVzV1ROS2JHUkhSbmxoVjBWbldrZEZaMUp0UmpaYVZ6VnJXVk5DYTJKNVFrWmpNMUpvV2tjNFoxcEhWV2RWTWtaMlNVWkNhR1JYZUhaTlFqUllEUXBFVkVWNVRWUkplRTFxUVhkTlJFRjNUVVp2V0VSVVRYbE5WRWw0VFdwSmVrNVVhekZQVm05M1oxbDNlRU42UVVwQ1owNVdRa0ZaVkVGclNsTk5WRlYzRFFwTmQxbEVWbEZSUzBWNWVGUmFWMDU1V2xoU2FHTnRiR2hKUjFKb1NVVmFhR1Z0Vm5WYVIwVm5Xa2M0WjFKWVRqQlpWMUoyU1VkU2JFbEdUbWhpZVVKUkRRcFpXRlp6WW5wR1IwMUZVVWRCTVZWRlFYaE5PVkZWVFdkVmJVWndaV2xDYTFwVFFsVmFXRTR3V2xOQ1ZGcFhUbmxhV0ZKb1kyMXNhRWxIVW1oSlJWcG9EUXBsYlZaMVdrZEZaMXBIT0dkU1dFNHdXVmRTZGtsSFVteEpSazVvWW5sQ1VWbFlWbk5pZWtORFFXbEpkMFJSV1VwTGIxcEphSFpqVGtGUlJVSkNVVUZFRFFwblowbFFRVVJEUTBGbmIwTm5aMGxDUVU1T1ltbExabTFyT0ZaVFIwSnNibTh4V0hWWU5YQm9hV3gzVDNsUlZtSnlOR1owYzFOR2RtOTJObEZCVEM4NURRcEdTV0Z3ZWxKRWN6RldkbU5TYUZSblFYVm5LMU15YzNSVlJpOWlVMmRRWTJKbE9XeFRUa2xtTTNneVkwOVRSVWcxWkV0TVUyWkVXalZ3WVVZMlUzbDJEUXBwVDA1clMwbFdaRTk1TUc1SGNVSXZaamRtTXpCdFpEbE1VMFl3WWsxYWJ6STJibVJQTlhWaWFrOU5VM1pyY2pCemRHcDJjWE16UjJJMk5qUlBOM2MxRFFwbmVubFJjVlZtTjFaS1ZUSldOWGhNTnpBdllXOUlZbXA0VVRaWmNGbElhRFZVT0hobFVFVjJhVWROZUhob2JXOWpkbVZyTUdWSWJYaGFNVnBCUm5kbURRcG1iV3BhY0dkdEt6TkJiV1VyUVdKMVowSXhjVmxrT1RkWFFsVmpMMUkyY2xZelNGVkphRXRNZG1zd1FtTXlRazVUUVdwS1ZITnRVbEpvTm5oaU5VVlBEUXBJVjNVNFNqbFZPVE5QVkRCdFEwUlRMMGMwZWtGd0t6SXdWbFZhVGxONVdIb3pka2h2ZHpOV1FrRTBjazQzVlV0aFRWQTRVMEZHY1dKUWQycFFhR1kyRFFwV2VVaGFTa2hHZVVscmFteFZMMDlsT0drNGFGSm9aU3QxUzBsdWVtMWtVa2xuYTNGcVF6UktZbE00TDBoS2QxcENlV0oxY2xodFpsWm5aMEp5V2pjeURRcDFTV3hJZVdaTFFXVnZaRTgySzFWdWRrOVJVVE5rVVhOTGMyaHNTMmwyZFVOS2VuWlpiSEJVWVc1VmJIbFVlWEoxZDBaV0wwMHpiSFZ3VlhWc1NrSjJEUW9yUlZwdVkySjNMMGd5VDFWR1NVOTVjeXRtYVVscWJ5OXlVQ3RWVkVWdVJUQmFlRXhNV1daTlNFNUlibTk1UmtaV1dsaFhNRmxMU1ZaMmQyOVZNRWd5RFFwTU5FRmxjbmx6V1d4ek5HcEhXV3A2UlhVMlRYSm9ORmwyU3k5RmEycEdRbmhzZVZGeFFpdHJMelpaY0haRVVFZEJSV05EV0V4bE0weFlaeTlHUjBSTERRcFZkalJTU2pSSE1YZDNXR0pEVTBscGRTdHNUM2hJUW5keGEzRmpZV28wWlZSNGFHUnlZWFpGWm1wNFVEazFaWEJDTjNBNVoxSlhaWGhMU1daQlowMUNEUXBCUVVkcVoyZEZiMDFKU1VKS1JFRlFRbWRPVmtoU1RVSkJaamhGUWxSQlJFRlJTQzlOU0hOSFFURlZaRWxCVWpCTlNFbDNZMEZaU2t0M1dVSkNRVWRDRFFvM1F6QkRUVWROZDFsUldVbExkMWxDUWxGVlNFRm5SVmRXVjJnd1pFaEJOa3g1T1doWk0wNW9aRU14TUZwWVRqQmFVelZ3WWxoQ2VWcFhOWHBaVnpsdERRcGhWMDV3V1ZkM2RWa3lPWFJNYlVwNVRETktiR05IT1hwaFdGSjJZMjFzZGt3eVVuZFplVGxvV1ROT2JGcHRSalpqTTBGMldraENhbGd5Um1wak1sWnREUXBaV0hCNlkwTTFkMXBIV1hkYVVWbEVWbEl3WmtKR05IZFlSRUpoYjBacFoxWnZXbFZoU0ZJd1kwUnZka3d5Um1wak1rWXdURmhTYkdNelVteE1iV3gwRFFwalNFcHNZbTVPYUdJeVduQlpNbXhvWWtNMWFtSXlNSFZaYmtsMlkyMVdkMkl6VG5Ca1J6bDVZVmM0ZG1KSFRubE1Na1pxWXpKV2JWbFljSHBqUXpsb0RRcFpNMDVzV20xR05tTXpRbXBqYlhkMVdUTktjMDFCTkVkQk1WVmtSSGRGUWk5M1VVVkJkMGxDUW1wQlpFSm5UbFpJVVRSRlJtZFJWVEZhUTFkeFRHOUhEUXBLV0VkMkwwZ3piRGR4VEUxRlpVTklaSEk0ZDBSUldVcExiMXBKYUhaalRrRlJSVTVDVVVGRVoyZEpRa0ZGYWxoaVNGaEdOR3hYVkVGRFNISjBNblIzRFFveWFtUnllbTVxTTFGSmRuaE5XbEJ0VlZkdVIwbFJSVWRKSzBRNFNYWlJURTFNV0RKR2QycEVSVk5rTDBKS1VYbElUSE0zWTFBdmREUnhlRXN5ZW1aSURRbzJkbGR2UzFGNGNHbGpRVTVDYkVoWk1FbzFabFpWWjBwdFFYUjJiV2xDYnpWNVUyRnViSE4yZWsxdlpDdDNVMHBVVDJaRVpqQm5Na3RJWm1oWk1razJEUXBJUkdSemNXUm9TMk00VEZNdldDdEJlblJpVmtWWVQxazRjMXBJVnpoTWJVOXBPRkkwV1c5aFltWkVZMkZEZERCc2IyaEdRekZtUnpWM1JIQTFPVzF0RFFwV2REQXpUa3haYUhaaWFUTkRkRU5ZUkhkMVEzWm1ORGhqV213dmIxVldkSEZwTkhBemJpdERTazVxYkROME4wWkJNRVprTUdkclZHMXdjVXRFWW5vd0RRcFNiRVp0ZGpVemVWazBjak5wVDJOQ2RVNU5aVzkxUkRFdmMwUXlZa0pyVTAxRFUzbEZMMHBZUjNaUVZEQlVOamhWWWtsR1REZEhiWEV4ZDFoM2NrRkNEUXBzWkV4eVFqSkJSMEZFYlhkWFpYYzBlbXhuVmpKMVNqTm5Va3BaTDJSU1NVVlNNVkZyU0VWNmRFUlJRVGhuYm5GdFdrcHRNVmcxV1dsQmMzaHZUa3BHRFFwQmMyWkNOVVZVUlRNNVRrOW5Na2xKY2pRNFZ6UXdTalZPVVdSS2NHUjBiSEZTYlhBek5qRlBVRWw1VG5wV05HWTVOemt4YmtaVmFHZFBPVnBrWVZKNURRcG9NWGs0TjNGWFNHVkpNMlpQUzFkR09XZHBTalUwTlVFNVMwZ3ZhV296Tm5GQ1dsUm9SazlFVEUwd1JXZFJOVFJHWjFsQ0wwcEhRMFZyYkZCVGRrb3JEUXBNWVZsRFFXWnlTak5qV0ZkNksyNW9UbEJNZVhoTk5VTkJUMmR1Vm1sR1JXZG1SVTVtUmtadlJpczRjVzFJU1U5RU5sVllabkExUzFKalNrd3pjRGhrRFFwWlVWYzJWVzlzUTJ0cGFIVXdVekZFUjJoRmEwcDZSMDVXT1ZkMVRVRTRUMWxXUVd0Uk5ESjBhMlZSZDFnNU5WRlJhV053TkZwVGFHaHlSbkJLVVZOSERRb3pTbEZNV0VkdmFqYzRPWEp4UjNOcVQyNHhiRTFuYnpNTkNpMHRMUzB0UlU1RUlFTkZVbFJKUmtsRFFWUkZMUzB0TFMwPTwvWDUwOUNlcnRpZmljYXRlPjwvWDUwOURhdGE+PC9LZXlJbmZvPjwvU2lnbmF0dXJlPjwvQ0ZlPg==|20141119164919|000000|CFe35141161099008000141599000009730000003075622

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Não compreendo os posts... o componente  ACBrSAT já faz chamada e tratamento para todas essas funções...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Fundadores

SIM, todas as DLLs SAT são compatíveis entre si, mudando apenas o meio de chamada "stdcall" ou "cdecl"... e para isso o ACBrSAT tem 2 modelos...

Leia o começo desse post...

 

Você pode testar a aplicação Demo baixando a desse endereço:

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

Olá caros, a DIMEP lançou recentemente uma campanha para incentivar as Software Houses que tiverem interesse em indicar seus clientes para a compra do D-SAT. 

 

Quer ganhar mais com a DIMEP?

Campanha D-SAT, indique e ganhe!
Agora já está valendo! Foi emitido o primeiro cupom fiscal utilizando a tecnologia CF-e-Sat e a Dimep é a primeira empresa a implementar esta solução através do equipamento D-SAT. Venha fazer parte deste sucesso conosco, a cada cliente que você indicar e gerar negócio para o equipamento D-SAT ganhe R$ 50,00 por equipamento vendido até 31/12/2014.

Não deixe para a última hora. Indique já o D-SAT para seus clientes.

Campanha válida para indicação e ou venda efetiva do produto.

http://www.p2criacao.com.br/dimep/mailing/IndicaVendas/IndicaVendas.html

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Me diz uma coisa, onde é armazenado o retorno do D-SAT DIMEP? 

Pois não achei... 

Obrigado

Para salvar automaticamente os XMLs, use as propriedades abaixo:

  ACBrSAT1.SalvarCFes := True;
  ACBrSAT1.PastaCFeVenda := PathCFe;
  ACBrSAT1.PastaCFeCancelamento := PathCFeCancelado;
djsystem-logo.png
 youtube.png facebook.png instagram.png linkedin.png
André Ferreira de Moraes | Analista de Sistemas
www.djsystem.com.br | www.djpdv.com.br
www.tefhouse.com.br | www.lambretinha.com.br
Link para o comentário
Compartilhar em outros sites

Muito obrigado.
Mas é o seguinte, a resposta que eu quero saber é a mensagem que o D-S@T da quando a  função foi realizada com sucesso ou deu algum erro.
Ex:

" 026500|10000|Resposta com Sucesso.|||900000980|DHCP|192.168.000.1xx|02:01:00:00:09:80|255.255.255.000|192.168.000.xxx|192.168.000.xxx|000.000.000.000|CONECTADO|ALTO|1 Gbyte|177 MbytesMbytes|20141203091958|01.00.00|00.06|00000000000000000000000000000000000000000000|00000000000000000000000000000000000000000000|00000000000000000000000000000000000000000000|20141203091943|20141203091943|20141104|20191102|0"

Antes essa mensagem de retorno, com o emulador da receita, era armazenado em um arquivo .txt, porém com o D-S@T não encontrei nada disso, e a unica função que no que me parece que seria o retorno "CodigoErro()", está dando erro ao ser chamada.

Não estou usando o Acbr, nesse momento pq estou fazendo um projeto que irá fazer esses procedimentos, porém no Acbr retorna isso...


Obrigado.

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Não estou usando o Acbr, nesse momento pq estou fazendo um projeto que irá fazer esses procedimentos, porém no Acbr retorna isso...

Se vc não usa o ACBr, então esse não é lugar correto para tirar suas dúvidas, pois o fórum é sobre o componente ACBrSAT.
djsystem-logo.png
 youtube.png facebook.png instagram.png linkedin.png
André Ferreira de Moraes | Analista de Sistemas
www.djsystem.com.br | www.djpdv.com.br
www.tefhouse.com.br | www.lambretinha.com.br
Link para o comentário
Compartilhar em outros sites

  • Fundadores

O código de resposta está na String que você copiou...

 

Você precisa ler a Especificação de Requisitos do  SAT

http://www.fazenda.sp.gov.br/sat/downloads/vigentes.asp

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • 3 semanas depois ...
  • Fundadores

Após receber um SAT da Dimep, pude fazer novos testes... e implementei as seguintes melhorias:

 

Data: 20/12/2014
-- ACBrSAT --        (por: DSA) [*] Mecanismo de Gravação de Log modificado, para permitir que a aplicação trate
    a gravação das linhas por si.. [*] TACBrSAT agora passa a descender de TACBrComponent
[+] Adicionada a propriedade: Rede : TRede, para permitir gerar e manipular os
    XMLs para configuração da Interface de Rede do SAT [*] ConfigurarInterfaceDeRede modificado para caso não receba o conteudo de um
    XML como parâmetro de entrada, irá gerar um XML com os valores atribuidos a
    ACBrSAT.Rede [*] Metodo TesteFimAFim modificado para salvar o conteudo do XML de resposta em
    ACBrSAT.CFe, no caso de sucesso.

 

Lembram que o SAT da Dimep é compatível com o ACBrSAT, usando o modelo satDinamico_stdcall

  • Curtir 1
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Mais algumas melhorias:

 

Data: 21/12/2014
-- ACBrSAT --        (por: DSA)
[+] Adicionada nova propriedade "Status: TACBrSATStatus", que conterá os valores
    já tratados da resposta ao método: "ConsultarStatusOperacional"

 

Demo do ACBrSAT atualizado em:

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3386 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.