Histórico da Página
Ponto de entrada para
preencher marcação da Etapamarcar 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: |
| ||||
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 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: |
| ||||||||
Retorno: |
|
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas