2025年5月14日 星期三

V20305M – 匯入PDM_BOM需求物料 –呼叫WebService WS_PDM02 –傳回文字檔*.TXT -*.TXT文字格式(左靠/右靠)

 目的: V20305M – 匯入PDM_BOM需求物料 
                            –呼叫WebService WS_PDM02 
                            –傳回文字檔*.TXT  
                            -*.TXT文字格式(左靠/右靠)

處理說明:  1>呼叫 WebService  - myfunc.getWS_PDM02
                       DataSet ds = myfunc.getWS_PDM02(Tmp_PN, Tmp_ECNO, Tmp_CDCODE,..);
                       DataTable Tmp_dt1 = ds.Tables["T1"];
                   2>*.TXT 檔 文字格式 - 固定長度_左靠
                        Tmp_Str = "AMM單號".PadRight(16, ' ')+"件號".PadRight(16,' ')+..+ "\n\r";
                        File.AppendAllText(Tmp_out_pFName, Tmp_Str);  
                        Tmp_Str = "=============================================" + "\n\r";
                        File.AppendAllText(Tmp_out_pFName, Tmp_Str);  
                   3>傳回 *.TXT 檔 -下載 *.TXT 檔案
                HttpContext.Current.Response.AddHeader("Content-Disposition", "attachment;filename=\"" + HttpUtility.UrlEncode((string)Tmp_out_FName, System.Text.Encoding.UTF8) + "\"");
                HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.UTF8;
                HttpContext.Current.Response.ContentType = "text/plain";
                HttpContext.Current.Response.WriteFile(Tmp_out_pFName);
                HttpContext.Current.Response.End();





1>myfunc.cs    呼叫WebService  WS_PDM02  - getWS_PDM02
/*
        // 函式名稱: getWS_PDM02
        1>傳入參數:
                        itm_id: 件號        ec_id:  ECNO           status:   情況碼
                        prodid:  機種       numberS:  機號        config:   專案配置      workloc:     生產工廠

        2>傳回參數:  ds 
                                    cmp_id:  子件號      itm_name:  子件號           qty:   需求數量
                                       units:    單位         mroutinetype:  製程          mroutinetype_name:  製程名稱
        
        */
        public static dynamic getWS_PDM02(string par_itm_id, string par_ec_id,string par_status,string par_prodid,string par_numberS, string  par_config,string par_workloc)
        {
            //DataSet ds=new DataSet();
            DataSet ds = null;  //接收 WebService 的回傳值
            if (!myfunc.checkisnull(par_itm_id))
            {
                PLM_WS.ServiceSoapClient PLM_WS = new PLM_WS.ServiceSoapClient();
                try
                {
                    ds = PLM_WS.AMM_PDM02(par_itm_id, par_ec_id, par_status, par_prodid, par_numberS, par_config, par_workloc);
                    myfunc.ds2T1C(ds);
                }
                catch (Exception ex)
                {
                    throw ex;
                }                //throw ex;            
                finally
                { };
            }
            return ds;
        }


2>*.cs
      DataSet ds = myfunc.getWS_PDM02(Tmp_PN, Tmp_ECNO, Tmp_CDCODE,..);
      DataTable Tmp_dt1 = ds.Tables["T1"];
//匯出文字
            string Tmp_out_FName = "V20305_匯入PDM_BOM結果_log.txt";      //處理_log.txt
 string documentPath = HttpContext.Current.Server.MapPath("~") + "document\\"; //取得實實的路徑
            string Tmp_out_pFName = documentPath + Tmp_out_FName;    //含 path 的Filename
            if (File.Exists(Tmp_out_pFName))
            {
                File.Delete(Tmp_out_pFName);
            }

            string Tmp_Str;
            Tmp_Str = "AMM單號".PadRight(16, ' ')+"件號".PadRight(16,' ')
                             +"匯入情況(Y/N)".PadRight(16,' ')+"匯入說明".PadRight(40,' ')
                             + "\n\r";
            File.AppendAllText(Tmp_out_pFName, Tmp_Str);  //不用 sw , 改用 File.AppendAllText
            Tmp_Str ="==================================================" + "\n\r";
            File.AppendAllText(Tmp_out_pFName, Tmp_Str);  //不用 sw , 改用 File.AppendAllText

3>*.js
//匯入PDM_BOM資料
    function V20305M_OK() {
        var cur_recs = Ext.getCmp('grid_M').getSelectionModel().getSelection();
        if (cur_recs.length == 0) {
            mywarnalert("請先選擇要匯入PDM_BOM的資料");
            return false;
        }
        var cur_rec;
        let Tmp_DataAry1 = [];
        for (let i = 0; i <= cur_recs.length - 1; i++) {
            console.log("i:", i);
            cur_rec = cur_recs[i];
            Tmp_DataAry1.push(cur_rec.data);
        }  // for i=0 to 
        let Tmp_DataString1 = JSON.stringify(Tmp_DataAry1);
        var np1 = {};
        np1["DataString1"] = Tmp_DataString1;
        np1["AMMNO"] = Tmp_AMMNO;
        np1["RPNOAF"] = Tmp_RPNOAF;
        np1["EIAC"] = Tmp_EIAC;

        np1["sub_PN"] = Ext.getCmp("sub_PN").getValue();   //件號
        //np1["sub_EONO"] = Ext.getCmp("sub_EONO").getValue();   //EONO
        //np1["sub_CDCODE"] = Ext.getCmp("sub_CDCODE").getValue();   //情況碼
        //?? 測試用
        np1["sub_EONO"] = "";   //EONO
        np1["sub_CDCODE"] ="";   //情況碼
        np1["sub_PDM_CONFIG"] = Ext.getCmp("sub_PDM_CONFIG").getValue();   //專案配置
        np1["sub_PDMPDTP"] = Ext.getCmp("sub_PDMPDTP").getValue();                //機種
        np1["sub_ACNO"] = Ext.getCmp("sub_ACNO").getValue();                               //機號

        np1["sub_rd_TYPE"] = (Ext.getCmp("sub_rd_TYPE").getValue()).sub_rd_TYPE;
        np1["sub_rd_SYS"] = (Ext.getCmp("sub_rd_SYS").getValue()).sub_rd_SYS;        
        //因為要傳回 *_log.txt ..所以改用 submit , 由 cookie 傳回訊息
        var Tmp_url = '../../api/V20305MAPI/INS_AMM_UOC_AMM_UOCD'
        Ext.getCmp('s_form').submit({
            method: "POST",
            url: Tmp_url,  //更新資料庫單況            
            standardSubmit: true,
            params: np1,
            async: false,
        });  //end of Ext.Ajax.Request               

        //顯示結果訊息..
        var Tmp_Str = '資料處理中..<br>'
                              + '可能需要數十分鐘<br> '
                              + ' 請稍待...<br>';
        var mask = new Ext.LoadMask(Ext.getBody(), {
            msg: Tmp_Str
        });

        mask.show();//使用 mask 需手動呼叫show() 方法下
        //每1秒檢核一次,是否已完成, 若已完成,則不再檢核
        var timer = setInterval(function () {
            var r = r_cookies('Rtn_Msg');
            if (!checkisnull(r)) {
                mysuccessalert(r);
                clearInterval(timer);
                mask.hide();
                timer = null;
            }
        }, 1000);  //1000ms = 1sec    


    } // end of function V20305M_OK()

2025年5月13日 星期二

V20305M – 匯入PDM BOM檔 –sub_Panel – 設定唯讀/填入欄位值 - 子畫面

 目的: V20305M – 匯入PDM BOM –sub_Panel – 設定唯讀/填入欄位值

處理說明:
              1>     Get_cmp_panel1 加入[件號][ECNO][情況碼]欄位
               2>     設定唯讀
               3>     填入欄位值



1>*.js
//設定 [件號] / [ECNO] / [CDCODE情況碼] 欄位
var cmp_sub_panel1 = get_cmp_panel1(200);
var cmp_sub_PN = get_cmp_txt1('件號', 'sub_PN', 110, 100);
var cmp_sub_EONO = get_cmp_txt1('ECNO', 'sub_EONO', 110, 100);
var cmp_sub_CDCODE = get_cmp_txt1('情況碼', 'sub_CDCODE', 110, 100);
cmp_sub_panel1.items.push(cmp_sub_PN, cmp_sub_EONO, cmp_sub_CDCODE);

//設定[機號]欄位
    var cmp_sub_ACNO = get_cmp_txt1('機號', 'sub_ACNO', 110, 100);
    //純粹LABEL欄位,  get_lbl_cmp1(欄位id , 欄位寬度 )
    //function get_cmp_lbl0(par_caption, par_l_width) {
    var cmp_sub_ACNO_lbl = get_cmp_lbl0('(只填一機號)', 110);
    cmp_sub_ACNO.items.push(cmp_sub_ACNO_lbl);


2025年5月7日 星期三

V20305L - 上下層同時提料需求申請 – Email附檔/收件人/副本 - New

 目的: V20305L - 上下層同時提料需求申請 – Email附檔/收件人/副本

處理說明: Email 附加檔案 - 所有資料均列入*.xls檔案 -  收件人/副本
                             1>*.js
                                    1.1>更新[上下層同時提料說明] 欄位值 -   UPDATE_UDRQSN
                                     1.2>Email附檔/收件人/副本
                             2>*.cs  -
                                      using Spire.Xls;                              //*.xls 
                                       using System.Net.Mime;    //Email

                             2.1>加入收件人/副本
                                                   MailMessage ChkMail = new MailMessage();
                                                  string mail_from = "tlsapp@ms.aidc.com.tw";
                                                       ChkMail.From = new MailAddress(mail_from, "AMM系統", System.Text.Encoding.UTF8);//寄件者                                                    
                                                                    ChkMail.To.Add(Tmp_NOTES_MAIL);         
                                                                   ChkMail.CC.Add(Tmp_CC_Email);
                 2.2>產生附件檔
                                        DataSet ds = get_sub_Data1();            
                        DataTable dt1 = ds.Tables[1];
                        for (var i = 0; i < dt1.Rows.Count; i++)
                             {..};
                        string Tmp_FName = "V20305_上下層同時提料申請.xlsx";              
                        Tmp_FName = ExportFile1(Tmp_FName);
                        ContentType ct = new ContentType("application/vnd.openxmlformats-                    
                                                                                 officedocument.spreadsheetml.sheet");
            //Attachment attm = new Attachment(stream, Tmp_FName, System.Net.Mime.MediaTypeNames.Application.Octet);
                        Attachment attm = new Attachment(Tmp_FName, ct);
                        ChkMail.Attachments.Add(attm);
                 2.3>Email 
                        sendMail(subject, content, ChkMail);   


1>*.js

var np = {};    
        np["RPNOAF_Str"] = Tmp_RPNOAF_Str;
        np["AMMNO_Str"] = Tmp_AMMNO_Str;
        np["UDRQSN"] = Ext.getCmp("sub_UPDOWN_DESCP").getValue();
        //np["DataString1"] = Tmp_DataString1;
        var Tmp_url = "../../api/V20305LAPI/UPDATE_UDRQSN";        
        Tmp_RtnMsg = getUrlStr(Tmp_url, np, "更新[上下層需求說明(AMM_UOCD.UDRQSN)].UpdateUDRQSN");
        if (!checkRtnOK(Tmp_RtnMsg)) {
            myalert(Tmp_RtnMsg);
            return;
        }  // end of SelAllBtn_click

        //STEP2 : Email                
        Tmp_url = "../../api/V20305LAPI/DoMAIL";
        Tmp_RtnMsg = getUrlStr(Tmp_url, np, "更新[上下層提料需求申請].DoMail");
        if (!checkRtnOK(Tmp_RtnMsg)) {
            myalert(Tmp_RtnMsg);
            return;
        }  // end of SelAllBtn_click
        Tmp_RtnMsg = "[上下層同時提料需求申請]鈕.執行成功!!<br>"
                                + Tmp_RtnMsg;
        mysuccessalert(Tmp_RtnMsg)



2>*.cs

public dynamic UPDATE_UDRQSN()
{
//取得參數值
var c = HttpContext.Current;
NameValueCollection nvc = c.Request.Form;

string Tmp_UDRQSN = nvc["UDRQSN"];
//匯出時, 不分頁(par_paging=false), 資料全取
//V20305LAPIController V20305L = new V20305LPIController();
DataSet ds = get_sub_Data1();
DataTable dt1 = ds.Tables[1];

for (var i = 0; i < dt1.Rows.Count; i++)
{
     Tmp_RPNOAF = dt1.Rows[i]["RPNOAF"].ToString();
     Tmp_EIAC = dt1.Rows[i]["EIAC"].ToString();

}
 //取得交修單號.[承辦人員].NOTES_MAIL
  MailMessage ChkMail = new MailMessage();            
  string mail_from = "tlsapp@ms.aidc.com.tw";
 ChkMail.From = new MailAddress(mail_from, "AMM系統", System.Text.Encoding.UTF8);//發送者  
         ChkMail.To.Add(Tmp_NOTES_MAIL);         
       ChkMail.CC.Add(Tmp_CC_Email);
          

2025年5月6日 星期二

V20305 – [主按鈕]列如何分成兩行

 目的: V20305 – [主按鈕]列如何分成兩行

處理說明:





2025年4月24日 星期四

V20305D – [批次匯入]資料-先檢核匯入資料,全部都沒問題 ,才更新資料庫 - XLS匯入 - 檢核資料後,更新資料庫

目的: V20305D – [批次匯入]資料-先檢核匯入資料,全部都沒問題 ,才更新資料庫

處理說明: 1>*.cs  
                                              -   CHECK2INS_AMM_UOC_UOCD()
                                             先檢核匯入資料,若全部資料檢核OK,才   更新資料庫
                                            Tmp_RtnMsg = CHECK_XLSDATA();
                                           if (!myfunc.checkisnull(Tmp_RtnMsg))
                                         {
                                            ws.Range[myfunc.GetExcelPos(44, cur_row)].Value = Tmp_RtnMsg;
                                            Tmp_isOk = false;
                                            continue;
                                        }

                              2>//STEP2 若匯入資料全部正確, 才更新資料
                                       if (Tmp_isOk)
                                    {
                                           //重新讀取匯入資料 , 更新資料庫
                                          cur_row = 1;
                                          for (int i = 0; i < RowsCount; i++)
                                      {  }
                                             
 




1>*.cs
//檢核標題是否正確
  if ((Tmp_OGONOAF != "提領編號") || (Tmp_RPNOAF != "交修單號") || (Tmp_MRPNOAF != "維修交修單號") || 
{


//檢核資料是否正確
 ws.Range[myfunc.GetExcelPos(44, 0)].Value = "匯入結果說明";
 ws.AutoFitRow(1);
 //STEP2 取得xls.[目前件號].報工資料                    
 // Transaction SQL List - 存放  Transaction 的 SQL 
 List<string> SQL_List_A = new List<string>();

 int RowsCount = ws.LastRow;
 bool Tmp_isOk = true;
 
 //STEP 1   : 檢核匯入的全部資料是否正確 , 資料全部正確 , 才執行資料更新
 for (int i = 0; i < RowsCount; i++)
{
}

 //STEP2 若匯入資料全部正確, 才更新資料
 if (Tmp_isOk)
 {
      //重新讀取匯入資料 , 更新資料庫
      cur_row = 1;
     for (int i = 0; i < RowsCount; i++)
   {  //更新資料庫
    }
}

2025年4月15日 星期二

V20305K1 –[確認]鈕 – 顯示訊息(myalert) 未顯示在最上層視窗 – 非TLS品項單筆提料 - 以
, /n 分行 - replace replaceAll

 目的: V20305K1 –[確認]鈕 – 顯示訊息(myalert) , – 非TLS品項單筆提料 
           --> myalert 未顯示在最上層視窗 (以<br>分行)
           --> 改用 alert (以/n分行)

處理說明:  1>V20305K1  - 主畫面2子畫面2子子畫面 (V20305 到 V20305K 到 V20305K1).顯示訊息
                        以 myalert 顯示訊息, 該訊息未顯示在最上層視窗, 無法點[確認]鈕
                        -->必需先關掉V20305K1 ,才可看到訊息 & 點[確認]鈕  
                   2>改用 alert 顯示訊息, 才看到該訊息,按[確認]鈕
                   3>alert 訊息,以 /n 分行
                       myalert 訊息,以 <br> 分析
                   4>replace只換第一次match字串, 傳回新字串,但原字串不變
                       replaceAll換所有match字串,傳回新字串,但原字串不變





1>*.js
     if (Tmp_Str.length > 0) {
            Tmp_Str = Tmp_Str + " 敬請檢核 !!<br>";
            //mywarnalert(Tmp_Str);   // myalert無法在最上層顯示訊息, 改用 alert 顯示
            //myalert(Tmp_Str);
            //window.alert(Tmp_Str);
            //將<br>轉成 /n      //replace 只換第一次字串, replaceAll 換所有的字串
            Tmp_Str=Tmp_Str.replaceAll("<br>", "\n");
            //Tmp_Str.replace("< br >", "\n");
            alert(Tmp_Str);   //alert 以 /n 換行,  myalert 以 <br> 換行
            is_ok = false;            
        }

2025年4月14日 星期一

V20305K – 子畫面簡單Grid – [V]加入另一SQL的資料至Grid (dt1 --> dt0) - T1C -重設 ds 的筆數

目的: V20305K – 子畫面簡單Grid – [V]加入另一SQL的資料至Grid

處理說明: 1>取得原始SQL 的資料 - ds.dt0
                      DataSet ds = getDataTable(cmd, countSql, false);
                      Tmp_RNK = ds.Tables["T1"].Rows.Count;
                  2>取得額外 SQL 的資料 , 並加入 dt0
                       Tmp_dt1 = myfunc.SqlOpen(Tmp_dt1, Tmp_Sql);
                       Tmp_cnt1 = Tmp_dt1.Rows.Count;
                       for (int j = 0; j < Tmp_cnt1; j++)
                      {                        
                        DataRow dr0 = ds.Tables["T1"].Rows.Add();
                        DataRow dr1 = Tmp_dt1.Rows[j];
                        Tmp_RNK = Tmp_RNK + 1;
                        dr0["RNK"] = Tmp_RNK.ToString();
                        dr0["EIAC"] = dr1["EIAC"].ToString();
                        dr0["EI_LCN"] = dr1["EI_LCN"].ToString();
                      }
                   3>重設 dt0 的筆數
                        ds.Tables["T1C"].Rows[0]["TOTAL"] = Tmp_RNK;


1>*.cs
try
            {
                DataSet ds = getDataTable(cmd, countSql, false);
                Tmp_RNK = ds.Tables["T1"].Rows.Count;
                //若[V]含膠漆料,則找出膠漆料的資料
                if (Tmp_sub_chk_INCCLUE=="true") 
                {
                    Tmp_Sql = " SELECT     LCN   "
                                   + "  FROM       PAP @TLS_245  "
                                   + "  WHERE     PN = " + myfunc.AA("MATERIAL REQUIREMENT")
                                    + "  AND         EFF = 'Y'    "
                                   + "   AND         EIAC = " + myfunc.AA(Tmp_EIAC);
                    Tmp_ROOT_LCN = myfunc.SqlValue(Tmp_Sql);
                    Tmp_Sql= "  SELECT  a.EIAC,a.LCN,a.ALC,  "
                                                    +" a.PN,a.CAGE,a.SPN,a.SCAGE,a.QPA,  "
                                                    +" b.EI_LCN,b.EI_ALC,b.NHA_LCN,b.NHA_ALC,  "
                                                    +" c.TMNOXX,c.WP,c.FIG,c.IND  "
                                    +" FROM    PAP @TLS_245 a,N_EI_UOC @TLS_245 b,(select * from PAPTOMD @TLS_245 where STAT = 'Y') c  "
                                    +" WHERE  a.EIAC = b.EIAC  "
                                    +"  AND      a.LCN = b.LCN  "
                                     +" AND      a.ALC = b.ALC  "
                                     +" AND      a.EIAC = c.EIAC(+)   "
                                     +" AND       a.LCN = c.LCN(+)  "
                                     +" AND       a.ALC = c.ALC(+)   "
                                     +" AND       a.PN = c.PN(+)   "
                                     +" AND       a.EFF = 'Y'   "
                                     +" AND       b.EFF = 'Y'   "
                                     +"  AND      a.LCN like "+ myfunc.AA(Tmp_ROOT_LCN+"%")
                                     +" AND       a.EIAC = "+myfunc.AA(Tmp_EIAC)
                                     +" ORDER   BY a.PN ";
                    Tmp_dt1 = myfunc.SqlOpen(Tmp_dt1, Tmp_Sql);
                    Tmp_cnt1 = Tmp_dt1.Rows.Count;
                    for (int j = 0; j < Tmp_cnt1; j++)
                    {                        
                        DataRow dr0 = ds.Tables["T1"].Rows.Add();
                        DataRow dr1 = Tmp_dt1.Rows[j];
                        Tmp_RNK = Tmp_RNK + 1;
                        dr0["RNK"] = Tmp_RNK.ToString();
                        dr0["EIAC"] = dr1["EIAC"].ToString();
                        dr0["EI_LCN"] = dr1["EI_LCN"].ToString();
                        dr0["EI_ALC"] = dr1["EI_ALC"].ToString();
                        dr0["NHA_LCN"] = dr1["NHA_LCN"].ToString();
                        dr0["NHA_ALC"] = dr1["NHA_ALC"].ToString();
                        dr0["LCN"] = dr1["LCN"].ToString();
                        dr0["ALC"] = dr1["ALC"].ToString();
                        dr0["PN"] = dr1["PN"].ToString();
                        dr0["CAGE"] = dr1["CAGE"].ToString();
                        dr0["TMNOXX"] = dr1["TMNOXX"].ToString();
                        dr0["WP"] = dr1["WP"].ToString();
                        dr0["FIG"] = dr1["FIG"].ToString();
                        dr0["IND"] = dr1["IND"].ToString();                        
                    };
                }

                ds.Tables["T1C"].Rows[0]["TOTAL"] = Tmp_RNK;
                ds.Tables["T1"].Columns.Add("NHA_PN_", typeof(object));           //上層件號
                ds.Tables["T1"].Columns.Add("RQPN_", typeof(object));           //提料件號
                ds.Tables["T1"].Columns.Add("C_NM_", typeof(object));           //物料名稱
                ds.Tables["T1"].Columns.Add("NSN_", typeof(object));           //料號                
                               

                foreach (DataRow row in ds.Tables["T1"].Rows)
                {
                    Tmp_EIAC = row["EIAC"].ToString();
                    Tmp_EI_LCN = row["EI_LCN"].ToString();
                    Tmp_PN = row["PN"].ToString();
                    Tmp_CAGE = row["CAGE"].ToString();

                    Tmp_Sql = " SELECT   NSN  "
                                + "  FROM       SP_NSN@TLS_245 "
                                + "  WHERE    1=1 "
                                + "   AND         PN=" + myfunc.AA(Tmp_PN)
                                + "  AND          CAGE=" + myfunc.AA(Tmp_CAGE)
                                + "   AND         rownum=1  ";
                    Tmp_NSN_ = myfunc.SqlValue(Tmp_Sql);


                    row["RQPN_"] = Tmp_RQPN_;
                    row["NHA_PN_"] = Tmp_NHA_PN_;
                    row["C_NM_"] = Tmp_C_NM_;
                    row["NSN_"] = Tmp_NSN_;                    
                }