CriaNovoModelo
Essa função cria um novo modelo de produção. É necessário passar todos os parâmetros. Caso a situação for passada com "A", o sistema irá consistir se o modelo poderá ficar ativo. Também nesse momento caso existir um produto com mesmo código do modelo, o sistema já faz a ligação automaticamente e também cria as derivações do modelo se baseando nas derivações do produto.
Nota
Se o sistema estiver parametrizado para a geração do bloco K, algumas consistências e bloqueios podem ser realizadas nessa função, garantindo a correta geração de informações do arquivo, conforme guia prático. Confira estas consistências na tela Parâmetros e consistências da empresa (F070ECN).
Sintaxe: Funcao CriaNovoModelo (Alfa CodMod, Alfa DesMod, Alfa CodFam, Numero QtdBas, Numero SitMod);
Parâmetros:
Nome | Tipo | Descrição |
---|---|---|
CodMod | Alfa | Código do modelo a ser criado. |
DesMod | Alfa | Descrição do modelo a ser criado. |
CodFam | Alfa | Código da família do modelo. |
QtdBas | Numero | Quantidade base do modelo. |
SitMod | Alfa | Situação do modelo. O conteúdo deste parâmetro deve estar entre aspas simples. |
Exemplo:
CriaNovoModelo("B10020P", "TESTE REGRA", "FBEN", 1, 'I');
AdicionaComponenteModelo("B10020P", 200, 10, "0002", 'N', 0);
AdicionaConsumoComponente("B10020P", 200, 10, "0010", "0002", " ", 10, 10, 0);
AdicionaConsumoComponente("B10020P", 200, 10, "0020", "0002", " ", 20, 10, 0);
AdicionaConsumoComponente("B10020P", 200, 10, "0050", "0002", " ", 50, 10, 0);
AdicionaComponenteModelo("B10020P", 200, 20, "BTREV2", 'N', 0);
AdicionaConsumoComponente("B10020P", 200, 20, "0050", "BTREV2", " ", 10, 10, 0);
CriaNovoModelo("B10020P", "TESTE REGRA", "FBEN", 1, 'A');