6/25/2011

X++ ตัดเอาวันที่ กับปี

ใช้ใน 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