Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 7

changes.mady.by.user Kamila Thaise de Oliveira

Gravado em

comparado com

Nova versão 8

changes.mady.by.user Alexandre dos Santos

Gravado em

Chave

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

PONTO DE ENTRADA PARA ADICIONAR CAMPOS NO BROWSE DE PROGRAMAÇÃO DE ORDEM DE SERVIÇO (MNTA990)

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

MNTA990

Programação de Ordem de Serviço

Rotina(s) envolvida(s)

Nome Técnico

MNTA9902

Ponto de Entrada

Cadastros Iniciais:

Em Atualizações→Controle de Oficina→Manutenção→Funcionários, cadastrar um Funcionário.

Em Atualizações→Controle de Oficina→Plano Manutenção→Programação de OS, incluir uma Programação de Ordem de Serviço.

Parâmetro(s):

NomeTipoDescrição
aTRB1ArrayTabela temporária com as O.S. a Programar. 
aDBFArrayArray com os campos criados pela tabela temporária das O.S. a Programar.
aTRB2ArrayTabela temporária com as O.S. Programadas. 
aDBFaArray

Array com os campos criado pela tabela temporária das O.S.

aCpoCompl

ArrayArray que recebe as descrições "Situação" e "Status" e define as cores das mesmas.

País(es):

Todos.

Banco(s) de Dados:

Todos.

Tabelas Utilizadas:

TT1 - Programação de Ordem de Serviço.

Sistema(s) Operacional(is):

Todos.

Ponto de Entrada

Descrição:

Ponto de entrada para adicionar campos no browse de O.S a programar.

Localização:

Atualizações→Controle de Oficina→Plano Manutenção→Programação de OS.

Eventos:

Programação de Ordem de Serviço.

Programa Fonte:

MNTA990.prw

Função:

MNTA990CAD(), fBuscaOS()

Retorno:

Tipo

Descrição

Obrigatório

Array

Recebe os campos novos adicionados.

Não.

 

Exemplo:

Bloco de código
titleMNTA9902
User Function MNTA9902()
 
    // Carrega variáveis de Entrada e Saida
    aTRB1     := ParamIXB[1] 
    aDBF      := ParamIXB[2]
    aTRB2     := ParamIXB[3]
    aDBFa     := ParamIXB[4]
    aCpoCompl := ParamIXB[5]
    
    // Adiciona campo de usuário
    aAdd( aDBF , { 'TESTE', 'C', 40, 0 } )
	aAdd( aTRB1, { "Teste" , NIL, "TESTE", } ) //"Desc. Serviço"
 
    MsgInfo( 'Ponto de Entrada MNTA9902 executado', 'Atenção' )
    
Return