Variables en reporte
Hola víctor, esta es mi consulta:
Desde un prg (sumas) estoy realizando 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 aparezca 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.
Desde un prg (sumas) estoy realizando 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 aparezca 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.
1 respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
Puedes implementar una variable adicional en el reporte y pasarle el valor antes de generar el reporte.
Hola víctor, 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.
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.
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
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
