01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:Prestadores de Serviço Terceirização
Função:TECA330A.PRW
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :

DSERSGS-9552


02. SITUAÇÃO/REQUISITO

Necessidade de um P.E no TECA330A para alteração dos horários na geração das agendas.

03. SOLUÇÃO

Ponto de Entrada

Descrição:Microsiga Protheus®
Localização:Serviços
Programa Fonte:TECA330A.PRW
Função:

At330HR

Parâmetros

Nome

Tipo

Descrição

PARAMIXBArray

Array para informações de alteração de horário.

01 -  Código da TGY

  PARAMIXB[1]: "000000001028897"

02 - Cód.Atendente

   PARAMIXB[2]:"00001989" 

03 - Data Inicial-

   PARAMIXB[3]:  


04 - Data Fim 

  PARAMIXB[4]:  


05 -Data de Referência

PARAMIXB[5]: 


06 - Turno

PARAMIXB[6]: "001"


06 - Sequência

PARAMIXB[7]: "01"


07 - Calendário (Passado por Parametro)

PARAMIXB[7]: {}


aHorasArray

01 - Hora Início 

aHoras[1] : "07:00"


02- Hora Fim

aHoras[2] : "16:00"

RetornoaHoras

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

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

#INCLUDE "PONCALEN.CH"


User Function At330HR()

Local cCodTGY := PARAMIXB[1]
Local cCodAtend := PARAMIXB[2]
Local cDtIni := PARAMIXB[3]
Local cDtFim := PARAMIXB[4]
Local cDtRef := PARAMIXB[5]
Local cTurno := PARAMIXB[6]
Local cSeq := PARAMIXB[7]

Local aCalend := PARAMIXB[8]
Local cEntra1 := "07:00"
Local cSaida1 := "12:00"
Local cEntra2 := "13:00"
Local cSaida2 := "16:00"
Local aHoras := {}
Local nI := 1

For nI := 1 To 2

    If nI == 1 
        Aadd(aHoras, {cEntra1,;
                    cSaida1})

       If TecConvHr(cEntra1) > TecConvHr(cSaida1)
            aCalend[CALEND_POS_DATA_APO] := aCalend[CALEND_POS_DATA_APO] - 1 //Data de Referencia
            aCalend[CALEND_POS_DATA] := aCalend[CALEND_POS_DATA] - 1 //Data
        EndIf


    ElseIf nI == 2
        Aadd(aHoras, {cEntra2,;
                    cSaida2})
        
    EndIf   

Next nI 

Return aHoras

Obs: O retorno sempre deverá ser um array com duas posições, sendo elas a primeira o horário de início e a segunda o horário de fim. O array do calendário é passado por parâmetro, ela é gerada apartir do criacalend.


A configuração dos horários informados no ponto de entrada deve estar igual a configuração da escala utilizada na projeção das agendas, ou seja, se a escala tiver duas entradas e duas saídas, o ponto de entrada deve respeitar este modelo.


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>