Код.
Пожалуйста :-)
Вот:
procedure TForm1.Button1Click(Sender: TObject);
Var Axapta : Taxapta2;
begin
Axapta := TAxapta2.Create(NIL);
Axapta.Logon2('','','cor','ru','','','WORK_DIRECT');
Axapta.CallJob(WideString('CORI01_FillCASnapshot_Job'));
Axapta.Logoff();
end;
А каким образом можно "трассировать вызовы COM Connectora внутри Аксапты "?
Спасибо,
Федор.
|