|
Buscar:
Búsqueda avanzada
|
Navegar por categorías:
|
Revisio 125 - Instal·lar i Configurar nou component de vista prèvia XFRX |
||||
Descarregar el component desde aquí:
Nota: Actualitzat component a nova versio 1.55
Descomprimir el contingut del l'arxiu rar a la carpeta del projecte.
(carpeta: \frxlib\, fitxers: hndlib.dll, md5.fll, msvcp71.dll, msvcr71.dll, xfrx.fxp, xfrxlib.fll, zlib.dll,etc ,etc, )
Per activar el component cal definir i activar la seguent variable publica als programes ADSGEST.PRG i INICI.PRG.
PUBLIC gpXFRXComponent
gpXFRXComponent=.T. && Activa component vista previa XFRX Recompilar el projecte i copiar el contingut del rar tambe a casa del client.
A partir d’ara la opcio Vista previa de tots els llistats utilitzara el component XFRX, amb moltes mes opcions d’exportació cap a nous fitxers, permet la utilització del component desde el programa o de manera asistida per l’usuari final:
La carpeta que proposa el nou component per guardar l’arxiu es la carpeta de documents del perfil de l’usuari + \ADSGEST\
(nota: revisar que no existeixi cap document amb el mateix no, ja que la carpeta no es crearà)
En cas de voler deixar la vista previa antiga en algún llistat, la classe lst_desti de la clase _utils conté una nova propietat useXFRX amb la qual podem desactivar o activar el component de manera individual.
Exemples:
Com generar un document PDF desde la nostre aplicació:
Try
&& Carrega la classe
lcerr=.F.
m_macro="xfrx("XFRX#INIT")"
lclib="xfrxlib\xfrxlib"
Set Classlib To (lclib) Additive
losession=&m_macro
Catch
lcerr=.t. && Si es prodeuix un error plega
Endtry
If lcerr=.t.
m_msg="Component XFRX no instalat:"+CHR(10)+CHR(10)+;
"Comprovar que els seguets components estiguin a la carpeta de l'aplicació:"+Chr(10)+;
"XFRX.FXP, XFRXLIB.FLL, HNDLIB.DLL, MD5.FLL ,ZLIB.DLL y la carpeta XFRXLIB"+Chr(10)
Messagebox(m_msg,0,"Atenció",5000)
Return
Endif
m_path=”c:\documents\pdf\factura.pdf” && Ubicació del fitxer de desti.
lnRetVal = loSession.SetParams(m_path,,.t.,,,,"PDF")
If lnretval = 0
loSession.ProcessReport("reports\factura") && Nom del report sense extensio frx
loSession.finalize()
Endif
Release loSession
Aquest exemple es pot aplicar a qualsevol altre format unicament s’ha de canviar el paramete final al cridar el metode SetParams
lnRetVal = loSession.SetParams(m_path,,.t.,,,,"PDF") && Adobe PDF
lnRetVal = loSession.SetParams(m_path,,.t.,,,,"DOC") && Document Word
lnRetVal = loSession.SetParams(m_path,,.t.,,,,"NATIVE_DOCX") && Document Word DOCx
lnRetVal = loSession.SetParams(m_path,,.t.,,,,"XLS") && Fulla Excel.
Aquí les diferents variants: https://eqeuscom.atlassian.net/wiki/display/DOC/Output+Types Tambe es posible comprimir el document o documents en format Zip un cop han set generats, nomes cal afegir els seguent paramentres al metode SetParms. Genera un pdf i el comprimeix en una arxiu anomenat factures.zip, despres esborra el document original, (si l’arxiu zip existeix el document s’afegira a l’arxiu). loSession.SetParams("factura_1234.pdf",,.T.,,,,"PDF","factures.zip", .t., .t.)
Tocat a BBDD:
A la bd no s’ha tocat res.
Passar parxe per deixar constància de la versió.
Passar Parxe : ADSGEST_0125.SQL
Tocat a l'Aplicació:
Forms Modificats:
ADSGEST.PRG (Modificat)
INICI.PRG (Modificat)
Meta Keywords: XFRX parxes adsgest
Documents adjunts: ADSGEST_0125.SQL
Revc
|
||||
| Archivos adjuntos | |
 |
ADSGEST_0125.SQL (4 kb) |
| Otras preguntas en esta categoría | |
| » Más preguntas | |
Powered by
KBPublisher (Knowledge base software)