Fastreport help

Fastreport help

Postby Wanderson » Wed Nov 01, 2017 11:41 am

Hi,

How i can put in a4 paper 2 invoices? I have a masterdata with header of invoice and detaildata with many itens.
I need to limit in 20 itens each detail of invoice. Someone have a sample?

Thanks in advance.
Wanderson
 
Posts: 332
Joined: Thu Nov 17, 2005 9:11 pm

Re: Fastreport help

Postby karinha » Wed Nov 01, 2017 11:56 am

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7831
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Fastreport help

Postby karinha » Wed Nov 01, 2017 12:37 pm

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7831
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Fastreport help

Postby Otto » Wed Nov 01, 2017 8:18 pm

Hello Wanderson,

If you are new to FastReport I would suggest you to start with EasyReport.

The most important reason is:
EasyReport uses preview class of Fivewin.

For example I changed preview class to print the current bill number after you saw the preview on screen.
This means you see the preview and in the preview menu I have only few buttons.
If the user selects print bill then the bill with a new current bill number is printed.

Image

I never found a way to decide in FastReport from preview sreen to print a final bill or to cancel.
I hope I explained myself.
We in Austria have to print on every bill a qrcode with a checksum.

With FR I was not able to fulfill following necessity.
Preview the printout on the screen and then have 4 buttons to select between: effective bill, print only a proforma bill or cancel.

EasyReport is Fivewin. You do not have to use a scripting language like PASCAL.

EasyReport can do all what you can do with FR and even more.

EasyReport designer is the unique designer I know where a novice can do some changes himself.
You can lock parts which a user should not be able to edit.

Also some of the Antivirus programs do not like FrSystH.dll. FrSystH.dll from 2011 and is not developed anymore.

You should also know that the master of xBrowse Mr. Rao and Fivedit master Cristobal are right now working on improvements to EASYREPORT.
There will soon be a new release.

Best regards,
Otto



I inherit from VRD

#include "FiveWin.ch"
#include "Constant.ch"
//----------------------------------------------------------------------------//

CLASS XVRD FROM VRD

CLASSDATA lRegistered AS LOGICAL

DATA cMenuData, oDlgRG, oWndRgX, lPrnRGX, oRechnung

METHOD SetupMenu()

METHOD End( )

ENDCLASS

//----------------------------------------------------------------------------//


And in method:

METHOD End( lPrintArea ) CLASS XVRD

I call xRPreview

xRPreview( ::oPrn,::cMenuData,::oDlgRg,::oWndRgx,::lPrnRGX,::oRechnung )


Here I made my changes like buttonbar and current bill number and qrcode.



I made the changes in:

static function PrintPrv( oDlg, nOption, nPageIni, nPageEnd, cArt, oRechnung )



if oRechnung:cDruckart <> "Kreditrechnung"

if nFor = len(aFiles) //letzte Seite qrcODE
oDevice:SayBitmap( Setup():aQRCodePosition[ 1 ], Setup():aQRCodePosition[ 2 ],;
cBmpFile, Setup():aQRCodePosition[ 3 ], Setup():aQRCodePosition[ 3 ] )

endif
cSignaturText := " Signatureinheit ausgefallen"

else
cSignaturText := " "

endif
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6334
Joined: Fri Oct 07, 2005 7:07 pm

Re: Fastreport help

Postby Wanderson » Thu Nov 02, 2017 2:17 pm

karinha wrote:Fast Report Demo complete,

https://www.4shared.com/rar/cJyzx3Jyca/FASTDEMO.html

Regards,


Thank you karinha! I solved with a script code in onbeforeprint.
Wanderson
 
Posts: 332
Joined: Thu Nov 17, 2005 9:11 pm

Re: Fastreport help

Postby Wanderson » Thu Nov 02, 2017 3:02 pm

Otto wrote:Hello Wanderson,

If you are new to FastReport I would suggest you to start with EasyReport.

The most important reason is:
EasyReport uses preview class of Fivewin.

For example I changed preview class to print the current bill number after you saw the preview on screen.
This means you see the preview and in the preview menu I have only few buttons.
If the user selects print bill then the bill with a new current bill number is printed.

Image

I never found a way to decide in FastReport from preview sreen to print a final bill or to cancel.
I hope I explained myself.
We in Austria have to print on every bill a qrcode with a checksum.

With FR I was not able to fulfill following necessity.
Preview the printout on the screen and then have 4 buttons to select between: effective bill, print only a proforma bill or cancel.

EasyReport is Fivewin. You do not have to use a scripting language like PASCAL.

EasyReport can do all what you can do with FR and even more.

EasyReport designer is the unique designer I know where a novice can do some changes himself.
You can lock parts which a user should not be able to edit.

Also some of the Antivirus programs do not like FrSystH.dll. FrSystH.dll from 2011 and is not developed anymore.

You should also know that the master of xBrowse Mr. Rao and Fivedit master Cristobal are right now working on improvements to EASYREPORT.
There will soon be a new release.

Best regards,
Otto



I inherit from VRD

#include "FiveWin.ch"
#include "Constant.ch"
//----------------------------------------------------------------------------//

CLASS XVRD FROM VRD

CLASSDATA lRegistered AS LOGICAL

DATA cMenuData, oDlgRG, oWndRgX, lPrnRGX, oRechnung

METHOD SetupMenu()

METHOD End( )

ENDCLASS

//----------------------------------------------------------------------------//


And in method:

METHOD End( lPrintArea ) CLASS XVRD

I call xRPreview

xRPreview( ::oPrn,::cMenuData,::oDlgRg,::oWndRgx,::lPrnRGX,::oRechnung )


Here I made my changes like buttonbar and current bill number and qrcode.



I made the changes in:

static function PrintPrv( oDlg, nOption, nPageIni, nPageEnd, cArt, oRechnung )



if oRechnung:cDruckart <> "Kreditrechnung"

if nFor = len(aFiles) //letzte Seite qrcODE
oDevice:SayBitmap( Setup():aQRCodePosition[ 1 ], Setup():aQRCodePosition[ 2 ],;
cBmpFile, Setup():aQRCodePosition[ 3 ], Setup():aQRCodePosition[ 3 ] )

endif
cSignaturText := " Signatureinheit ausgefallen"

else
cSignaturText := " "

endif


Thank you Otto, all my reports are made with fastreport but you right about easy report, where I can get?
Wanderson
 
Posts: 332
Joined: Thu Nov 17, 2005 9:11 pm

Re: Fastreport help

Postby Antonio Linares » Sat Nov 04, 2017 7:32 pm

regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42117
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Fastreport help

Postby Otto » Sat Nov 04, 2017 8:38 pm

Hello Wanderson,

You have to change the bat-file to compile with EasyReport.
Please add:
echo c:\EasyReport\vrd.lib + >> b32.bc

Best regards,
Otto

echo %bcdir%\lib\c0w32.obj + > b32.bc
echo %1.obj, + >> b32.bc
echo %1.exe, + >> b32.bc
echo %1.map, + >> b32.bc
echo %fwh%\lib\FiveH.lib %fwh%\lib\FiveHC.lib %fwh%\lib\libmysql.lib + >> b32.bc
echo %hdirl%\hbwin.lib + >> b32.bc
echo %hdirl%\gtgui.lib + >> b32.bc
echo %hdirl%\hbrtl.lib + >> b32.bc
echo %hdirl%\hbvm.lib + >> b32.bc
echo %hdirl%\hblang.lib + >> b32.bc
echo %hdirl%\hbmacro.lib + >> b32.bc
echo %hdirl%\hbrdd.lib + >> b32.bc
echo %hdirl%\rddntx.lib + >> b32.bc
echo %hdirl%\rddcdx.lib + >> b32.bc
echo %hdirl%\rddfpt.lib + >> b32.bc
echo %hdirl%\hbsix.lib + >> b32.bc
echo %hdirl%\hbdebug.lib + >> b32.bc
echo %hdirl%\hbcommon.lib + >> b32.bc
echo %hdirl%\hbpp.lib + >> b32.bc
echo %hdirl%\hbcpage.lib + >> b32.bc
echo %hdirl%\hbcplr.lib + >> b32.bc
echo %hdirl%\hbct.lib + >> b32.bc
echo %hdirl%\hbpcre.lib + >> b32.bc
echo %hdirl%\xhb.lib + >> b32.bc
echo %hdirl%\hbziparc.lib + >> b32.bc
echo %hdirl%\hbmzip.lib + >> b32.bc
echo %hdirl%\hbzlib.lib + >> b32.bc
echo %hdirl%\minizip.lib + >> b32.bc
rem echo %hdirl%\png.lib + >> b32.bc
echo %hdirl%\hbusrrdd.lib + >> b32.bc
echo %hdirl%\hbtip.lib + >> b32.bc

echo c:\EasyReport\vrd.lib + >> b32.bc
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6334
Joined: Fri Oct 07, 2005 7:07 pm

Re: Fastreport help

Postby Wanderson » Sun Nov 05, 2017 11:45 am



Thank you Antonio
Wanderson
 
Posts: 332
Joined: Thu Nov 17, 2005 9:11 pm

Re: Fastreport help

Postby Wanderson » Sun Nov 05, 2017 11:46 am

Otto wrote:Hello Wanderson,

You have to change the bat-file to compile with EasyReport.
Please add:
echo c:\EasyReport\vrd.lib + >> b32.bc

Best regards,
Otto

echo %bcdir%\lib\c0w32.obj + > b32.bc
echo %1.obj, + >> b32.bc
echo %1.exe, + >> b32.bc
echo %1.map, + >> b32.bc
echo %fwh%\lib\FiveH.lib %fwh%\lib\FiveHC.lib %fwh%\lib\libmysql.lib + >> b32.bc
echo %hdirl%\hbwin.lib + >> b32.bc
echo %hdirl%\gtgui.lib + >> b32.bc
echo %hdirl%\hbrtl.lib + >> b32.bc
echo %hdirl%\hbvm.lib + >> b32.bc
echo %hdirl%\hblang.lib + >> b32.bc
echo %hdirl%\hbmacro.lib + >> b32.bc
echo %hdirl%\hbrdd.lib + >> b32.bc
echo %hdirl%\rddntx.lib + >> b32.bc
echo %hdirl%\rddcdx.lib + >> b32.bc
echo %hdirl%\rddfpt.lib + >> b32.bc
echo %hdirl%\hbsix.lib + >> b32.bc
echo %hdirl%\hbdebug.lib + >> b32.bc
echo %hdirl%\hbcommon.lib + >> b32.bc
echo %hdirl%\hbpp.lib + >> b32.bc
echo %hdirl%\hbcpage.lib + >> b32.bc
echo %hdirl%\hbcplr.lib + >> b32.bc
echo %hdirl%\hbct.lib + >> b32.bc
echo %hdirl%\hbpcre.lib + >> b32.bc
echo %hdirl%\xhb.lib + >> b32.bc
echo %hdirl%\hbziparc.lib + >> b32.bc
echo %hdirl%\hbmzip.lib + >> b32.bc
echo %hdirl%\hbzlib.lib + >> b32.bc
echo %hdirl%\minizip.lib + >> b32.bc
rem echo %hdirl%\png.lib + >> b32.bc
echo %hdirl%\hbusrrdd.lib + >> b32.bc
echo %hdirl%\hbtip.lib + >> b32.bc

echo c:\EasyReport\vrd.lib + >> b32.bc


Thank you Otto, I will try.
Wanderson
 
Posts: 332
Joined: Thu Nov 17, 2005 9:11 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 99 guests