AcbrCargaBal

[ROBSON PIEDADE PINHEIRO]

Vi uma propriedade  tecla e validade no componente porém não vejo o txt preenchido caso passe um valor pra elas . Qual a função dessas propriedade? Não encontrei tbm a solução no demo. Alguém pode me esclarecer?

[BigWings]

13 horas atrás, ROBSON PIEDADE PINHEIRO disse:

Vi uma propriedade  tecla e validade no componente porém não vejo o txt preenchido caso passe um valor pra elas . Qual a função dessas propriedade? Não encontrei tbm a solução no demo. Alguém pode me esclarecer?

Qual modelo de balança?

[ROBSON PIEDADE PINHEIRO]

PRIX 4 UNO DA TOLEDO COM ETHERNET

Editado 22 Julho, 2020 por ROBSON PIEDADE PINHEIRO

[BigWings]

2 horas atrás, ROBSON PIEDADE PINHEIRO disse:

PRIX 4 UNO DA TOLEDO COM ETHERNET

Digo qual modelo está selecionando para exportar o arquivo.

Para balanças Toledo existem os modelos modToledo, modToledoMGV5, modToletoMGV6 e modToledoMGV5Ver1.

Dependendo de qual gerenciador for usar para importar os arquivos, e a versão, pode gerar resultado diferente.

Pelo que vi no código para modToledo realmente não está gerando o arquivo de teclas, mas as demais estão.

Sobre a função de cada uma, Tecla é a associação do teclado da balança com o produto para não precisar digitar o código, e Validade é a quantidade de dias de validade do item para ser impresso na etiqueta no momento da pesagem.

[ROBSON PIEDADE PINHEIRO]

   

Estou fazendo da seguinte maneira . Se passo do banco ou valor no código ele não vai pro arquivo.  Será que  tenho que passa outra propriedade?  estou exportando para o MGV6

 

    with ACBrCargaBal1.Produtos.New do
      begin

              //  ModeloEtiqueta  := 1;
               if qry_produtosUNIDADE.Text='KG' then
                Tipo                    := tpvPeso else
                Tipo                    := tpvUnidade;

                Codigo               := qry_produtosCONTROLE.AsInteger;
                Descricao          := qry_produtosPRODUTO.Text;
                ValorVenda       := qry_produtosPRECOVENDA.AsCurrency;
                if trim(qry_produtosCONTROLARVALIDADE.Text)<>'' then
                Validade            := qry_produtosCONTROLARVALIDADE.AsInteger;
                Tecla                  := '25';
                TipoValidade    :=tpvDias;

                Setor.Codigo         := 1;
                Setor.Descricao    := 'GERAL';

      end;

     qry_produtos.Next;

      end;

DEPTO.TXT ITENSMGV.TXT

[Antonio Luiz]

aqui eu tive que selecionar MGV5 para gerar o arquivo de teclas. mesmo usando o Gerenciador MGV6 da toledo.

pra importar no no MGV6  o arquivo de teclas precisa ter na primeira linha o conteúdo (OBS01)  01 indica o teclado. foi o que pude ver lendo o manual da toledo