Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada que adiciona/altera/exclui etapas após a gravação de 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

NGGERAOS

Gera OS de Manutenção


Rotina(s) envolvida(s)

Nome Técnico

NGADDETAPA

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 no programa de Geração de OS de Manutenção (NGGERAOS) que permite adicionar/alterar/excluir etapas após a gravação da OS

Programa Fonte:

NGGERAOS.prx
Localização:SIGAMNT: Atualizações/Controle de Oficina/Retorno de OS/Retorno

Função:

NGADDETAPA()

Retorno:

Nulo
Exemplo do Ponto de Entrada NGADDETAPA()
#INCLUDE "PROTHEUS.CH"
User Function NGADDETAPA()


//Grava etapa
dbSelectArea('STQ')
dbSetOrder(1)
If !dbSeek(xFilial('STQ') + STJ->TJ_ORDEM + STJ->TJ_PLANO + '0     ' + '002   ')
    RecLock('STQ', .T.)
    STQ->TQ_FILIAL := xFilial("STQ")
    STQ->TQ_ORDEM  := STJ->TJ_ORDEM
    STQ->TQ_PLANO  := STJ->TJ_PLANO
    STQ->TQ_TAREFA := '0     '
    STQ->TQ_ETAPA  := '002   '
    STQ->TQ_SEQETA := '001'
    MsUnlock('STQ')
EndIf

Return