LeListaItmCalExp

Alimenta modelos ligados a tela F813PRO.

Sintaxe: Funcao LeListaItmCalExp (Numero pPos, Numero End pFim,Numero SelIpd,Alfa TipNec, Alfa CodPvp, Numero CodFil, Numero NumPed, Numero SeqIpd, Alfa CodPro,Alfa CodDer, Numero QtdNec, Alfa UniMed).

Parâmetros:

Nome	Tipo	Descrição
pPos	Numero	Posição inicial pela qual a lista deve começar a ser lida.
pFim	Numero	Posição final a ser lida na lista.
SelIpd	Numero	Indica se o registro foi selecionado na grade.
TipNec	Alfa	Indica o tipo de necessidade.
CodPvp	Alfa	Código do período.
CodFil	Numero	Código da filial.
NumPed	Numero	Número do pedido.
SeqIpd	Numero	Sequência do item do pedido.
CodPro	Alfa	Código do produto.
CodDer	Alfa	Código da derivação.
QtdNec	Numero	Quantidade necessária a produzir.
UniMed	Alfa	Unidade de medida.

Exemplo:

definir numero vSelIpd;
definir alfa vTipNec;
definir alfa vCodPvp;
definir numero vCodFil;
definir numero vNumPed;
definir numero vSeqIpd;
definir alfa vCodPro;
definir alfa vCodDer;
definir numero vQtdNec;
definir alfa vUniMed;

PosMemList = 0;

enquanto (FimMemList = 0) {
@ LÊ OS REGISTROS ORIUNDO DA TELA DE CONSULTA @ LeListaItmCalExp(PosMemList,FimMemList,vSelIpd,vTipNec,vCodPvp,vCodFil,vNumPed,vSeqIpd,vCodPro,vCodDer,vQtdNec,vUniMed);
se (FimMemList = 0)
{
PosMemList++;
ListaSecao("Adicional_1");

}
}

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.3 (XTended)