How many times have you written a diddy of an agent to go out and change some field values for you? How many databases do you have with these left over agents that perform specific data maintenance for specific purposes? By using the Handy Dandy agents below, you need not do this anymore. One agent can be used to change any field value in any system on selected docs! You can change the code to use environment variables if you prefer. Don't leave home without it!
Main Agent Calling - Execute Once Macro
INP := @Prompt([OKCANCELEDIT];"Input Field Name";"EnterField";"");
@SetProfileField("AppProfile"; "tField"; INP);
VAL := @Prompt([OKCANCELEDIT];"Enter Field Value";"Enter Field Value";"");
@SetProfileField("AppProfile"; "tVAL"; VAL);
@Command([ToolsRunMacro];"Set Field Values")
Called Agent "Set Field Values" - Run on Selected Documents
INP := @GetProfileField("AppProfile"; "tField" );
VAL := @GetProfileField("AppProfile"; "tVAL");
FIELD INP := INP;
@SetField(INP;VAL);SELECT @All
This was first published in November 2000