ComposicaoProduto_4

Esta função tem basicamente o mesmo objetivo da função ComposicaoProduto, que é retornar uma Lista em Memória que deve ser lida com a Função "LeMemListCompPro". A diferença é que possui a variável pMsgUsu que define se a execução será interrompida e retorna mensagem de erro quando ocorrer alguma inconsistência na estrutura do produto.

Sintaxe: ComposicaoProduto_4(Alfa pCodPro, Alfa pCodDer, Numero pQtdInf, Numero pUniEst, Numero pDecPro, Numero pDecMon, Numero pDelMon, Numero pLmpLis, Numero pJunDer, Numero pTipDes, Alfa pMsgUsu);

Parâmetros:

Nome Tipo Descrição
pCodPro Alfa Variável que recebe o código do produto.
pCodDer Alfa Variável que recebe a derivação.
pQtdInf Numero Variável que recebe a quantidade a produzir.
pUniEst Alfa Variável que recebe 'S' para converter para U.M. estoque ou 'N' para usar U.M. Ficha.
pDecPro Alfa Variável que recebe 'S' para Decompor Produzidos.
pDecMon Alfa Variável que recebe 'S' para Decompor Montagens.
pDelMon Alfa Variável com 'S' para excluir produtos montados e só retornar os componentes.
pLmpLis Alfa Variável com 'S' para limpar a lista a cada chamada da função.
pJunDer Alfa Variável com 'S' para juntar componentes iguais para derivações do produto final diferente.
pTipDes Alfa Variável com 'P' ou 'N' para trazer a descrição do componente ('P'), ou a descrição da nota Fiscal ('N').
pMsgUsu Alfa Variável que recebe 'S' para retornar mensagem de erro quando ocorrer alguma inconsistência na estrutura do produto, interrompe a execução da função, ou pode receber 'N' para não retornar mensagem e não interromper a execução. Ex: "Situação do Produto está Inativa".

Exemplo:

Definir Alfa VCodPro;

Definir Alfa VCodDer;

Definir Alfa MsgUsu;

VCodPro = "PRODUTO";

VCodDer = "1";

MsgUsu = 'S';

ComposicaoProduto_4(VCodPro, VCodDer, 1, "S", "S", "S", "S", "S", "S", "P", MsgUsu);

x=y;

Utilização da Função (dependentes): Nenhum dependente.

Este artigo ajudou você?