CarregaLevantaNecessidades
Função que carrega os dados a serem utilizados na função RetornaLevantaNecessidades.
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 das funções MontaCriteriosFormacao, MontaCriteriosAperfeicoamento e MontaCriteriosConhecimento.
Sintaxe: CarregaLevantaNecessidades(xNumEmp, xTipCol, xNumCad, xCmpRef, xTabOrg, xCodLoc, xEstCar, xCodCar, xTodosCol, xTodosReq);
Parâmetros:
| Nome | Tipo | Descrição |
| xNumEmp | Numérica | Variável que contém o código da empresa. |
| xTipCol | Numérica | Variável que contém o código do tipo de colaborador. |
| xNumCad | Numérica | Variável que contém o código do colaborador. |
| xCmpRef | Numérica | Variável que contém data de emissão do relatório. |
| xTabOrg | Numérica | Variável que contém o código da tabela de organograma. |
| xCodLoc | Alfa | Variável que contém o código do local. |
| xEstCar | Numérica | Variável que contém o código da estrutura de cargos. |
| xCodCar | Alfa | Variável do tipo Alfa que contém o código do cargo. |
| xTodosCol | Alfa | Variável do tipo Alfa cujo valor deve ser "S (Sim)" ou "N (Não)" para todos os colaboradores. |
| xTodosReq | Alfa | Variável do tipo Alfa cujo valor deve ser "S (Sim)" ou "N (Não)"
para todos os requisitos. |
Exemplo:
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.
Observação: As variáveis cujo valor devem ser "S" ou "N" funcionam da seguinte
maneira:
Se o usuário escolher a opção "S", ao carregar os dados este critério será considerado.
Se a variável xTodosCol = "N", serão selecionados somente os colaboradores que não possuam algum requisito para o cargo, caso contrário, serão selecionados todos os colaboradores indeferentes de terem o requisito ou não.
Se a variável xTodosReq = "N", serão listados somente os requisitos que o colaborador não possui, caso contrário, serão listados todos os requisitos.
Disponível para o módulo:TR.
English
Español
