パブリック静的ボイドlookupRate（FormStringControlの_contrl、
TNK_ToRisk_C _custAccount、
TNK_LTSeiZhaCh_COCTR_C _costCenter、
TNK_SB_C _itemId）
{
SysTableLookup sysTableLookup;
クエリQ;
QueryBuildDataSourceのqbds。
TNK_BaseRate_C baseRate_C;
TNK_RDB_JIGSOBA_UNT_SBT unt_SBT;
TNK_TmpCustomerRate tmpCustomerRate;
delete_from tmpCustomerRate;
ttsBegin;
insert_recordset tmpCustomerRate
（JIGSOBA_UNT_SBT、SCBaseRate_C、LTSeiZhaCh_COCTR_C、ToRisk_C、SB_C）
baseRate_CからBaseRate_C、SCBaseRate_C、LTSeiZhaCh_COCTR_C、ToRisk_C、_itemIdを選択
どこbaseRate_C.ToRisk_C == _custAccount
&& baseRate_C.LTSeiZhaCh_COCTR_C == _costCenter
&& baseRate_C.SCBaseRate_C //特別価格
&& baseRate_C.SYOUNINN_F //承認
unt_SBTに参加する存在
どこunt_SBT.JIGSOBA_UNT_SBT == baseRate_C.BaseRate_C
&& unt_SBT.SB_C == _itemId。
（もし！tmpCustomerRate）
{
insert_recordset tmpCustomerRate
（JIGSOBA_UNT_SBT、SCBaseRate_C、LTSeiZhaCh_COCTR_C、ToRisk_C、SB_C）
baseRate_CからBaseRate_C、SCBaseRate_C、LTSeiZhaCh_COCTR_C、ToRisk_C、_itemIdを選択
どこbaseRate_C.ToRisk_C == _custAccount
&& baseRate_C.LTSeiZhaCh_COCTR_C == _costCenter
&&！BaseRate_C.SCBaseRate_C //非特異的な為替レート
unt_SBTに参加する存在
どこunt_SBT.JIGSOBA_UNT_SBT == baseRate_C.BaseRate_C
&& unt_SBT.SB_C == _itemId。
}
ttsCommit;
tmpCustomerRateを選択します。
Q =新しいクエリ（）;
qbds = q.addDataSource（tableNum（TNK_TmpCustomerRate））。
sysTableLookup = SysTableLookup :: newparameters返却（tableNum（TNK_TmpCustomerRate）、_contrl）。
sysTableLookup.addLookupfield（fieldNum（TNK_TmpCustomerRate、JIGSOBA_UNT_SBT））。
sysTableLookup.addLookupfield（fieldNum（TNK_TmpCustomerRate、SCBaseRate_C））。
sysTableLookup.addLookupfield（fieldNum（TNK_TmpCustomerRate、ToRisk_C））。
sysTableLookup.addLookupfield（fieldNum（TNK_TmpCustomerRate、LTSeiZhaCh_COCTR_C））。
sysTableLookup.addLookupfield（fieldNum（TNK_TmpCustomerRate、SB_C））。
sysTableLookup.parmQuery（Q）。
sysTableLookup.parmTmpBuffer（tmpCustomerRate）。
sysTableLookup.performFormLookup（）;
}