Histórico da Página
Aviso |
---|
|
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: |
| ||||||||||||||
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 depois da exclusão de todos os relacionamentos da Ordem de Serviço. |
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() |
Aviso |
---|
|
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#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 |