Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada para marcar automaticamente as opções 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 marcar automaticamente as opções 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 do aheader das Opções de Etapa da O.S. (TPC)

Informações da contidas nas Etapas da O.S.

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

Retorno:

Nome

Tipo

Descrição

Obrigatório

aCOLSArrayArray com o 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 AllTrim(TPC->TPC_OPCAO) == 'SIM'
          aCOLSTPC[nLin][nOK] := "X"
     EndIf
     RestArea(aArea)
Return aCOLSTPC