Voy a intentar hacer un ejemplo, pero estaba pensando lo siguiente. Cuando tengo que definir un report primero creo una serie de arrays:
- Code: Select all Expand view
LOCAL aCampos := { "CuCuota", "CuImporte", "CuSeguro", "CuTotal", "CuCompar", "CuEDesde", "CuEhasta" }
LOCAL aTitulos := { "Cuota", "Importe", "Seguro", "Total", "Comparsistas", "Edad (desde)", "Edad (Hasta)" }
LOCAL aWidth := { 40, 10, 10, 10, 10, 10, 10 }
LOCAL aShow := { .T., .T., .T., .T., .T., .t., .t. }
LOCAL aPicture := { "NO", "@E999.99", "@E999.99", "@E999.99", "@E999", "@E99", "@E99" }
LOCAL aTotal := { .F., .F., .F., .F., .T., .F., .F. }
LOCAL oInforme
y luego defino el informe y para añadir las columnas hago esto:
- Code: Select all Expand view
FOR i := 1 TO Len(::aTitulos)
IF ::aShow[i]
// ? ::aCampos[i]
if ::aPicture[i] == "NO"
RptAddColumn( {bTitulo(::aTitulos,i)},,{bCampo(::aCampos,i)},::aWidth[i],{},{||1},.F.,,,.F.,.F.,)
...
Lo que estaba pensando es que no recorto el campo, sino que lo limito con el ancho de la columna. Esto en el preview se ve bein, pero puede que al generar el PDF el problema venga por ahí. Voy a probar a corregirlo y lo comento.
Saludos,