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