Linha Microsiga Protheus

Árvore de páginas

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:

NGUTIL4A()

País:Brasil


02. DESCRIÇÃO

Descrição:

Ponto de entrada acionado ao validar lançamento de contador, Adicionando nova validação na verificação de histórico do contador.

Programa Fonte:

MNTUTIL_CONTADOR.prw

Função:

NGUTIL4A()

Parâmetros:

NomeTipoDescrição
ParamIXB[1]CarácterCódigo do bem
ParamIXB[2]DataData de leitura do contador
ParamIXB[3]NuméricoPosição do contador
ParamIXB[4]CarácterHora de leitura do contador
ParamIXB[5]NuméricoTipo de contador (1 - Primeiro Contador / 2 - Segundo Contador)
ParamIXB[6]LógicoDefine se deve apresentar mensagens em tela

Retorno:

NomeTipoDescriçãoObrigatório
aReturnArray
NomeTipoDescriçãoObrigatório
Array[1]LógicoDefine se o registro é válidoSim
Array[2]CarácterMensagem de erro para apresentaçãoSim
Sim

03. DEMAIS INFORMAÇÕES

Exemplo NGUTIL4A()
#INCLUDE "PROTHEUS.CH"
 User Function NGUTIL4A()
 
    Local cBem    := ParamIXB[1] //Codigo do bem
    Local dDtLei  := ParamIXB[2] //Data de leitura
    Local nPosCo  := ParamIXB[3] //Contador
    Local cHrLei  := ParamIXB[4] //Hora de leitura
    Local nTpCon  := ParamIXB[5] //Tipo Contador
    Local lGetMsg := ParamIXB[6] //Apresenta Erro
    Local aReturn := { .T., '' }
 
    If nPosCo > 100
         
        If lGetMsg
            aReturn := { .F., '' }
            MsgAlert( 'Atenção', 'Erro' )
        Else
            aReturn := { .F., 'Erro' }
        EndIf
         
    EndIf
     
Return aReturn


04. ASSUNTOS RELACIONADOS

  • Não se aplica.