A dialog to edit ADDINS and PROJECTADDINS paths.

//  Edit Addins Paths
DB  dbMain           = null
DBE dbeAddins        = null
DBE dbeProjectAddins = null
DBE dbeDoorsAddins        = null
DBE dbeDoorsProjectAddins = null

string addins        = getenv("ADDINS")
string projectAddins = getenv("PROJECTADDINS")

string doorsAddins        = getenv("DOORSADDINS")
string doorsProjectAddins = getenv("DOORSPROJECTADDINS")
/******************************************************************************
 doApply
******************************************************************************/
void doApply(DB db)
{
 doorsAddins        = get(dbeDoorsAddins)

 doorsProjectAddins = get(dbeDoorsProjectAddins)

 addins        = get(dbeAddins)

 projectAddins = get(dbeProjectAddins)
 
 setenv("DOORSADDINS", doorsAddins)

 setenv("DOORSPROJECTADDINS", doorsProjectAddins)
 
 setenv("ADDINS", addins)

 setenv("PROJECTADDINS", projectAddins)
 
 }
/******************************************************************************
 editAddins
******************************************************************************/
void editAddins()
{
 dbMain = create(dbExplorer, "Edit DOORS Addins Paths", styleCentered | styleFloating)

 dbeAddins = field(dbMain, "ADDINS", addins, 150, false)

 dbeProjectAddins = field(dbMain, "PROJECTADDINS", projectAddins, 150, false)
 
 dbeDoorsAddins = field(dbMain, "DOORSADDINS", doorsAddins, 150, false)

 dbeDoorsProjectAddins = field(dbMain, "DOORSPROJECTADDINS", doorsProjectAddins, 150, false)

 apply(dbMain, "Apply Changes", doApply)

 realize(dbMain)

 show(dbMain)
}
/******************************************************************************
 MAIN
******************************************************************************/
editAddins()