01. DADOS GERAIS
Produto: | TOTVS Manutenção de Ativos |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Manufatura |
Módulo: | TOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT) |
Função: | MNTA5102() |
País: | Brasil |
02. DESCRIÇÃO
Descrição: | P.E utilizado para considerar os parâmetros de filtro no Retorno de O.S em Lote (MNTA510). Para utilização do exemplo abaixo, deverá ser cadastrado, via configurador, no grupo de perguntas (SX1) 'MNT510' os parâmetros MV_PAR11 e MV_PAR12. | ||||||||
Localização: | Módulo de Manutenção de Ativos e Gestão de Frotas (SIGAMNT): Atualizações / Retorno O.S. / Em Lote. | ||||||||
Programa Fonte: | MNTA510.prw | ||||||||
Função: | MNTA5102() | ||||||||
Retorno: |
|
03. DEMAIS INFORMAÇÕES
Exemplo MNTA5102()
#Include 'Protheus.ch' User Function MNTA5102() Local cCONDEN := "" Local cUsuIni := MV_PAR11 Local cUsuFim := MV_PAR12 Local aUsers, nG If Empty( cUsuIni ) .And. Empty( cUsuFim ) cCONDEN := '.T.' Return cCONDEN EndIf aUsers := AllUsers() For nG := 1 To Len( aUsers ) If aScan( aUsers[ nG ][ 1 ], { | x | AllTrim( x ) == AllTrim( cUsuIni ) } ) > 0 cUsuIni := aUsers[ nG ][ 1 ][ 2 ] EndIf If aScan( aUsers[ nG ][ 1 ], { | x | AllTrim( x ) == AllTrim( cUsuFim ) } ) > 0 cUsuFim := aUsers[ nG ][ 1 ][ 2 ] EndIf Next nG If Empty( cUsuIni ) cCONDEN := "STJ->TJ_USUAINI <= " + ValToSql( cUsuFim ) Else cCONDEN := "STJ->TJ_USUAINI >= " + ValToSql( cUsuIni ) + " .And. STJ->TJ_USUAINI <= " + ValToSql( cUsuFim ) EndIf Return cCONDEN
04. ASSUNTOS RELACIONADOS
- Não se aplica.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas