| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | MNTA420 - O.S. Corretiva |
Descrição: | Ponto de entrada utilizado na rotina de O.S. Corretiva (MNTA420) para gerar empenho de modo específico. | ||||||
| Parâmetros: |
| ||||||
| Retorno: | .T. |
#Include 'Protheus.ch'
User Function MNTA420Q()
Local cRotina := PARAMIXB[1]
If MsgYesNo("Deseja realizar empenho?")
NGINTCOMPEST(STJ->TJ_DTMPINI, STJ->TJ_DTMPFIM, cRotina)
EndIf
Return .T. |