Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Setting the number of copies at runtime
Message
 
To
17/12/2004 09:41:17
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00969991
Message ID:
00970222
Views:
12
Seting Copies=2,3... in report it make report run once (I think so, not tested) & leave all other job to printer driver.

Ex:
 repo_name = SYS(2015)
 STRTOFILE(FILETOSTR("Myreport.FRX"), repo_name+".FRX",0)
 STRTOFILE(FILETOSTR("Myreport.FRT"), repo_name+".FRT",0)
 old_alias = ALIAS()
 SELECT 0
 USE (repo_name+".FRX")
 GO TOP
 at_copies = AT("COPIES=", Expr)
 tmp_expr  = LEFT(Expr, at_copies+6)+TRANSFORM(YourNumberOfCopies)
 tmp_expr2 = SUBSTR(Expr, at_copies+6)
 tmp_expr2 = SUBSTR(tmp_expr2, AT(CHR(13)+CHR(10),tmp_expr2))
 REPLACE Expr WITH tmp_expr+tmp_expr2
 USE
 SELECT (old_alias)
 REPORT FORM (repo_name) ....
 ERASE (repo_name+".*")
>the Setting the page field to a value greater than one make the report running that numer of times or just leave the job to the printer ?
>Anyway how should I use this strtofile command, make me an example please.
>Thanks Borislav
>
>>No I afraid, because then Report is ReadOnly. You must extract it from EXE using STRTOFILE(FILETOSTR(...)...) before change it.
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform