Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Setting the number of copies at runtime
Message
De
20/12/2004 04:35:13
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00969991
Message ID:
00970519
Vues:
16
thanks Borislv, I'll test your code and let you know though it looks like it is what I was looking for :-)
Have a merry Xmas and a happy new year
Alessio

>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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform