Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Alexandre dos Santos

Gravado em

comparado com

Nova versão 2

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 incluir, remover e customizar os botões apresentados na rotina de retorno simplificado

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

MNTA415

Retorno Simplificado

Ponto de Entrada

Descrição:

Ponto de entrada para incluir, remover e customizar os botões apresentados na rotina de retorno simplificado.

Localização:

SIGAMNT: Atualizações > Controle de Oficina > Retorno OS > Retorno Simplificado

Programa Fonte:

MNTA415.prx

Função:

MNTA415()

Parâmetros:

NomeTipoDescrição
PARAMIXBArray

Listagem de botões padrão utilizado pela rotina.

OrdemConteúdo
PARAMIXB[1]
PosiçãoConteúdo PadrãoDescrição
PARAMIXB[1,1]

005

Ponto vertical inicial do objeto
PARAMIXB[1,2]002Ponto horizontal inicial do objeto
PARAMIXB[1,3]EtapasNome do botão
PARAMIXB[1,4]{ || NG415ETA() }Ação realizada pelo botão
PARAMIXB[1,5]

'oBtnEta'

Objeto que controla as ações do botão
PARAMIXB[2]
PosiçãoConteúdo PadrãoDescrição
PARAMIXB[2,1]

005

Ponto vertical inicial do objeto
PARAMIXB[2,2]052Ponto horizontal inicial do objeto
PARAMIXB[2,3]OcorrênciasNome do botão
PARAMIXB[2,4]{ || NG415OCO() }Ação realizada pelo botão
PARAMIXB[2,5]

'oBtnOco'

Objeto que controla as ações do botão
PARAMIXB[3]
PosiçãoConteúdo PadrãoDescrição
PARAMIXB[3,1]

005

Ponto vertical inicial do objeto
PARAMIXB[3,2]102Ponto horizontal inicial do objeto
PARAMIXB[3,3]Finalização O.S.Nome do botão
PARAMIXB[3,4]{ || NG415FIM() }Ação realizada pelo botão
PARAMIXB[3,5]

'oBtnFin'

Objeto que controla as ações do botão
PARAMIXB[4]
PosiçãoConteúdo PadrãoDescrição
PARAMIXB[4,1]

005

Ponto vertical inicial do objeto
PARAMIXB[4,2]152Ponto horizontal inicial do objeto
PARAMIXB[4,3]RateioNome do botão
PARAMIXB[4,4]{ || MNTA402() }Ação realizada pelo botão
PARAMIXB[4,5]

'oBtnRat'

Objeto que controla as ações do botão
PARAMIXB[5]
PosiçãoConteúdo PadrãoDescrição
PARAMIXB[5,1]

005

Ponto vertical inicial do objeto
PARAMIXB[5,2]202Ponto horizontal inicial do objeto
PARAMIXB[5,3]Solic. CompraNome do botão
PARAMIXB[5,4]{ || MNTC290( IIf( aTail( aCols[n], '', aCols[n,nORDEM4] ) ) }Ação realizada pelo botão
PARAMIXB[5,5]

'oBtnSC'

Objeto que controla as ações do botão

 

 

Bloco de código
languagesql
titleExemplo do P.E. MNTA9902MNTA4156
linenumberstrue
#INCLUDE 'Protheus.ch'

User Function MNTA9902MNTA4156()
 
    // Carrega variáveis de Entrada e Saida
    aTRB1     	Local aButtons := ParamIXBPARAMIXB[1] 
    aDBF      := ParamIXB[2]
    aTRB2// Remove o botão £o := ParamIXB[3]de etapas
    aDBFaIf (   nPosDel := ParamIXB[4]
    aCpoCompl := ParamIXB[5]
    
    aAdd( aDBF , { 'CODIFAM', 'C', TamSX3( 'T6_CODFAMI' )[1], 0 } )
	aAdd( aTRB1, { 'CODIFAM', NIL, 'Família' } )
    aAdd( aDBF , { 'DESCFAM', 'C', TamSX3( 'T6_NOME' )[1], 0 } )
	aAdd( aTRB1, { 'DESCFAM', NIL, 'Desc. Fam.' } )aScan( aButtons, { |x| x[3] == 'Etapas' } ) ) > 0

        aDel( aButtons, nPosDel )
        aSize( aButtons, Len( aButtons ) - 1 )

    EndIf

    aAdd( aDBFa, { 'CODIFAM', 'C', TamSX3( 'T6_CODFAMI' )[1], 0 } )
	aAdd( aTRB2, { 'CODIFAM', NIL, 'Família' } )
    aAdd( aDBFa, { 'DESCFAM', 'C', TamSX3( 'T6_NOME' )[1], 0 } )
	aAdd( aTRB2, { 'DESCFAM', NIL, 'Desc. Fam.' } )
    
Return// Inclui o botão calculadora
    aAdd( aButtons, { 005, 002, 'Calculadora', { || Calculadora() }, 'oBtnCal' } )

Return aButtons