ใช้ใน Axapta เพื่อตัด เอา วันที่ และ ปี เพื่อมาเทียบ ว่าเป็นเดือนอะไร
int i,celRow,k,sumk,numberdate,numberyear,yearps,temstryear,tdate,stryear;
real exchrate,fobcurrency,fob,fobsum,exchratedn,fobcurrencydn,fobdn,fobsumdn,sumcust,cust,ratezero;
str total,strdate,numdate;
;
tdate = mthofyr(todate); ///////////////ตัดเอาวันที่มา
// print strfmt("%1",tdate);
switch (tdate)
{
case 1 : numdate ="Á¡ÃÒ¤Á" ;
break;
case 2 : numdate ="¡ØÁÀҾѹ¸ì" ;
break;
case 3 : numdate ="ÁÕ¹Ò¤Á" ;
break;
case 4 : numdate ="àÁÉÒ¹" ;
break;
case 5 : numdate ="¾ÄÉÀÒ¤Á" ;
break;
case 6 : numdate ="ÁԶعÒ¹" ;
break;
case 7 : numdate ="¡Ã¡®Ò¤Á" ;
break;
case 8 : numdate ="ÊÔ§ËÒ¤Á" ;
break;
case 9 : numdate ="¡Ñ¹ÂÒ¹" ;
break;
case 10 : numdate ="µØÅÒ¤Á" ;
break;
case 11 : numdate ="¾ÄȨԡÒ¹" ;
break;
DEFAULT : numdate ="¸Ñ¹ÇÒ¤Á" ;
break;
}
stryear=Year(toDate); ////////ตัดเอาปี ตัดเอาปี
// print strfmt("%1", stryear);
yearps = stryear + 543; //////บวกให้เป็น พศ.
// print strfmt("%1",yearps);
No comments:
Post a Comment