Histórico da Página
Ponto de entrada que permite incluir validação para o processo de exclusão de abastecimento.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | SIGAGFR - Gestão de Frotas | ||||
Rotina: |
|
Ponto de Entrada
Descrição: | Ponto de entrada executado ao acionar o processo de exclusão de um abastecimento,assim permitindo validar o mesmo. | ||||
Programa Fonte: | MNTA655.prx | ||||
Retorno: |
|
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE#Include 'PROTHEUSProtheus.CHch' User Function NGDEVSTLMNTA655EX() Local oFwTemplRet := ParamIXB[1] Local cAlsMNT := oFwTemp:GetAlias() (cAlsMNT)->( dbGoBottom() ) // Pega o ultimo insumo encontrado Return (cAlsMNT)->TRB_RECNO.T. If Year( TQN->TQN_DTABAS ) < YEAR( Date() ) // Não permite exclusão de abastecimento de anos anteriores ao ano atual. lRet := .F. EndIf Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas