Ir para conteúdo
  • Cadastre-se

arturguerra

Membros
  • Total de ítens

    10
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

arturguerra's Achievements

Apprentice

Apprentice (3/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

1

Reputação

  1. Claro ! Segue anexo o arquivo com a gambiarra ! Abraço ! Artur ACBrMTer.pas
  2. Sim tudo ligado e funcionando. A questão é na hora de retornar o peso com a balança Magna. Detectei o problema na linha 615 da unit ACBrMTer. Fiz uma gambiarra, para poder entregar o programa ao cliente, e depois vou verificar o que realmente está causando o retorno sempre zero do peso e postar no grupo. Segue a gambiarra: //linha 615 da ACBrMTer if (Tag = 1) then // Lendo Peso begin Tag := 0; //início da gambiarra x := RespostaTratada; Delete(x,1,4); x := trim(x); x := TiraCharIlegalNumerico(x); Insert(',' , x, (x.Length - 2)); d := StrToFloat( x );//StrToFloatDef( x , 0); PesoLido := d; //BAL.InterpretarRepostaPeso(Trim(x));//RespostaTratada)); //fim da gambiarra fConexoes.ACBrMTer.DoRecebePeso(IP, PesoLido); end Abraço ! Artur
  3. Boa tarde. Estou tentando fazer a integração da balança Magna L-PCR-40 e terminal WillTech W6000U, utilizando o como base o exemplo ACBrMTer . Tudo funciona corretamente exceto quando mando pegar o peso o retorno é sempre zero. Não dá erro, mas não retorna o peso, somente zero. Alguém sabe como ou pode me ajudar ? Um abraço ! Artur Guerra
  4. Boa noite. Estamos com um problema na emissão de uma nota fiscal de importação. Tudo preenchido como manda o manual, mas recebemos o erro anexo. Na outra imagem, temos a estrutura da tag <DI>. Alguém ??
  5. Perfeito Sérgio ! Era exatamente o que eu precisava ! Um abraço ! Artur.
  6. Sim Sérigo, isso eu sei. A questão é diferente: tenho o arquivo retorno. Não estou processando a venda pelo ACBRSat. Gostaria de passar o retorno que tenho (enviado acima), para o ACBRSat e ele fazer a tradução. Tenho 10 equipamentos SAT, conectados a apenas um CPU, por isso não uso o ACBRSat para as vendas. Alguma idéia ? Artur.
  7. Boa tarde. Tenho o retorno de processamento de venda de um equipamento SAT, num arquivo texto. Existe alguma forma de carregar o conteúdo deste arquivo, para o ACBRSat e efetuar a conversão para guardar o arquivo xml já decodificado ? Abaixo o conteúdo do arquivo: 015830|06000|0000|Emitido com sucesso + conteúdo notas|||PENGZT48aW5mQ0ZlIElkPSJDRmUzNTE3MDI2MTA5OTAwODAwMDE0MTU5OTAwMDAyMDg3MDAwNDA2MDA4NTIyNCIgdmVyc2FvPSIwLjA2IiB2ZXJzYW9EYWRvc0VudD0iMC4wNiIgdmVyc2FvU0I9IjAxMDIwMCI+PGlkZT48Y1VGPjM1PC9jVUY+PGNORj4wMDg1MjI8L2NORj48bW9kPjU5PC9tb2Q+PG5zZXJpZVNBVD45MDAwMDIwODc8L25zZXJpZVNBVD48bkNGZT4wMDA0MDY8L25DRmU+PGRFbWk+MjAxNzAyMTQ8L2RFbWk+PGhFbWk+MTMwMDE1PC9oRW1pPjxjRFY+NDwvY0RWPjx0cEFtYj4yPC90cEFtYj48Q05QSj4xNjcxNjExNDAwMDE3MjwvQ05QSj48c2lnbkFDPlNHUi1TQVQgU0lTVEVNQSBERSBHRVNUQU8gRSBSRVRBR1VBUkRBIERPIFNBVDwvc2lnbkFDPjxhc3NpbmF0dXJhUVJDT0RFPlBFbmpoWGdZYU5JcEs0Sm9xM1J6bXFwUkhLWUNremd1akdQN0tHYjZYV3dyZWllT29oRkVUWXBhd3hocGp5TmUyakxxVGpzNU5aNG9tSVJVQ0M3WDRwL0UxMVB3Z3NtVHF3UXIzRTZzMEI1MDVZTk5TZC9xeFoxN3hsekduM0F5VHc0eTFKVXFBdGtIUTZkT2puQUoyWnBpOWxiemU1RWtUaktwVDJ5RFEzQ1ZIc0FCM1c1Sng5R1p4VEZhdENZRUZKdFYrenVxUyt3a1R4R0ZUZWQybGQ1UEIvQXZFK2RvY3dhM0JNMDBPa3Z2eFZmV0pzUW9GTEhQaEJyM1FZQkNEeEdpRzFUWGgwU3dLSnMvT3pTdTI4bGViMW40emhhMFRqTm4rWHpWRytBeFpwTVFFUnJlR3R0QzNzNUZGWEZYa3QyU1o4Q1g4eDdjZUlhWWgrT3pOdz09PC9hc3NpbmF0dXJhUVJDT0RFPjxudW1lcm9DYWl4YT4wMDE8L251bWVyb0NhaXhhPjwvaWRlPjxlbWl0PjxDTlBKPjYxMDk5MDA4MDAwMTQxPC9DTlBKPjx4Tm9tZT5ESU1BUyBERSBNRUxPIFBJTUVOVEEgU0lTVEVNQVMgREUgUE9OVE8gRSBBQ0VTU08gTFREQTwveE5vbWU+PHhGYW50PkRJTUVQPC94RmFudD48ZW5kZXJFbWl0Pjx4TGdyPkFWRU5JREEgTU9GQVJSRUo8L3hMZ3I+PG5ybz44NDA8L25ybz48eENwbD45MDg8L3hDcGw+PHhCYWlycm8+VkwuIExFT1BPTERJTkE8L3hCYWlycm8+PHhNdW4+U0FPIFBBVUxPPC94TXVuPjxDRVA+MDUzMTEwMDA8L0NFUD48L2VuZGVyRW1pdD48SUU+MTExMTExMTExMTExPC9JRT48SU0+MTIzMTIzPC9JTT48Y1JlZ1RyaWI+MzwvY1JlZ1RyaWI+PGluZFJhdElTU1FOPk48L2luZFJhdElTU1FOPjwvZW1pdD48ZGVzdD48Q1BGPjIxNjUwMzA3ODEwPC9DUEY+PC9kZXN0PjxkZXQgbkl0ZW09IjEiPjxwcm9kPjxjUHJvZD4xMjM8L2NQcm9kPjx4UHJvZD5DSU1FTlRPPC94UHJvZD48TkNNPjI1MjMyOTEwPC9OQ00+PENGT1A+NTQwMTwvQ0ZPUD48dUNvbT5VTjwvdUNvbT48cUNvbT41LjAwMDA8L3FDb20+PHZVbkNvbT4xNS4wMDwvdlVuQ29tPjx2UHJvZD43NS4wMDwvdlByb2Q+PGluZFJlZ3JhPkE8L2luZFJlZ3JhPjx2SXRlbT42Ny41MDwvdkl0ZW0+PHZSYXREZXNjPjcuNTA8L3ZSYXREZXNjPjwvcHJvZD48aW1wb3N0bz48SUNNUz48SUNNU1NOMTAyPjxPcmlnPjA8L09yaWc+PENTT1NOPjUwMDwvQ1NPU04+PC9JQ01TU04xMDI+PC9JQ01TPjxQSVM+PFBJU1NOPjxDU1Q+NDk8L0NTVD48L1BJU1NOPjwvUElTPjxDT0ZJTlM+PENPRklOU1NOPjxDU1Q+NDk8L0NTVD48L0NPRklOU1NOPjwvQ09GSU5TPjwvaW1wb3N0bz48L2RldD48dG90YWw+PElDTVNUb3Q+PHZJQ01TPjAuMDA8L3ZJQ01TPjx2UHJvZD43NS4wMDwvdlByb2Q+PHZEZXNjPjAuMDA8L3ZEZXNjPjx2UElTPjAuMDA8L3ZQSVM+PHZDT0ZJTlM+MC4wMDwvdkNPRklOUz48dlBJU1NUPjAuMDA8L3ZQSVNTVD48dkNPRklOU1NUPjAuMDA8L3ZDT0ZJTlNTVD48dk91dHJvPjAuMDA8L3ZPdXRybz48L0lDTVNUb3Q+PHZDRmU+NjcuNTA8L3ZDRmU+PERlc2NBY3JFbnRyPjx2RGVzY1N1YnRvdD43LjUwPC92RGVzY1N1YnRvdD48L0Rlc2NBY3JFbnRyPjx2Q0ZlTGVpMTI3NDE+MC4wMDwvdkNGZUxlaTEyNzQxPjwvdG90YWw+PHBndG8+PE1QPjxjTVA+MDE8L2NNUD48dk1QPjEwMC4wMDwvdk1QPjwvTVA+PHZUcm9jbz4zMi41MDwvdlRyb2NvPjwvcGd0bz48aW5mQWRpYz48aW5mQ3BsPkdlcmFkbyBwb3I6R2VTQVQgVmVyc2FvIDEuMC4wLjEgLSBzaXRlOiB3d3cuZ2Vjb24uaW5mLmJyPC9pbmZDcGw+PG9ic0Zpc2NvIHhDYW1wbz0ieENhbXBvMSI+PHhUZXh0bz54VGV4dG8xPC94VGV4dG8+PC9vYnNGaXNjbz48L2luZkFkaWM+PC9pbmZDRmU+PFNpZ25hdHVyZSB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC8wOS94bWxkc2lnIyI+PFNpZ25lZEluZm8+PENhbm9uaWNhbGl6YXRpb25NZXRob2QgQWxnb3JpdGhtPSJodHRwOi8vd3d3LnczLm9yZy9UUi8yMDAxL1JFQy14bWwtYzE0bi0yMDAxMDMxNSI+PC9DYW5vbmljYWxpemF0aW9uTWV0aG9kPjxTaWduYXR1cmVNZXRob2QgQWxnb3JpdGhtPSJodHRwOi8vd3d3LnczLm9yZy8yMDAxLzA0L3htbGRzaWctbW9yZSNyc2Etc2hhMjU2Ij48L1NpZ25hdHVyZU1ldGhvZD48UmVmZXJlbmNlIFVSST0iI0NGZTM1MTcwMjYxMDk5MDA4MDAwMTQxNTk5MDAwMDIwODcwMDA0MDYwMDg1MjI0Ij48VHJhbnNmb3Jtcz48VHJhbnNmb3JtIEFsZ29yaXRobT0iaHR0cDovL3d3dy53My5vcmcvMjAwMC8wOS94bWxkc2lnI2VudmVsb3BlZC1zaWduYXR1cmUiPjwvVHJhbnNmb3JtPjxUcmFuc2Zvcm0gQWxnb3JpdGhtPSJodHRwOi8vd3d3LnczLm9yZy9UUi8yMDAxL1JFQy14bWwtYzE0bi0yMDAxMDMxNSI+PC9UcmFuc2Zvcm0+PC9UcmFuc2Zvcm1zPjxEaWdlc3RNZXRob2QgQWxnb3JpdGhtPSJodHRwOi8vd3d3LnczLm9yZy8yMDAxLzA0L3htbGVuYyNzaGEyNTYiPjwvRGlnZXN0TWV0aG9kPjxEaWdlc3RWYWx1ZT51ZzBGcWs0bW1IeGxiQTRpcitTQ0VTdHcva2ZoaGwwbytIWTg2aXg0enJNPTwvRGlnZXN0VmFsdWU+PC9SZWZlcmVuY2U+PC9TaWduZWRJbmZvPjxTaWduYXR1cmVWYWx1ZT5aK1MwaHp6TWlycGxvSmxKYy9wWEllMEh5Sm5TQkZ4dnM2K2lKYURYb1NQK0srL3RXYUNGUmNyYlJ2YjZqNlR5Qlk5K1BiVkoxVlV1T0kxYnEzRlk2b0NneGFCRnhhRFQ5ZUQ3VlBvRXdmTmNPVUNHMDgrV3FtNE9OODhzT2hCQkxlek5Od2lhWTlBNkRDS3RVNk85ZzdiYmtsZWdBamZUemVsSzZUSXNEOE45OEFzR3BQUGtHYVJrOGdSbkdDeHp2OTBEMTltYk5YWWl0MHZ1MlVhSE5RMDMwckd6Sldad0UrNVVzdE1VSHBBbWk1b3JscUNFYnVmUHJLNzlPSU1nUFNqQU11aXZsK1J5K1NkNUF6QTVVQU9IZXFaNm9wTUk1OVFaZVloSm1xeGp1WUs2NGR2U3drMnd5VG9WVWw1Q2ZsTlgyc2Y0M2tFY3ladjRRK29DTkE9PTwvU2lnbmF0dXJlVmFsdWU+PEtleUluZm8+PFg1MDlEYXRhPjxYNTA5Q2VydGlmaWNhdGU+TUlJRzd6Q0NCTmVnQXdJQkFnSVFkc2t6dCsrVnJCUTFhdjhtcElRSldqQU5CZ2txaGtpRzl3MEJBUXNGQURCbk1Rc3dDUVlEVlFRR0V3SkNVakUxTURNR0ExVUVDaE1zVTJWamNtVjBZWEpwWVNCa1lTQkdZWHBsYm1SaElHUnZJRVZ6ZEdGa2J5QmtaU0JUWVc4Z1VHRjFiRzh4SVRBZkJnTlZCQU1UR0VGRElGTkJWQ0JrWlNCVVpYTjBaU0JUUlVaQldpQlRVREFlRncweE5UQTBNREV3TURBd01EQmFGdzB5TURBek1qa3lNelU1TlRsYU1JSHNNUXN3Q1FZRFZRUUdFd0pDVWpFU01CQUdBMVVFQ0JNSlUyRnZJRkJoZFd4dk1SRXdEd1lEVlFRS0ZBaFRSVVpCV2kxVFVERVBNQTBHQTFVRUN4UUdRVU10VTBGVU1TZ3dKZ1lEVlFRTEZCOUJkWFJsYm5ScFkyRmtieUJ3YjNJZ1FWSWdVMFZHUVZvZ1UxQWdVMEZVTVJ3d0dnWURWUVFMRkJNeE5ESTNPVEV5TWpZd01UWXpOekkzTWpnMU1SSXdFQVlEVlFRRkV3azVNREF3TURJd09EY3hTVEJIQmdOVkJBTVRRRVJKVFVGVElFUkZJRTFGVEU4Z1VFbE5SVTVVUVNCVFNWTlVSVTFCVXlCRVJTQlFUMDVVVHlCRklFRkRSVk5UVHlBNk5qRXdPVGt3TURnd01EQXhOREV3Z2dFaU1BMEdDU3FHU0liM0RRRUJBUVVBQTRJQkR3QXdnZ0VLQW9JQkFRREgvNWdCTW13MXdqaWFmcDA4dzk5ZnE1R1pQSVU0d2JQakp0b2tvWDc3OFRtcHpSc3Y2L29INHh1eG8rT2F6UEFrTEQrWFlGZUJZV2tPK01vRGNib1Q3cWFhbFRNSkN0TlExQlFQckc1U25jS1RmZWorTHBZM2laU2VlYUdiSVdSQUtFeUpmRUJBYjk2NEczd2tvdWhPTEZzMDhhbkxvYTN1cjZtVGQ0WVpOa1BncStqdnA3aFJjRzJ0UTVoZ0RZUGRrNmdMMjV6RE1ldVRuSVRjc1k1NzQzZXZFK09HbUJBYWltd0NVTjl3R0hUV0VKYkFWWEtaeWNLMTZKa1Z3djhnNkgrWk5zdVhWY0RyN3l1N0crcmFnQWpXbTZ4Z1F2SGxzaHdVUlpMV0R0cDBZak5pVE1Mb09TVWIzWFNINFRQZHB5b2tycld0ekc4WWpyalVkNmluQWdNQkFBR2pnZ0lQTUlJQ0N6QWtCZ05WSFJFRUhUQWJvQmtHQldCTUFRTURvQkFFRGpZeE1EazVNREE0TURBd01UUXhNQWtHQTFVZEV3UUNNQUF3RGdZRFZSMFBBUUgvQkFRREFnWGdNQjhHQTFVZEl3UVlNQmFBRkk0NVFRQmM4cmdGMnFodG1Ma0JSbTF1WTk4Q01Hc0dBMVVkSHdSa01HSXdZS0Jlb0Z5R1dtaDBkSEE2THk5aFkzTmhkQzEwWlhOMFpTNXBiWEJ5Wlc1ellXOW1hV05wWVd3dVkyOXRMbUp5TDNKbGNHOXphWFJ2Y21sdkwyeGpjaTloWTNOaGRITmxabUY2YzNBdllXTnpZWFJ6WldaaGVuTndZM0pzTG1OeWJEQjdCZ05WSFNBRWREQnlNSEFHQ1NzR0FRUUJnZXd0QXpCak1HRUdDQ3NHQVFVRkJ3SUJGbFZvZEhSd09pOHZZV056WVhRdWFXMXdjbVZ1YzJGdlptbGphV0ZzTG1OdmJTNWljaTl5WlhCdmMybDBiM0pwYnk5a2NHTXZZV056WVhSelpXWmhlbk53TDJSd1kxOWhZM05oZEhObFptRjZjM0F1Y0dSbU1CTUdBMVVkSlFRTU1Bb0dDQ3NHQVFVRkJ3TUNNSUduQmdnckJnRUZCUWNCQVFTQm1qQ0JsekJmQmdnckJnRUZCUWN3QW9aVGFIUjBjSE02THk5aFkzTmhkQzEwWlhOMFpTNXBiWEJ5Wlc1ellXOW1hV05wWVd3dVkyOXRMbUp5TDNKbGNHOXphWFJ2Y21sdkwyTmxjblJwWm1sallXUnZjeTloWTNOaGRDMTBaWE4wWlM1d04yTXdOQVlJS3dZQkJRVUhNQUdHS0doMGRIQTZMeTl2WTNOd0xYQnBiRzkwTG1sdGNISmxibk5oYjJacFkybGhiQzVqYjIwdVluSXdEUVlKS29aSWh2Y05BUUVMQlFBRGdnSUJBSHBrS1o4ZU0vblpVOG5TR29zdVBhQW9qRGpIQnJPVnE3anUyWVkyZGhXbEVBRmtjcld6MWQ5Q2doRmFLaEp0NnRYUTF6SWtwc1FqM0lVS0VBUkU3a09hRGw5UEtRRGJibE5tOFM4M3BrWnRlNCt3MFJNNFJkQ0NMYXRMZ0NSNWVxYWVsNzBveDlqUHhJQUV2R1JFaWRHV1pTNnJwL0FGVk5XMkN6dHJMZTZxVHlDUmR2bDc1WUdyYjNHTGU2ZDdCaXllWlRuRHN4TUJKaG1rUkMzL2pRY2kvOGNhdjVPNVVzTXZLQ1VhVFcvYVA3VXpSdVQ3S0paQ0hNYWNVUHA2YkNPVTZoZzc0M1Q2TlY4VkZ5QmVMQWdxRm92MmlZcENPQ2JaZ0E4YW1nMHl6QjVOUzVjR1VENGg5V01yc3NXN3BHcFNlei82cVlSekVzOUtVejlTUm9CLzlFTXhIZ3FmWkh0a3dCaDZNaHI4QmcxcG1VUjZHMS9DQngrR1R2WXhFSEtIMEFrWWE1YVFRK29UcmFQdVIxdllDV1FYWUFpanhkMXIwbUhMb3h3aW83bUo0ZW9rL1Mya25XTXdCWUxXaFZqOWhFaFpBNXo1Y2tGTVVjTFNNYmJuRkFqb3JtN1lHRzhja2dRWEpXMTVlZGlyNXEyT1BhQ0JLMHFQTFFOR2VkVFBpK0pLWk56WWc4MkRLT1dGUVd5aE9uckpkdVBmbXRuWXBtc1EzRncrOTk3bDNKVE1Icnh3d2w2YkVkaGp3dWNXQnVDSHRGZ1ZuSDlsMmxKWVJSdjJWb1owQ1RWRkJZRVVxTUR0ZVlBMXdvMmx3RW8vbDRaMWhEOG5scUJQbUJVL3M5YSthYXpuOWdBUHdkSmtsV3MzSWo5NWtBODJ0ZmY2NVRKODNDcEg8L1g1MDlDZXJ0aWZpY2F0ZT48L1g1MDlEYXRhPjwvS2V5SW5mbz48L1NpZ25hdHVyZT48L0NGZT4=|20170214130015|CFe35170261099008000141599000020870004060085224|67.50|21650307810|PEnjhXgYaNIpK4Joq3RzmqpRHKYCkzgujGP7KGb6XWwreieOohFETYpawxhpjyNe2jLqTjs5NZ4omIRUCC7X4p/E11PwgsmTqwQr3E6s0B505YNNSd/qxZ17xlzGn3AyTw4y1JUqAtkHQ6dOjnAJ2Zpi9lbze5EkTjKpT2yDQ3CVHsAB3W5Jx9GZxTFatCYEFJtV+zuqS+wkTxGFTed2ld5PB/AvE+docwa3BM00OkvvxVfWJsQoFLHPhBr3QYBCDxGiG1TXh0SwKJs/OzSu28leb1n4zha0TjNn+XzVG+AxZpMQERreGttC3s5FFXFXkt2SZ8CX8x7ceIaYh+OzNw== Artur
  8. A sintaxe traduzida para Delphi, que funcionou comigo, dos comandos citados pelo Guilherme, existentes na dll, ficaram assim: function GetPortaSAT(serial : PAnsiChar; sessao : Longint ; codatv : PAnsiChar) : PAnsiChar ; stdCall; External 'dllsat.dll'; function GetMapaPortasSAT (codatv : PAnsiChar) : PAnsiChar ; stdcall; External 'dllsat.dll'; Agora consegui retornar os valores e montar vários SAT's numa CPU só. Artur.
  9. Boa noite. Estou desenvolvendo uma solução, que deverá utilizar dois ou mais SAT's conectados à mesma CPU. O fato é que em contato com suporte da DIMEP, foi-me informado que a DLL atual, já consegue fazer este gerenciamento. Baixei a DLL, e fiz a chamada de todas as formas q conheço e não consegui fazer a comunicação com os dois SAT's. Alguém, tem uma idéia ou dica pra passar ? Ou ainda, no ACBRSat eu consigo alterar a porta para qual eu quero que ele opere ? O cenário é simples: SAT1 na COM1 & SAT2 na COM2 Quero emitir a venda 1 na COM1 e depois que esta for finalizada, a venda 2 na COM2, ou seja, não precisa ser simultâneo. Um abraço. Artur.
  10. Também estou precisando iniciar o desenvolvimento. Alguém tem notícia ?
×
×
  • 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.