Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Giovana Niehues

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Giovana Niehues

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Ponto de entrada que permite realizar a alteração/inclusão de campos do usuário ao gerar OS Preventiva automática por contador 

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

MNTUTIL_OS

Funções de Ordem de Serviço - Cria OS Preventiva


Rotina(s) envolvida(s)

Nome Técnico

NGAUTCLI

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 Funções Relacionadas a OS (MNTUTIL_OS) na geração de Ordens de Serviços Preventivas automáticas por contador (NGGEROSAUT), para alteração/inclusão de campos do usuário utilizando o código do bem e o contador

Programa Fonte:

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

Função:

NGAUTCLI()
Parâmetros:
NomeTipoDescrição
ParamIXB[1]CaracterCódigo do bem
ParamIXB[2]NuméricoContador do bem
ParamIXB[3]CaracterCódigo da filial de processamento

Retorno:

Nulo
Bloco de código
languagesql
titleExemplo do Ponto de Entrada NGAUTCLI()
#Include 'Protheus.ch'

User Function NGAUTCLI()

	Local cBem   := ParamIXB[1]
	Local nCont  := ParamIXB[2]
	Local PFIL   := ParamIXB[3]

	PFIL := IIF(PFIL <> NIL, PFIL,xFilial('STF'))

	dbSelectArea('STF')
	dbSetOrder(1)
	If dbSeek( xFilial('STF')+cBem )
    	MsgInfo('Ponto de entrada NGAUTCLI executado', 'Atenção')
		Reclock('STF', .F.)
		STF->TF_CALENDA := '002'
		STF->(MsUnlock())
	EndIf

Return