...
| Linha de Produto: | Microsiga Protheus |
|---|
| Segmento: | Recursos Humanos |
|---|
| Módulo: | SIGAPON |
|---|
| Função: | PONA160
PONA161 |
|---|
| Ticket: | 8716400 |
|---|
| Requisito/Story/Issue: | DRHPAG-36149 |
|---|
02. SITUAÇÃO/REQUISITO
...
Criado o ponto de entrada PONAP161 para permitir a manipulação da tabela SPF, Transferência de Turno, antes do sistema realizar a inclusão das informações.
| Card documentos |
|---|
| Informacao | Use esse box para destacar informações relevantes e/ou de destaque. |
|---|
| Titulo | IMPORTANTE! |
|---|
|
04. DEMAIS INFORMAÇÕES
Exemplo de uso do Ponto de entrada PONAO161
| Bloco de código |
|---|
| language | cpp |
|---|
| firstline | 1 |
|---|
| title | Exclui registros com a mesma data informada |
|---|
| linenumbers | true |
|---|
|
...
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} User Function PONAP161
Ponto de entrada chamado na Transferência de Turno em lote
@type User Function
@author user
@since 28/04/2020
@version 12.1.XX
@see https://tdn.totvs.com/x/kQ_eI
/*/
User Function PONAP161()
Local dDataInfo := ParamIXB[1]
Local aArea := GetArea()
dbSelectArea("SPF")
dbSetOrder(1) // PF_FILIAL + PF_MAT + DTOS(PF_DATA)
If SPF->(dbSeek(SRA->RA_FILIAL + SRA->(RA_MAT + DtoS(dDataInfo))))
RecLock("SPF", .F.)
SPF->(dbDelete())
SPF->(MsUnlock())
EndIf
RestArea(aArea)
Return |
| 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>
|
...
