I am implementing a drilldown for the PRIMAVERA ERP 9 STP process table, but it is giving error.
My code.
Public Sub ExecutaEventoDrillDown_Processos(ByVal IdProcesso As String)
Dim objParametros As StdBEValoresStr
Dim objCampoDrillDown As StdBESqlCampoDrillDown
objCampoDrillDown = New StdBESqlCampoDrillDown
With objCampoDrillDown
.Tipo = EnumTipoDrillDownListas.tddlEventoAplicacao
.ModuloNotificado = "STP"
.Evento = "evtDD_STP_Processos"
End With
objParametros = New StdBEValoresStr
With objParametros
.InsereNovo("ID", IdProcesso)
End With
PSO.DrillDownLista(objCampoDrillDown, objParametros)
objCampoDrillDown = Nothing
objParametros = Nothing
End Sub