Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Maria Elisandra

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Maria Elisandra

Gravado em

Chave

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

Permite customizar a ordenação das etapas da ordem de serviço no retorno mod 2

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Manufatura.

Módulo:

Manutenção de Ativos e Gestão de Frotas.

Rotina:

Rotina

Nome Técnico

MNTA435

Retorno Mod. 2

País(es):

Todos.

Banco(s) de Dados:

Todos.

Sistema(s) Operacional(is):

Todos.

Ponto de Entrada

Array de campos que fazem parte dos índices da tabela temporária utilizada para apresentação de etapas 

Não há

Descrição:

Ponto de entrada que permite customizar o ordenamento a ordenação das etapas da ordem de serviço. 

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno Mod. 2

Eventos:

Retorno Mod. 2 (MNTA435)

Programa Fonte:

mnta435q.prw

Parâmetros:
PosiçãoTipoDescrição

1

array

Retorno:

Tipo

Descrição

Obrigatório

array

Campo(s) utilizados para o índice

Numérico

Índice da tabela temporária utilizado para ordenar as etapas 

Sim

 

Bloco de código
languagesql
titleMNTA435Q
#Include 'Protheus.ch'
    
User Function MNTA435Q()
    
    //Local parâmetro {{'TQ_TAREFA', 'TQ_SEQETA', 'TQ_ETAPA'}, {'TQ_TAREFA','TQ_ETAPA',aReturn := { 'TQ_SEQETA'}, { 'TQ_SEQETA', 'TQ_ETAPA', 'TQ_TAREFA' }}
    Local aParam  := PARAMIXB[1] 
    Local nIndex  := 0
    Local nReturn := 1

    // verifica se há um índice com os campos TQ_SEQETA + TQ_ETAPA
    nIndex := Ascan( aParam, { |x|  x[1] == 'TQ_SEQETA' .And. x[2] == 'TQ_ETAPA' } ) 

    If nIndex > 0
        nReturn := nIndex
    EndIf

Return nReturnaReturn