English
Español
LeMemlistCrc
Esta função lista em um relatório as críticas geradas por um processo, por exemplo, as críticas geradas numa geração de Ficha Técnica.
Sintaxe: LeMemlistCrc(Numero pPos,Numero End pFim, Alfa End CodPro, Alfa End CodDer, Alfa End CodSer, Alfa end TipCrc, Alfa End CodOri, Alfa End CodFam, Alfa End ObsCrc)
Parâmetros:
| Nome | Tipo | Descrição |
|---|---|---|
| pPos | Numero | Variável que indica a posição da lista que se quer ler. |
| pfim | Numero | Variável que retorna 1 quando tiver acabado a lista. |
| CodPro, CodDer, CodSer | Alfa | Variáveis que retornam o produto, derivação ou serviço que gerou crítica. |
| TipCRC | Alfa |
Variável que retorna o tipo da crítica. |
| CodOri, CodFam | Alfa |
Variáveis que retornam a origem e a família do produto/serviço que gerou crítica. |
| ObsCrc | Alfa | Variável que retorna a observação. |
Tipo de retorno:
pfim: Variável alfanumérica que retorna 1 quando tiver acabado a lista.
CodPro, CodDer, CodSer: Variáveis alfanuméricas que retornam o produto, derivação ou serviço que gerou crítica.
TipCRC: Variável alfanumérica que retorna o tipo da crítica.
CodOri, CodFam: Variáveis alfanuméricas que retornam a origem e a família do produto/serviço que gerou crítica.
ObsCrc: Variável alfanumérica que retorna a observação.
Exemplo:
Enquanto (FimMemList = 0)
inicio
LeMemListCrc(Pos,FimMemList,CrcCodpro,CrcCodDer,CrcCodSer,CrcTipCrc,CrcCodOri,CrcCodFam,CrcObsCrc);
Se (FimMemList = 0)
Inicio
ListaSecao("Adicional_Criticas");
Pos = Pos + 1;
Fim;
Fim;
Utilização da Função (dependentes): Nenhum dependente.
Observações: Só vai ler críticas que já tiverem sido geradas por outro processo. o único processo que pode ser feito através do gerador de relatórios e que gera críticas é a Geração de uma ficha técnica, através da função "GeraTabFicha", utilizada nos modelos de ficha valorizada.
English
Español
