Customer Defined Field can't hold his liquor

[Bender]

Hi there fellow Baanies

can i ask you a question about Extensions and Customer defined fields?

My Problem is as follows:
- created a table extension on table tisfc001
- created a customer defined field tisfc001.cdf_sord
that field has to be filled with the order number from tdsls402

My problem is, i just cannot set the value in the CDF. I can update other standard fields with my extension but i cannot fill the Customer defined Field

What i already did:
- defined the CDF in Declarations
extern domain ticdf___str030 tisfc001.cdf_sord

- set the fill of the CDF in Before.Save
| SLS Number
select * from tdsls402
where tdsls402.apdo = :tisfc001.pdno
as set with 1 rows
selectdo
tisfc001.cdf_sord = tdsls402.orno
endselect

- set the fill of the CDF in the CDF Field Logic Section in Update
| SLS Number
select * from tdsls402
where tdsls402.apdo = :tisfc001.pdno
as set with 1 rows
selectdo
tisfc001.cdf_sord = tdsls402.orno
endselect

I also tried to set the code in every other section possible, it just wont do the trick.



Can you please help a bro out here?

[BaanInOhio]

Try to use 'export' or 'put.var' for loading the CDF field. Direct assignments don't seem to work when using db.update instead of DAL.

Use a local variable and explicitly export each CDF in the ‘select’ clause if needed:

domain  tcdate  from.date, to.date

to.date =  ……    | set to.date to something that must be added to the CDF.
select tsacm101.*, tsacm101.cdf_rvdt:from.date
from   tsacm101 for update
where  tsacm101. ………..
selectdo
       if (from.date <> to.date) then   | update CDF when date is different
           ret = export(“tsacm101.cdf_rvdt”, to.date)    | put the contents of to.date into the tsacm101.cdf_rvdt field
           db.update(ttsacm101, db.retry)
           commit.transaction()
       endif
endselect

You can replace the ‘export’ function with ‘put.var’, which is the longer version of export where you can specify the process id, which is always the current process ID (‘pid’ predefined variable).

       ret = put.var(pid, “tsacm101.cdf_rvdt”, local.date)    | ‘pid’ is a predefined variable containing the current session process ID.

Using DAL to replace the "db.update" functions is a bit easier when CDFs are involved since an export/put.var isn't needed. A single "dal.set.field" is used when importing fields.

domain  tcdate  from.date, to.date

to.date =  ……    | set to.date to something that must be added to the CDF.
select tsacm101.*, tsacm101.cdf_rvdt:from.date
from   tsacm101 for update
where  tsacm101. ………..
selectdo
       if (from.date <> to.date) then   | update CDF when date is different
           ret = dal.change.object("tsacm101")
           if (ret = 0) then
               dal.set.field(“tsacm101.cdf_rvdt”, to.date)    | put the contents of to.date into the tsacm101.cdf_rvdt field
               ret = dal.save.object(“tsacm101”)
           endif
           if (ret = 0) then
               commit.transaction()
           else
               | report error
           endif
       endif
endselect

[JaapJD]

Giving the CDF the value if the Sales Order number in the Before Save hook is the best solution. The reason that it doesn't work maybe the fact that you declared the CDF yourself.

- defined the CDF in Declarations
extern domain ticdf___str030 tisfc001.cdf_sord

Remove this and try again.

[Bender]

thx BaanInOhio but unfortunatly the set.var, export did not help.


Plus, in an extension on table extension level, you cannot use commit.transaction as you are already in a transaction.

Originally Posted by BaanInOhio

Try to use 'export' or 'put.var' for loading the CDF field. Direct assignments don't seem to work when using db.update instead of DAL.

Use a local variable and explicitly export each CDF in the ‘select’ clause if needed:

domain  tcdate  from.date, to.date

to.date =  ……    | set to.date to something that must be added to the CDF.
select tsacm101.*, tsacm101.cdf_rvdt:from.date
from   tsacm101 for update
where  tsacm101. ………..
selectdo
       if (from.date <> to.date) then   | update CDF when date is different
           ret = export(“tsacm101.cdf_rvdt”, to.date)    | put the contents of to.date into the tsacm101.cdf_rvdt field
           db.update(ttsacm101, db.retry)
           commit.transaction()
       endif
endselect

You can replace the ‘export’ function with ‘put.var’, which is the longer version of export where you can specify the process id, which is always the current process ID (‘pid’ predefined variable).

       ret = put.var(pid, “tsacm101.cdf_rvdt”, local.date)    | ‘pid’ is a predefined variable containing the current session process ID.

Using DAL to replace the "db.update" functions is a bit easier when CDFs are involved since an export/put.var isn't needed. A single "dal.set.field" is used when importing fields.

domain  tcdate  from.date, to.date

to.date =  ……    | set to.date to something that must be added to the CDF.
select tsacm101.*, tsacm101.cdf_rvdt:from.date
from   tsacm101 for update
where  tsacm101. ………..
selectdo
       if (from.date <> to.date) then   | update CDF when date is different
           ret = dal.change.object("tsacm101")
           if (ret = 0) then
               dal.set.field(“tsacm101.cdf_rvdt”, to.date)    | put the contents of to.date into the tsacm101.cdf_rvdt field
               ret = dal.save.object(“tsacm101”)
           endif
           if (ret = 0) then
               commit.transaction()
           else
               | report error
           endif
       endif
endselect

[Bender]

Hi there JaapJD and thx too.
I removed the declaration but still no luck

Originally Posted by JaapJD

Giving the CDF the value if the Sales Order number in the Before Save hook is the best solution. The reason that it doesn't work maybe the fact that you declared the CDF yourself.

Remove this and try again.