Árvore de páginas
Ir para o final dos metadados
Ir para o início dos metadados

Permite incluir e remover campos que serão apresentados sobre a O.S da Programaçã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 OS

Issues Relacionadas

12.1.17 / DNG-1194

País(es):

Todos.

Banco(s) de Dados:

Todos.

Sistema(s) Operacional(is):

Todos.

Ponto de Entrada

Descrição:

Permite incluir e remover campos que serão apresentados sobre a O.S da Programação.

Localização:

SIGAMNT: Atualizações/Controle de Oificina/Plano de Manutenção/Programação OS

Eventos:

Proframação OS (MNTA990)

Programa Fonte:

MNTA990.PRW

Função:

MNTA990CAD()

Parametros:

Nome

Tipo

Descrição

Obrigatório

aTrb1

Array

NomeTipoDescrição
aTrb1[1]CaracterNome do campo
aTrb1[2]NilNil
aTrb1[3]CaracterTitulo do campo

Sim

NomeTipoDescriçãoObrigatório
aDbf1Array
NomeTipoDescrição
aDbf1[1]CaracterNome do Campo
aDbf1[2]CaracterTipo do campo
aDbf1[3]NumericoTamanho do campo
aDbf1[4]NumericoNível do campo
Sim

Nome

Tipo

Descrição

Obrigatório

aTrb2

Array

NomeTipoDescrição
aTrb2[1]CaracterNome do campo
aTrb2[2]NilNil
aTrb2[3]CaracterTitulo do campo
Sim
NomeTipoDescriçãoObrigatório
aDbf2Array
NomeTipoDescrição
aDbf2[1]CaracterNome do Campo
aDbf2[2]CaracterTipo do campo
aDbf2[3]NumericoTamanho do campo
aDbf2[4]NumericoNível do campo
Sim

Nome

Tipo

Descrição

Obrigatório

aCpoComp
Array
NomeTipoDescrição
aCpoComp[1]
CaracterNome do Campo
Sim



Retorno
NomeTipoDescrição
aRetArray
NomeTipoDescrição
aRet[1]ArrayContem campos para montagem do grid OSs a programar
aRet[2]ArrayContem campos para montagem do grid OSs em programação
aRet[3]ArrayContem campos para montagem do TRB OSs a programar
aRet[4]ArrayContem campos para montagem do TRB OSs em programação
aRet[5]ArrayContem campos complementares de legenda dos grids OSs a programar e em programação

 

Exemplo:


User Function MNTA9902()
    
	Local nPosTrb  := 0
	Local nPosTrb  := 0
    
    aTrb1     := ParamIXB[1]
    aDbf1     := ParamIXB[2]
    aTrb2     := ParamIXB[3]
    aDbf2     := ParamIXB[4]
    aCpoCompl := ParamIXB[5]
    
    nPosTrb := aScan(aTrb1,{|x| "PRIOR" $ Upper(x[3])})
    aDel(aTrb1, nPosTrb)
    aSize(aTrb1, Len(aTrb1)-1)
    
    nPosTrb := aScan(aCpoCompl,{|x| "STATUS" $ Upper(x)})
    aDel(aCpoCompl, nPosTrb)
    aSize(aCpoCompl, Len(aCpoCompl)-1)
    
Return {aTrb1, aTrb2, aDbf1, aDbf2, aCpoCompl}