Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 3 minutos


01. DADOS GERAIS

Produto:

TOTVS Manutenção de Ativos

Linha de Produto:

Linha Protheus

Segmento:

Manufatura

Módulo:

TOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT)

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


02. DESCRIÇÃO

Descrição:

A utilização do presente ponto de entrada permite que o usuário efetue a execução de regras específicas, onde essas serão consolidadas no momento da confirmação da rotina de Alteração de O.S. (MNTA265).

Localização:

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

Programa Fonte:

MNTA265.PRW

Função:

MNTA2652()

Parâmetros:

NomeTipoDescriçã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.

03. DEMAIS INFORMAÇÕES

Exemplo MNTA2652()
User Function MNTA2652()
 
    Local cOrdem := ParamIxb[1]
    Local cPlano := ParamIxb[2]
 
    dbSelectArea("STJ")
    dbSetOrder(1)
    If dbSeek(xFilial("STJ")+cOrdem+cPlano)
        If FieldPos("TJ_XPTO") > 0
            Reclock("STJ",.F.)
            STJ->TJ_XPTO := "Registro alterado em " + DTOC(dDataBase)
            MsUnLock()
        EndIf
    EndIf
 
Return


04. ASSUNTOS RELACIONADOS

  • Não se aplica.