Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Rodrigo Nascimento Soledade

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Rodrigo Nascimento Soledade

Gravado em

Chave

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

Ponto de entrada para preencher marcação da Etapa (TCP)

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

MNTA435

Retorno O.S. Mod 2

Chamados Relacionados

                                                                 

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos



Ponto de Entrada

Descrição:

Ponto de entrada para preencher marcação da Etapa (TCP)

Localização:

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

Eventos:

Retorno O.S. Mod 2 (MNTA435)

Programa Fonte:

MNTA435.PRW

Função:

MNTA435L()

Parâmetros:

Nome

Tipo

Descrição

aHEADER

aCOLS

nCnt

Array

Array

Numero

Campos da griddo aheader das Opções de Etapa da O.S. (TPC)

Informações da contidas na gridnas Etapas da O.S.

Linha que esta percorrendoestá percorrendo na tabela de Opções de Etapa (TPC)

Retorno:



Nome

Tipo

Descrição

Obrigatório

aBtnaCOLSArrayArray com todos os botões que deveram ser exibidos na rotina e seus respectivos conteúdoso acols das etapas da O.S.Sim

 

Exemplo:


#include "Protheus.ch"
User Function MNTA435L()

     Local aArea := GetArea()
     Local aHeadTPC := PARAMIXB[1]
     Local aCOLSTPC := PARAMIXB[2]
     Local nLin := PARAMIXB[3]
     Local nOk := aScan(aHeadTPC, {|x| AllTrim(Upper(X[2])) == "TX_OK" })
     Local nX := 0

     If TPC->TPC_OPCAO == 'SIM'
          aCOLSTPC[nLin][nOK] := "X"
     EndIf

     RestArea(aArea)
Return aCOLSTPC