AdicionaComponenteModelo

Essa função adiciona um novo componente no modelo de produção. É necessário passar todos os parâmetros. Lembrando q o sistema
insere os parâmetros definidos na tela de opções do modelo (página seq.). Caso no tipo do componente não existir derivação, e o mesmo
for tipo F, o sistema adiciona todos os consumos.

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 AdicionaComponenteModelo (Alfa CodMod, Numero CodEtg, Numero SeqMod, Alfa CodCmp, Alfa TipRdm, Numero VlrRdm);

Parâmetros:

Nome Tipo Descrição
CodMod Alfa Código do modelo.
CodEtg Numero Código do estágio.
SeqMod Numero Sequência do modelo.
CodCmp Alfa Código do componente.
TipRdm Alfa Tipo de rendimento do componente. O conteúdo deste parâmetro deve estar entre aspas simples.
VlrRdm Numero Valor do rendimento do componente.

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');

Este artigo ajudou você?