PE MNTA2652 Permite alterar conteúdo dos campos de ordem de serviço na gravação da rotina Alteração de O.S.

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

MNTA265 - Alteração de O.S.

Chamados Relacionados

MNG-4235

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Permite alterar conteúdo dos campos de ordem de serviço na gravação da rotina de alteração de O.S.

Localização:

SIGAMNT: Atualizações/ Controle de Combustíveis/ Abastecimento/Abast. Lote Posto Interno

Programa Fonte:

MNTA265.prx

Função:

MNTA2652()

Parâmetros:

Nome

Tipo

Descrição

cOrdemCaracter

Representa o código da ordem de serviço que está sendo alterada.


cPlanoCaracterRepresenta o código do plano de manutenção referente a ordem de serviço que está sendo alterada.

 


User Function MNTA2652()

    Local cOrdem := ParamIxb[1]
    Local cPlano := ParamIxb[2]

    dbSelectArea("STJ")
    dbSetOrder(1)
    If dbSeek(xFilial("STJ")+cOrdem+cPlano)
        Reclock("STJ",.F.)
        STJ->TJ_SITUACA := "P"
        MsUnLock()
    EndIf

Return