Inicio > Visual FoxPro > victoramf > Variables en reporte

Variables en reporte

Experto:
Usuario:
Fecha: 23/06/2008
Valoración: (5,00 sobre 5) Categoría: Visual FoxPro
21/06/2008
alfidimu, usuario preguntando en Visual FoxPro
Usuario
Hola victor, esta es mi consulta:
Desde un prg (sumas) estoy relizando sumas de acuerdo al mes por ejem:
may=saldo+(eneD-EneH)+(febD-FedH)+(marD-marH)...
jun=saldo+(eneD-EneH)+(febD-FedH)+(marD-marH)+...
Desde el formulario cargo el prg sumas y  de acuerdo al mes que elija en el form quiero que apàrezca dicha variable en el reporte, si elijo el mes de mayo que aparezca la variable may en el reporte si elijo el mes de junio que aparezca la variable jun en el reporte.
21/06/2008
alfidimu, experto respondiendo en Visual FoxPro
Experto
Puedes implementar una variable adicional en el reporte y pasarle el valor antes de generar el reporte.
23/06/2008
alfidimu, usuario preguntando en Visual FoxPro
Usuario
Hola victor, he creado la variable xx en el reporte pero como paso el valor a esa variable. En un prg tengo estas lineas:
ccplanxx.prg
SELECT 1
USE ccplan&cAño ALIAS c1 SHARED
LOCATE FOR ccta="10401001"
IF FOUND() AND cMes="04"
         abr=sale+(ened-eneh)+(febd-febh)+(mard-marh)
ENDIF
IF FOUND() AND cMes="05"
        may=sale+ened-eneh+febd-febh+mard-marh+abrd-abrh
ENDIF
retu
En el boton aceptar del form ejecuto el prg:
 do:\ruta\ ccplanxx.prg
Luego cargo el reporte:
REPORT FORM d:\libros\reportes\libro preview
Quiero pasar la variable abr o may dependiendo del mes que elija, hacia la variable xx del reporte.
23/06/2008
alfidimu, experto respondiendo en Visual FoxPro
Experto
xx debe tener visibilidad pública y en el módulo ccplanxx:

IF FOUND() AND cMes="04"
     abr=sale+(ened-eneh)+(febd-febh)+(mard-marh)
     xx="abr"
ENDIF

IF FOUND() AND cMes="05"
    xx="may"
    may=sale+ened-eneh+febd-febh+mard-marh+abrd-abrh
ENDIF
23/06/2008
alfidimu, usuario preguntando en Visual FoxPro
Usuario
Muchas Gracias.
Enlaces patrocinados