年忌名を英語に変換

年忌名を英語に変換

Local StringVar target :={Old2.TYMemo};
target := Replace(target,"1st","一周忌");
target := Replace(target,"3th","三回忌");
target := Replace(target,"7th","七回忌");
target := Replace(target,"13th","十三回忌");
target := Replace(target,"17th","十七回忌");
target := Replace(target,"23th","二十三回忌");
target := Replace(target,"25th","二十五回忌");
target := Replace(target,"27th","二十七回忌");
target := Replace(target,"33th","三十三回忌");
target := Replace(target,"37th","三十七回忌");
target := Replace(target,"43th","四十三回忌");
target := Replace(target,"47th","四十七回忌");
target := Replace(target,"50th","五十回忌");
target := Replace(target,"60th","六十回忌");
target := Replace(target,"100th","百回忌");
target := Replace(target,"150th","百五十回忌");
target := Replace(target,"200th","二百回忌");
target := Replace(target,"250th","二百五十回忌");
target := Replace(target,"300th","三百回忌");
target := Replace(target,"350th","三百五十回忌");

月としての数字を英語表記に変換

Local StringVar target :=totext({Old.Tuki});
target := Replace(target,"12.00","Dec.");
target := Replace(target,"11.00","Oct.");
target := Replace(target,"1.00","Jan.");
target := Replace(target,"2.00","Feb.");
target := Replace(target,"3.00","Mar.");
target := Replace(target,"4.00","Apr.");
target := Replace(target,"5.00","May.");
target := Replace(target,"6.00","Jun.");
target := Replace(target,"7.00","Jul.");
target := Replace(target,"8.00","Aug.");
target := Replace(target,"9.00","Jan.");
target := Replace(target,"10.00","Sep.");

日としての数字を英語表記に変換

Local StringVar target :=totext({Old.Hi});
target := Replace(target,"31.00","31st");
target := Replace(target,"30.00","30th");
target := Replace(target,"29.00","29th");
target := Replace(target,"28.00","28th");
target := Replace(target,"27.00","27th");
target := Replace(target,"26.00","26th");
target := Replace(target,"25.00","25th");
target := Replace(target,"24.00","24th");
target := Replace(target,"23.00","23rd");
target := Replace(target,"22.00","22nd");
target := Replace(target,"21.00","21st");
target := Replace(target,"20.00","20th");
target := Replace(target,"19.00","19th");
target := Replace(target,"18.00","18th");
target := Replace(target,"17.00","17th");
target := Replace(target,"16.00","16th");
target := Replace(target,"15.00","15th");
target := Replace(target,"14.00","14th");
target := Replace(target,"13.00","13th");
target := Replace(target,"12.00","12th");
target := Replace(target,"11.00","11th");
target := Replace(target,"10.00","10th");
target := Replace(target,"9.00","9th");
target := Replace(target,"8.00","8th");
target := Replace(target,"7.00","7th");
target := Replace(target,"6.00","6th");
target := Replace(target,"5.00","5th");
target := Replace(target,"4.00","4th");
target := Replace(target,"3.00","3rd");
target := Replace(target,"2.00","2nd");
target := Replace(target,"1.00","1st");