Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Giovana Niehues

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Giovana Niehues

Gravado em

Chave

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

Ponto de entrada que permite manipular campos específicos do usuário na rotina de Liberação de OS (MNTA490)

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

MNTA490

Liberação de OS


Rotina(s) envolvida(s)

Nome Técnico

MNTA4901

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos


Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina

de Retorno Mod. 2 (MNTA435) que consiste em verificar se o produto atrelado à OS possui uma requisição de solicitação ao armazém. Caso possua é impossível finalizar a OS, caso contrário, o processo de finalização de retorno da ordem de serviço é processado

de Liberação de OS (MNTA490) que permite manipular os campos de usuário na rotina

Programa Fonte:

MNTA435
MNTA490.prx
Localização:SIGAMNT: Atualizações/Controle de Oficina/
Retorno de OS/Retorno Mod. 2
Plano Manutenção/Liberação de OS 

Função:

MNTA4352
MNTA4901()
Parâmetros:

Nome

Tipo

Descrição

ParamIXBCaracterIndica o número da ordem de serviço

Retorno:

Nulo
Bloco de código
titleExemplo do Ponto de Entrada MNTA4901()
#Include 'Protheus.ch'
   
User Function MNTA4901()
       
	Local ccVORDEM := ParamIXB

    MsgInfo('Ponto de entrada MNTA4901 executado')
    dbSelectArea('STJ')
	dbSetOrder(1)
	If dbSeek( xFilial('STJ')+ccVORDEM )
    	Reclock('STJ',.F.)
    	STJ->TJ_SERVICO := 'CORGEN'
    	STJ->(MsUnlock())
	EndIf
   
Return