Linha Microsiga Protheus

Árvore de páginas

Tratamento nas informações retornadas para o método GetDepartment para visões de postos

Linha de Produto:

Microsiga Protheus®

Segmento:

Recursos Humanos

Módulo:

Arquitetura Organizacional (SIGAORG)

Função:

WSORG010.PRX

Situação/Requisito:

Ao acionar o método GetDepartament do serviço OrgStructure, existe hoje a regra para busca de departamentos com base na ocupação dos postos, não relacionando no retorno do método postos que não possuem movimentações em sua tabela principal (RCX).

Solução/Implementação:

Foi criado um parâmetro adicional (ControlPost) nesse método para permitir receber se deseja informar que a validação dos postos na tabela RCX não seja realizada na execução desse método GetDepartament().

Esse parâmetro será acionado apenas quando for utilizado uma visão do tipo comunicação (estrutura de postos), montada no módulo SIGAORG. Caso nenhum código de visão seja informada no parâmetro de acionamento do método, esse novo parâmetro não terá efeito.

Para realizar esse controle basta iniciar esse campo com o conteúdo "N", caso nenhuma informação seja passada, o processo continua funcionando de acordo com a funcionalidade padrão, realizando as validações na tabela de controle de postos (RCX).

 

Exemplo de chamada ADVPL ao serviço:

Web Function EXEMPLO()
Local oOrg

WEB EXTENDED INIT cHtml START "InSite"

oOrg := WSORGSTRUCTURE():New()
WsChgURL(@oOrg,"ORGSTRUCTURE.APW")

oOrg:cVISION := //Código da visão (ORG)
oOrg:cPARTICIPANTID := // Código do participante
oOrg:cControlPost := "N"

If oOrg:GetDepartment()
HttpSession->Department := oOrg:oWSGETDEPARTMENTRESULT:oWSLISTOFDEPARTMENT:OWSDATADEPARTMENT
nPageTotal := oOrg:oWSGETDEPARTMENTRESULT:nPagesTotal
Else
HttpSession->Department := {}
nPageTotal := 1
EndIf

WEB EXTENDED END

Return .T.


Tickets relacionados:

801697

Pacote:

Faça o download do pacote com essa correção:

Versão 12.1.14:

Versão 12.1.07: