Libreria

Clase

Metodo

AhoraListados

RutinasList

ImprimeReportSql


Implementación:


 Sub ImprimeReportSql(
     aSql As String,
     Optional aColDescrip As Collection = Nothing,
     Optional aColCamposAgrupar As Collection = Nothing,
     Optional aTitulo As String,
     Optional aColCampos As Collection,
     Optional aColWidth As Collection,
     Optional aObjeto As String) 


Descripción:


Permite seleccionar informes de impresión ya creados e imprimirlos.


Ejemplo de uso:


    Dim lCol As Collection
     Dim lColWidth As Collection
     Dim lColDescrip As Collection
     Set lColDescrip = New Collection
     Set lColWidth = New Collection
  
     gCn.AhoraProceso "ImprimeReportSql", False,
     pSQL, lColDescrip, lCol, pCol.Descripcion, , lColWidth,
     pCol.Propiedades("HijoDefecto")