Árvore de páginas

Versões comparadas

Chave

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

PONTO DE ENTRADA PARA CARREGAR OS CAMPOS DA PROGRAMAÇÃO DE O.S. (MNTA990) CRIADOS PELO PONTO DE ENTRADA MNTA9902 NA OPERAÇÃO DE ALTERAÇÃO

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

MNTA9906

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
c990TRB3CaracterTabela temporária com as O.S. Programadas
c990TRB2CaracterTabela temporária com filtro da Programação

País(es)Países:

Todos

Banco(s) Bancos de Dados:

Todos

Tabelas Utilizadas:

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

Sistemas Operacionais:

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de entrada para carregar os campo da Programação de O.S. criados pelo ponto de entrada MNTA9902 na alteração da programação de O.S.

Localização:

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

Eventos:

Programação de O.S.

Programa Fonte:

MNTA990.prw

Função:

MNTA990CAD(), fFilDataOS()

 
Bloco de código
Exemplo:code
language
sql
titleExemplo do P.E. MNTA9906
linenumberstrue
User Function MNTA9906()

  //CarregaLocal variáveisc990TRB3 de Entrada e Saída

  c990TRB3:= ParamIXB[1]
  Local c990TRB2 := ParamIXB[12]
  Local lIsRet  c990TRB2 := ParamIXB[23]
  Local aRet     := {}

  If lIsRet

    aRet := { {  //Carrega o campo de usuário criado pelo ponto de entrada MNTA9902
'TESTE1', 'Teste do campo 1' },;
              { 'TESTE2', 'Teste do campo 2' } }

  Else

    (c990TRB3)->TESTE>TESTE1 := 'Teste do campo 1'
    (c990TRB2)->TESTE1 := "Teste de ponto de entrada MNTA9906"
'Teste do campo 1'

    (c990TRB3)->TESTE2 := 'Teste do campo 2'
    (c990TRB2)->TESTE>TESTE2 := "'Teste dedo ponto de entrada MNTA9906"campo 2'

  EndIf

Return aRet