Script - Llamada al formulario de histórico de movimientos de almacén con la posibilidad de aplicar filtros

'--Sin filtro
Sub Main()
     frmAux.Descargar 'ATENCIÓN: DEBE ESTAR SIEMPRE QUE NO SE MUESTRE EL FORMULARIO.
     gCn.AhoraProceso "MacroCl.HistMov", False
End Sub

'--Con filtro
Sub Main()
     frmAux.Descargar 'ATENCIÓN: DEBE ESTAR SIEMPRE QUE NO SE MUESTRE EL FORMULARIO.
     Dim lParam
     Dim lCol 'As Collection
     Dim lForm 'As Object
     Set lParam = CreateObject("AhoraScripts.Script_Parametro")
     lParam.Nombre = "IdArticulo" ' NO_TRADUCIR_TAG
     lParam.Valor = "0"

     Set lCol = gcn.damenewcollection
     lCol.Add lParam
     Set lForm = gcn.sesion.mainform
     gCn.AhoraProceso "HistoricoMovimientos_Filtro", False, lCol, lForm
End Sub

// Sin filtro
public void Main()
{
    gCn.AhoraProceso("MacroCl.HistMov", out _);
}

// Con filtro
public void Main()
{
    IScript_Parametro lParam = null;
    IVB6Collection<IScript_Parametro> lCol = null;
    lParam = AhoraCore.AhoraServiceLocator.Current.GetService<AhoraScripts.IScript_Parametro>();
    lParam.Nombre = "IdArticulo";
    lParam.Valor = "0";

    lCol = new VB6Collection<IScript_Parametro>();
    lCol.Add(lParam);

    gCn.AhoraProceso("HistoricoMovimientos_Filtro", out _, lCol, gForm);
}