Histórico da Página
Permite customizar
ordenamento dea 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: |
| ||||
País(es): | Todos. | ||||
Banco(s) de Dados: | Todos. | ||||
Sistema(s) Operacional(is): | Todos. |
Ponto de Entrada
Descrição: | Ponto de entrada que permite customizar o ordenamento 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: |
| ||||||
Retorno: |
|
Bloco de código | ||||
---|---|---|---|---|
| ||||
#Include 'Protheus.ch' User Function MNTA435Q() Local aParam := PARAMIXB[1] //Contém os arrays de campos /* exemplo do parâmetro {{"'TQ_TAREFA"'," 'TQ_SEQETA"'," 'TQ_ETAPA"'},; índice 1 {"'TQ_TAREFA"',"'TQ_ETAPA"', "'TQ_SEQETA"'},; índice 2 { "'TQ_SEQETA","TQ_TAREFA", "TQ_ETAPA" }} índice 3 */ ', '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 nReturn |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas