Job automation

[joshuaguilty]

I am typing repeating steps for replacing like this.

use c:\folder1\table1
replace field1 with "AAA" for field1="aaa" and field2="Y"
replace field1 with "BBB" for field1="bbb" and field2="Y"
replace field1 with "CCC" for field1="ccc" and field2="Y"

use c:\folder1\table2
replace field1 with "AAA" for field1="aaa" and field2="Y"
replace field1 with "BBB" for field1="bbb" and field2="Y"
replace field1 with "CCC" for field1="ccc" and field2="Y"
....

Could I automate them in a script ?
Thanks.

 

[Olaf Doschke]

if it's all just about upper case, then you could do:

Replace field1 With Upper(field1) For field2="Y"

Bye, Olaf.

 

[joshuaguilty]

Thank you for the response.
Actually I would like to know the way how to put them in a script file. (data quoted is just example, actual format is more complicate)

 

[fitedgar]

Just write a small program.
File , NEW select program.

Write the above code and give it a name (for example name.prg and save.

Within Foxpro DO x:\path\name.prg and the program will execute.

Edgar
IBS

 

[joshuaguilty]

Thanks to ALL for the instructions.

 

[TamarGranor]

If you want to be able to do the same thing to any file, make your program look like this:

PARAMETERS cFileName

USE (cFileName)
replace field1 with "AAA" for field1="aaa" and field2="Y"
replace field1 with "BBB" for field1="bbb" and field2="Y"
replace field1 with "CCC" for field1="ccc" and field2="Y"

You can then call this routine for each file, passing the file name. For example, if you save it as ChgFile.PRG

DO ChgFile WITH "c:\folder1\table1"
DO ChgFile WITH "c:\folder1\table2"

Tamar