Devido à descontinuação da versão 5.10.3, que ocorrerá em 30/09/2025, informamos que este manual não receberá atualizações a partir desta data. Para mais informações sobre a evolução do Gestão Empresarial | ERP, acesse a documentação sobre a PCVV - Política do Ciclo de Vida das Versões.

Informamos que as funcionalidades da Reforma Tributária estão disponíveis apenas a partir da versão 5.10.4 do Gestão Empresarial.
Acesse o Portal de Exigências Legais da Senior para saber como preparar o seu negócio!

MontaListPosEst

Traz a posição do estoque em determinada data, Saldo em Estoque, Quantidade em Estoque, Preço Médio.

Sintaxe: MontaListPosEst(Numero Empresa,Numero Data, Alfa Produto,Alfa Derivação, Alfa Depósito,Alfa Origem,Alfa Familia,Alfa Agrupar);

Parâmetros:

Nome Tipo Descrição
Empresa Numero Variável que recebe o código da empresa.
Data Numero Busca a movimentação do estoque até a data informada.
Produto Alfa Variável que recebe o código do produto.
Derivação Alfa Variável que recebe o código da derivação.
Depósito Alfa Variável que recebe o código do depósito.
Origem Alfa Variável que recebe o código da origem.
Família Alfa Variável que recebe o código da família.
Agrupar Alfa Neste parâmetro será informado "S" ou "N" conforme necessidade de agrupar ou não o saldo em estoque por produto.

Tipo de retorno: O retorno será trazido pela função "LEMEMLISTPOSEST".

Exemplo:

definir alfa vcodori;

definir alfa vcodfam;

definir alfa vcodpro;

definir alfa vcodder;

definir alfa vcoddep;

definir data vdatest;

definir alfa vdespro;

definir alfa vdesnfv;

definir alfa vcplpro;

definir alfa vclafis;

definir alfa vunimed;

definir alfa vflgagr;

vcodori= "ACA";

vcodfam= "FCON";

vcodpro= "CA00101";

vcodder= "";

vcoddep= "DEPACA";

vflgagr= "N"; /* flag que indica se irá ou não agrupar por produto */

MONTADATA (01,01,1999,vdatest);

FimMemList = 0;

Pos = 0;

/* Chamando a função para carregar a posição do estoque conforme os parâmetros informados*/

MONTALISTPOSEST(1,vdatest,vcodpro,vcodder,vcoddep,vcodori,vcodfam,vflgagr);

Enquanto (FimMemList = 0)

inicio /* Lendo a posição do estoque carregada anteriormente*/

LeMemListPosEst(Pos,FimMemList,vcoddep,vcodori,vcodfam,vcodpro,codder,vdespro, fqtdest, fpremed, fvlrest,

vdesnfv, vcplpro, vunimed, vclafis);

Se (FimMemList = 0)

Inicio VQtdEst=FQtdest; /* Quantidade em Estoque */

VVlrEst=FVlrESt; /* Valor do Estoque */

VPreMed=FPreMed; /* Preço Médio */

Pos = Pos + 1;

Fim;

Fim;

Utilização da Função (Dependentes): LEMEMLISTPOSEST.

Este artigo ajudou você?