Histórico da Página

User Function VXGRUVEI()
    
    Local cChaInt    := ParamIxb[1]
    Local cGrupoVeic := ""

    // O grupo está sendo levantado em um momento em que estou posicionado na VV1
    If VV1->(FieldPos('VV1_GRUVEI')) .and. !Empty(cChaInt)//(FWIsInCallStack('VEIXA010') .or. FWIsInCallStack('VEIA070'))Campo customizado
        VV1->(DBSetOrder(1))
        If VV1->(DBSeek(xFilial("VV1") + cChaInt))
            If !Empty(VV1->VV1_GRUVEI)
                cGrupoVeic := VV1->VV1_GRUVEI
            Endif
        Endif
    Endif

	If Empty(cGrupoVeic)
		cGrupoVeic := Left(GetMV("MV_GRUVEI")+Space(TamSX3("B1_GRUPO")[1]),TamSX3("B1_GRUPO")[1])
	Endif

Return cGrupoVeic