I believe so, yes.
I use this code routinely:
FOR m.i = 1 TO ALEN(frxArray1,1)
WAIT WINDOW " Processing REPORTS" + frxArray1[i,1] + " ...
" NOWAIT NOCLEAR
USE frxArray1[i,1]
LOCATE
IF ! EMPTY(Tag)
nCount1a = nCount1a + 1
ENDIF
REPLACE Tag WITH ''
REPLACE Tag2 WITH ''
m.cExpr=Expr
m.cString = ''
FOR j=1 TO MEMLINES(m.cExpr)
m.cLine=MLINE(m.cExpr,j)
IF m.cLine='ORIENTATION' OR m.cLine='PAPERSIZE' OR
m.cLine='COPIES'
m.cString = m.cString + m.cLine + CHR(13)
ENDIF
NEXT
IF RIGHT(m.cString,1) = CHR(13)
m.cString = LEFT(cString,LEN(cString)-1)
ENDIF
REPLACE Expr WITH m.cString
ENDFOR &&* m.i = 1 TO ALEN(frxArray1,1)
============
Brian Abbott
ACA Systems
============
> -----Original Message-----
> From: profox-bounces /AT/ leafe .D.O.T com
> [mailto:profox-bounces@leafe.com] On Behalf Of Andy Davies
> Sent: 13 June 2003 10:10
> To: profox /AT/ leafe .D.O.T com
> Subject: VFP7: Report Tag fields
>
>
> Hi,
> I have just shipped an updated app to the users, and as usual
> I stripped
> the Tag/Tag2 fields - and also the Expr field (not sure if I
> did that last
> time). The users complained that they had to set 'landscape' for some
> reports each time they ran them. I modified all the reports again and
> left:
> ORIENTATION=1
> PAPERSIZE=9
> in the Expr field. I just wonder whether this is really generic - are
> these orientation and size codes shared by all printers?
>
> AndyD 8-)#
>
>
> **********************************************************************
> This email and any files transmitted with it are confidential
> and intended solely for the use of the individual or entity
> to whom they are addressed. If you have received this email
> in error please notify the system manager.
>
> This footnote also confirms that this email message has been swept
> for the presence of computer viruses.
>
> Please contact internet.administrators@notes.manchester.gov.uk
> with any queries.
>
>
[excessive quoting removed by server]
©2003 Brian Abbott |
