[ExtensionOf(classStr(CustInterestPost))]
final class CustInterestPost_Extension
{
public TransDate dueDate;
public DialogField dialogDueDate;
public Object dialog()
{
DialogRunbase dialog;
dialog = next dialog();
dialogDueDate = dialog.addFieldValue(extendedTypeStr(TransDate), DateTimeUtil::addMonths(this.postingDate(), 1), "DueDate");
dialog.allowUpdateOnSelectCtrl(true);
return dialog;
}
public void dialogSelectCtrl()
{
next dialogSelectCtrl();
dialogDueDate.value(DateTimeUtil::addMonths(dialogPostingDate.value(), 1));
}
public boolean getFromDialog()
{
boolean ret;
ret = next getFromDialog();
if(ret)
{
dueDate = dialogDueDate.value();
}
return ret;
}
protected TransDate dueDate(TransDate _dueDate = dueDate)
{
dueDate = _dueDate;
return dueDate;
}
public void run()
{
next run();
ttsbegin;
CustInterestJour custInterestJour;
select forupdate custInterestJour where custInterestJour.RecId == parmCustInterestJour.RecId;
if(custInterestJour)
{
custInterestJour.DueDate = this.dueDate();
custInterestJour.update();
}
ttscommit;
}
}
[ExtensionOf(ClassStr(CustInterestPost))]
final class CustInterestPost_Extension
{
public void run()
{
next run();
ttsbegin;
CustInterestJour custInterestJour = CustInterestJour::find(this.parmCustInterestJour.RecId, true);
custInterestJour.due = this.postingDate();
custInterestJour.update();
ttscommit;
}
}
André Arnaud de Cal... 291,391 Super User 2024 Season 2
Martin Dráb 230,445 Most Valuable Professional
nmaenpaa 101,156