会計名の取得方法

stringvar tag := cstr({Row.会計名});
select (tag)
 case  '1.00' :{M_ConfigCashbook.AccountingTitle1}
 case  '2.00' :{M_ConfigCashbook.AccountingTitle2}
 case  '3.00' :{M_ConfigCashbook.AccountingTitle3}
 case  '4.00' :{M_ConfigCashbook.AccountingTitle4}
 case  '5.00' :{M_ConfigCashbook.AccountingTitle5}
 case  '6.00' :{M_ConfigCashbook.AccountingTitle6}
 case  '7.00' :{M_ConfigCashbook.AccountingTitle7}
 case  '8.00' :{M_ConfigCashbook.AccountingTitle8}
 case  '9.00' :{M_ConfigCashbook.AccountingTitle9}
 case  '10.00' :{M_ConfigCashbook.AccountingTitle10}
default: tag