Este Ponto de Entrada é Válido a partir do Release 12.1.14 (Outubro/2016) e superiores

ALTERAÇÃO CAMPOS ESPECÍFICOS DA ORDEM DE SERVIÇO, PARAMETRIZADO COM FACILITIES

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
MNTA291	Atendimento de Solicitação de Serviço

Rotina(s) envolvida(s)	Nome Técnico
MNTA291	Atendimento de Solicitação de Serviço
MNTR675	Relatório de Ordem de Serviço

Chamados Relacionados

12.1.7: TVYYI5

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Descrição:	Ponto de Entrada que possibilita gravação de campos específicos na OS, tabela STJ (Ordem de Serviço), relacionada à Solicitação de Serviço.
Localização:	SIGAMNT: Atualizações/Controle de Oficina/Solicitação de Serviço/Atendimento
Eventos:	Atendimento de Solicitação de Serviço (MNTA291)
Programa Fonte:	MNTA291.PRX
Função:	MNTA291A()
Retorno:	(Nulo)

Exemplo:

User Function MNTA291A()

Local cOrdem := PARAMIXB[1] //Ordem de Serviço Gerada

Local cPlano := PARAMIXB[2] //Plano da Ordem de Serviço

Local cUser := SubStr(UsrRetName(TQB->TQB_CDSOLI),1,30) //Usuário que será adicionado à observação

dbSelectArea("STJ")

dbSetOrder(1) //TJ_FILIAL+TJ_ORDEM+TJ_PLANO+TJ_TIPOOS+TJ_CODBEM+TJ_SERVICO+TJ_SEQRELA

If dbSeek(xFilial("STJ") + cOrdem + cPlano )

RecLock("STJ", .F.)

STJ->TJ_OBSERVA += cUser

MsUnlock("STJ")

EndIf

Return