Histórico da Página

01. DADOS GERAIS

Produto:

Solucoes_totvs

Solucao	TOTVS Prestadores de Serviços Terceirização

Solucoes_totvs_cross

SolucaoCross

Solucoes_totvs_parceiros

SolucaoParceiros

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs

Segmento	Distribuição
Region	Construção Projetos
Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Serviços

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

PARAMIXB

Array

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]: 01/09/2020

04 - Data Fim

PARAMIXB[4]: 30/09/2020

05 - Data de Referência

PARAMIXB[5]: 30/09/2020

06 - Turno

PARAMIXB[6]: "001"

06 07 - Sequência

PARAMIXB[7]: "01"

08 - Calendário Posicionado

PARAMIXB[8]: {}

09 - Calendário Geral

PARAMIXB[8]: {}

aHoras

Array

01 - Horário

01 - Hora Início

aHoras[1] : "07:00"

02- Hora Fim

aHoras[2] : "16:00"

02 - Agenda do Efetivo

Retorno

aHoras

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"

User Function At330HRUser 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 cHorIni

Local cEntra1 := "07:00"
Local cSaida1 := "12:00"

Local cHorFim

Local cEntra2 := "13:00"
Local cSaida2 := "16:00"
Local aHoras := {}

Aadd(aHoras, cHorIni)
Aadd(aHoras, cHorFim)
Return aHoras

Local nI := 1

For nI := 1 To 2

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

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

    EndIf

Next nI

Return {aHoras, aCalend}

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.

Aviso

title	Atenção

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

Não há.

HTML

<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>

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão Atual

Chave