01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:MNTA4901()
País:Brasil


02. DESCRIÇÃO

Descrição:

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

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Plano Manutenção/Liberação de OS 

Programa Fonte:

MNTA490.prw

Função:

MNTA4901()

Parâmetros:

NomeTipoDescrição
ParamIXBCaracterIndica o número da ordem de serviço

Retorno:

Nulo

03. DEMAIS INFORMAÇÕES

#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


04. ASSUNTOS RELACIONADOS