Dúvida sobre o novo suporte à USB (ACBrDevice)

[jjw.roberto]

 

Isso também engloba as impressoras fiscais (ECF) ?

 

[Daniel Simoes]

Não testei a nova funcionalidade, com as Impressoras Fiscais... como elas estão morrendo... achei que não faria sentido...

[jjw.roberto]

5 minutos atrás, Daniel Simoes disse:

Não testei a nova funcionalidade, com as Impressoras Fiscais... como elas estão morrendo... achei que não faria sentido...

Ah, mas aqui em SC ta cheio dessas "moribundas" . Elas tem pelo menos mais 2 anos de vigência, estão começando a definir a NFC-e agora aqui no estado (que provavelmente vai ser um "SAT da vida" como de SP) ...

Mas na teoria deveria funcionar?

[Daniel Simoes]

Qual Marca e Modelo ?

Preciso plugar um, e verificar se o ACBr encontra ela... talvez isso possa ser verificado com o botão "Informações USB", do Demo do PosPrinterTeste

 

[jjw.roberto]

Em 09/01/2020 at 16:43, Daniel Simoes disse:

Qual Marca e Modelo ?

Preciso plugar um, e verificar se o ACBr encontra ela... talvez isso possa ser verificado com o botão "Informações USB", do Demo do PosPrinterTeste

 

Temos várias marcas e modelos que nossos clientes usam, mas as mais comuns são:

• Bematech TH FI MP-4000
• Bematech TH FI MP-4002
• Epson T81 FB III
• Epson T900 F

OBS.: testei com uma Epson T900F, mas o tal do botão "Informações USB" não listou nada.

Editado 14 Janeiro, 2020 por jjw.roberto

[jjw.roberto]

@Daniel Simoes, nenhuma posição?

[Daniel Simoes]

Ainda não tive tempo de analisar...

[everson.turossi]

Em 14/01/2020 at 08:17, jjw.roberto disse:

OBS.: testei com uma Epson T900F, mas o tal do botão "Informações USB" não listou nada.

Tenta o seguinte, lista todos os dispositivos, e pega o DeviceInterface e usa como porta

procedure TForm7.Listar();
var
  I: Integer;
  LDevice: TACBrUSBWinDevice;
begin
  ACBrPosPrinter1.Device.WinUSB.DeviceList.Clear;
  ACBrPosPrinter1.Device.WinUSB.FindUSBDevicesByGUID(GUID_DEVINTERFACE_USB_DEVICE);

  MemoDispositivos.Lines.Clear;
  for I := 0 to Pred(ACBrPosPrinter1.Device.WinUSB.DeviceList.Count) do
  begin
    LDevice := ACBrPosPrinter1.Device.WinUSB.DeviceList.Items[I];
    MemoDispositivos.Lines.Add('DeviceKind:' + DeviceKindDescription(LDevice.DeviceKind));
    MemoDispositivos.Lines.Add('DeviceName:' + LDevice.DeviceName);
    MemoDispositivos.Lines.Add('VendorID:' + LDevice.VendorID);
    MemoDispositivos.Lines.Add('VendorName:' + LDevice.VendorName);
    MemoDispositivos.Lines.Add('ProductID:' + LDevice.ProductID);
    MemoDispositivos.Lines.Add('ProductModel:' + LDevice.ProductModel);
    MemoDispositivos.Lines.Add('DeviceInterface:' + LDevice.DeviceInterface);
    MemoDispositivos.Lines.Add('USBPort:' + LDevice.USBPort);
    MemoDispositivos.Lines.Add('-----------------------------------');
  end;
end;

 

[Daniel Simoes]

Descomenta a linha 834 de ACBrWinUSBDevice.pas, que você verá todos os dispositivos USB,

  //Result := Result + FindUSBDevicesByGUID( GUID_DEVINTERFACE_USB_DEVICE, ADeviceListToAdd);

 

[jjw.roberto]

Legal o resultado foi esse:

DeviceKind:
DeviceName:Bematech
VendorID:0b1b
VendorName:Bematech
ProductID:0103
ProductModel:
DeviceInterface:\\?\usb#vid_0b1b&pid_0103#5&152dc530&0&8#{a5dcbf10-6530-11d2-901f-00c04fb951ed}
USBPort:Port_#0008.Hub_#0001
-----------------------------------
DeviceKind:
DeviceName:04f2, b610
VendorID:04f2
VendorName:
ProductID:b610
ProductModel:
DeviceInterface:\\?\usb#vid_04f2&pid_b610#5&152dc530&0&13#{a5dcbf10-6530-11d2-901f-00c04fb951ed}
USBPort:Port_#0013.Hub_#0001
-----------------------------------
DeviceKind:
DeviceName:8087, 0aaa
VendorID:8087
VendorName:
ProductID:0aaa
ProductModel:
DeviceInterface:\\?\usb#vid_8087&pid_0aaa#5&152dc530&0&14#{a5dcbf10-6530-11d2-901f-00c04fb951ed}
USBPort:Port_#0014.Hub_#0001
-----------------------------------
DeviceKind:
DeviceName:048d, ce00
VendorID:048d
VendorName:
ProductID:ce00
ProductModel:
DeviceInterface:\\?\usb#vid_048d&pid_ce00#5&152dc530&0&6#{a5dcbf10-6530-11d2-901f-00c04fb951ed}
USBPort:Port_#0006.Hub_#0001
-----------------------------------
DeviceKind:
DeviceName:045e, 0745
VendorID:045e
VendorName:
ProductID:0745
ProductModel:
DeviceInterface:\\?\usb#vid_045e&pid_0745#6&23c5183d&0&3#{a5dcbf10-6530-11d2-901f-00c04fb951ed}
USBPort:Port_#0003.Hub_#0002
-----------------------------------

 

Parece ser a primeira listada.

Mas como eu configuro isso no ACBr Monitor Plus?

Tentei forçar assim no AcbrMonitorPlus.ini:

[ECF]
Porta=\\?\usb#vid_0b1b&pid_0103#5&152dc530&0&8#{a5dcbf10-6530-11d2-901f-00c04fb951ed}

 

Mas não funciona.

 

Editado 20 Janeiro, 2020 por jjw.roberto
mais detalhes

[Daniel Simoes]

Acho que seria necessário algum ajuste nos Fontes do ACBrECF, para que ele aceite essa sintaxe de porta...

[jjw.roberto]

Daniel, e será que tem como vocês colocarem isso no ROAD-MAP? Seria de grande ajuda se funcionar....

Nós temos bastante clientes com essas ECFs ainda, e a maioria usa o maldito driver USB de emulação de serial. 

Eles apresentam tantos problemas de perda de comunicação, que constantemente temos que reiniciar a máquina para que o driver volte a funcionar e as vezes temos que pedir para instalar uma placa serial com cabo serial para sanar os problemas de vez.

[everson.turossi]

Olha só, talvez uma coisa não ficou clara em relação a uso da porta USB no ACBrDevice é que não foi desprendido tempo pra compatibilizar com ECF´s porque estão com os dias contados. Toda via se mesmo assim você quiser utilizar esse recurso você mesmo terá que implementa-lo e então submeter sua contribuição. O pessoal do ACBr já faz um excelente trabalho implementando recursos que serão úteis para a maioria de quem o utiliza, porém as particularidades ficam por nossa conta como neste caso.