傑佛瑞Blog TIPTOP ERP+ EasyFlow (BPM) + BI 系統整合開發經驗分享

  ●集團信用超限暨留置放行維護作業●

switch(mode_type){  

   case "SO":

   para1 =  (txt_cno1.text=="")? "%" : searchAndReplace(txt_cno1.text,"*","%") ;  /** 客戶編號 **/

   para2 =  (txt_pno1.text=="")? "%" : searchAndReplace(txt_pno1.text,"*","%") ;  /** 單據號碼 **/

   sql_str +=" SELECT CTY,PLANT,NVL(PNAME,' ') PNAME,NVL(PUID,' ') PUID,NVL(PDATE,' ') PDATE,NVL(PDESC,' ') PDESC,NVL(PUC,' ') PUC,NVL(PCNO,' ') PCNO,NVL(PCNAME,' ') PCNAME,to_char(NVL(PSUM,0),'999,999,999,990.99') PSUM FROM DS.CV1_SOD  ";

   sql_str +=" WHERE PLANT IN ("+arrPlant+") AND PCNO LIKE '"+para1+"' AND PUID LIKE '"+para2+"' ";

   break;

   case "SP":

   para1 =  (txt_cno2.text=="")? "%" : searchAndReplace(txt_cno2.text,"*","%") ;  /** 客戶編號 **/

   para2 =  (txt_pno2.text=="")? "%" : searchAndReplace(txt_pno2.text,"*","%") ;  /** 單據號碼 **/

   sql_str +=" SELECT CTY,PLANT,NVL(PNAME,' ') PNAME,NVL(PUID,' ') PUID,NVL(PDATE,' ') PDATE,NVL(PDESC,' ') PDESC,NVL(PUC,' ') PUC,NVL(PCNO,' ') PCNO,NVL(PCNAME,' ') PCNAME,to_char(NVL(PSUM,0),'999,999,999,990.99') PSUM FROM DS.CV2_SOD  ";

   sql_str +=" WHERE PLANT IN ("+arrPlant+") AND PCNO LIKE '"+para1+"' AND PUID LIKE '"+para2+"' ";

   break;

   case "AR":

   para1 =  (txt_cno3.text=="")? "%" : searchAndReplace(txt_cno3.text,"*","%") ;  /** 客戶編號 **/

   para2 =  (txt_pno3.text=="")? "%" : searchAndReplace(txt_pno3.text,"*","%") ;  /** 單據號碼 **/

   sql_str +=" SELECT PDATE2 PMODDATE,PLANT,NVL(PNAME,' ') PNAME,NVL(PUID,' ') PUID,NVL(PCNO,' ') PCNO,NVL(PCNAME,' ') PCNAME,NVL(PACNO,' ') PACNO,NVL(PACNAME,' ') PACNAME,NVL(PDATE,' ') PDATE,NVL(PDATE2,' ') PDATE2,NVL(PCUR,' ') PCUR,to_char(NVL(PSUM1,0),'999,999,999,990.99') PSUM1,to_char(NVL(PSUM2,0),'999,999,999,990.99') PSUM2,to_char(NVL(PSUM3,0),'999,999,999,990.99') PSUM3,to_char(NVL(PSUM4,0),'999,999,999,990.99') PSUM4 FROM DS.CV3_SOD  ";

   sql_str +=" WHERE  PLANT IN ("+arrPlant+") AND PACNO LIKE '"+para1+"' AND PUID LIKE '"+para2+"' ";

   break;

   default: break;

   }