Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Postado
23 minutos atrás, Daniel Simoes disse:

Desculpe mas não compreendi a sua postagem....

O SAT não tem qualquer integração com impressoras...

Não consigo inserir o modelo Tanca no meu sistema. Segue a tela de configuração do ACBrSat:

procedure TDM.DataModuleCreate(Sender: TObject);
var
  Arquivo: TIniFile;
begin
  Arquivo := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'CONFIG.INI');

  iModeloImp := Arquivo.ReadInteger('IMPRESSORA', 'MODELO', 0);
  sPortaImp  := Arquivo.ReadString('IMPRESSORA', 'PORTA', '');
  iEspaco    := Arquivo.ReadInteger('IMPRESSORA', 'LINHAS_CUPOM', 5);

  sCrt        := Arquivo.ReadString('SAT', 'REGIME_TRIBUTARIO', '1');
  iTipoSat    := Arquivo.ReadInteger('SAT', 'TIPO', 1);
  sDllSat     := Arquivo.ReadString('SAT', 'DLL_SAT', '');
  sVersaoSat  := Arquivo.ReadString('SAT', 'VERSAO', '');
  sCnpj       := Arquivo.ReadString('SAT', 'CNPJ', '');
  sInscricao  := Arquivo.ReadString('SAT', 'INSCRICAO', '');
  sCnpjSH     := Arquivo.ReadString('SAT', 'SH_CNPJ', '');
  sCodigo     := Arquivo.ReadString('SAT', 'COD_ATIVACAO', '');
  sAssinatura := Arquivo.ReadString('SAT', 'ASSINATURA', '');

  Arquivo.Free;

  if (iModeloImp = 0) or (iModeloImp = 5) then // Bematech e Feasso
    cPosSAT.Modelo := ppEscBematech;

  if iModeloImp = 1 then
    cPosSAT.Modelo := ppEscDaruma; // Daruma

  if (iModeloImp = 2) then // Diebold
    cPosSAT.Modelo := ppEscDiebold;

  if (iModeloImp = 3) or (iModeloImp = 4) then // Elgin e Epson
    cPosSAT.Modelo := ppEscPosEpson;

  cPosSAT.Porta := sPortaImp;

  AjustaACBrSAT;

end;

 

  • Este tópico foi criado há 295 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.