RN OrdemProducao LotePadraoEmpresa

Regra de negócio do tipo Habilitadora que pode ser acoplada ao DataPlus ERP e tem por objetivo adicionar o lote padrão informado no atributo adicional do cadastro de empresa na ordem de produção ou na ficha de produção ao gravar a mesma.

Acoplamento

Essa regra de negócio deve ser acoplada em formulário de Produção (FrmMovOrdemProducao ou FrmMovFichaProducao). Ela está preparada para funcionar com designador Execucao em conjunto com o elemento OnLoad, no tempo de execução Antes.

OBS: Deve ser executado o script do atributo adicional no cliente que for utilizar.

Caminho: J:\Vb.Net\Scripts\Atributos Adicionais\Cria campo Lote Padrão no cadastro de Empresa.sql

Script: IF OBJECT_ID('dpAtributosAdicionais') IS NOT NULL BEGIN IF (SELECT 1 FROM dpAtributosAdicionais WHERE Classe = 'DataPlus.Sistemas.Comum.Empresa' AND NomeCampo = 'Lote Padrão') = 1 BEGIN UPDATE dpAtributosAdicionais SET TipoDado = 'System.String', ViewControleContainer = 'frmCadastroEmpresa', ViewX = 675, ViewY = 72, ViewLargura = 151, TagControle = 2, Anchor = NULL, ClasseAssociacao = NULL, LarguraAssociacao = 0, AnchorAssociacao = NULL, AnchorPesquisa = NULL, LarguraLabel = 151 WHERE Classe = 'DataPlus.Sistemas.Comum.Empresa' AND NomeCampo = 'Lote Padrão' END ELSE BEGIN INSERT INTO dpAtributosAdicionais (Classe, NomeCampo, TipoDado, ViewControleContainer, ViewX, ViewY, ViewLargura, TagControle, Anchor, ClasseAssociacao, LarguraAssociacao, AnchorAssociacao, AnchorPesquisa, LarguraLabel) VALUES ('DataPlus.Sistemas.Comum.Empresa', 'Lote Padrão', 'System.String', 'frmCadastroEmpresa', 675, 72, 151, 2, NULL, NULL, 0, NULL, NULL, 151) END END GO