MNTA435A - Informações Customizadas de Garantia

Descrição

O ponto de entrada MNTA435A possibilita o uso de informações customizadas no cadastro de garantia de insumo do tipo produto.

Observações

Desta forma os campos serão preenchidos automaticamente quando for aberta a tela.

Exemplos

#INCLUDE "Protheus.ch"
User Function MNTA435A()

Local cTipoRet // Campo preenchido
Local cRet := "" // Retorno caracter
Local nRet := 0 // Retorno numerioc

//------------------------------------------------
// Recebe o parametro que define em qual campo sera
// preenchido o registro.
// L - Codigo da Localizacao
// Q - Quantidade (Garantia por Tempo)
// U - Unidade de tempo
//------------------------------------------------
cTipoRet := PARAMIXB[1]

If cTipoRet == "L"
cRet := "DIAESQ"
ElseIf cTipoRet == "Q"
nRet := 999999
ElseIf cTipoRet == "U"
cRet := "Dia"
EndIf

Return If(cTipoRet == "Q",nRet,cRet)