|
Привет,
Трассировка работает только в Аксапте 3.0.
Я сделал примерчик по твоему образу и подобию почти, так как работаю в 3.0
static void Job2(Args _args)
{
int i;
Test t;
TreeNode treeNode;
TreeNodeIterator treeNodeIterator;
xInfo xInfo = new xInfo();
;
treeNode = TreeNode::rootNode();
treeNode = treeNode.AOTfindChild( "Jobs" );
treeNodeIterator = treeNode.AOTiterator();
treeNode = treeNodeIterator.next();
while (treeNode)
{
t.Name = treeNode.treeNodeName();
t.insert();
treeNode = treeNodeIterator.next();
}
}
Public Sub TEST()
Dim Axapta As Object
Set Axapta = CreateObject("AxaptaCOMConnector.Axapta")
Axapta.Logon
Axapta.CallJob "Job2"
End Sub
Посмотрел потом таблицу TEST , Job ее заполняет, значит все работает
|