RetornaCargosDoPosto

Retorna uma lista com o(s) cargo(s) de determinado posto de trabalho.

Sintaxe: Funcao RetornaCargosDoPosto(Numero xEstPos, Alfa xPosto, Data xDatRef, Alfa xAcao, Numero End xEstCar, Alfa End xCodCar, Alfa End xNomeCargo);

Parâmetros:

Nome	Tipo	Descripción
xEstPos	Numérico	Estrutura do posto.
xPosto	Alfa	Código do posto de trabalho.
xDatRef	Fecha	Data de referência para retornar o(s) cargo(s) do posto.
xAcao	Alfa	Indica a ação que a função deve executar: -> 'CARREGAR': ação que carrega a lista com o(s) cargo(s) do posto de trabalho informado na data de referência, posicionando no primeiro registro. -> 'INICIO': ação que posiciona a lista no primeiro registro. -> 'PROXIMO': ação que posiciona a lista no próximo registro.
xEstCar	Numérico	Estrutura do cargo na posição atual da lista.
xCodCar	Alfa	Código do cargo na posição atual da lista.
xNomeCargo	Alfa	Título do cargo na posição atual da lista.

Tipo de Retorno: Própria função - Retorna "0" (zero) quando não há registro na posição atual, e "1" (um) quando há registro na posição atual da lista.

Ejemplo:

xRetCarPos = RetornaCargosDoPosto(xEstPos, xPosTra, EDatRef, "CARREGAR", xRetEstCar, xRetCodCar, xRetNomeCargo);
Enquanto (xRetCarPos <> 0)
inicio
@ Faz alguma consistencia para a estrutura e cargo retornados... @
xRetCarPos = RetornaCargosDoPosto(xEstPos, xPosTra, EDatRef, "PROXIMO", xRetEstCar, xRetCodCar, xRetNomeCargo);
orden;

Utilização: Gerador de relatórios e editor de regras.

Disponível para o módulo: SM.