ダイアログにも同様の問題がありますが、メソッドを呼び出すコントロールがないとエラーが発生します。
タイプCustAccountのダイアログフィールドでのルックアップをオーバーライドしようとしています-必要なのは、invoiceAccountが特定の値であるすべてのcustTableレコードを返すルックアップです。
これが私のコードです:
class AG_UpdateQuoteCust extends Runbase
{
DialogField dlgCust;
CustAccount newCust;
CustAccount custAccount;
#define.CurrentVersion(1)
#define.Version1(1)
#localmacro.CurrentList
custAccount
#endmacro
}
public Object dialog()
{
DialogRunbase dlg;
;
dlg = super(dlg);
dlg.caption("Change quotation customer account");
dlg.addText('Please select an alternative customer account');
dlgCust = dlg.addField(typeid(CustAccount),'Customer account');
dlgCust.fieldControl().mandatory(true);
if(!dlgCust)
{
error('Please fill out all mandatory fields');
}
return dlg;
}
void Fld2_1_lookup()
{
Dialog dlg = this.dialog();
SysTableLookup sysTableLookup;
QueryBuildDataSource queryBuildDataSource;
QueryBuildRange queryBuildRange;
Query query;
Str TmpStr;
Formrun fr = this.dialogModify().parmDialog();
Object Control = fr.controlCallingMethod();
FormStringControl _control = control;
;
sysTableLookup = SysTableLookup::newParameters(tablenum(CustTable),_control);
sysTableLookup.addLookupfield(fieldnum(CustTable, AccountNum),true);
sysTableLookup.addLookupfield(fieldnum(CustTable, Name));
sysTableLookup.addLookupfield(fieldnum(CustTable, NameAlias));
query = new Query();
queryBuildDataSource = query.addDataSource(tablenum(CustTable));
tmpStr = 'ADAM001H';
queryBuildRange = queryBuildDataSource.addRange(fieldnum(CustTable, InvoiceAccount));
queryBuildRange.value(TmpStr);
sysTableLookup.parmQuery(query);
sysTableLookup.performFormLookup();
}
public void dialogPostRun(DialogRunbase dialog)
{
;
Super(dialog);
dialog.formRun().controlMethodOverload(true);
dialog.formRun().controlMethodOverloadObject(this);
}
ここでどこが間違っているのか教えていただけますか?実際、dialogPostRunメソッドのこのオーバーライドやControlCallingMethodの使用についてはよくわかりません。