Apuntes Técnicos

Macro para salvar un reporte de Impromptu como PDF

Introducción a las macros en Cognos

Cognos Script es la herramienta donde se puede automatizar las aplicaciones de Cognos, utiliza un lenguaje basado en BASIC y automatización OLE. Se pueden generar macros que corran reportes de Impromptu o Power Play o que construyan cubos por ejemplo. Casi cualquier cosa que un usuario puede hacer, se puede automatizar con macros.

Se puede dar de alta una macro en cierto reporte de Impromptu o PowerPlay y colocarla en un botón de la barra de herramientas para que realice cierta tarea específica que si el usuario la hiciera tardaría mas tiempo.

Se pueden utilizar lenguajes de macro tales como Visual Basic o Microsoft Excel para crear códigos que ejecuten ciertas tareas.

Código

Sub Main()

   'Declaración de variables
   Dim objImpRep as Object
   Dim objImpApp as Object
   Dim objPDFPub as Object

   'Se declara un objeto tipo Impromptu
   Set objImpApp = CreateObject("CognosImpromptu.Application")  
   'Se declara una variable con la ubicación del reporte de Impromptu
   Set objImpRep = objImpApp.OpenReport("C:\REPORTE.IMR")
      'Se abre el catálogo especificando su ubicación y su usuario
      objImpApp.OpenCatalog "C:\CATALOGO.CAT", "Creator"
      strReportName = objImpRep.FullName
      'Recupera todos los registros
      objImpRep.RetrieveAll
      Set objPDFPub = objImpRep.PublishPDF
      'Se especifica el nombre del reporte PDF
      'y salva el reporte IMR como PDF
      objPDFPub.Publish "C:\REPORTE.PDF"
      'Cierra el reporte
      obImpRep.CloseReport
      'Cierra el catálogo
      objImpApp.CloseCatalog
      'Sale de la aplicación
      objImpApp.Quit

   'Se cierran todos los objetos utilizados
   Set objImpApp = Nothing
   Set objImpRep = Nothing
   Set objPDFPub = Nothing

End Sub

Si desea aprender mas sobre macros tenemos el curso de CognosScript Basics.

(Desarrollado por PROFIN México)

Para cualquier comentario acerca de este sitio web favor de dirigirse a webmaster@profinmexico.com