Árvore de páginas

Versões comparadas

Chave

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

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:


Bloco de código
languagevb
themeEclipse
User Function MNTA9902()
    
	Local nPosTrb  := 0
	Local nPosTrb  := 0
    
    aTrb1     := ParamIXB[1]
    aDbf1     := ParamIXB[2]
    aTrb2     := ParamIXB[3]
    aDbf2     := ParamIXB[4]
    aCpoCompaCpoCompl := ParamIXB[5]
    
    nPosTrb := aScan(aTrb1,{|x| "PRIOR" $ Upper(x[3])})
    aDel(aTrb1, nPosTrb)
    aSize(aTrb1, Len(aTrb1)-1)
    
    nPosDbfnPosTrb := aScan(aDbf1aCpoCompl,{|x| "PRIORSTATUS" $ Upper(x[1])})
    aDel(aDbf1aCpoCompl, nPosDbfnPosTrb)
    aSize(aDbf1aCpoCompl, Len(aDbf1aCpoCompl)-1)
    
Return    nPosTrb := aScan(aCpoComp,{|x| "STATUS" $ Upper(x[3])})
    aDel(aCpoComp, nPosTrb)
    aSize(aCpoComp, Len(aCpoComp)-1){aTrb1, aTrb2, aDbf1, aDbf2, aCpoCompl}
    
Return