Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada que realiza gravação de campos de usuário após a confirmação de uma O.S. Manual (MNTA410)

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

MNTA410

Manual


Rotina(s) envolvida(s)

Nome Técnico

MNTA4104

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 na rotina de O.S. Manual (MNTA410) que realiza a gravação de campos de usuário após a confirmação da O.S.

Programa Fonte:

MNTA410.prx
Localização:SIGAMNT: Atualizações/Controle de Oficina/Ordem de Serviço/Manual

Função:

MNTA4104()

Retorno:

.T.
Exemplo do Ponto de Entrada MNTA4104()
#Include 'Protheus.ch'

User Function MNTA4104()  
	
	Local i
	
	For i:= 1 to Len(aGetIns)    
		DbSelectArea("STL")   
		DbSetOrder(1)   
		If DbSeek( xFilial("STL")+cOSAtu+STL->TL_PLANO+aGETINS[i][1]+aGETINS[i][nTIP]+aGETINS[i][nCOD] )      
			RecLock("STL",.F.)      
			STL->TL_NUMRMS := SZA->ZA_NUM      
			MsUnlock("STL")   
		EndIf
	Next i	
	
Return .T.