Histórico da Página

#DEFINE X5_CHAVE      3

User Function QIPINTAPI()
    Local aLabsFil   := {}
	Local aSX5       := Nil
    Local cClasseAPI := Nil
    Local cEndPoint  := Nil
    Local cEvento    := Nil
    Local oDados     := Nil
     
    If ParamIXB != Nil
        oDados     := ParamIXB[1]
        cEndPoint  := ParamIXB[2]
        cClasseAPI := ParamIXB[3]
        cEvento    := ParamIXB[4]
    EndIf
 
    If  cEvento == "laboratoriosRelacionadosAoUsuario" .AND. !Empty(oDados['loginUsuario']) .AND. oDados['loginUsuario'] == "USUARIO01"
        aAdd(aLabsFil, "LABQUI")
	Else
		ElseIf cEvento == "laboratoriosRelacionadosAoUsuario"
        aSX5 := FWGetSX5( "Q2" )
		aEval(aSX5, {|aItem| aAdd(aLabsFil, aItem[X5_CHAVE]) })
    EndIf
 
Return aLabsFil