Linha Microsiga Protheus

Árvore de páginas

Atenção

Este Ponto de Entrada esta disponível a partir da Release 12.1.17

Realiza processo após a exclusão de todos relacionamentos da OS.

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

MNTUTIL_OS

Funções Genéricas de OS

Rotina(s) envolvida(s)

Nome Técnico

MNTA420

OS Corretiva

MNTA435Retorno OS Mod 2
MNTA260Cancelamento OS
MNTA400Retorno

Issues Relacionadas

12.1.17 / INOVBANCO-14539     

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de entrada executado no cancelamento da Ordem de Serviço depois da exclusão de todos os relacionamentos. Este permite a gravação de novos campos.

Localização:

Atualizações/Controle de Oficina/Retorno OS/Retorno

Atualizações/Controle de Oficina/Retorno OS/Retorno Mod. 2

Atualizações/Controle de Oficina/Plano de Manutenção/Cancelamento OS

Atualizações/Controle de Oficina/Ordem de Serviço/Corretiva

Eventos:

Retorno (MNTA400)

Retorno Mod. 2 (MNTA435)

Cancelamento OS (MNTA260)

OS Corretiva (MNTA420)

Programa Fonte:

MNTUTIL_OS.PRW

Função:

NGDELETOS()



Atenção

Os campos utilizados no exemplo, foram incluídos pelo configurador para que então fossem utilizados.


Exemplo:

#Include "PROTHEUS.CH"
User Function NGDELDIN()

    Local aArea  := GetArea()
    
    RecLock("STJ", .F.)
        
    STJ->TJ_LOGDT := Date()
    STJ->TJ_LOGHR := Time()
    STJ->TJ_LOGUS := UsrFullName(RetCodUsr())
    STJ->TJ_LOGPR := FunName()
        
    MsUnLock()
    
    RestArea(aArea)

Return