MNTA9921 - P.E para validação de Inclusão, Alteração e Exclusão de Reporte de Horas da Mão-de-Obra.

Ponto de entrada para validação de Inclusão, Alteração e Exclusão de Reporte de Horas da Mão-de-Obra.

#Include 'Protheus.ch'

User Function MNTA9921()

Local aArea := GetArea()
Local lRet := .F.

dbSelectArea( "TTL" )
dbSetOrder( 01 )

If dbSeek( xFilial( "TTL" ) + M->TTL_CODFUN + DTOS( M->TTL_DTINI ) + M->TTL_HRINI + DTOS( M->TTL_DTFIM ) + M->TTL_HRFIM ) //+ DTOS( M->TTL_DTINI ) + M->TTL_HRINI + DTOS( M->TTL_DTFIM ) + M->TTL_HRFIM

RecLock( "TTL" , .f. )
TTL->TTL_PCTHRE := 100
MsUnlock( "TTL" )

Endif

RestArea(aArea)

Return lRet

Português(Brasil)

Todas

Todos

Todas

Lógico

MNTA992