Dynamics AX - 在 AX 2009 中以编程方式将表添加到数据库日志
Dynamics AX - Adding tables to DatabaseLog programatically in AX 2009
我正在寻找一种方法来为某些 table 启用日志记录更改。
我已经尝试并测试了以编程方式将 tables 添加到数据库日志,但到目前为止取得了各种成功 - 有时它有效有时它不起作用(大多数情况下它没有) - 它似乎只是将行插入 DatabaseLog
table 不太成功。
我尝试过的:
添加具有正确 tableId、fieldId、logType 和 .
域的行已分配为 'Admin'、主公司、空字段和子公司,结果相同。
我创建了 class 来处理插入,主要的两个功能是:
public static void InsertBase(STR tableName, domainId _domain='Admin')
{
//base logging for insert, delete, uptade on fieldid=0
DatabaseLog DBDict;
TableId _tableId;
DatabaseLogType _logType;
fieldId _fieldId =0;
List logTypes;
int i;
ListEnumerator enumerator;
;
_tableId= tableName2id(tableName);
logTypes = new List(Types::Enum);
logTypes.addEnd(DatabaseLogType::Insert);
logTypes.addEnd(DatabaseLogType::Update);
logTypes.addEnd(DatabaseLogType::Delete);
logTypes.addEnd(DatabaseLogType::EventInsert);
logTypes.addEnd(DatabaseLogType::EventUpdate);
logTypes.addEnd(DatabaseLogType::EventDelete);
enumerator = logTypes.getEnumerator();
while(enumerator.moveNext())
{
_logType = enumerator.current();
select * from dbdict where
dbdict.logTable==_tableId && dbdict.logField==_fieldId
&& dbdict.logType==_logType;
if(!dbDict) //that means it doesnt exist
{
dbdict.logTable=_tableId;
dbdict.logField=_fieldId;
dbdict.logType=_logType;
dbdict.domainId=_domain;
dbdict.insert();
}
}
info("Success");
}
以及列出每个字段并添加为 logType::Update
的方法
public static void init(str TableName, DomainId domain='Admin')
{
DatabaseLogType logtype;
int i;
container kk, ll;
DatabaseLog dblog;
tableid _tableId;
fieldid _fieldid;
;
logtype = DatabaseLogType::Update;
//holds a container of not yet added table fields to databaselog
kk = BLX_AddTableToDatabaseLog::buildFieldList(logtype,TableName);
for(i=1; i <= conlen(kk);i++)
{
ll = conpeek(kk,i);
_tableid = tableName2id(tableName);
_fieldid = conpeek(ll,1);
info(strfmt("%1 %2", conpeek(ll,1),conpeek(ll,2)));
dblog.logType=logType;
dblog.logTable = _tableId;
dblog.domainId = domain;
dblog.logField =_fieldid;
dblog.insert();
}
}
结果:
我错过了什么?
@编辑一些额外的信息
不适用于 SalesTable
和 SalesLine
、WMSBillOfLading
。
我无法使用管理面板中的向导为 SalesTable
和 SalesLine
添加日志,但我的同事以某种方式做到了(她做了和我完全一样的事情)。我们还尝试将日志添加到其他各种 tables,我们经常发现她可以而我不能,反之亦然(有时 none 设法做到这一点,就像 WMSBillOfLading
table)。
这种机制的不一致性促使我编写这段代码,我希望它能解决所有问题。
完成设置更改后,您可能需要调用
SysFlushDatabaseLogSetup::main();
为了刷新所有缓存。
此方法也在标准 AX 代码中调用,形式为方法 SysDatabaseLogTableSetup\Methods\close
和 class 方法 SysDatabaseLogWizard\doRun
。
我正在寻找一种方法来为某些 table 启用日志记录更改。
我已经尝试并测试了以编程方式将 tables 添加到数据库日志,但到目前为止取得了各种成功 - 有时它有效有时它不起作用(大多数情况下它没有) - 它似乎只是将行插入 DatabaseLog
table 不太成功。
我尝试过的:
添加具有正确 tableId、fieldId、logType 和 .
域的行已分配为 'Admin'、主公司、空字段和子公司,结果相同。
我创建了 class 来处理插入,主要的两个功能是:
public static void InsertBase(STR tableName, domainId _domain='Admin')
{
//base logging for insert, delete, uptade on fieldid=0
DatabaseLog DBDict;
TableId _tableId;
DatabaseLogType _logType;
fieldId _fieldId =0;
List logTypes;
int i;
ListEnumerator enumerator;
;
_tableId= tableName2id(tableName);
logTypes = new List(Types::Enum);
logTypes.addEnd(DatabaseLogType::Insert);
logTypes.addEnd(DatabaseLogType::Update);
logTypes.addEnd(DatabaseLogType::Delete);
logTypes.addEnd(DatabaseLogType::EventInsert);
logTypes.addEnd(DatabaseLogType::EventUpdate);
logTypes.addEnd(DatabaseLogType::EventDelete);
enumerator = logTypes.getEnumerator();
while(enumerator.moveNext())
{
_logType = enumerator.current();
select * from dbdict where
dbdict.logTable==_tableId && dbdict.logField==_fieldId
&& dbdict.logType==_logType;
if(!dbDict) //that means it doesnt exist
{
dbdict.logTable=_tableId;
dbdict.logField=_fieldId;
dbdict.logType=_logType;
dbdict.domainId=_domain;
dbdict.insert();
}
}
info("Success");
}
以及列出每个字段并添加为 logType::Update
的方法public static void init(str TableName, DomainId domain='Admin')
{
DatabaseLogType logtype;
int i;
container kk, ll;
DatabaseLog dblog;
tableid _tableId;
fieldid _fieldid;
;
logtype = DatabaseLogType::Update;
//holds a container of not yet added table fields to databaselog
kk = BLX_AddTableToDatabaseLog::buildFieldList(logtype,TableName);
for(i=1; i <= conlen(kk);i++)
{
ll = conpeek(kk,i);
_tableid = tableName2id(tableName);
_fieldid = conpeek(ll,1);
info(strfmt("%1 %2", conpeek(ll,1),conpeek(ll,2)));
dblog.logType=logType;
dblog.logTable = _tableId;
dblog.domainId = domain;
dblog.logField =_fieldid;
dblog.insert();
}
}
结果:
我错过了什么?
@编辑一些额外的信息
不适用于 SalesTable
和 SalesLine
、WMSBillOfLading
。
我无法使用管理面板中的向导为 SalesTable
和 SalesLine
添加日志,但我的同事以某种方式做到了(她做了和我完全一样的事情)。我们还尝试将日志添加到其他各种 tables,我们经常发现她可以而我不能,反之亦然(有时 none 设法做到这一点,就像 WMSBillOfLading
table)。
这种机制的不一致性促使我编写这段代码,我希望它能解决所有问题。
完成设置更改后,您可能需要调用
SysFlushDatabaseLogSetup::main();
为了刷新所有缓存。
此方法也在标准 AX 代码中调用,形式为方法 SysDatabaseLogTableSetup\Methods\close
和 class 方法 SysDatabaseLogWizard\doRun
。