MyRpt - Diseñador de Reportings - En desarrollo :-)

[ruben Dario]

Hola Sebas,

Muchas gracias, pero creo que haría falta un ejemplo autocontenido para que la gente lo pueda probar y dar feedback.

Tal cual lo publicas nadie lo puede probar.

He probado lo siguiente sin éxito:

Code: Select all | Expand

static ownd
#include "myrpt.prg"


REQUEST DBFCDX



//---------------------------------------------------------------------------
function Main()
//---------------------------------------------------------------------------

   local oBar, oCursorHand


   DEFINE WINDOW oWnd ;
      TITLE "Testing MyRept"




   DEFINE MESSAGE BAR OF oWnd TITLE FWCOPYRIGHT ;
      NOINSET DATE CLOCK KEYBOARD

   ACTIVATE WINDOW oWnd MAXIMIZED ;
            VALID MsgYesNo( "Want to exit ?" ) ;
            ON INIT DoReport()


return nil
//---------------------------------------------------------------------------



//---------------------------------------------------------------------------
function DoReport()
//---------------------------------------------------------------------------

 local o, oRpt, oList, n

 o := MyRpt():New('Fattura.rpt',"Factura",'MyApp', .T. )
 oRpt := o:Run()
 oRpt:lPreview := .t. //Si quereis Preview
 oRpt:Activate()

 //oRpt:bHeader := {|| Cabefact(oRpt) }
 // oRpt:bFooter := {|| Piefact(oRpt) }
 oRpt:Activate()

 //utilizar el método data para poner los datos en los Items:

        For nI = 1 to len(oRpt:oReport:aitems)
               oitem := oRpt:oReport:aitems[nI] //Item actual
               do case
                    case oitem:cID = 'NUMERO_FACTURA'
                           oRpt:Data('NUMERO_FACTURA', 100)
                    case oitem:cID = 'NOMBRE_CLIENTE'
                          oRpt:data('NOMBRE_CLIENTE', "cnombre")

            endcase
         Next nI

 oRpt:End()
 o := nil


return nil
//---------------------------------------------------------------------------

 

Muchas gracias.

Saludos

He probado tu ejemplo ,
al Ejecutarlo me da error, Veo que falta el archivo 'Fattura.rpt' , no tienes un ejemplo que se pueda reproducir con todo que tenga la tabla y el rpt. Numca lo he probado , no lo conozco bien, pero segun veo solamente se necesitan dos archivo.
Un ejemplo que muestre como se usa la tabla , y como se crea un RPT.

[artu01]

Hola foro he compilado los fuentes de myrpt de este link http://www.caseinformatica.com/MyRpt/ pero cuando ejecuto el programa me da
este error:



Este mi archivo mak

Code: Select all | Expand

HBDIR=c:\131\harbour
BCDIR=c:\131\bcc582
FWDIR=c:\131\fwh

.path.OBJ = .\obj.dem
.path.PRG = .\source.dem
.path.CH  = $(FWDIR)\include;$(HBDIR)\include
.path.rc  = .\source.dem

PRG =          \
REPDEMO.PRG    \
REPMEMO.PRG    \
VR.PRG         \
VR1.PRG        \
EMF1.PRG       \
MEMO.PRG       \
MEMO1.PRG      \
MEMO2.PRG      \
ALBLIST.PRG    \
MYRPT.PRG    \
CLIALB.PRG     \
CLIALB2.PRG    \
CLIALB3.PRG    \
PRODUCT.PRG    \
PRODLIST.PRG

PROJECT    : RepDemo.exe

RepDemo.exe  : $(PRG:.PRG=.OBJ) RepDemo.RES
      echo off
      echo $(BCDIR)\lib\c0w32.obj            + > b32.bc
      echo obj.dem\repdemo          + >> b32.bc
      echo obj.dem\repmemo          + >> b32.bc
      echo obj.dem\emf1             + >> b32.bc
      echo obj.dem\memo             + >> b32.bc
      echo obj.dem\memo1            + >> b32.bc
      echo obj.dem\memo2            + >> b32.bc
      echo obj.dem\alblist          + >> b32.bc
      echo obj.dem\product          + >> b32.bc
      echo obj.dem\prodlist         + >> b32.bc
      echo obj.dem\myrpt            + >> b32.bc
      echo obj.dem\clialb           + >> b32.bc
      echo obj.dem\clialb2          + >> b32.bc
      echo obj.dem\clialb3          + >> b32.bc
      echo obj.dem\vr               + >> b32.bc
      echo obj.dem\vr1,             + >> b32.bc
      echo repdemo.exe,             + >> b32.bc
      echo repdemo.map,             + >> b32.bc
      echo .\Lib\MyRpt.lib          + >> b32.bc
      echo $(FWDIR)\lib\FiveH.lib $(FWDIR)\lib\FiveHC.lib     + >> b32.bc
      echo $(HBDIR)\lib\hbrtl.lib                + >> b32.bc
      echo $(HBDIR)\lib\hbvm.lib                 + >> b32.bc
      echo $(HBDIR)\lib\gtgui.lib                + >> b32.bc
      echo $(HBDIR)\lib\hblang.lib               + >> b32.bc
      echo $(HBDIR)\lib\hbmacro.lib              + >> b32.bc
      echo $(HBDIR)\lib\hbrdd.lib                + >> b32.bc
      echo $(HBDIR)\lib\rddntx.lib               + >> b32.bc
      echo $(HBDIR)\lib\rddcdx.lib               + >> b32.bc
      echo $(HBDIR)\lib\rddfpt.lib               + >> b32.bc
      echo $(HBDIR)\lib\hbsix.lib                + >> b32.bc
      echo $(HBDIR)\lib\hbdebug.lib              + >> b32.bc
      echo $(HBDIR)\lib\hbcommon.lib             + >> b32.bc
      echo $(HBDIR)\lib\hbpp.lib                 + >> b32.bc
      echo $(HBDIR)\lib\hbwin.lib                + >> b32.bc
      echo $(HBDIR)\lib\hbcpage.lib              + >> b32.bc
      echo $(HBDIR)\lib\hbct.lib                 + >> b32.bc
      echo $(HBDIR)\lib\xHb.lib                  + >> b32.bc
      echo $(HBDIR)\lib\hbcplr.lib               + >> b32.bc
      echo $(HBDIR)\lib\hbpcre.lib               + >> b32.bc
      echo $(BCDIR)\lib\cw32.lib                 + >> b32.bc
      echo $(BCDIR)\lib\import32.lib             + >> b32.bc
      echo $(BCDIR)\lib\psdk\odbc32.lib               + >> b32.bc
      echo $(BCDIR)\lib\psdk\nddeapi.lib              + >> b32.bc
      echo $(BCDIR)\lib\psdk\iphlpapi.lib             + >> b32.bc
      echo $(BCDIR)\lib\psdk\msimg32.lib              + >> b32.bc
      echo $(BCDIR)\lib\psdk\ws2_32.lib               + >> b32.bc
      echo $(BCDIR)\lib\psdk\psapi.lib                + >> b32.bc
      echo $(BCDIR)\lib\psdk\rasapi32.lib,              >> b32.bc

      echo .\source.dem\Repdemo.res   >> b32.bc

      $(BCDIR)\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
      del *.bc
      del *.map
      del *.tds
      RepDemo.exe

.PRG.OBJ:
 # $(HBDIR)\bin\harbour $< /L /N /W /Oobj.dem\$&.c
 # $(BCDIR)\bin\bcc32 -c -tWM -oobj.dem\$& obj.dem\$&.c

  $(HBDIR)\bin\harbour $< /L /N /W /Oobj.dem\ /I$(FWDIR)\include;$(HBDIR)\include
  $(BCDIR)\bin\bcc32 -c -tWM -I$(HBDIR)\include -oobj.dem\$& obj.dem\$&.c


RepDemo.res : RepDemo.rc
  $(BCDIR)\bin\brc32.exe -r .\source.dem\repdemo.rc

 

[lucasdebeltran]

Hola,

Carles abandonó el proyecto.

¿Por qué no usas el EasyReport?. Está terminado y con todos los fuentes disponibles gracias a la generosidad de Antonio.

[artu01]

Hola Lucas,
Es una lástima que Carles no pudiera terminar su reporteador que se veia muy facil de usar...bajare entonces el easyreport, hare pruebas
y comentare que tal me va

Gracias

[karinha]

Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.

[Silvio.Falconi]

Please Charles or Sebastian can You found a solution to create and print Labels with Myrpt ?

[ruben Dario]

Hola,

He dejado en http://www.caseinformatica.com/MyRpt/, una nueva versión de MyRpt.

Si queréis probarlo, se trata solo de dos ficheros, el prg y la dll (de momento solo en castellano).

En la página indico un poco por donde voy.

Saludos

Hola Sebastian tu le estas trabajando a este proyecto.

[Silvio.Falconi]

I'm thinkin Charles can help up to build labels .
Charles Know good the source code .
Charles is the author of MyRpt.
I hope Charles help me

[karinha]

Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.

[Silvio.Falconi]

Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.

on fwh/samples

[karinha]

Thanks Silvio.

Regards, saludos.

[Silvio.Falconi]

Hola,

He dejado en http://www.caseinformatica.com/MyRpt/, una nueva versión de MyRpt.

Si queréis probarlo, se trata solo de dos ficheros, el prg y la dll (de momento solo en castellano).

En la página indico un poco por donde voy.

Saludos

Hola Sebastian tu le estas trabajando a este proyecto.

sebastian no ha respondido a mis mensajes quisiera hablar con él sobre un asunto muy importante que estoy seguro le interesará mucho

[Silvio.Falconi]

Thanks Silvio.

Regards, saludos.

on W7 there is a problem