Mark,
I've done this with some success. The only thing I make sure to do is not change the orientation by blanking out Expr completely. Here's the code I use. It assumes the current directory is where the report and/or label files are.
SET MEMOWIDTH TO 1024
DIMENSION aFileType[2]
aFileType[1]='*.FRX'
aFileType[2]='*.LBX'
FOR EACH cFileType IN aFileType
nNumReps=ADIR(aReps,m.cFileType)
FOR i=1 TO nNumReps
USE (aReps[i,1])
LOCATE FOR ObjType=1
IF FOUND()
REPLACE Tag2 WITH ''
m.cExpr=Expr
FOR j=1 TO MEMLINES(m.cExpr)
m.cLine=MLINE(m.cExpr,j)
IF m.cLine='ORIENTATION'
EXIT
ENDIF
NEXT
REPLACE Expr WITH IIF(m.cLine='ORIENTATION',m.cLine,'')
ENDIF
NEXT
ENDFOR
>Hi ,
>I'm creating reports using the VFP report designer & just before I send a new report to my clients I intend to open the report's .frx file, go to record 1 & replace tag, tag2 & expr with "". Is this all I need to do to ensure the report will run properly on different printers. This sounds almost too easy to me. Does anyone know of any problems with this approach?