MRC003.R001 — Fábrica/Planta e Vinheta de Recapagem obrigatórias na bandeira Michelin

Módulo: MRC003 · Menu: Recapadora > Movimentações > Ordem de Produção Pneu Classificação: observado · Relevância: media

Regra

Quando a bandeira é Michelin (TPBANDEIRA='M'), a Fábrica/Planta (Reformadora) fica visível e o Nº da Vinheta Recapagem passa a ser exigido ao salvar a etapa de Limpeza de Manchão/fechamento.

Quando dispara

Salvar etapa com lblFABRICAPLANTA visível e Nº Vinheta Recapagem vazio

Mensagem exibida

Informe o Nr. Vinheta Recapagem. Verifique!

Como o usuário resolve

Preencher o campo Nº Vinheta Recapagem na aba de Limpeza de Manchão/Exame Inicial antes de salvar/fechar.

Parâmetros envolvidos

• PARAMRECAP.TPBANDEIRA

Evidência

Arquivo	Linhas	Rotina	O que o trecho faz
source/MRC003/UdmMRC003.pas	1762-1772	TdmMRC003.qryLimpezaManchaoBeforePost	Exige NRVINHETARECAPAGEM quando a Fábrica/Planta está visível (bandeira M)
source/MRC003/UdmMRC003.pas	3560-3570	TdmMRC003.qryOrdemProducaoRecapBeforePost	Repete a mesma exigência no BeforePost da ordem

source/MRC003/UdmMRC003.pas:1762

   if (frameEdicao.lblFABRICAPLANTA.Visible) then
   begin

      if (dmMRC003.qryOrdemProducaoRecapNRVINHETARECAPAGEM.AsString = EmptyStr) then
      begin
         frameEdicao.pageControl.ActivePage := frameEdicao.pageLimpezaManchao;
         frameEdicao.edtNRVINHETARECAPAGEM.SetFocus;
         raise JException.Create('W-0000', ['Informe o Nr. Vinheta Recapagem. Verifique!']);
      end;

   end;

source/MRC003/UdmMRC003.pas:3560

   if (frameEdicao.lblFABRICAPLANTA.Visible) and (dmMRC003.qryLimpezaManchaoID.AsString <> '') then
   begin

      if (dmMRC003.qryOrdemProducaoRecapNRVINHETARECAPAGEM.AsString = EmptyStr) then
      begin
         frameEdicao.pageControl.ActivePage := frameEdicao.pageLimpezaManchao;
         frameEdicao.edtNRVINHETARECAPAGEM.SetFocus;
         raise JException.Create('W-0000', ['Informe o Nr. Vinheta Recapagem. Verifique!']);
      end;
         
   end;