Histórico da Página
PERMITE VALIDAR CAMPOS ADICIONADOS NA CONCILIAÇÃO MANUAL DE POSTO INTERNO
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
Issues Relacionadas | 11.80: MNG-3306 | ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de Entrada que permite validar campos adicionados na rotina de Conciliação Manual de Posto Interno. | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Combustíveis/Abastecimento/Conc. Manual Posto Interno | ||||||||
Eventos: | Conciliação Manual Posto Interno (MNTA670) | ||||||||
Programa Fonte: | MNTA670.PRX | ||||||||
Função: | MNTA6702() | ||||||||
Parâmetros: |
| ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function MNTA6702()
Local lReturn := .T.
Local aRet6702 := PARAMIXB[1] //Campos adicionados na Conciliação Manual
// nQtdBom != nQtdTotal
If !Empty(aRet6702)
If aRet6702[1] != aRet6702[4]
Help(" ", 1, "ATENÇÃO",, "'Contador Bomba' terá que ser igual a 'Qtde Total'!", 3, 1)
lReturn := .F.
EndIf
EndIf
Return lReturn