Update CDF in tccom100 after saving and BOD export

Steffen Baumbusch

Hello Community,

I addred two fields to tccom100, one text field for a password, the other one is a checkbox to regenerate the password if I check the field an save the record.
If I check the password reset field I export the record through the BOD export where I need the password reset field value=1 to start an external process and the new password.
All this is still working ok. Therefore I created a table extension and put my code into "Before Save".
Now the record is exported through the BOD, I want to uncheck the password reset field to set the value to 0. Therefore, I tried the following code in "Afterr Save" of the table extension:

function extern long after.save.object(long mode)
{
If tccom100.cdf_pwdr = tcyesno.yes then
tccom100.cdf_pwdr = tcyesno.no
EndIf
return (0)
}

When I debug the code, I can see that the code is running through the if-statement and the field is set to tcyesno.no.
But when I open the session tccom4100s000 in Infor LN, the value in the password reset field is still tcyesno.yes.

What can be the problem?

Fabiano Silva

@Steffen Baumbusch ,

Create a custom table txcom001 to control that, I think is a better way

function extern long after.save.object(long mode)

{

	select  txcom001.*

 	from    txcom001 for update

 	where   txcom001._index1 = {:tccom100.bpid}

 	selectdo

	       txcom001.pwdr = tcyesno.yes

	       db.update(ttxcom001, DB.RETRY)

 	endselect


	return (0)

}