Implementación control de versiones en Generador de Reporte
Beneficios:
- Mitigar riesgo por la pérdida de personalizaciones causadas por la actualización del reporte.
- Lograr recuperar versiones anteriores del reporte.
- Autonomía y sin depender de personal técnico.
- Fácil y rápido, ubicas el reporte, clic en botón “Pegar”, para que AdaptaPro muestre las pistas de auditoría y mediante el botón Grabar, será restaurado el contenido del reporte.
Implementado control de versiones en Generador de Reportes. Mediante el uso del registro de auditoría, tiene el propósito de facilitar recuperaciones futuras en el caso que el reporte esté personalizado y sea reemplazado por el proceso de actualización. También para casos donde el usuario requiere recuperar una versión anterior del reporte. Citamos el siguiente caso: Restaurar los nombres de los archivos CRYSTAL REPORT asociados con el reporte. Toda vez que el usuario realice: Modificación del Reporte, Importación de Reportes o sustitución del reporte desde las actualización automáticas será registrado pista de auditoría en la tabla “dpaudelimodcnf” ubicada en la base de datos «Configuración del Sistema» y la acción la realiza AdaptaPro mediante la siguiente instrucción:
oTable:SETAUDITAR() debe ser agregada antes de la sentencia grabar:
oTable:Commit(oTable:cWhere)
Desde el programa REPWRITE. Modificar Reporte
oTable:=OpenTable(«SELECT * FROM DPREPORTES WHERE REP_CODIGO»+GetWhere(«=»,oGenRep:cCodigoOld),.T.)
oTable:SETAUDITAR()
oTable:Replace(«REP_FUENTE»,oGenRep:cMemo )
oTable:Replace(«REP_PARAM» ,oGenRep:cParameter)
oTable:Commit(oTable:cWhere)
oTable:End()
Desde programa REPIMPORT (Importar Reportes)
IF !oTable:lAppend
oTable:SETAUDITAR()
ENDIF
Desde RAQTOREPORTES
IF oTable:RecCount()>0
oTable:SETAUDITAR()
ENDIF