01. DADOS GERAIS

Produto:

TOTVS DMS

Linha de Produto:

Segmento:

Módulo:

TOTVS DMS (Linha Protheus) - Oficina (SIGAOFI)

Função:Solic. Garantia Jd (OFINJD15)
País:Brasil
Ticket:24370687
Requisito/Story/Issue (informe o requisito relacionado) :DVARMIL-10454


02. DESCRIÇÃO

Localização: Rotina Solic. Garantia Jd (OFINJD15) → Outras Ações → Atualiza O.S.

Em que ponto? Esse Ponto de Entrada será executado no processo para validação da digitação das informações nas Grids de Peças, Serviços e Outros Créditos na função de atualização de O.S. 

03. DEMAIS INFORMAÇÕES

Parâmetro:

NomeTipoDescrição

cReadVar

Caracter

Variavel em memória do campo

nPosGet

Numeric

Posição do aCols

lProcIni

Lógico

Executado pela rotina de pré-preenchimento


Retorno:

NomeTipoDescrição

lRet

Lógico

Continua ou Aborta Operação


Exemplo de utilização Advpl:

#include 'protheus.ch'

User Function OFJD15FO(cReadVar,nPosGet,lProcIni)
Local lRet 

If lProcIni

	//**** Grid de Peças ****//
	If cReadVar == "M->PEC_GRUITE" 
		oGetPeca:aCols[nPosGet,aScan("aHPeca",{|x| AllTrim(x[2])=="OUT_TIPTEM"})] := M->PEC_TIPTEM
		M->VO3_GRUITE := M->PEC_GRUITE
	EndIf

   	//**** Grid de Serviços ****//
	If cReadVar == "M->SER_GRUSER" 
		oGetSrvc:aCols[nPosGet,aScan("aHSrvc",{|x| AllTrim(x[2])=="SER_TIPTEM"})] := M->SER_TIPTEM
		M->VO4_GRUSER := M->SER_GRUSER
	EndIf

	//**** Grid Outros Créditos ****//
	If cReadVar == "M->OUT_TIPTEM" 
		oGetOutr:aCols[nPosGet,aScan("aHOutr",{|x| AllTrim(x[2])=="OUT_TIPTEM"})] := M->OUT_TIPTEM
		M->VO3_TIPTEM := M->OUT_TIPTEM
	EndIf

EndIF

lRet := .T.
 
return lRet


04. ASSUNTOS RELACIONADOS