Persisted Globals - Reading

Persisted Globals - Reading
 1def var_type(value):
 2    """VBScript VarType equivalent - returns numeric type code."""
 3    if value is None:
 4        return 1  # vbNull
 5    elif isinstance(value, bool):
 6        return 11  # vbBoolean
 7    elif isinstance(value, int):
 8        return 2  # vbInteger
 9    elif isinstance(value, float):
10        return 5  # vbDouble
11    elif isinstance(value, str):
12        return 8  # vbString
13    elif isinstance(value, (datetime.date, datetime.datetime)):
14        return 7  # vbDate
15    else:
16        return 9  # vbObject
17
18
19# This example demonstrates how to iterate over all persisted impact.globals for a specific group name
20
21ot = impact.gui.output_toolbox
22
23ot.clear()
24
25dbs = impact.active_database.settings
26
27dbglobals = dbs.persisted_globals("Arden.WEBcnx")
28
29ot.add("Count=" + str(dbglobals.count))
30
31for i in range(1, dbglobals.count  + 1):
32    dbglobal = dbglobals.item(i)
33
34    ot.add(dbglobal.name + " (" + str(var_type(dbglobal.value)) + ")" + "=" + dbglobal.value)
35
36# alternative syntax
37# for each dbglobal in dbglobals
38# ot.add(dbglobal.name + " (" + str(VarType(dbglobal.value)) + ")" + "=" + dbglobal.value)
39# next