Árvore de páginas

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:

Rotina

Nome Técnico

MNTA670

Conciliação Manual Posto Interno

Rotina(s) envolvida(s)

Nome Técnico

MNTA670Conciliação Manual Posto Interno

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:
NomeTipoDescrição
aRet6702ArrayCampos adicionados na Conciliação Manual

Retorno:

NomeTipoDescriçãoObrigatório
lReturnLógicoIndica se permite realizar a ConciliaçãoSim

 

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