RetornarRequisitosCargoPosto

Retornará as informações que ja foram carregadas pela função BuscarRequisitosCargoPosto.

Chamar a função RetornarRequisitosCargoPosto de forma isolada não funcionará, pois antes dele deve-se, obrigatóriamente, chamar a BuscarRequisitosCargoPosto.

Passando como parâmetro a Posicao 'Inicio' o sistema retornará o primeiro registro encontrado na busca. E, passando o parâmetro 'Proximo', o sistema retornará sempre o próximo registro, até que não haja mais registros a serem retornados.

Sintaxe: RetornarRequisitosCargoPosto(Alfa Posicao, Numero End TipReq, Numero End CodCpt, Alfa End RevCpt, Alfa End DesCpt, Numero End PrfApl, Numero End CodCua, Alfa End NomCua, Numero End CodCuf, Alfa End NomCuf, Numero End OriReq);

Parâmetros:

Nome Tipo Descrição
Posicao Alfa Preencher com 'Inicio' ou 'Proximo'.
TipReq Numero Retornará o tipo do requisito: "1 - Aperfeiçoamento", "2 - Competência" ou "3 - Formação".
CodCpt Numero Retornará o Código da competência (somente quando o tipo do requisito for "2 - Competência").
RevCpt Alfa Retornará a Revisão da Competência (somente quando o tipo do requisito for "2 - Competência").
DesCpt Alfa Retornará Descrição da competência (somente quando o tipo do requisito for "2 - Competência").
PrfApl Numero Retornará o perfil de aplicação da competência (somente quando o tipo do requisito for "2 - Competência").
CodCua Numero Retornará o código do curso de aperfeiçoamento (somente quando o tipo do requisito for "1 - Aperfeiçoamento").
NomCua Alfa Retornará o nome do curso de aperfeiçoamento (somente quando o tipo do requisito for "1 - Aperfeiçoamento").
CodCuf Numero Retornará o código do curso de formação (somente quando o tipo do requisito for "1 - Formação").
NomCuf Alfa Retornará o nome do curso de formação (somente quando o tipo do requisito for "1 - Formação").
OriReq Numero Retornará a origem do requisito: "1 - Cargo", "2 - Posto", "3 - Brigada", "4 - CIPA" ou "5 - EPI".

Exemplo:

BuscarRequisitosCargoPosto(xNumEmp, xTipCol, xNumCad, R030FIL.CodFil, Cur_PostosFunc.EstPos, Cur_PostosFunc.PosTra, 0, "", 0, 0, EDatRef, "N", "N", "N");

RetornarRequisitosCargoPosto("Inicio", xTipReq, xCodCpt, xRevCpt, xDesCpt, xPrfApl, xCodCua, xNomCua, xCodCuf, xNomCuf, xOriReq);

/* Enquanto a função retornar cursos necessários. */

Enquanto (xTipReq <> 0)

Inicio

Se (xTipReq = 1) /* 1 - Aperfeiçoamento */

xNomCur = xNomCua;

Senao Se (xTipReq = 3) /* 3 - Formação */

xNomCur = xNomCuf;

Senao

xNomCur = " ";

xTreinamentos = xTreinamentos + " - " + xNomCur + cSaltaLinha;

/* Funciona como um cursor, indo para o proximo registro. */

RetornarRequisitosCargoPosto("Proximo", xTipReq, xCodCpt, xRevCpt, xDesCpt, xPrfApl, xCodCua, xNomCua, xCodCuf, xNomCuf, xOriReq);

Fim;

Utilização: Disponível em: Gerador de Relatórios e Regras.

Disponível para o módulo: Todos os módulos do Gestão de Pessoas | HCM.

Este artigo ajudou você?