RetornaLevantaNecessidades

Função que retorna o tipo, código e nome do curso, código da família, código do assunto e Possui Requisitos ( "S" ou "N"). Usada na regra de Seção Detalhe, essa função é utilizada somente em um modelo da cópia (TRDE001.GER - Levantamento de Necessidades).
Sua funcionalidade depende da função CarregaLevantaNecessidades.

Sintaxe: RetornaLevantaNecessidades(xPosicao, xTipCur, xCodCur, xNomCur, xCodFam, xFamAss, xTemreq);

Parámetros:

Nome	Tipo	Descripción
xPosicao	Alfa	Variável que contém a posição de seleção dos dados.
xTipCur	Alfa	Variável que retorna o tipo de curso.
xCodCur	Alfa	Variável que retorna o código do curso.
xNomCur	Alfa	Variável que retorna o nome do curso.
xCodFam	Alfa	Variável que retorna o código da família de conhecimentos.
xFamAss	Alfa	Variável que retorna o código do assunto.
xTemreq	Alfa	Variável que retorna "S" ou "N" para o critério Possui Requisitos.

Ejemplo:

Deseja-se montar um relatório que liste todos os colaboradores e somente os requisitos que o colaborador não possui para o seu cargo.
Na Pré-Seleção , deve-se incluir as funções MontaCriteriosFormacao, MontaCriteriosAperfeicoamento e MontaCriteriosConhecimento passando como parâmetro as informações da tela de entrada.
MontaCriteriosFormacao (EHisCuf, EAndCuf, EComCuf, EDesCuf, ESusCuf, EMedCuf, EFreCuf, ETrfCuf, EAbrCuf, EAbrAss);
MontaCriteriosAperfeicoamento (EHisCua, EValCua, ERevCua, ECerApr, ECerPar, EAndCua, EComCua, EDesCua, ESusCua, EMedCua, EFreCua, ETrfCua, EAbrCua);
MontaCriteriosConhecimento(EHisCnc, EValCnc, EAprSim, EAprNao, EAbrCnc, EabrFam);

Em seguida, insira as funções CarregaLevantaNecessidades e RetornaLevantaNecessidades (passando como primeiro parâmetro Inicio) na Seleção.
Definir Alfa xcodcar;
xnumemp = R034FUN.NumEmp;
xtipcol = R034FUN.TipCol;
xnumcad = R034FUN.NumCad; /* LOCAL NA DATA INFORMADA */
RetLocEmp(xnumemp, xtipcol, xnumcad, xdatref);
xtaborg = TabOrgEmp;
xnumloc = LocEmp;

/* CARGO NA DATA INFORMADA */
RetCarEmp(xnumemp, xtipcol, xnumcad, xdatref);
xestcar = EstCarEmp;
xcodcar = CarEmp;

CarregaLevantaNecessidades(xnumemp, xtipcol, xnumcad, ECmpRef, xtaborg, xnumloc, xestcar, xcodcar, ETodCol, ETodReq, EReqHFu);
RetornaLevantaNecessidades("Inicio", xtipcur, xcodcur, xnomcur, xcodfam, xfamass, xtemreq);

Então no evento Depois Imprimir da seção Detalhe, chamar a função RetornaLevantaNecessidades passando como primeiro parâmetro Proximo.
RetornaLevantaNecessidades("Proximo",xtipcur, xcodcur, xnomcur, xcodfam, xfamass, xtemreq);

Utilização: Gerador de relatórios.

Disponível para o(s) Módulo(s): TR