Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada executado para gerar número sequencial das OS de forma contínua entre as filiais 

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 O.S. de manutenção


Rotina(s) envolvida(s)

Nome Técnico

NGGEROS2

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 para gerar número sequencial das O.S. de forma contínua entre as filiais

Programa Fonte:

NGGERAOS.prx

Função:

NGGEROS2()

Retorno:

NomeTipoDescriçãoObrigatório
cOrdemCaracterRetorna o código da OSX
Exemplo do Ponto de Entrada NGGEROS2()
#Include 'Protheus.ch'

User Function NGGEROS2()

	Local cOrdem := '

	dbSelectArea('SX3')
	dbSetOrder(2)
	If dbSeek('TJ_ORDEM')
		If 'GETSXENUM' $ SX3->X3_RELACAO
			cOrdem := &(SX3->X3_RELACAO)
		Else
			cOrdem := GETSXENUM('STJ','TJ_ORDEM')
		EndIf
	EndIf

Return cOrdem