ruben Dario
Posts: 986 Joined: Thu Sep 27, 2007 3:47 pm
Location: Colombia
Post
by ruben Dario » Fri Dec 05, 2014 1:46 pm
lucasdebeltran wrote: 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
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
Posts: 306 Joined: Fri May 11, 2007 8:20 pm
Location: Lima
Post
by artu01 » Wed Nov 02, 2016 5:54 am
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
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
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
lucasdebeltran
Posts: 1303 Joined: Tue Jul 21, 2009 8:12 am
Contact:
Post
by lucasdebeltran » Thu Nov 03, 2016 11:17 am
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.
Muchas gracias. Many thanks.
Un saludo, Best regards,
Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producción]
Implementando MSVC 2010, FWH64 y ADO.
Abandonando uso xHarbour y SQLRDD.
artu01
Posts: 306 Joined: Fri May 11, 2007 8:20 pm
Location: Lima
Post
by artu01 » Thu Nov 03, 2016 1:53 pm
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
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
karinha
Posts: 4882 Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Post
by karinha » Mon Dec 05, 2016 5:56 pm
Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.
João Santos - São Paulo - Brasil
Silvio.Falconi
Posts: 4956 Joined: Thu Oct 18, 2012 7:17 pm
Post
by Silvio.Falconi » Tue Dec 06, 2016 11:53 am
Please Charles or Sebastian can You found a solution to create and print Labels with Myrpt ?
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
ruben Dario
Posts: 986 Joined: Thu Sep 27, 2007 3:47 pm
Location: Colombia
Post
by ruben Dario » Fri Dec 09, 2016 3:46 am
Sebastián Almirón wrote: 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
Posts: 4956 Joined: Thu Oct 18, 2012 7:17 pm
Post
by Silvio.Falconi » Fri Dec 09, 2016 9:19 am
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
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
karinha
Posts: 4882 Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Post
by karinha » Fri Dec 25, 2020 3:13 pm
Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.
João Santos - São Paulo - Brasil
Silvio.Falconi
Posts: 4956 Joined: Thu Oct 18, 2012 7:17 pm
Post
by Silvio.Falconi » Sat Dec 26, 2020 11:17 pm
karinha wrote: Buenas, donde puedo bajar el último build de MyRpt? Gracias, saludos.
on fwh/samples
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
karinha
Posts: 4882 Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Post
by karinha » Sun Dec 27, 2020 1:47 pm
Thanks Silvio.
Regards, saludos.
João Santos - São Paulo - Brasil
Silvio.Falconi
Posts: 4956 Joined: Thu Oct 18, 2012 7:17 pm
Post
by Silvio.Falconi » Mon Dec 28, 2020 9:18 am
ruben Dario wrote: Sebastián Almirón wrote: 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
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
Silvio.Falconi
Posts: 4956 Joined: Thu Oct 18, 2012 7:17 pm
Post
by Silvio.Falconi » Wed Dec 30, 2020 9:39 pm
karinha wrote: Thanks Silvio.
Regards, saludos.
on W7 there is a problem
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC