Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Gestão de Serviços
Função:TECXFUNB.PRW
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-6505


02. SITUAÇÃO/REQUISITO

Criação do ponto de entrada para manipulação em conflitos de integração RH, afastamento, demissão ou ferias.

03. SOLUÇÃO

Ponto de Entrada 

Descrição:Microsiga Protheus®
Localização:Serviços
Programa Fonte:TECXFUNB.PRW
Função:TecConfAlo
Parâmetros
NomeTipoDescrição
aPEConfaArray

Array para informações sobre o atendente, segue estrutura por posição.

01 - Matricula

02 - Nome do Atendente

03 - Código do Atendente

04 - Numero do Contrato

05 - Inicio das Ausências

06 - Fim das Ausências

07 - Inicio da Agenda

08 - Fim da Agenda

09 - Motivo da Ausência

10 - Data da demissão

Lembrete: Em caso de demissão, as posições 5 e 6 do array não são preenchidas e a posição 10 recebe a data da demissão.

aAgendaArray

Array contendo as agenda geradas, o array contem N linhas com

cinco posições:

01 - Data Inicio

02 - Data Fim

03 - Hora Inicio

04 - Hora Fim

05 - Codigo da ABB

06 - ABB_CHEGOU

07 - Local 

08 - IDCFAL

09 - RECNOC

Retorno:
#INCLUDE 'protheus.ch'
#INCLUDE 'parmtype.ch'
#INCLUDE "FWMVCDEF.CH"

User Function ATPECONFA()
Local aConfa	:= PARAMIXB[1][1]
Local aAgenda	:= PARAMIXB[2]
Local cMsg		:= ""

cMsg := "O atendente: " + aConfa[2] + CRLF
cMsg += "Matricula: " + aConfa[1] + CRLF
cMsg += "Codigo do atendente: " + aConfa[3] + CRLF
cMsg += "Numero do contrato: " + aConfa[4] + CRLF
cMsg += "Esta preste a realizar um(a): " + aConfa[9] + CRLF
cMsg += "Periodo de agenda: " + DToC(aConfa[7]) + " até " + DToC(aConfa[8]) + CRLF
If EMPTY(aConfa[10])
	cMsg += "Com Afastamento para a data: " + DToC(aConfa[5]) + " até " + DToC(aConfa[6]) + " Gerando conflito na(s) agenda(s)" + CRLF
Else
	cMsg += "Com demissao para a data: " + DToC(aConfa[10]) + " gerando confilto na agenda."
EndIf


AtShowLog(cMsg,"Atendente",/*lVScroll*/,/*lHScroll*/,/*lWrdWrap*/,.F.)
Return

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

  • Não há.