Histórico da Página

#INCLUDE "TOTVS.ch"

/*/{Protheus.doc} User Function FA686VLD
    (Ponto de entrada que permite durante o carregamento das grids, 
    validar se inclui ou não a linha na tela .T. = Inclui/ .F. = Não Inclui)
    @type  Function
    @author Cassio S Dias
    @since 11/12/2023
    @version 12
    @return Nil
    @see (https://tdn.totvs.com/x/PNFaM)
    /*/
User Function FA686VLD(cAliasQry)
//posicionado nas tabelas 
//FL6 - Reservas                      
//FLQ - Confirmação Valores Viagem       	

	Local nTipo as numeric

    cAliasQry := Paramixb[1]
    nTipo     := Val((cAliasQry)->FL6_TIPO)

//1=Aereo;2=Hotel;3=Carro;4=Seguro;5=Rodoviario;6=Outros                                                                         
 

//Valida tipo de serviço (1=Aereo;2=Hotel;3=Carro;4=Seguro;5=Rodoviario;6=Outros ) 
	if  nTipo == 1 .OR. nTipo == 2	

		RETURN(.F.)
	else
		//MSGINFO( "Ponto de Entrada FA686VLD", "FA686VLD" )
		RETURN(.T.)

	endif

Return Nil