Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Change to landscape
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00142179
Message ID:
00143277
Vues:
31
That is an idea. It would obviously have to become habit or when I send out a program change in the heat of the moment (BUG!), I would forget and...

Thanks.



>Joseph,
>
>Poof Poof :)
>
>
>How about doing it programmatically before you recompile the project :)?
>
>>
>>
>>set defa to reports
>>=adir(xRep,'*.frx')
>>for x= 1 to alen(xRep,1)
>>    xFN=xRep(x,1)
>>	wait xFN window nowait
>>    use (xFN)
>>    go top
>>    xM= 'PRINTQUALITY=300'+chr(13)+'YRESOLUTION=300'+chr(13)
>>    do case
>>*!*	    case xFN= "AGENTSCHEDULE"
>>*!*	    	Xm=XM+"ORIENTATION=1"+chr(13)
>>    OTHERWISE
>>    	XM= Xm+"ORIENTATION=0"+chr(13)
>>    ENDCASE
>>*!*	    if upper(xFN)= "TRUCKRECEIPT"
>>*!*	    	xM= xM+"COPIES=2"+chr(13)
>>*!*	    endif
>>    	
>>	replace expr with xM,tag with '', tag2 with ''
>>next
>>set defa to ..	
>>
>>
Joseph C. Kempel
Systems Analyst/Programmer
JNC
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform