Á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 a customização de coluna em O.S. gerada na rotina de Confirmação (MNTA340)

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

MNTA340

Confirmação

Rotina(s) envolvida(s)

Nome Técnico

MNTA340D

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos




Informações
titleP.E. MNTA340G

Para que os campos adicionados tenham seu valor preenchido é necessário o uso do Ponto de Entrada MNTA340G que atribui valor aos campos adicionados

Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Confirmação (MNTA340) que permite a customização de coluna em O.S. gerada

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Plano Manutenção/Confirmação

Programa Fonte:

MNTA340.prx

Função:

MNTA340D()

Parâmetros:
a tabela temporária
NomeTipoDescrição
ParamIXB[1]Array

Recebe

ParamIXB[2]ArrayRecebe array com campos 

array com campos, dependendo do tipo de plano da ordem.

(Campos adicionados aqui serão exibidos na tela de

Conf.Plano Manut - Individual)

Retorno:

Retorno:

Nome

Tipo

Descrição

Obrigatório

 Nulo 

-

-

Array

Deve retornar o mesmo array recebido via parâmetro nas mesmas posições,

porém contendo as colunas a serem inseridas

( Os campos a serem inseridos devem ser estar presentes na tabela STJ previamente )

X-

 

Bloco de código
titleExemplo do Ponto de Entrada MNTA340D()
#Include 'Protheus.ch'
  
User Function MNTA340D()
  
    aDBF := ParamIXB[1]    // Parâmetro Armazenaque armazena os campos da tabela temporária dependendo do tipo de plano da ordem
    aDBF1 := ParamIXB[2]   // Armazena os campos da tabela temporária para realizar a confirmacao
    aDBF001 := ParamIXB[3] // Armazena os campos que vao ser usados na montagem de browse para cadastrar informacoes, e para relatorio
 
    nPosDBF :=If aScan( aDBF ,{|x| x[1] == "TJ_TIPOTESTE" } )
    If nPosDBF > 0
        aAdd( aDBF,  { 'TJ_TIPO', 'C',  9, 0 })
    EndIf
 
= 0 // Verifica se o campo já foi incluido
  
     nPosDBF := aScan( aDBF1 ,{|x| x[1] == "TJ_DESCR" } )
    If nPosDBF > 0
        aAdd( aDBF,  { 'TJ_DESCRTESTE', 'C',  507, 0 })
 // Inclui o EndIf
novo 
campo na lista
  nPosDBF
 := aScan( aDBF001 ,{|x| x[1] == "NUMSEQ" } )
    If nPosDBF > 0
        aAdd( aDBF,  { 'NUMSEQ', 'C',  5, 0 })
    EndIf
 
Return EndIf
  
Return aDBF