Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

PONTO DE ENTRADA QUE PERMITE RETIRAR CAMPOS NO CADASTRO DE BENS (MNTA080).

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

MNTA080

Cadastro Bens.

Rotina(s) envolvida(s)

Nome Técnico

MNTA080

Cadastro Bens.

Chamados Relacionados

MNG-5882

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de Entrada que permite remover campos no cadastro de Bens adicionados na tabela de Bens (ST9).

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Bens/Bens.

Eventos:

Cadastro de Bens. - (MNTA080)

Programa Fonte:

MNTA080.PRW

Função:

MNTA080O()

Retorno:

NomeTipoDescriçãoObrigatório
lRet 
LógicoRetorna .T. para confirmar que foi removido o campo de tela.Sim
Bloco de código
languagesql
firstline1
titleExemplo 1
linenumberstrue
#Include "PROTHEUS.ch"

//---------------------------------------------------------------------
/*/{Protheus.doc} MNTA080O
Ponto de entrada na montagem da tela.

/*/
//---------------------------------------------------------------------
User Function MNTA080O()

    //Variável que recebe o Model/View (Model = 1 e View = 2).
    Local nMoVi      := PARAMIXB[1]

    //Variavel que recebe a tabela relacionada.
    Local cAlias     := PARAMIXB[2]

    //Variavel que recebe o Modelo de Estrutura.
    Local oStructAux := PARAMIXB[3]

    //Variavel utilizada para retorno do Ponto de Entrada.
    Local lRet       := .F.

    //Busca campo no oModel/oView
    If nMoVi == 1 /*Model*/ .Or. nMovi == 2 /*View*/
        oStructAux:RemoveField("T9_GENERIC")
        lRet := .T.
    EndIf

Return lRet