[Done] COMMate: a method requires a method as parameter

[infratec]

Original Example:

Code: Select all

MasterDb := BpApp.DataSetInfos('Adressen').CreateDataSet;
Dokument := BpApp.GetSpecialObject(soDokumente);
Dokument.InitDB(MasterDb);

In PB:

Code: Select all

  Protected oDokument.COMateObject
  Protected oAdresseTable.COMateObject
  
  oAdresseTable = _ERP\GetObjectProperty("DataSetInfos('Adressen')\CreateDataSet()")
  oDokument = _ERP\GetObjectProperty("GetSpecialObject(2)")   ; 2 is soDokumente
  oDokument\Invoke("InitDB( ??? )")

I get always a type missmatch, doesn't matter what I try to use at the ???

Any idea?

Bernd

[Ajm]

Hi Infratec,

Just a guess but do you need to pass in the oAdresseTable COMateObject to the InitDB.

So possibly something like:-

Code: Select all

oDokument\Invoke("InitDB(" + Str(oAddressTable) + "As COMateObject )")

[srod]

That should do it yes. Just make sure to put a space before the 'As' :

Code: Select all

oDokument\Invoke("InitDB(" + Str(oAddressTable) + " As COMateObject )")

[infratec]

Hi,

thank you very much: it works.

Bernd