Scripts varios

Ahora proceso MacroCl.HistMov
Ahora proceso HistoricoMovimientos_Filtro


Ver código ejemplo


'--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


Autor: Daniel Ernesto Lutz Llano