Histórico da Página

#DEFINE X5_CHAVE      3  

User Function QIPINTAPI()

    Local aLabsFiloReturn    := {}
	Nil
    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. 
        oReturn := {}
        If !Empty(oDados['loginUsuario']) .AND. oDados['loginUsuario'] == "USUARIO01"
            aAdd(aLabsFiloReturn, "LABQUI")
	ElseIf cEvento == "laboratoriosRelacionadosAoUsuario"
        Else
             aSX5 := FWGetSX5( "Q2" )
		            aEval(aSX5, {|aItem| aAdd(aLabsFiloReturn, aItem[X5_CHAVE]) })
        EndIf

    ElseIf cEvento == "bloqueiaDataInspecao"
Return aLabsFil        oReturn := .F.

    ElseIf cEvento == "bloqueiaHoraInspecao"
        oReturn := .F.

    ElseIf cEvento == "complementoAmostra"
        //Meu complemento de amostra

    ElseIf cEvento == "complementoResultados"
        //Meu complemento de resultados

    ElseIf cEvento == "complementoLaudo"
        //Meu complemento de laudo
        
    EndIf
  
Return oReturn