using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Web.UI;
using System.Data;
using System.IO;
using System.Globalization;
using DataLibrary;

namespace CoreSavingLibrary
{
    public class Printing
    {
        private static String CnvXmlStringFormat(DataTable dt)
        {
            try
            {
                if (dt.Rows.Count <= 0) throw new Exception("ไม่พบข้อมูล (row <= 0)");
                CultureInfo en = new CultureInfo("en-US");
                StringBuilder sss = new StringBuilder();
                sss.Append("<?xml version=\"1.0\" encoding=\"utf-8\"?>\n");
                sss.Append("<printing_japplet>\n");
                for (int i = 0; i < dt.Rows.Count; i++)
                {
                    sss.Append("\t<printing_japplet_row>\n");
                    for (int j = 0; j < dt.Columns.Count; j++)
                    {
                        sss.Append("\t\t");
                        try
                        {
                            String value = dt.Columns[j].DataType.ToString() == "System.DateTime" ? Convert.ToDateTime(dt.Rows[i][j]).ToString("yyyy-MM-dd HH:mm:ss", en) : dt.Rows[i][j].ToString();
                            sss.Append("<" + dt.Columns[j].ColumnName.ToLower() + ">" + value + "</" + dt.Columns[j].ColumnName.ToLower() + ">\n");
                        }
                        catch
                        {
                            sss.Append("<" + dt.Columns[j].ColumnName.ToLower() + "/>\n");
                        }
                    }
                    sss.Append("\t</printing_japplet_row>\n");
                }
                sss.Append("</printing_japplet>");

                StringReader strre = new StringReader(sss.ToString());
                String xml = sss.ToString();
                return xml;
            }
            catch (Exception ex)
            {
                throw ex;
            }
        }

        private static DataTable CnvDataTableFormat(string xml)
        {
            if (xml.IndexOf("<?xml") >= 0)
            {
                try
                {
                    DataSet ds = new DataSet();
                    System.IO.StringReader sReader = new System.IO.StringReader(xml);
                    ds.ReadXml(sReader);
                    int count = ds.Tables.Count;
                    DataTable dt = ds.Tables[0];
                    int maxRow = 0;
                    for (int i = 0; i < ds.Tables.Count; i++)
                    {
                        if (ds.Tables[i].Columns.Count > maxRow)
                        {
                            maxRow = ds.Tables[i].Columns.Count;
                            dt = ds.Tables[i];
                        }
                    }

                    //ตั้งชื่อ table name เพราะถ้าไม่มีชือจะเกิด exception (ตั้งชื่ออะไรก็ได้)
                    dt.TableName = "Sdt";

                    return dt;
                }
                catch { }
            }
            return null;
        }

        /// <summary>
        /// สั่ง JsPrinting
        /// </summary>
        /// <param name="page"></param>
        /// <param name="formPrintName"></param>
        /// <param name="xml"></param>
        /// <param name="rowPerPage"></param>
        public static void Print(PageWeb page, String formPrintName, String xml, decimal rowPerPage)
        {
            int rowCount = -1;
            try
            {
                DataSet ds = new DataSet();
                System.IO.StringReader sReader = new System.IO.StringReader(xml);
                ds.ReadXml(sReader);
                rowCount = ds.Tables[ds.Tables.Count - 1].Rows.Count;
            }
            catch { }
            page.Session["ss_printing_xml"] = xml;
            string result = "";
            string ip = page.state.SsClientIp;
            decimal totalPage = Math.Ceiling(rowCount / rowPerPage);
            string reportName = formPrintName.Substring(formPrintName.LastIndexOf("/")).Replace("/", "").Replace(".aspx", "");
            string xmlConfigUrl = page.state.SsUrl.Replace("/GCOOP/Saving/", "/GCOOP/XmlConfig/") + "client.jsprint_client_setting.xml";
            result = "<script language=\"javascript\">";
            result += "window.open('" + page.state.SsUrl + "PrintingDialog.aspx?pageName=" + formPrintName + "&totalPage=" + totalPage + "&rowCount=" + rowCount + "&rowPerPage=" + rowPerPage + "&ipAddress=" + ip + "&reportName=" + reportName + "&xmlConfigUrl=" + xmlConfigUrl + "', null, 'height=600,width=850,top=50,left=100,status=0,scrollbars=1,toolbar=0,menubar=0,location=0,resizable=0');";
            result += "</script>";
            Type t = page.GetType();
            page.ClientScript.RegisterClientScriptBlock(t, "PrintingScript", result);
        }

        /// <summary>
        /// สั่ง JsPrinting
        /// </summary>
        /// <param name="page"></param>
        /// <param name="formPrintName"></param>
        /// <param name="data"></param>
        /// <param name="rowPerPage"></param>
        public static void Print(PageWeb page, String formPrintName, DataTable data, decimal rowPerPage)
        {
            String xml = "";

            //ตั้งชื่อ table name เพราะถ้าไม่มีชือจะเกิด exception (ตั้งชื่ออะไรก็ได้)
            data.TableName = "datatable_slip";

            //นำข้อมูลจาก datatable ไปเป็น stringwriter
            StringWriter strWrite = new StringWriter();
            data.WriteXml(strWrite);

            //แปลงค่าเป็น xml string ธรรมดา
            xml = strWrite.ToString();

            //เรียก Print ตามเดิม
            Printing.Print(page, formPrintName, xml, rowPerPage);
        }

        /// <summary>
        ///  สั่ง Printing ด้วย Java Applet
        /// </summary>
        /// <param name="page">ใส่ this เท่านั้น (*คลาสที่ inherit จาก CommonLibrary.PageWeb)</param>
        /// <param name="printingName">ใส่ชื่อ Form Class จาก Applet เช่น ap_deposit.PrintBook</param>
        /// <param name="xml">ค่า xml string เพื่อใช้ในรายงาน/ใบเสร็จ</param>
        public static void PrintApplet(PageWeb page, String printingName, String xml)
        {
            DataTable dt = CnvDataTableFormat(xml);
            PrintApplet(page, printingName, dt);
        }

        /// <summary>
        /// สั่ง Printing ด้วย Java Applet
        /// </summary>
        /// <param name="page">ใส่ this เท่านั้น (*คลาสที่ inherit จาก CommonLibrary.PageWeb)</param>
        /// <param name="printingName">ใส่ชื่อ Form Class จาก Applet เช่น ap_deposit.PrintBook</param>
        /// <param name="data">DataTable สำหรับไปสร้าง xml string เพื่อใช้ในรายงาน/ใบเสร็จ</param>
        public static void PrintApplet(PageWeb page, String printingName, DataTable data)
        {
            String xml = CnvXmlStringFormat(data);
            Printing.PrintAppletFinish(page, printingName, xml);
        }

        private static void PrintAppletFinish(PageWeb page, String printingName, String xml)
        {
            WebState state = page.state;
            String result = "";
            try
            {
                int rowCount = -1;
                try
                {
                    DataSet ds = new DataSet();
                    System.IO.StringReader sReader = new System.IO.StringReader(xml);
                    ds.ReadXml(sReader);
                    rowCount = ds.Tables[ds.Tables.Count - 1].Rows.Count;
                }
                catch { }
                XmlConfigService xmlconfig = page.xmlconfig;
                String appletIpDomain = "";
                String appletProtocal = xmlconfig.SavAppletProtocol;
                int appletPortNumber = xmlconfig.SavAppletPort;

                //appletIpDomain = xmlconfig.SavAppletDomain;
                if (state.SsIsLocalIp)
                {
                    appletIpDomain = xmlconfig.SavAppletIp;
                }
                else
                {
                    appletIpDomain = xmlconfig.SavAppletDomain;
                }

                // หา ip/domain
                if (appletIpDomain == "*")
                {
                    appletIpDomain = xmlconfig.SavDomain;
                }
                if (appletIpDomain == "*")
                {
                    appletIpDomain = WebUtil.GetSavingAddress();
                }

                String appletPort = ":" + appletPortNumber;
                if (appletPortNumber == 80 && appletProtocal == "http")
                {
                    appletPort = "";
                }
                else if (appletPortNumber == 443 && appletProtocal == "https")
                {
                    appletPort = "";
                }
                String httpUrl = appletProtocal + "://" + appletIpDomain + appletPort + "/ICORE/" + xmlconfig.SavPathPattern + "";
                String fileName = DateTime.Now.ToString("yyyy_MM_dd_E_HHmmss") + "_" + page.Session.SessionID + ".xml";
                String physPath = WebUtil.PhysicalPath + "Saving\\SlipApp\\xml_file_japplet";
                String physFilePath = WebUtil.PhysicalPath + "Saving\\SlipApp\\xml_file_japplet\\" + fileName + "";
                String urlXmlData = httpUrl + "SlipApp/xml_file_japplet/" + fileName + "";
                String appletPath = httpUrl + "SlipApp/dist/SlipApp.jar";

                String urlXml = appletProtocal + "://" + appletIpDomain + appletPort + "/" + WebUtil.GetVirtualDirectoryCurrent() + "/" + xmlconfig.SavPathPattern + "";
                urlXmlData = urlXml + "SlipApp/xml_file_japplet/" + fileName + "";

                DirectoryInfo dir = new DirectoryInfo(physPath);
                if (!dir.Exists)
                {
                    dir.Create();
                }

                // create a writer and open the file
                TextWriter tw = new StreamWriter(physFilePath);

                // write a line of text to the file
                tw.Write(xml);

                // close the stream
                tw.Close();

                //className = className.Replace("/", ".");
                //printingName = printingName.Replace("/", ".");

                string ip = page.state.SsClientIp;
                string reportName = printingName;
                result += "<script language=\"javascript\">";
                result += "window.open('" + httpUrl + "PrintingAppletDialog.aspx?con_index=" + state.SsConnectionIndex + "&printingName=" + printingName + "&urlXmlData=" + urlXmlData + "&appletPath=" + appletPath + "', null, 'height=100,width=200,top=50,left=100,status=0,scrollbars=1,toolbar=0,menubar=0,location=0,resizable=0');";
                result += "</script>";
            }
            catch (Exception ex)
            {
                result = "<script language=\"javascript\">";
                result += "window.open('Err: " + ex.Message + "');";
                result += "</script>";
            }
            Type t = page.GetType();
            page.ClientScript.RegisterClientScriptBlock(t, "PrintingScript", result);
        }

        public static void FinPrintSlipReceive(PageWeb page, String coopId, String slipNo, DateTime workDate, int printMode)
        {
            String sql = @"
                SELECT
	                MBUCFMEMBGROUP.MEMBGROUP_DESC,   
	                FINSLIP.PAY_TOWHOM,   
	                FINSLIPDET.SLIPITEM_DESC,   
	                FINSLIPDET.ITEMPAY_AMT,   
	                FINSLIP.MEMBER_NO,   
	                CMCOOPCONSTANT.COOP_NAME,   
	                CMCOOPCONSTANT.COOP_ADDR,   
	                CMCOOPCONSTANT.TAMBOL,   
	                CMCOOPCONSTANT.DISTRICT_CODE,   
	                CMCOOPCONSTANT.PROVINCE_CODE,   
	                CMCOOPCONSTANT.POSTCODE,   
	                CMCOOPCONSTANT.COOP_TEL,   
	                CMCOOPCONSTANT.COOP_FAX,   
	                MBUCFDISTRICT.DISTRICT_DESC,   
	                MBUCFPROVINCE.PROVINCE_DESC,   
	                FINSLIP.CASH_TYPE,   
	                MBMEMBMASTER.PROVINCE_CODE,   
	                FINSLIPDET.SEQ_NO,   
	                FINSLIP.RECEIVE_DATE,   
	                FINSLIP.REMARK,   
	                FINSLIP.SLIP_NO,   
	                FINSLIPDET.VAT_AMT,   
	                FINSLIP.MEMBER_FLAG,   
	                AMSECUSERS.FULL_NAME,   
	                FINSLIP.RECEIPT_NO,   
	                MBUCFMEMBGROUP.MEMBGROUP_CODE  
                FROM 
	                FINSLIP,   
	                FINSLIPDET,   
	                MBMEMBMASTER,   
	                MBUCFMEMBGROUP,   
	                CMCOOPCONSTANT,   
	                MBUCFDISTRICT,   
	                MBUCFPROVINCE,   
	                AMSECUSERS  
                WHERE 
	                ( cmcoopconstant.district_code = mbucfdistrict.district_code (+)) and  
	                ( cmcoopconstant.province_code = mbucfdistrict.province_code (+)) and  
	                ( cmcoopconstant.province_code = mbucfprovince.province_code (+)) and  
	                ( mbmembmaster.membgroup_code = mbucfmembgroup.membgroup_code (+)) and  
	                ( finslip.member_no = mbmembmaster.member_no (+)) and  
	                ( FINSLIP.SLIP_NO = FINSLIPDET.SLIP_NO ) and  
	                ( FINSLIP.COOP_ID = FINSLIPDET.COOP_ID ) and  
	                ( AMSECUSERS.USER_NAME = FINSLIP.ENTRY_ID ) and  
	                ( ( FINSLIP.ENTRY_DATE = {0} ) AND  
	                ( FINSLIP.SLIP_NO = {1} ) AND  
	                ( FINSLIP.COOP_ID = {2} ) )  
                ";
            //sql = page.wcf.InterPreter.GetSqlFinSlip(0, "SqlFinSlipReceive.aspx", coopId, slipNo, workDate);
            sql = WebUtil.SQLFormat(sql, workDate, slipNo, coopId);
            DataTable data = WebUtil.Query(sql);
            //Printing.Print(page, "Slip/app_finance/FinSlipReceive.aspx", data, 10);
            if (printMode == 1)
            {
                Printing.Print(page, "Slip/app_finance/FinSlipReceive.aspx", data, 1);
            }
            else
            {
                Printing.PrintApplet(page, "fin_slip_receive", data);
            }
        }

        public static void FinPrintSlipPay(PageWeb page, String coopId, String slipNo, DateTime workDate, int printMode)
        {
            String sql = "";
            //sql = page.wcf.InterPreter.GetSqlFinSlip(0, "SqlFinSlipPay.aspx", coopId, slipNo, workDate);
            //DataTable data = WebUtil.Query(sql);
            //Printing.Print(page, "Slip/app_finance/FinSlipPay.aspx", data, 10);
            sql = WebUtil.SQLFormat(sql, workDate, slipNo, coopId);
            DataTable data = WebUtil.Query(sql);
            //Printing.Print(page, "Slip/app_finance/FinSlipPay.aspx", data, 10);
            if (printMode == 1)
            {
                Printing.Print(page, "Slip/app_finance/FinSlipPay.aspx", data, 1);
            }
            else if (printMode == 2)
            {
                Printing.PrintApplet(page, "fin_slip_pay", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "fin_slip_pay", data);
            }
        }

        public static void DeptPrintBookFirstPage(PageWeb page, String xml)
        {
            if (page.state.SsBookVersion == "new")
            {
                Printing.PrintApplet(page, "dept_printbookfirst_auto", xml);
            }
            else
            {
                Printing.PrintApplet(page, "dept_printbookfirst", xml);
            }
        }

        public static void DeptPrintBook(PageWeb page, String xml)
        {
            if (page.state.SsBookVersion == "new")
            {
                Printing.PrintApplet(page, "dept_printbook_auto", xml);
            }
            else if (page.state.SsBookVersion == "Old")
            {
                Printing.PrintApplet(page, "dept_printbookOld", xml);
            }
            else
            {
                Printing.PrintApplet(page, "dept_printbook", xml);
            }
        }

        public static void ShrPrintBookHead(PageWeb page, string loancontract_no)
        {
            string sqlshrhead = @"select l.loancontract_no as loancontract_no,
                 ft_cnvtdate(l.startcont_date,0)  as startcont_date,
                ft_cnvtdate(l.loanapprove_date,0)  as loanapprove_date,
                format(l.loanapprove_amt,0) as loanapprove_amt,
                lntype.loangroup_code as loangroup_code,
                case
	                when lntype.loangroup_code = '01' then 'ระยะสั้น'
                    when lntype.loangroup_code = '02' then 'ระยะปานกลาง'
                    else 'ระยะยาว'
                end as loantype_desc,
                 case  when    sum(case when lp.period = 1 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 1 then lp.period_payment  else 0 end ),0) end  as period1,
                (select concat('(1) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 1 and loancontract_no = {0}) as expiredate_period1,
                   case  when    sum(case when lp.period = 2 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 2 then lp.period_payment  else 0 end ),0) end  as period2,
                (select concat('(2) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 2 and loancontract_no = {0}) as expiredate_period2,
                 case  when    sum(case when lp.period = 3 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 3 then lp.period_payment  else 0 end ),0) end  as period3,
                (select concat('(3) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 3 and loancontract_no = {0}) as expiredate_period3,
                  case  when    sum(case when lp.period = 4 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 4 then lp.period_payment  else 0 end ),0) end  as period4,
                (select concat('(4) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 4 and loancontract_no = {0}) as expiredate_period4,
                 case  when    sum(case when lp.period = 5 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 5 then lp.period_payment  else 0 end ),0) end  as period5,
                (select concat('(5) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 5 and loancontract_no = {0}) as expiredate_period5,
                 case  when    sum(case when lp.period = 6 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 6 then lp.period_payment  else 0 end ),0) end  as period6,
                (select concat('(6) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 6 and loancontract_no = {0}) as expiredate_period6,
                  case  when    sum(case when lp.period = 7 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 7 then lp.period_payment  else 0 end ),0) end  as period7,
                (select concat('(7) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 7 and loancontract_no = {0}) as expiredate_period7,
                  case  when    sum(case when lp.period = 8 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 8 then lp.period_payment  else 0 end ),0) end  as period8,
                (select concat('(8) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 8 and loancontract_no = {0}) as expiredate_period8,
                   case  when    sum(case when lp.period = 9 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 9 then lp.period_payment  else 0 end ),0) end  as period9,
                (select concat('(9) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 9 and loancontract_no = {0}) as expiredate_period9,
                  case  when    sum(case when lp.period = 10 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 10 then lp.period_payment  else 0 end ),0) end  as period10,
                (select concat('(10) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 10 and loancontract_no = {0}) as expiredate_period10,
                  case  when    sum(case when lp.period = 11 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 11 then lp.period_payment  else 0 end ),0) end  as period11,
                (select concat('(11) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 11 and loancontract_no = {0}) as expiredate_period11,
                  case  when    sum(case when lp.period = 12 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 12 then lp.period_payment  else 0 end ),0) end  as period12,
                (select concat('(12) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 12 and loancontract_no = {0}) as expiredate_period12,
                  case  when    sum(case when lp.period = 13 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 13 then lp.period_payment  else 0 end ),0) end  as period13,
                (select concat('(13) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 13 and loancontract_no = {0}) as expiredate_period13,
                 case  when    sum(case when lp.period = 14 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 14 then lp.period_payment  else 0 end ),0) end  as period14,
                (select concat('(14) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 14 and loancontract_no = {0}) as expiredate_period14,
                case  when    sum(case when lp.period = 15 then lp.period_payment  else 0 end  ) =0 then ''
					 else format(sum(case when lp.period = 15 then lp.period_payment  else 0 end ),0) end  as period15,
                (select concat('(15) ', ft_cnvtdate(expireperiod_date,0)) from lncontperiodpaydet where period = 15 and loancontract_no = {0}) as expiredate_period15
                from lncontmaster l left join mbmembmaster mb on l.member_no= mb.member_no
                left join lnloantype lntype on lntype.loantype_code= l.loantype_code, lncontperiodpaydet lp
                where l.loancontract_no = {0}
                and l.loancontract_no = lp.loancontract_no
                group by l.loancontract_no,
                l.startcont_date,
                l.loanapprove_amt,
                lntype.loangroup_code";
            sqlshrhead = WebUtil.SQLFormat(sqlshrhead, loancontract_no);
            DataTable data = WebUtil.Query(sqlshrhead);
            string xml = CnvXmlStringFormat(data);
            Printing.PrintApplet(page, "loan_printbookhead", xml);
        }

        public static void ShrPrintBookFirstPage(PageWeb page, String xml)
        {
            Printing.PrintApplet(page, "share_printbookfirst", xml);
        }


        /*
        public static void LnCoopSlip(PageWeb page, String coopId, String slip_no, int printMode)
        {
            String sql = "";
            sql = page.wcf.InterPreter.GetSqlLnCoopSlip(-1, coopId, slip_no);
            DataTable dt = WebUtil.Query(sql);
            Printing.PrintApplet(page, "lncoop_slip", dt);

        }
         */
        /// <summary>
        ///  สั่ง Printing ด้วย Java Applet
        /// </summary>
        /// <param name="page">ใส่ this เท่านั้น (*คลาสที่ inherit จาก CommonLibrary.PageWeb)</param>
        /// <param name="printingName">ใส่ชื่อ Form Class จาก Applet เช่น ap_deposit.PrintBook</param>
        /// <param name="xml">ค่า xml string เพื่อใช้ในรายงาน/ใบเสร็จ</param>
        public static void PrintAppletPB(PageWeb page, String printingName, String xml)
        {
            DataTable dt = CnvDataTableFormat(xml);
            PrintAppletPB(page, printingName, dt);
        }

        /// <summary>
        /// สั่ง Printing ด้วย Java Applet
        /// </summary>
        /// <param name="page">ใส่ this เท่านั้น (*คลาสที่ inherit จาก CommonLibrary.PageWeb)</param>
        /// <param name="printingName">ใส่ชื่อ Form Class จาก Applet เช่น ap_deposit.PrintBook</param>
        /// <param name="data">DataTable สำหรับไปสร้าง xml string เพื่อใช้ในรายงาน/ใบเสร็จ</param>
        public static void PrintAppletPB(PageWeb page, String printingName, DataTable data)
        {
            String xml = CnvXmlStringFormat(data);
            Printing.PrintAppletPBFinish(page, printingName, xml);
        }

        private static void PrintAppletPBFinish(PageWeb page, String printingName, String xml)
        {
            WebState state = page.state;
            String result = "";
            try
            {
                int rowCount = -1;
                try
                {
                    DataSet ds = new DataSet();
                    System.IO.StringReader sReader = new System.IO.StringReader(xml);
                    ds.ReadXml(sReader);
                    rowCount = ds.Tables[ds.Tables.Count - 1].Rows.Count;
                }
                catch { }

                String fileName = DateTime.Now.ToString("yyyy_MM_dd_E_HHmmss") + "_" + page.Session.SessionID + ".xml";
                String physPath = WebUtil.GetGcoopPathCore() + "Saving\\SlipApp\\xml_file_japplet"; // เปลี่ยนจาก WebUtil.PhysicalPath เป็น WebUtil.GetGcoopPathCore()
                String physFilePath = WebUtil.GetGcoopPathCore() + "Saving\\SlipApp\\xml_file_japplet\\" + fileName + ""; // เปลี่ยนจาก WebUtil.PhysicalPath เป็น WebUtil.GetGcoopPathCore()
                String appletPath = state.SsUrl + "SlipPB/SlipPB_Applet/dist/SlipPB_Applet.jar";
                String urlXmlData = state.SsUrl + "SlipApp/xml_file_japplet/" + fileName + "";

                DirectoryInfo dir = new DirectoryInfo(physPath);
                if (!dir.Exists)
                {
                    dir.Create();
                }

                // create a writer and open the file
                TextWriter tw = new StreamWriter(physFilePath);

                // write a line of text to the file
                tw.Write(xml);

                // close the stream
                tw.Close();

                //className = className.Replace("/", ".");
                //printingName = printingName.Replace("/", ".");

                string ip = page.state.SsClientIp;
                string reportName = printingName;
                result = "<script language=\"javascript\">";
                result += "window.open('" + state.SsUrl + "PrintingAppletDialogPBSlip.aspx?printingName=" + printingName + "&urlXmlData=" + urlXmlData + "&appletPath=" + appletPath + "&con_index=" + state.SsConnectionIndex + "', null, 'height=320,width=320,top=50,left=100,status=0,scrollbars=1,toolbar=0,menubar=0,location=0,resizable=0');";
                result += "</script>";
            }
            catch (Exception ex)
            {
                result = "<script language=\"javascript\">";
                result += "window.open('Err: " + ex.Message + "');";
                result += "</script>";
            }
            Type t = page.GetType();
            page.ClientScript.RegisterClientScriptBlock(t, "PrintingScript", result);
        }
        public static void PrintSlipBuyshareYTK(PageWeb page, string payinslip_no, string coop_id)
        {


            string sql = @"select slslippayin.member_no,
                            slslippayindet.slipitem_desc,
                            slslippayindet.item_payamt,
                            slslippayin.payinslip_no    as document_no,
                            CONCAT(CONCAT(CONCAT( MBUCFPRENAME.PRENAME_DESC , MBMEMBMASTER.MEMB_NAME) , '   ' ) , MBMEMBMASTER.MEMB_SURNAME)  as mem_name,
                            mbmembmaster.membgroup_code,
                             concat(  trim(ifnull(addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(addr_moo,'-')) ,' ','ต.',trim(t_tambol) ,' อ.',trim(t_amphur) , ' จ.',trim(t_province) ,' ',trim(addr_postcode)) as addr,
                            ftreadbaht(slslippayin.slip_amt) as bthai,
                            DATE_FORMAT(DATE_ADD( slip_date, INTERVAL 543 YEAR), '%d/%m/%Y')   as date_thai,(select full_name from amsecusers where user_name =slslippayin.entry_id ) as entry_id
                              from slslippayin,slslippayindet,mbucfprename,mbmembmaster
                            where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                            slslippayin.member_no = mbmembmaster.member_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            slslippayin.payinslip_no= '" + payinslip_no + @"' and
                            slslippayindet.slipitemtype_code in ('SHR','FEE','FSV')   ";

            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "RECEIPT2", data);


        }

        public static void PrintSlipPayinYTK(PageWeb page, string payinslip_no, string coop_id)
        {


            string sql = @"SELECT
                            PI.PAYINSLIP_NO,
                            DATE_FORMAT(DATE_ADD(PI.SLIP_DATE,INTERVAL 543 YEAR), '%d/%m/%Y') as SLIP_DATE,
                            PI.MEMBER_NO,
                            CONCAT(MP.PRENAME_DESC, MB.MEMB_NAME,' ', MB.MEMB_SURNAME) AS FULLNAME,
                            CONCAT(MB.MEMBGROUP_CODE, ' - ', MG.MEMBGROUP_DESC) AS MEMBGROUP_NAME,
                            PI.SHARESTK_VALUE,
                            PI.SLIP_AMT,
                            ftreadbaht(PI.SLIP_AMT) as THBATH,
                            PD.CALINT_TO AS LASTCALINT_DATE,
                            PD.LOANCONTRACT_NO,
                            PD.INTYEAR_PAYMENT,
                            PD.FINEYEAR_PAYMENT,
                            PD.PRINCIPAL_PAYMENT,PRINARR_PAYMENT,
                            PD.INT_PAYMENT,
                            PD.FINE_PAYMENT,
                            PD.ITEM_PAYMENT,
                            PD.PRINCIPAL_BALANCE,
                            (PD.INT_BALANCE) AS BFINTARR_BALANCE,FINE_BALANCE,
                            AM.FULL_NAME 
                            FROM SLSLIPPAYIN PI, slslippayloan PD, MBMEMBMASTER MB, MBUCFPRENAME MP, MBUCFMEMBGROUP MG, AMSECUSERS AM  
                            WHERE PI.PAYINSLIP_NO = PD.PAYINSLIP_NO
                            AND PI.MEMBER_NO = MB.MEMBER_NO
                            AND PI.ENTRY_ID = AM.USER_NAME
                            AND MB.PRENAME_CODE = MP.PRENAME_CODE
                            AND MB.MEMBGROUP_CODE = MG.MEMBGROUP_CODE
                            AND PI.PAYINSLIP_NO =  '" + payinslip_no + @"'
                              ";

            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "RECEIPT", data);


        }
        public static void PrintSlipSlpayinBuyshare(PageWeb page, string payinslip_no, string coop_id)
        {

            if (Sta.IS_MYSQL_MODE)
            {

                string sql = @"select slslippayin.member_no,
                            slslippayindet.slipitem_desc,
                            slslippayindet.item_payamt,
                            slslippayin.document_no,
                            CONCAT(CONCAT(CONCAT( MBUCFPRENAME.PRENAME_DESC , MBMEMBMASTER.MEMB_NAME) , '   ' ) , MBMEMBMASTER.MEMB_SURNAME)  as mem_name,
                            mbmembmaster.membgroup_code,
                            mbmembmaster.addr_no,
                            mbmembmaster.addr_moo,
                            mbmembmaster.tambol_desc,
                            mbmembmaster.t_amphur,
                            mbmembmaster.t_province,
                            '' as bthai,
                            '' as date_thai
                              from slslippayin,slslippayindet,mbucfprename,mbmembmaster
                            where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                            slslippayin.member_no = mbmembmaster.member_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            slslippayin.payinslip_no='" + payinslip_no + @"' and
                            slslippayindet.slipitemtype_code='SHR'   ";

                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "RECEIPT2", data);

            }
            else
            {
                string sql = "";
                if (coop_id == "000501")//แม่จัน
                {
                    sql = @"select slslippayin.member_no,slslippayindet.slipitem_desc,slslippayindet.item_payamt
                            ,slslippayin.document_no
                            ,( MBUCFPRENAME.PRENAME_DESC || MBMEMBMASTER.MEMB_NAME || '   ' || MBMEMBMASTER.MEMB_SURNAME  )as mem_name,
                            mbmembmaster.membgroup_code,mbmembmaster.addr_no,mbmembmaster.addr_moo,
                            mbmembmaster.tambol_desc,mbmembmaster.t_amphur,mbmembmaster.t_province,
                            FTREADTBAHT(slslippayindet.item_payamt) as bthai,
                            REPLACE(ft_cnvtdate(slslippayin.slip_date,3), ' ', '                   ')as  date_thai
 
                              from slslippayin,slslippayindet,mbucfprename,mbmembmaster
                            where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                            slslippayin.member_no = mbmembmaster.member_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            slslippayin.payinslip_no='" + payinslip_no + @"' and
                            slslippayindet.slipitemtype_code='SHR'   ";
                }
                else
                {
                    sql = @"select slslippayin.member_no,slslippayindet.slipitem_desc,slslippayindet.item_payamt
                            ,slslippayin.document_no
                            ,( MBUCFPRENAME.PRENAME_DESC || MBMEMBMASTER.MEMB_NAME || '   ' || MBMEMBMASTER.MEMB_SURNAME  )as mem_name,
                            mbmembmaster.membgroup_code,mbmembmaster.addr_no,mbmembmaster.addr_moo,
                            mbmembmaster.tambol_desc,mbmembmaster.t_amphur,mbmembmaster.t_province,
                            FTREADTBAHT(slslippayindet.item_payamt) as bthai,ft_cnvtdate(slslippayin.slip_date,3) as date_thai
                              from slslippayin,slslippayindet,mbucfprename,mbmembmaster
                            where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                            slslippayin.member_no = mbmembmaster.member_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            slslippayin.payinslip_no='" + payinslip_no + @"' and
                            slslippayindet.slipitemtype_code='SHR'   ";
                }
                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "RECEIPT2", data);

            }

        }


        public static void PrintFinslipCrmja(PageWeb page, string payinslip_no, string coop_id)
        {

            Sdt d = WebUtil.QuerySdt("select slip_no from  finslip where slip_no='" + payinslip_no + "' and vat_amt>0  ");
            if (d.Next())
            {
                string sql = "";

                sql = @" select finslip.member_no,finslipdet.seq_no as seq_no,finslipdet.slipitem_desc  as slipitem_desc,finslip.itempay_amt as item_payamt,finslipdet.itempay_amt as item_payamtdet
                            ,finslip.slip_no as document_no
                            ,pay_towhom as mem_name                  ,      
                            โ(finslip.itempay_amt) as bthai,
                             ft_cnvtdate(finslip.operate_date,3 ) as  date_thai,
						fincontackmaster.tax_id as tax_id 
 ,trim(fincontackmaster.address_no) ||' '||'ต.'||trim(fincontackmaster.subdistrict ) ||' อ.'||trim(mbucfdistrict.district_desc) || ' จ.'||trim(mbucfprovince.province_desc) 
||' '||trim( fincontackmaster.postcode) as addr ,finslip.vat_amt as vat_amt
                              from finslip,finslipdet,fincontackmaster,mbucfprovince,mbucfdistrict
                            where 
                            finslip.member_no = fincontackmaster.contack_no and
						fincontackmaster.province = mbucfprovince.province_code and
						fincontackmaster.district = mbucfdistrict.district_code and
                            finslip.slip_no = finslipdet.slip_no and
                            finslip.slip_no='" + payinslip_no + @"'  order by  finslipdet.seq_no ";

                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "finslipvat", data);
            }
            else
            {


                string sql = "";

                sql = @"select finslip.member_no,finslipdet.seq_no||'. '||finslipdet.slipitem_desc  as slipitem_desc,finslip.itempay_amt as item_payamt,finslipdet.itempay_amt as item_payamtdet
                            ,finslip.slip_no as document_no
                            ,( MBUCFPRENAME.PRENAME_DESC || MBMEMBMASTER.MEMB_NAME || '   ' || MBMEMBMASTER.MEMB_SURNAME  )as mem_name,
                            mbmembmaster.membgroup_code,mbmembmaster.addr_no,mbmembmaster.addr_moo,
                            mbmembmaster.tambol_desc,mbmembmaster.t_amphur,mbmembmaster.t_province,
                            FTREADTBAHT(finslip.itempay_amt) as bthai,
                            REPLACE(ft_cnvtdate(finslip.operate_date,3), ' ', '                   ')as  date_thai
 
                              from finslip,finslipdet,mbucfprename,mbmembmaster
                            where 
                            finslip.member_no = mbmembmaster.member_no and
                            finslip.slip_no = finslipdet.slip_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            finslip.slip_no='" + payinslip_no + @"'  order by  finslipdet.seq_no ";

                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "finslip", data);
            }


        }

        public static void PrintSlipSlpayinBuyshare_out(PageWeb page, string payinslip_no, string coop_id)//ถอนหุ้นลาออกแม่จัน
        {
            string sql = "";
            sql = @"select slslippayout.member_no,'ถอนหุ้น' as slipitem_desc,slslippayout.payout_amt as item_payamt
                            ,slslippayout.document_no
                            ,( MBUCFPRENAME.PRENAME_DESC || MBMEMBMASTER.MEMB_NAME || '   ' || MBMEMBMASTER.MEMB_SURNAME  )as mem_name,
                            mbmembmaster.membgroup_code,mbmembmaster.addr_no,mbmembmaster.addr_moo,
                            mbmembmaster.tambol_desc,mbmembmaster.t_amphur,mbmembmaster.t_province,
                            FTREADTBAHT(slslippayout.payout_amt) as bthai,
                            REPLACE(ft_cnvtdate(slslippayout.slip_date,3), ' ', '                   ')as  date_thai

                              from slslippayout,mbucfprename,mbmembmaster
                            where 
                            slslippayout.member_no = mbmembmaster.member_no and
                            mbmembmaster.prename_code = mbucfprename.prename_code and
                            slslippayout.payoutslip_no='" + payinslip_no + @"' and
                            slslippayout.sliptype_code='SWD'   ";
            DataTable data = WebUtil.Query(sql);

            Printing.PrintAppletPB(page, "RECEIPT2", data);
        }


        public static void PrintHeadCardLoan(PageWeb page, string payinslip_no, string coop_id)
        {

            if (Sta.IS_MYSQL_MODE)
            {
                string sql = @"select l.contcount,l.contcount_end,l.expirecont_date,l.loancontract_no as l1,l.loancontract_no as l2,l.startcont_date as startcont_date,
lnucfloanobjective.loanobjective_desc,l.loanapprove_amt,lntype.loangroup_code,mb.member_no,mb.membgroup_code , concat(mbucfprename.PRENAME_DESC, mb.MEMB_NAME , ' ' , mb.MEMB_SURNAME) as mbname
,  concat(  trim(ifnull(mb.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mb.addr_moo,'-')) ,' ','ต.',trim(mb.t_tambol) ,' อ.',trim(mb.t_amphur) , ' จ.',trim(mb.t_province) ,' ',trim(mb.addr_postcode)) as addr_no,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=1 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll1,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=2 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll2,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=3 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll3,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=4 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll4,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=5 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll5,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=6 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll6,
ifnull((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as yearclass1,
ifnull((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as yearclass2,
ifnull((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as yearclass3,
ifnull((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as pointclass1,
ifnull((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as pointclass2,
ifnull((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as pointclass3,
ifnull((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as memb_levelclass1,
ifnull((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as memb_levelclass2,
ifnull((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as memb_levelclass3,
ifnull((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as int_rateclass1,
ifnull((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as int_rateclass2,
ifnull((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as int_rateclass3,
  (select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as PERIOD_PAYMENT1,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as PERIOD_PAYMENT2,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as PERIOD_PAYMENT3,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as PERIOD_PAYMENT4,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as PERIOD_PAYMENT5,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as PERIOD_PAYMENT6,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as PERIOD_PAYMENT7,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as PERIOD_PAYMENT8,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as PERIOD_PAYMENT9,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as PERIOD_PAYMENT10 ,  

(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as EXPIREPERIOD_DATE1,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as EXPIREPERIOD_DATE2,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as EXPIREPERIOD_DATE3,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as EXPIREPERIOD_DATE4,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as EXPIREPERIOD_DATE5,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as EXPIREPERIOD_DATE6,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as EXPIREPERIOD_DATE7,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as EXPIREPERIOD_DATE8,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as EXPIREPERIOD_DATE9,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as EXPIREPERIOD_DATE10
,lntype.loantype_desc as loantype_desc
 from lncontmaster l left join mbmembmaster mb on l.member_no= mb.member_no left join mbucfprename on
mb.prename_code = mbucfprename.prename_code
left join lnloantype lntype on lntype.loantype_code= l.loantype_code left join lnucfloanobjective on
l.loanobjective_code = lnucfloanobjective.loanobjective_code
 where loancontract_no= '" + payinslip_no + @"'    ";


                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "loan_headcard", data);
            }
            else
            {

                string sql = @"select l.contcount,l.contcount_end,l.expirecont_date,l.loancontract_no as l1,l.loancontract_no as l2,l.startcont_date as startcont_date,
lnucfloanobjective.loanobjective_desc,l.loanapprove_amt,lntype.loangroup_code,mb.member_no,mb.membgroup_code ,mbucfprename.prename_desc||mb.memb_name||'  '||mb.memb_surname as mbname
, 'บ้านเลขที่ '|| nvl(mb.addr_no,'      ') || ' หมู่ ' || mb.addr_moo || ' ต.'||
nvl(mb.t_tambol,'            ')|| '  อ.' ||nvl(mb.T_amphur,'            ') ||'    จ.'|| nvl(mb.t_province,'                 ') ||'   '|| nvl(mb.ADDR_POSTCODE,'       ') as addr_no,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=1 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll1,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=2 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll2,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=3 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll3,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=4 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll4,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=5 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll5,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=6 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll6  ,
nvl((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as yearclass1,
nvl((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as yearclass2,
nvl((SELECT year_no  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as yearclass3,
nvl((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as pointclass1,
nvl((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as pointclass2,
nvl((SELECT points  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as pointclass3,
nvl((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as memb_levelclass1,
nvl((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as memb_levelclass2,
nvl((SELECT memb_level  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as memb_levelclass3,
nvl((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=1),''  ) as int_rateclass1,
nvl((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=2),''  ) as int_rateclass2,
nvl((SELECT int_rate  FROM mbmembclass where  loancontract_no='" + payinslip_no + @"' and seq_no=3),''  ) as int_rateclass3,
  (select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as PERIOD_PAYMENT1,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as PERIOD_PAYMENT2,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as PERIOD_PAYMENT3,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as PERIOD_PAYMENT4,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as PERIOD_PAYMENT5,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as PERIOD_PAYMENT6,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as PERIOD_PAYMENT7,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as PERIOD_PAYMENT8,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as PERIOD_PAYMENT9,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as PERIOD_PAYMENT10 ,  

(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as EXPIREPERIOD_DATE1,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as EXPIREPERIOD_DATE2,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as EXPIREPERIOD_DATE3,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as EXPIREPERIOD_DATE4,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as EXPIREPERIOD_DATE5,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as EXPIREPERIOD_DATE6,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as EXPIREPERIOD_DATE7,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as EXPIREPERIOD_DATE8,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as EXPIREPERIOD_DATE9,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as EXPIREPERIOD_DATE10

 from lncontmaster l left join mbmembmaster mb on l.member_no= mb.member_no left join mbucfprename on
mb.prename_code = mbucfprename.prename_code
left join lnloantype lntype on lntype.loantype_code= l.loantype_code left join lnucfloanobjective on
l.loanobjective_code = lnucfloanobjective.loanobjective_code
 where loancontract_no= '" + payinslip_no + @"'    ";


                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "loan_headcard", data);
            }
        }
        public static void PrintHeadCardDebt(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = @"select '' as contcount, '' as contcount_end,l.end_date    as expirecont_date,l.contract_no    as l1,l.contract_no    as l2,l.strart_date  as startcont_date,
'' as loanobjective_desc,l.limit_amt as loanapprove_amt,'' as loangroup_code,m.debt_no as member_no, substr(m.debt_no,0,3) as membgroup_code ,bname as mbname
,( 'บ้านเลขที่ '|| 
m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) as addr_no,
(select   coll_desc     from stcontractcoll   where seq_no=1 and  contract_no='" + payinslip_no + @"') as coll1,
(select   coll_desc     from stcontractcoll   where seq_no=2 and  contract_no='" + payinslip_no + @"') as coll2,
(select   coll_desc     from stcontractcoll   where seq_no=3 and  contract_no='" + payinslip_no + @"') as coll3,
(select   coll_desc     from stcontractcoll   where seq_no=4 and  contract_no='" + payinslip_no + @"') as coll4,
(select   coll_desc     from stcontractcoll   where seq_no=5 and  contract_no='" + payinslip_no + @"') as coll5,
(select   coll_desc     from stcontractcoll   where seq_no=6 and  contract_no='" + payinslip_no + @"') as coll6,
'' as yearclass1,'' as yearclass2,'' as yearclass3,
'' as pointclass1,'' as pointclass2,'' as pointclass3,
'' as memb_levelclass1,'' as memb_levelclass2,'' as memb_levelclass3,
'' as int_rateclass1,'' as int_rateclass2,'' as int_rateclass3,
'' as PERIOD_PAYMENT1,  '' as PERIOD_PAYMENT2,  
'' as PERIOD_PAYMENT3,  '' as PERIOD_PAYMENT4,  
'' as PERIOD_PAYMENT5,  '' as PERIOD_PAYMENT6, 
 '' as PERIOD_PAYMENT7,  '' as PERIOD_PAYMENT8,  
'' as PERIOD_PAYMENT9,  '' as PERIOD_PAYMENT10,  
'' as EXPIREPERIOD_DATE1,  '' as EXPIREPERIOD_DATE2,  
'' as EXPIREPERIOD_DATE3,  '' as EXPIREPERIOD_DATE4,  
'' as EXPIREPERIOD_DATE5,  '' as EXPIREPERIOD_DATE6,  
'' as EXPIREPERIOD_DATE7,  '' as EXPIREPERIOD_DATE8,  
'' as EXPIREPERIOD_DATE9,  '' as EXPIREPERIOD_DATE10 
 from stcontract l left join stdebtmaster m  on l.debt_no= m.debt_no    
 where l.contract_no= '" + payinslip_no + @"'     ";


            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "debt_headcard", data);

        }

        public static void PrintHeadLoan(PageWeb page, string payinslip_no, string coop_id)
        {
            if (Sta.IS_MYSQL_MODE)
            {
                string sql = @"select l.contcount,l.contcount_end,l.expirecont_date,l.loancontract_no as l1,l.loancontract_no as l2,l.startcont_date as startcont_date,
 l.loanapprove_amt,lntype.loangroup_code 
,
 ifnull((select loanobjective_desc from (select 1 as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =1),'')  as obj2,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =2),'')  as obj1,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' ) ) a where a.dd =3),'')  as obj4,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =4),'')  as obj5,
ifnull((select concat( 'ชำระค่าหุ้น  '   , format(clrother_amt,0))   as objective_amt from lnreqloanclrother where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"') and clrother_desc is not null ),'') as obj3,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=1 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll1,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=2 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll2,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=3 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll3,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=4 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll4,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=5 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll5,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=6 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll6,
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as PERIOD_PAYMENT1,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as PERIOD_PAYMENT2,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as PERIOD_PAYMENT3,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as PERIOD_PAYMENT4,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as PERIOD_PAYMENT5,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as PERIOD_PAYMENT6,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as PERIOD_PAYMENT7,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as PERIOD_PAYMENT8,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as PERIOD_PAYMENT9,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as PERIOD_PAYMENT10 ,  

(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as EXPIREPERIOD_DATE1,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as EXPIREPERIOD_DATE2,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as EXPIREPERIOD_DATE3,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as EXPIREPERIOD_DATE4,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as EXPIREPERIOD_DATE5,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as EXPIREPERIOD_DATE6,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as EXPIREPERIOD_DATE7,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as EXPIREPERIOD_DATE8,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as EXPIREPERIOD_DATE9,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as EXPIREPERIOD_DATE10
 , ifnull((select objective_amt from (select 1 as dd, objective_amt  as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"')) a where a.dd =1),'')  as obj2_amt,
ifnull((select objective_amt from (select count(*) as dd, format(objective_amt,0)    as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =2),'')  as obj1_amt,
ifnull((select objective_amt from (select count(*) as dd,format(objective_amt,0) as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' ) ) a where a.dd =3),'')  as obj4_amt,
ifnull((select objective_amt from (select count(*) as dd,format(objective_amt,0)  as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =4),'')  as obj5_amt,
concat(mbucfprename.prename_desc,mbmembmaster.memb_name,'  ',mbmembmaster.memb_surname) as membname
 from lncontmaster l  
left join lnloantype lntype on lntype.loantype_code= l.loantype_code  inner join mbmembmaster on mbmembmaster.member_no = l.member_no 
 inner join mbucfprename on mbmembmaster.prename_code = mbucfprename.prename_code
 where loancontract_no= '" + payinslip_no + @"' ";


                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "loan_headbook", data);
            }
            else
            {

                string sql = @"select l.contcount,l.contcount_end,l.expirecont_date,l.loancontract_no as l1,l.loancontract_no as l2,l.startcont_date as startcont_date,
 l.loanapprove_amt,lntype.loangroup_code 
,
 nvl((select loanobjective_desc from (select rownum as dd, '('||loanobjective_code || ') ' ||trim( loanobjective_desc)|| '  '|| TO_CHAR(objective_amt,'999,999,999')  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =1),'')  as obj2,
nvl((select loanobjective_desc from (select rownum as dd, '('||loanobjective_code || ') ' || trim( loanobjective_desc)|| '  '|| TO_CHAR(objective_amt,'999,999,999')  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =2),'')  as obj3,
nvl((select loanobjective_desc from (select rownum as dd, '('||loanobjective_code || ') ' || trim( loanobjective_desc)|| '  '|| TO_CHAR(objective_amt,'999,999,999')  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' ) ) a where a.dd =3),'')  as obj4,
nvl((select loanobjective_desc from (select rownum as dd, '('||loanobjective_code || ') ' || trim( loanobjective_desc)|| '  '|| TO_CHAR(objective_amt,'999,999,999')  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =4),'')  as obj5,
nvl((select  'ชำระค่าหุ้น  '   || TO_CHAR(clrother_amt,'9,999,999')   as objective_amt from lnreqloanclrother where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"') and clrother_desc is not null ),'') as obj1,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=1 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll1,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=2 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll2,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=3 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll3,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=4 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll4,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=5 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll5,
(select  case when lncontcoll.loancolltype_code ='03' then 'โฉนด เลขที่' ||' ' || lncollmaster.collmast_no  ||'  เนื้อที่' ||' '|| size_rai ||' ไร่' ||' '|| size_ngan ||' งาน' || ' ' || size_wa || ' ตรว.  ราคาประเมิน ' || to_char(mortgage_price,'9,999,999') || ' บาท'
else ref_collno||'  '|| DESCRIPTION end     from lncontcoll  left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=6 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll6  ,

  (select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as PERIOD_PAYMENT1,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as PERIOD_PAYMENT2,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as PERIOD_PAYMENT3,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as PERIOD_PAYMENT4,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as PERIOD_PAYMENT5,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as PERIOD_PAYMENT6,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as PERIOD_PAYMENT7,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as PERIOD_PAYMENT8,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as PERIOD_PAYMENT9,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as PERIOD_PAYMENT10 ,  

(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as EXPIREPERIOD_DATE1,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as EXPIREPERIOD_DATE2,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as EXPIREPERIOD_DATE3,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as EXPIREPERIOD_DATE4,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as EXPIREPERIOD_DATE5,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as EXPIREPERIOD_DATE6,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as EXPIREPERIOD_DATE7,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as EXPIREPERIOD_DATE8,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as EXPIREPERIOD_DATE9,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as EXPIREPERIOD_DATE10
 from lncontmaster l  
left join lnloantype lntype on lntype.loantype_code= l.loantype_code  
 where loancontract_no= '" + payinslip_no + @"'    ";


                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
                Printing.PrintAppletPB(page, "loan_headbook", data);
            }

        }



        public static void PrintSlipPayLoan(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";

            if (Sta.IS_MYSQL_MODE)
            {

                Sdt d = WebUtil.QuerySdt("  select * from cmcoopmaster where addr_tambol='ศรีธาตุ'");
                if (d.Next())
                {
                    sql = @"select sl.member_no , sl.loancontract_no , sl.payout_amt , mb.membgroup_code ,mid( lntype.loantype_desc , 12, 50 ) as  loantype_desc  , 
                         concat( pre.prename_desc , mb.memb_name , '  ' , mb.memb_surname ) as mbname  ,
                        ftreadbaht( IFNULL ( sl.payout_amt,0) ) as payoutamt_thai , DATE_ADD(sl.slip_date, INTERVAL 543 YEAR)  as slip_date ,
                        ft_cnvtdatethai(sl.slip_date , 0) as slip_thaidate ,
                        cm.coop_name  , concat( cm.addr_no ,'  หมู่ ' , cm.addr_moo , '  ต.' , cm.addr_tambol , '  อ.'  , cm.addr_amphur, '   จ.' , cm.addr_province ,' ' , cm.addr_postcode  ,'  โทร '  ,  cm.addr_phone   ) as addr_coop
                       from slslippayout  sl 
		                    left join lncontmaster ln  on sl.loancontract_no = ln.loancontract_no
		                    left join mbmembmaster mb on sl.member_no = mb.member_no 
		                    left join mbucfprename pre on  mb.prename_code = pre.prename_code
		                    left join lnloantype lntype on lntype.loantype_code = ln.loantype_code  
		                    left join cmcoopmaster cm on cm.coop_id = sl.coop_id  
                        where sl.payoutslip_no = '" + payinslip_no + @"' ";
                }
                else
                {

                    sql = @"select slslippayout.member_no,slslippayout.payout_amt,mbmembmaster.membgroup_code,concat(mbucfprename.prename_desc,mbmembmaster.memb_name, '    ' ,mbmembmaster.memb_surname)as mem_name,
   ftreadbaht(slslippayout.payout_amt) as pthai,  DATE_FORMAT(DATE_ADD(slslippayout.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y') as date_thai,
  slslippayout.loancontract_no,lnloantype.loantype_desc
   from slslippayout left join lncontmaster on slslippayout.loancontract_no = lncontmaster.loancontract_no
  left join mbmembmaster on slslippayout.member_no = mbmembmaster.member_no left join mbucfprename on  mbmembmaster.prename_code = mbucfprename.prename_code
   left join lnloantype on lnloantype.loantype_code = lncontmaster.loantype_code 
   where slslippayout.payoutslip_no = '" + payinslip_no + @"'  ";
                }



            }
            else
            {

                if (coop_id == "000501")//แม่จัน
                {
                    sql = @"select slslippayout.member_no,slslippayout.payout_amt,mbmembmaster.membgroup_code,
(mbucfprename.prename_desc||mbmembmaster.memb_name|| '    ' ||mbmembmaster.memb_surname)as mem_name,
 slslippayout.slip_date  as date_thai,slslippayout.entry_date  as entry_date,slslippayout.loancontract_no ,
trim(slslippayout.entry_id) as entry_id2
 from slslippayout left join lncontmaster on slslippayout.loancontract_no = lncontmaster.loancontract_no
left join mbmembmaster on slslippayout.member_no = mbmembmaster.member_no left join mbucfprename on  mbmembmaster.prename_code = mbucfprename.prename_code
 where slslippayout.payoutslip_no = '" + payinslip_no + @"'  ";

                }
                else
                {

                    sql = @"select slslippayout.member_no,slslippayout.payout_amt,mbmembmaster.membgroup_code,(mbucfprename.prename_desc||mbmembmaster.memb_name|| '    ' ||mbmembmaster.memb_surname)as mem_name,
 FTREADTBAHT(slslippayout.payout_amt) as pthai,ft_cnvtdate(slslippayout.slip_date,3) date_thai,
slslippayout.loancontract_no,lnloantype.loantype_desc
 from slslippayout left join lncontmaster on slslippayout.loancontract_no = lncontmaster.loancontract_no
left join mbmembmaster on slslippayout.member_no = mbmembmaster.member_no left join mbucfprename on  mbmembmaster.prename_code = mbucfprename.prename_code
 left join lnloantype on lnloantype.loantype_code = lncontmaster.loantype_code 
 where slslippayout.payoutslip_no = '" + payinslip_no + @"'  ";
                }
            }
            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "loan_slip_payout", data);

        }

        public static void PrintSlipDept(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = @"select dpdepttype.depttype_desc, dpdeptmaster.deptaccount_no,deptslip_date,
deptaccount_name,dpdeptslip.deptslip_amt as int_amt,int_return,tax_amt  from dpdeptslip inner join dpdeptmaster on dpdeptslip.deptaccount_no = 
 dpdeptmaster.deptaccount_no inner join dpdepttype on dpdepttype.depttype_code=
dpdeptmaster.depttype_code where dpdeptslip.deptslip_no= '" + payinslip_no + "' and dpdeptslip.coop_id = '" + coop_id + "'   ";


            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "dept_int", data);

        }
        public static void PrintSlipDept2(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = @"select dpdepttype.depttype_desc, dpdeptmaster.deptaccount_no,deptslip_date,
deptaccount_name,dpdeptslip.int_amt as int_amt,int_return,tax_amt  from dpdeptslip inner join dpdeptmaster on dpdeptslip.deptaccount_no = 
 dpdeptmaster.deptaccount_no inner join dpdepttype on dpdepttype.depttype_code=
dpdeptmaster.depttype_code where dpdeptslip.deptslip_no= '" + payinslip_no + "' and dpdeptslip.coop_id = '" + coop_id + "'   ";


            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "dept_int", data);

        }



        public static void PrintSlipPaySKMUA(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";

            if (Sta.IS_MYSQL_MODE)
            {

                sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,ls.principal_balance as principal_balance ,
         s.loancontract_no as loancontract_no,
         concat(pre.PRENAME_DESC, mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
      concat(  trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr
        ,
        DATE_FORMAT(DATE_ADD(pin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y')   as date_thai,loantype.loangroup_code as loangroup_code
         from slsslip_desc s inner join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
        inner join lnloantype loantype on loantype.loantype_code = ln.loantype_code inner join slslippayin pin on  s.payinslip_no = pin.payinslip_no
         inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
        mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE inner join lncontstatement ls on  pin.payinslip_no = ls.ref_slipno 
        where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "' and  payment !=0 order by ordernumber  ";




            }
            else
            {
                sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,ls.principal_balance as principal_balance ,
         s.loancontract_no as loancontract_no,
        pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
        trim(mas.addr_no) ||' '||' หมู่ '||trim(mas.addr_moo) ||' '||'ต.'||trim(mas.t_tambol) ||' อ.'||trim(mas.t_amphur) || ' จ.'||trim(mas.t_province) ||' '||trim(mas.addr_postcode) as addr
        ,
         ft_cnvtdate(pin.slip_date,3) date_thai,loantype.loangroup_code as loangroup_code
         from slsslip_desc s inner join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
        inner join lnloantype loantype on loantype.loantype_code = ln.loantype_code inner join slslippayin pin on  s.payinslip_no = pin.payinslip_no
         inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
        mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE inner join lncontstatement ls on  pin.payinslip_no = ls.ref_slipno 
        where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "' and  payment !=0 order by ordernumber  ";

            }



            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
             
            Printing.PrintAppletPB(page, "RECEIPT", data);

        }

        public static void PrintSlipPaySri(PageWeb page, string payinslip_no, string coop_id,string ip)
        {
            string sql = "";

            

                sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,ls.principal_balance as principal_balance ,
         s.loancontract_no as loancontract_no,
         concat(pre.PRENAME_DESC, mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,(case when loangroup_code =01 then concat('ระยะสั้น-',prefix) else (case when  loangroup_code ='02' then concat('ปานกลาง-',prefix) else concat('ระยะยาว-',prefix) end) end) as loantype_code, trim(mas.membgroup_code)  as memgroup,
      concat(  trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr
        ,
        DATE_FORMAT(DATE_ADD(pin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y')   as date_thai,loantype.loangroup_code as loangroup_code
         from slsslip_desc s inner join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
        inner join lnloantype loantype on loantype.loantype_code = ln.loantype_code inner join slslippayin pin on  s.payinslip_no = pin.payinslip_no
         inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
        mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE inner join lncontstatement ls on  pin.payinslip_no = ls.ref_slipno 
        where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "' and  payment !=0 order by ordernumber  ";



 


            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            if (ip == "192.168.0.143") //fin_old
            {
                Printing.PrintAppletPB(page, "RECEIPT_fin", data);
            }
            else if (ip == "192.168.0.201") //golf
            {
                Printing.PrintAppletPB(page, "RECEIPT_golf", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "RECEIPT", data);
            }

        }

        public static void PrintSlipBuyshareSri(PageWeb page, string payinslip_no, string coop_id, string ip)
        {
            string sql = "";
            
                sql = @"select slslippayin.document_no, slslippayin.member_no, slslippayindet.slipitem_desc
                        ,slslippayindet.item_payamt, slslippayin.document_no 
                        ,DATE_FORMAT(DATE_ADD(slslippayin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y') as date_thai ,ls.sharestk_amt
                        ,concat(  mbucfprename.PRENAME_DESC , mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,
                        mas.membgroup_code,concat( trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,
                        ' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr,
                        ftreadbaht(slslippayindet.item_payamt) as bthai 
                        from slslippayin,slslippayindet,mbucfprename,mbmembmaster mas,shsharestatement ls
                        where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                        slslippayin.member_no = mas.member_no and
                        mas.prename_code = mbucfprename.prename_code and
                        ls.ref_slipno = slslippayin.payinslip_no and
                        slslippayin.PAYINSLIP_NO = '" + payinslip_no + "' and slslippayin.coop_id = '" + coop_id + "' and (slslippayindet.slipitemtype_code='SHR' or slslippayindet.slipitemtype_code='FEE')    ";
            

            DataTable data = WebUtil.Query(sql);
            if (ip == "192.168.0.143") //fin_old
            {
                Printing.PrintAppletPB(page, "RECEIPT2_fin", data);
            }
            else if (ip == "192.168.0.201") //golf
            {
                Printing.PrintAppletPB(page, "RECEIPT2_golf", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "RECEIPT2", data);
            }

        }

        public static void PrintSlipPaySriOut(PageWeb page, string payinslip_no, string payoutslip_no, string coop_id, string ip)
        {
            string sql = "";

            

                sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,
(select payout_amt from slslippayout where payoutslip_no = '" + payoutslip_no + "') as principal_balance ," +
    @" s.loancontract_no as loancontract_no,
 concat(pre.PRENAME_DESC, mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
 concat(  trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr
,
 DATE_FORMAT(DATE_ADD(pin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y')  as date_thai,loantype.loangroup_code as loangroup_code
 from slsslip_desc s left join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
left join lnloantype loantype on loantype.loantype_code = ln.loantype_code left join  slslippayin pin on  trim(s.payinslip_no) = trim(pin.payinslip_no)
 inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE
where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "'  order by ordernumber  ";



 
            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
             
            if (ip == "192.168.0.143") //fin_old
            {
                Printing.PrintAppletPB(page, "payinfrompayout_fin", data);
            }
            else if (ip == "192.168.0.201") //golf
            {
                Printing.PrintAppletPB(page, "payinfrompayout_golf", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "payinfrompayout", data);
            }

        }

        public static void PrintSlipPayLoan(PageWeb page, string payinslip_no, string coop_id, string ip)
        {
            string sql = "";

            
                
                    sql = @"select sl.member_no , sl.loancontract_no , sl.payout_amt , mb.membgroup_code ,mid( lntype.loantype_desc , 12, 50 ) as  loantype_desc  , 
                         concat( pre.prename_desc , mb.memb_name , '  ' , mb.memb_surname ) as mbname  ,
                        ftreadbaht( IFNULL ( sl.payout_amt,0) ) as payoutamt_thai , sl.slip_date  ,
                        ft_cnvtdatethai(sl.slip_date , 0) as slip_thaidate ,
                        cm.coop_name  , concat( cm.addr_no ,'  หมู่ ' , cm.addr_moo , '  ต.' , cm.addr_tambol , '  อ.'  , cm.addr_amphur, '   จ.' , cm.addr_province ,' ' , cm.addr_postcode  ,'  โทร '  ,  cm.addr_phone   ) as addr_coop
                       from slslippayout  sl 
		                    left join lncontmaster ln  on sl.loancontract_no = ln.loancontract_no
		                    left join mbmembmaster mb on sl.member_no = mb.member_no 
		                    left join mbucfprename pre on  mb.prename_code = pre.prename_code
		                    left join lnloantype lntype on lntype.loantype_code = ln.loantype_code  
		                    left join cmcoopmaster cm on cm.coop_id = sl.coop_id  
                        where sl.payoutslip_no = '" + payinslip_no + @"' ";
                

            
            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
           // Printing.PrintAppletPB(page, "loan_slip_payout", data);
            if (ip == "192.168.0.143") //fin_old
            {
                Printing.PrintAppletPB(page, "loan_slip_payout_fin", data);
            }
            else if (ip == "192.168.0.201") //golf
            {
                Printing.PrintAppletPB(page, "loan_slip_payout_golf", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "loan_slip_payout", data);
            }

        }

        public static void PrintHeadLoanSri(PageWeb page, string payinslip_no, string coop_id, string ip)
        {
             
                string sql = @"select l.contcount,l.contcount_end,l.expirecont_date,l.loancontract_no as l1,l.loancontract_no as l2,l.startcont_date as startcont_date,
 l.loanapprove_amt,lntype.loangroup_code 
,
 ifnull((select loanobjective_desc from (select 1 as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =1),'')  as obj2,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =2),'')  as obj1,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' ) ) a where a.dd =3),'')  as obj4,
ifnull((select loanobjective_desc from (select count(*) as dd, trim( loanobjective_desc)  as loanobjective_desc from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =4),'')  as obj5,
ifnull((select concat( 'ชำระค่าหุ้น  '   , format(clrother_amt,0))   as objective_amt from lnreqloanclrother where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"') and clrother_desc is not null ),'') as obj3,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=1 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll1,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=2 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll2,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=3 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll3,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=4 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll4,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=5 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll5,
(select  case when lncontcoll.loancolltype_code ='03' then concat( lncollmaster.collmast_no  ,' เนื้อที่ ' , format(size_rai,0) ,'-',format(size_ngan,0) , '-', format(size_wa,0) , ' ตรว. ' , format(mortgage_price,0) , '.-')
else concat(ref_collno,'  ', DESCRIPTION) end     from lncontcoll left join lncollmaster on   lncontcoll.ref_collno = lncollmaster.collmast_no where seq_no=6 and lncontcoll.loancontract_no='" + payinslip_no + @"') as coll6,
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as PERIOD_PAYMENT1,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as PERIOD_PAYMENT2,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as PERIOD_PAYMENT3,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as PERIOD_PAYMENT4,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as PERIOD_PAYMENT5,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as PERIOD_PAYMENT6,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as PERIOD_PAYMENT7,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as PERIOD_PAYMENT8,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as PERIOD_PAYMENT9,  
(select  LNCONTPERIODPAYDET.PERIOD_PAYMENT   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as PERIOD_PAYMENT10 ,  

(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=1)as EXPIREPERIOD_DATE1,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=2)as EXPIREPERIOD_DATE2,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=3)as EXPIREPERIOD_DATE3,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=4)as EXPIREPERIOD_DATE4,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=5)as EXPIREPERIOD_DATE5,  
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=6)as EXPIREPERIOD_DATE6,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=7)as EXPIREPERIOD_DATE7,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=8)as EXPIREPERIOD_DATE8,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=9)as EXPIREPERIOD_DATE9,
(select   ft_cnvtdate( LNCONTPERIODPAYDET.EXPIREPERIOD_DATE,1)   FROM LNCONTPERIODPAYDET  
where   LNCONTPERIODPAYDET.LOANCONTRACT_NO = '" + payinslip_no + @"'  and period=10)as EXPIREPERIOD_DATE10
 , ifnull((select objective_amt from (select 1 as dd, objective_amt  as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"')) a where a.dd =1),'')  as obj2_amt,
ifnull((select objective_amt from (select count(*) as dd, format(objective_amt,0)    as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =2),'')  as obj1_amt,
ifnull((select objective_amt from (select count(*) as dd,format(objective_amt,0) as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' ) ) a where a.dd =3),'')  as obj4_amt,
ifnull((select objective_amt from (select count(*) as dd,format(objective_amt,0)  as objective_amt from lncontobjective  where loanrequest_docno = (select loanrequest_docno from lncontmaster where loancontract_no='" + payinslip_no + @"' )) a where a.dd =4),'')  as obj5_amt,
concat(mbucfprename.prename_desc,mbmembmaster.memb_name,'  ',mbmembmaster.memb_surname) as membname
 from lncontmaster l  
left join lnloantype lntype on lntype.loantype_code= l.loantype_code  inner join mbmembmaster on mbmembmaster.member_no = l.member_no 
 inner join mbucfprename on mbmembmaster.prename_code = mbucfprename.prename_code
 where loancontract_no= '" + payinslip_no + @"' ";


                DataTable data = WebUtil.Query(sql);
                // Printing.PrintAppletPB(page, "RECEIPT", data);
               // Printing.PrintAppletPB(page, "loan_headbook", data);
                if (ip == "192.168.0.143") //fin_old
                {
                    Printing.PrintAppletPB(page, "loan_headbook_fin", data);
                }
                else if (ip == "192.168.0.201") //golf
                {
                    Printing.PrintAppletPB(page, "loan_headbook_golf", data);
                }
                else
                {
                    Printing.PrintAppletPB(page, "loan_headbook", data);
                }
             

        }







        public static void PrintSlipPaySKMUAOut(PageWeb page, string payinslip_no, string payoutslip_no, string coop_id)
        {
            string sql = "";

            if (Sta.IS_MYSQL_MODE)
            {

                sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,
(select payout_amt from slslippayout where payoutslip_no = '" + payoutslip_no + "') as principal_balance ," +
    @" s.loancontract_no as loancontract_no,
 concat(pre.PRENAME_DESC, mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
 concat(  trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr
,
 DATE_FORMAT(DATE_ADD(pin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y')  as date_thai,loantype.loangroup_code as loangroup_code
 from slsslip_desc s left join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
left join lnloantype loantype on loantype.loantype_code = ln.loantype_code left join  slslippayin pin on  trim(s.payinslip_no) = trim(pin.payinslip_no)
 inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE
where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "'  order by ordernumber  ";




            }
            else
            {
                Sdt d = WebUtil.QuerySdt("select * from paprintingmaster where printing_name='payinfrompayout' and datawindow='r_sl_slippayin_skmua_frompayout_nmn'");
                if (d.Next())
                {  //สกก.นาหมื่น
                    sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,	pin.slip_amt as principal_balance ,
 ln.loancontract_no as loancontract_no,
pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
trim(mas.addr_no) ||' '||' หมู่ '||trim(mas.addr_moo) ||' '||'ต.'||trim(mas.t_tambol) ||' อ.'||trim(mas.t_amphur) || ' จ.'||trim(mas.t_province) ||' '||trim(mas.addr_postcode) as addr
,
 ft_cnvtdate(pin.slip_date,3) date_thai,slslippayout.payout_amt ,slslippayout.payoutnet_amt as payoutnet_amt
 from slsslip_desc s left join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
left join lnloantype loantype on loantype.loantype_code = ln.loantype_code left join  slslippayin pin on  trim(s.payinslip_no) = trim(pin.payinslip_no)
 inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE left join slslippayout on
slslippayout.loancontract_no =  ln.loancontract_no
where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "' and ordernumber >1 order by ordernumber  ";

                }
                else
                {  //สกก.ศรีสะเกษ
                    sql = @"select    pin.PAYINSLIP_NO as PAYINSLIP_NO,  pin.document_no as document_no,pin.member_no as member_no,
(select payout_amt from slslippayout where payoutslip_no = '" + payoutslip_no + "') as principal_balance ," +
    @" s.loancontract_no as loancontract_no,
pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,s.slip_desc as slip_desc ,s.payment as payment,loantype.loantype_code as loantype_code, trim(mas.membgroup_code)  as memgroup,
trim(mas.addr_no) ||' '||' หมู่ '||trim(mas.addr_moo) ||' '||'ต.'||trim(mas.t_tambol) ||' อ.'||trim(mas.t_amphur) || ' จ.'||trim(mas.t_province) ||' '||trim(mas.addr_postcode) as addr
,
 ft_cnvtdate(pin.slip_date,3) date_thai,loantype.loangroup_code as loangroup_code
 from slsslip_desc s left join lncontmaster ln on  s.loancontract_no= ln.loancontract_no
left join lnloantype loantype on loantype.loantype_code = ln.loantype_code left join  slslippayin pin on  trim(s.payinslip_no) = trim(pin.payinslip_no)
 inner join mbmembmaster mas on  mas.MEMBER_NO = pin.MEMBER_NO inner join MBUCFPRENAME pre on
mas.PRENAME_CODE = pre.PRENAME_CODE inner join MBUCFMEMBGROUP mgrp on mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE
where pin.PAYINSLIP_NO = '" + payinslip_no + "' and pin.coop_id = '" + coop_id + "'  order by ordernumber  ";

                }
            }
            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "payinfrompayout", data);

        }
        public static void PrintSlipBuyshareSKMUA(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";
            if (Sta.IS_MYSQL_MODE)
            {
                sql = @"select slslippayin.document_no, slslippayin.member_no, slslippayindet.slipitem_desc
                        ,slslippayindet.item_payamt, slslippayin.document_no 
                        ,DATE_FORMAT(DATE_ADD(slslippayin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y') as date_thai ,ls.sharestk_amt
                        ,concat(  mbucfprename.PRENAME_DESC , mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,
                        mas.membgroup_code,concat( trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,
                        ' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr,
                        ftreadbaht(slslippayindet.item_payamt) as bthai 
                        from slslippayin,slslippayindet,mbucfprename,mbmembmaster mas,shsharestatement ls
                        where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                        slslippayin.member_no = mas.member_no and
                        mas.prename_code = mbucfprename.prename_code and
                        ls.ref_slipno = slslippayin.payinslip_no and
                        slslippayin.PAYINSLIP_NO = '" + payinslip_no + "' and slslippayin.coop_id = '" + coop_id + "' and (slslippayindet.slipitemtype_code='SHR' or slslippayindet.slipitemtype_code='FEE')    ";
            }
            else
            {
                sql = @"select slslippayin.document_no,slslippayin.member_no,slslippayindet.slipitem_desc
,slslippayindet.item_payamt
,slslippayin.document_no,   ft_cnvtdate(slslippayin.slip_date,3) date_thai ,ls.sharestk_amt
,mbucfprename.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,
mas.membgroup_code,trim(mas.addr_no) ||' '||' หมู่ '||trim(mas.addr_moo) ||' '||'ต.'||trim(mas.t_tambol) ||
' อ.'||trim(mas.t_amphur) || ' จ.'||trim(mas.t_province) ||' '||trim(mas.addr_postcode) as addr,
FTREADTBAHT(slslippayindet.item_payamt) as bthai,ft_cnvtdate(slslippayin.slip_date,3) date_thai
  from slslippayin,slslippayindet,mbucfprename,mbmembmaster mas,shsharestatement ls
where slslippayin.payinslip_no = slslippayindet.payinslip_no and
slslippayin.member_no = mas.member_no and
mas.prename_code = mbucfprename.prename_code and
ls.ref_slipno = slslippayin.payinslip_no and

slslippayin.PAYINSLIP_NO = '" + payinslip_no + "' and slslippayin.coop_id = '" + coop_id + "' and (slslippayindet.slipitemtype_code='SHR' or slslippayindet.slipitemtype_code='FEE')    ";
            }

            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "RECEIPT2", data);

        }

        public static void PrintSlipEtc_SKMUA(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";
            if (Sta.IS_MYSQL_MODE)
            {
                sql = @"select slslippayin.document_no, slslippayin.member_no, slslippayindet.slipitem_desc
                        ,slslippayindet.item_payamt, slslippayin.document_no 
                        ,DATE_FORMAT(DATE_ADD(slslippayin.slip_date, INTERVAL 543 YEAR), '%d/%m/%Y') as date_thai ,ls.sharestk_amt
                        ,concat(  mbucfprename.PRENAME_DESC , mas.MEMB_NAME , ' ' , mas.MEMB_SURNAME) AS FULLNAME,
                        mas.membgroup_code,concat( trim(ifnull(mas.addr_no,'-')) ,' ',' หมู่ ',trim(ifnull(mas.addr_moo,'-')) ,' ','ต.',trim(mas.t_tambol) ,
                        ' อ.',trim(mas.t_amphur) , ' จ.',trim(mas.t_province) ,' ',trim(mas.addr_postcode)) as addr,
                        ftreadbaht(slslippayindet.item_payamt) as bthai 
                        from slslippayindet,mbucfprename,mbmembmaster mas ,slslippayin  left join shsharestatement ls on
 					 ls.ref_slipno = slslippayin.payinslip_no
                        where slslippayin.payinslip_no = slslippayindet.payinslip_no and
                        slslippayin.member_no = mas.member_no and
                        mas.prename_code = mbucfprename.prename_code and                       
                        slslippayin.PAYINSLIP_NO = '" + payinslip_no + "' and slslippayin.coop_id = '" + coop_id + "'    ";
            }
            else
            {
                sql = @"select slslippayin.document_no,slslippayin.member_no,slslippayindet.slipitem_desc,slslippayindet.item_payamt
,slslippayin.document_no,   ft_cnvtdate(slslippayin.slip_date,3) date_thai  
,mbucfprename.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,
mas.membgroup_code,trim(mas.addr_no) ||' '||' หมู่ '||trim(mas.addr_moo) ||' '||'ต.'||trim(mas.t_tambol) ||' อ.'||trim(mas.t_amphur) || ' จ.'||trim(mas.t_province) ||' '||trim(mas.addr_postcode) as addr,
FTREADTBAHT(slslippayindet.item_payamt) as bthai,ft_cnvtdate(slslippayin.slip_date,3) date_thai
  from slslippayin,slslippayindet,mbucfprename,mbmembmaster mas 
where slslippayin.payinslip_no = slslippayindet.payinslip_no and
slslippayin.member_no = mas.member_no and
mas.prename_code = mbucfprename.prename_code  and 
slslippayin.PAYINSLIP_NO = '" + payinslip_no + "' and slslippayin.coop_id = '" + coop_id + "' and (slslippayindet.slipitemtype_code='ETC' or slslippayindet.slipitemtype_code='FEE' or slslippayindet.slipitemtype_code='FSV')    ";

            }
            DataTable data = WebUtil.Query(sql);
            // Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "slip_etc", data);

        }

        public static void PrintHead_SKMUA(PageWeb page, string loancontract_no, string coop_id)
        {
            string sql = @"select l.loancontract_no,l.startcont_date as startcont_date,l.loanapprove_amt,lntype.loangroup_code,mb.member_no,mb.memb_name,mb.memb_surname
 from lncontmaster l left join mbmembmaster mb on l.member_no= mb.member_no
left join lnloantype lntype on lntype.loantype_code= l.loantype_code where l.loancontract_no = '" + loancontract_no + "' and l.coop_id='" + coop_id + "' ";


            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "RECEIPT", data);
            Printing.PrintAppletPB(page, "bookhead", loancontract_no);

        }

        public static void PrintHead_CardShare(PageWeb page, string member_no, string coop_id)
        {
            string sql = "";
            if (Sta.IS_MYSQL_MODE)
            {
                sql = @"    SELECT  MBMEMBMASTER.MEMBER_NO ,          concat( MBUCFPRENAME.PRENAME_DESC, MBMEMBMASTER.MEMB_NAME ,'   ', MBMEMBMASTER.MEMB_SURNAME ) as mem_name,  
         MBMEMBMASTER.MEMBER_DATE ,           MBMEMBMASTER.BIRTH_DATE ,           MBMEMBMASTER.MATE_NAME ,          MBMEMBMASTER.addr_no,   MBMEMBMASTER.addr_moo,        
                 MBMEMBMASTER.ADDR_ROAD ,           MBMEMBMASTER.T_TAMBOL ,  
                MBMEMBMASTER.addr_postcode ,           MBMEMBMASTER.PROVINCE_CODE ,      MBMEMBMASTER.addr_phone   ,      MBMEMBMASTER.addr_village, MBMEMBMASTER.addr_soi,
      MBMEMBMASTER.T_PROVINCE ,           MBMEMBMASTER.T_AMPHUR,           MBMEMBMASTER.POSITION_DESC ,           MBMEMBMASTER.MEMBGROUP_CODE ,     
      MBUCFMEMBGROUP.MEMBGROUP_DESC , CMCOOPMASTER.coop_name as coop_name
, (CMCOOPMASTER.addr_no || ' หมู่ '||CMCOOPMASTER.addr_moo || ' ถ.'|| CMCOOPMASTER.addr_road ||' ต.'||
CMCOOPMASTER.addr_tambol ||' อ.'||CMCOOPMASTER.addr_amphur ||'  จ.'|| CMCOOPMASTER.addr_province  || ' '||
CMCOOPMASTER.addr_postcode ) as addr_cm ,mate_name,card_person
    FROM MBMEMBMASTER ,           MBUCFPRENAME ,           
      MBUCFMEMBGROUP ,CMCOOPMASTER    WHERE            ( MBUCFPRENAME.PRENAME_CODE = MBMEMBMASTER.PRENAME_CODE ) and      
   
       ( MBMEMBMASTER.MEMBGROUP_CODE = MBUCFMEMBGROUP.MEMBGROUP_CODE ) and          ( ( MBMEMBMASTER.MEMBER_NO = '" + member_no + "' )) and MBMEMBMASTER.coop_id='" + coop_id + "' ";

            }
            else
            {
                sql = @"  SELECT  SHSHAREMASTER.MEMBER_NO ,           ( MBUCFPRENAME.PRENAME_DESC || MBMEMBMASTER.MEMB_NAME ||'   '|| MBMEMBMASTER.MEMB_SURNAME ) as mem_name,  
         MBMEMBMASTER.MEMBER_DATE ,           MBMEMBMASTER.BIRTH_DATE ,           MBMEMBMASTER.MATE_NAME ,          MBMEMBMASTER.addr_no,   MBMEMBMASTER.addr_moo,        
                 MBMEMBMASTER.ADDR_ROAD ,           MBMEMBMASTER.T_TAMBOL ,  
                MBMEMBMASTER.addr_postcode ,           MBMEMBMASTER.PROVINCE_CODE ,      MBMEMBMASTER.addr_phone   ,      MBMEMBMASTER.addr_village, MBMEMBMASTER.addr_soi,
      MBMEMBMASTER.T_PROVINCE ,           MBMEMBMASTER.T_AMPHUR,           MBMEMBMASTER.POSITION_DESC ,           MBMEMBMASTER.MEMBGROUP_CODE ,     
      MBUCFMEMBGROUP.MEMBGROUP_DESC , CMCOOPMASTER.coop_name as coop_name
, (CMCOOPMASTER.addr_no || ' หมู่ '||CMCOOPMASTER.addr_moo || ' ถ.'|| CMCOOPMASTER.addr_road ||' ต.'||
CMCOOPMASTER.addr_tambol ||' อ.'||CMCOOPMASTER.addr_amphur ||'  จ.'|| CMCOOPMASTER.addr_province  || ' '||
CMCOOPMASTER.addr_postcode ) as addr_cm      FROM MBMEMBMASTER ,           MBUCFPRENAME ,           SHSHAREMASTER ,         
      MBUCFMEMBGROUP ,CMCOOPMASTER    WHERE            ( MBUCFPRENAME.PRENAME_CODE = MBMEMBMASTER.PRENAME_CODE ) and      
    ( SHSHAREMASTER.MEMBER_NO = MBMEMBMASTER.MEMBER_NO ) and          ( SHSHAREMASTER.COOP_ID = MBMEMBMASTER.COOP_ID ) and   
       ( MBMEMBMASTER.MEMBGROUP_CODE = MBUCFMEMBGROUP.MEMBGROUP_CODE ) and          ( ( SHSHAREMASTER.MEMBER_NO = '" + member_no + "' ) ) and MBMEMBMASTER.coop_id='" + coop_id + "' ";
            }



            sql = WebUtil.SQLFormat(sql, member_no, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "bookheadcardshare", data);
        }

        public static void PrintHead_CardDept(PageWeb page, string member_no, string coop_id)
        {
            string sql = @"    SELECT DPDEPTMASTER.DEPTACCOUNT_NO,SUBSTR( DPDEPTMASTER.DEPTACCOUNT_NO, 1, 3)||'-'||SUBSTR(DPDEPTMASTER.DEPTACCOUNT_NO, 4, 1)
||'-'||SUBSTR(DPDEPTMASTER.DEPTACCOUNT_NO, 5, 10) as deptaccount_no2,   
         DPDEPTMASTER.MEMBER_NO,   
         DPDEPTMASTER.DEPTOPEN_DATE,   
         DPDEPTMASTER.DEPTACCOUNT_NAME,   
         DPDEPTMASTER.DEPTPASSBOOK_NO,   
         DPDEPTMASTER.DEPT_OBJECTIVE,   
         DPDEPTMASTER.CONDFORWITHDRAW,   
         DPDEPTTYPE.DEPTTYPE_DESC  ,   MBUCFMEMBGROUP.MEMBGROUP_DESC,
          MBMEMBMASTER.addr_no,   MBMEMBMASTER.addr_moo,        
                 MBMEMBMASTER.ADDR_ROAD ,           MBMEMBMASTER.T_TAMBOL ,  
                MBMEMBMASTER.addr_postcode ,           MBMEMBMASTER.PROVINCE_CODE ,      MBMEMBMASTER.addr_phone   ,      MBMEMBMASTER.addr_village, MBMEMBMASTER.addr_soi,
      MBMEMBMASTER.T_PROVINCE ,           MBMEMBMASTER.T_AMPHUR,              MBMEMBMASTER.MEMBGROUP_CODE , CMCOOPMASTER.coop_name
, (CMCOOPMASTER.addr_no || ' หมู่ '||CMCOOPMASTER.addr_moo || ' ถ.'|| CMCOOPMASTER.addr_road ||' ต.'||
CMCOOPMASTER.addr_tambol ||' อ.'||CMCOOPMASTER.addr_amphur ||'  จ.'|| CMCOOPMASTER.addr_province  || ' '||
CMCOOPMASTER.addr_postcode ) as addr_cm  
    FROM  DPDEPTTYPE,    CMCOOPMASTER,DPDEPTMASTER left join
         MBMEMBMASTER on DPDEPTMASTER.MEMBER_NO =  MBMEMBMASTER.MEMBER_NO 
left join    MBUCFMEMBGROUP  on  MBMEMBMASTER.MEMBGROUP_CODE =    MBUCFMEMBGROUP.MEMBGROUP_CODE  
where  
   DPDEPTMASTER.DEPTTYPE_CODE =    DPDEPTTYPE.DEPTTYPE_CODE   
      and   ( ( DPDEPTMASTER.DEPTACCOUNT_NO = '" + member_no + "' ) ) and DPDEPTMASTER.coop_id='" + coop_id + "' ";

            sql = WebUtil.SQLFormat(sql, member_no, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "bookheadcarddept", data);
        }


        public static void PrintSlipSlpayin(PageWeb page, string payinslip_no, string coop_id)
        {

            if (Sta.IS_MYSQL_MODE)  // mysql
            {

                string sql = @"select si.member_no ,
                    CONCAT(CONCAT(CONCAT( mp.PRENAME_DESC , mb.MEMB_NAME ) , '   ' ) , mb.MEMB_SURNAME  )as mem_name ,
                    mb.membgroup_code,
                    mg.membgroup_desc,
                     '' as slip_date ,
                    si.payinslip_no,
                    LNLOANTYPE.LOANTYPE_DESC,
                    sid.LOANCONTRACT_NO,
                    IFNULL(sid.PRINCIPAL_PAYAMT,0) as PRINCIPAL_PAYAMT,
                    IFNULL(sid.INTEREST_PAYAMT,0) as INTEREST_PAYAMT , 
                    IFNULL(sid.INTEREST_PERIOD,0) as INTEREST_PERIOD,
                    IFNULL(sid.ITEM_PAYAMT,0) as ITEM_PAYAMT , 
                    IFNULL(sid.ITEM_BALANCE,0) as ITEM_BALANCE,
                    sid.CALINT_FROM, 
                    IFNULL(sid.FINE_PERIOD,0) as FINE_PERIOD ,
                     ls.calint_from,ls.calint_to, 
                    IFNULL(ls.fineyear_arrear,0) as fineyear_arrear ,
                    IFNULL(ls.bffineyear_amt ,0) as bffineyear_amt ,
                    IFNULL(ls.fine_arrear,0) as fine_arrear ,
                     IFNULL(ls.bffine_arrear,0) as bffine_arrear,
                     IFNULL(ls.fine_period ,0) as fine_period  ,
                     IFNULL(ls.bffine_preiod,0) as bffine_preiod ,
                    ftreadbaht(sid.ITEM_PAYAMT)  as pthai ,
                     IFNULL(ls.bfintyeararr_amt,0) as bfintyeararr_amt , 
                    IFNULL(sid.inyear_arrear,0) as inyear_arrear ,
                     IFNULL(ls.bfinterest_arrear,0) as bfinterest_arrear ,
                    IFNULL(sid.intarrear_payamt,0) as interest_arrear ,
                    IFNULL(ls.bfint_preiod,0) as bfint_preiod ,
                    (IFNULL(sid.INTEREST_PERIOD,0)  + IFNULL(sid.intarrear_payamt,0)) as interest_pay ,
                     ( IFNULL(ls.bfint_preiod,0) )-(IFNULL(sid.INTEREST_PERIOD,0)  + IFNULL(sid.intarrear_payamt,0)) as interest_balance

                    from  slslippayin si ,slslippayindet sid,mbmembmaster mb,mbucfprename mp,mbucfmembgroup mg,lnloantype ,lncontmaster,lncontstatement ls

                    where  si.coop_id = {1} and si.payinslip_no ={0} and
                    si.payinslip_no = sid.payinslip_no
                    and si.coop_id = sid.coop_id
                    and si.member_no=mb.member_no
                    and si.coop_id=mb.coop_id
                    and mb.prename_code=mp.prename_code
                    and mb.membgroup_code = mg.membgroup_code
                    and sid.LOANCONTRACT_NO= lncontmaster.loancontract_no
                    and lncontmaster.loancontract_no = ls.loancontract_no
                    and sid.payinslip_no = ls.ref_slipno
                    and mb.coop_id = mg.coop_id and
                    sid.SLIPITEMTYPE_CODE='LON' and
                    lnloantype.LOANTYPE_CODE= sid.SHRLONTYPE_CODE

                    group by si.member_no ,
                    mp.prename_desc,
                    mb.memb_name,
                    mb.memb_surname ,
                    mb.membgroup_code,mg.membgroup_desc,
                    si.slip_date ,si.payinslip_no,LNLOANTYPE.LOANTYPE_DESC,sid.LOANCONTRACT_NO,sid.PRINCIPAL_PAYAMT
                    ,sid.INTEREST_PAYAMT,sid.INTEREST_PERIOD
                    ,sid.ITEM_PAYAMT,sid.ITEM_BALANCE
                    ,sid.CALINT_FROM,sid.FINE_PERIOD, ls.calint_from,ls.calint_to,ls.fineyear_arrear,ls.bffineyear_amt,ls.fine_arrear,ls.bffine_arrear,ls.fine_period,ls.bffine_preiod,
                    ls.bfintyeararr_amt , sid.inyear_arrear , ls.bfinterest_arrear ,sid.intarrear_payamt ,ls.bfint_preiod
                    ";
                sql = WebUtil.SQLFormat(sql, payinslip_no, coop_id);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, "RECEIPT", data);//
            }
            else // oracle
            {

                string sql = @"select si.member_no ,
               ( mp.PRENAME_DESC || mb.MEMB_NAME || '   ' || mb.MEMB_SURNAME  )as mem_name ,
mb.membgroup_code,mg.membgroup_desc,
 ft_cnvtdate(si.slip_date,3)as slip_date ,si.payinslip_no
,LNLOANTYPE.LOANTYPE_DESC,sid.LOANCONTRACT_NO,
NVL(sid.PRINCIPAL_PAYAMT,0) as PRINCIPAL_PAYAMT
,NVL(sid.INTEREST_PAYAMT,0) as INTEREST_PAYAMT , NVL(sid.INTEREST_PERIOD,0) as INTEREST_PERIOD
, NVL(sid.ITEM_PAYAMT,0) as ITEM_PAYAMT , NVL(sid.ITEM_BALANCE,0) as ITEM_BALANCE
,sid.CALINT_FROM as int_date, NVL(sid.FINE_PERIOD,0) as FINE_PERIOD , ls.calint_from,ls.calint_to, NVL(ls.fineyear_arrear,0) as fineyear_arrear , NVL(ls.bffineyear_amt ,0) as bffineyear_amt ,NVL(ls.fine_arrear,0) as fine_arrear ,
 NVL(ls.bffine_arrear,0) as bffine_arrear, NVL(ls.fine_period ,0) as fine_period  , NVL(ls.bffine_preiod,0) as bffine_preiod ,FTREADTBAHT(ITEM_PAYAMT) as pthai ,
 NVL(ls.bfintyeararr_amt,0) as bfintyeararr_amt , NVL(sid.inyear_arrear,0) as inyear_arrear , NVL(ls.bfinterest_arrear,0) as bfinterest_arrear ,NVL(sid.intarrear_payamt,0) as interest_arrear 
,NVL(ls.bfint_preiod,0) as bfint_preiod ,(NVL(sid.INTEREST_PERIOD,0)  + NVL(sid.intarrear_payamt,0)) as interest_pay ,
  ( NVL(ls.bfint_preiod,0)+NVL(ls.bfinterest_arrear,0) )-(NVL(sid.INTEREST_PERIOD,0)  + NVL(ls.interest_arrear,0)) as interest_balance
                from  slslippayin si ,slslippayindet sid,mbmembmaster mb,mbucfprename mp,mbucfmembgroup mg,lnloantype ,lncontmaster,lncontstatement ls

                where  si.coop_id = {1} and si.payinslip_no ={0} and
                si.payinslip_no = sid.payinslip_no
                and si.coop_id = sid.coop_id
                and si.member_no=mb.member_no
                and si.coop_id=mb.coop_id
                and mb.prename_code=mp.prename_code
                and mb.membgroup_code = mg.membgroup_code
                and sid.LOANCONTRACT_NO= lncontmaster.loancontract_no
                and lncontmaster.loancontract_no = ls.loancontract_no
                 and sid.payinslip_no = ls.ref_slipno
                and mb.coop_id = mg.coop_id and
                sid.SLIPITEMTYPE_CODE='LON' and
                lnloantype.LOANTYPE_CODE= sid.SHRLONTYPE_CODE

               group by si.member_no ,
mp.prename_desc,ls.interest_arrear,
mb.memb_name,
mb.memb_surname ,
mb.membgroup_code,mg.membgroup_desc,
si.slip_date ,si.payinslip_no,LNLOANTYPE.LOANTYPE_DESC,sid.LOANCONTRACT_NO,sid.PRINCIPAL_PAYAMT
,sid.INTEREST_PAYAMT,sid.INTEREST_PERIOD
,sid.ITEM_PAYAMT,sid.ITEM_BALANCE
,sid.CALINT_FROM,sid.FINE_PERIOD, ls.calint_from,ls.calint_to,ls.fineyear_arrear,ls.bffineyear_amt,ls.fine_arrear,ls.bffine_arrear,ls.fine_period,ls.bffine_preiod,
ls.bfintyeararr_amt , sid.inyear_arrear , ls.bfinterest_arrear ,sid.intarrear_payamt ,ls.bfint_preiod,ls.bfintarrear_amt
                    ";
                sql = WebUtil.SQLFormat(sql, payinslip_no, coop_id);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, "RECEIPT", data);
            }

        }
        public static void PrintSlipSlpayinJS(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = @"select
                    a.payinslip_no,
                    a.member_no,
                    a.sliptype_code,
                    a.moneytype_code,
                    a.document_no,
                    a.slip_date,
                    a.operate_date,
                    a.sharestk_value,
                    a.intaccum_amt,
                    a.sharestkbf_value,
                    a.slip_amt,
                    a.slip_status,
                    a.entry_id,
                    a.entry_bycoopid,
                    a.ref_system,
                    b.slipitemtype_code,
                    b.shrlontype_code,
                    b.loancontract_no,
                    b.slipitem_desc,
                    b.period,
                    b.principal_payamt,
                    b.interest_payamt,
                    b.item_payamt,
                    ft_getmbaddr(c.coop_id, c.member_no, 1) as memaddr,
			        ft_getgrpaddr(a.coop_id, a.membgroup_code, 1) as grpaddr,
			        e.printreceiptaddr_type,
                    b.item_balance,
                    b.calint_to,
                    d.prename_desc||c.memb_name||'  '||c.memb_surname as member_name,
                    a.membgroup_code,
                    e.membgroup_desc,	
                    c.membtype_code,			    
                    c.retry_status,
                    f.membtype_desc,
                    g.receipt_remark1 as remark_line1,
                    g.receipt_remark2 as remark_line2,
                    ft_readtbaht( a.slip_amt ) AS  money_thaibaht 
                    from	slslippayin a, slslippayindet b, mbmembmaster c, mbucfprename d, mbucfmembgroup e, mbucfmembtype f, cmcoopmaster g 
                    where	a.coop_id = '" + coop_id + @"'
                    and		a.payinslip_no = '" + payinslip_no + @"'
                    and     a.coop_id		    = b.coop_id
                    and		a.payinslip_no	    = b.payinslip_no
                    and		a.memcoop_id	    = c.coop_id
                    and		a.member_no			= c.member_no
                    and		c.prename_code		= d.prename_code (+)
                    and		a.memcoop_id	    = e.coop_id (+)
                    and		a.membgroup_code	= e.membgroup_code (+)
                    and		c.coop_id		    = f.coop_id (+)
                    and		c.membtype_code		= f.membtype_code (+)
                    and		a.coop_id		    = g.coop_id
                    ";
            DataTable data = WebUtil.Query(sql);
            Printing.PrintApplet(page, "RECEIPT", data);

        }

        public static void printbookMbshr(PageWeb page, string print_date_pk, string xml)
        {
            /*
            string sql = @"select * from  mbshrlonprintbook where member_no='" + member_no + @"' 
                    and print_date_pk='" + print_date_pk + "' order by order_no asc ";
            DataTable data = WebUtil.Query(sql);
            //Printing.PrintApplet(page, "mbshr_printbook", data)
             */
            Printing.PrintApplet(page, "mbshr_printbook", xml);
        }

        public static void RePrintSlipSlpayin(PageWeb page, string payinslip_no, string coop_id)
        {
            String check_slip = " select slipitemtype_code from slslippayindet where payinslip_no = '" + payinslip_no + "' and coop_id = '" + coop_id + "' ";
            check_slip = WebUtil.SQLFormat(check_slip);
            Sdt d = WebUtil.QuerySdt(check_slip);
            while (d.Next())
            {

                if (d.GetString("slipitemtype_code") == "LON")
                {
                    Printing.PrintSlipSlpayin(page, payinslip_no, coop_id);
                }
                else
                {

                    Printing.PrintSlipSlpayinBuyshare(page, payinslip_no, coop_id);

                }
            }
        }
        public static void RePrintSlipSlpayinJS(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = @"select
                    a.payinslip_no,
                    a.member_no,
                    a.sliptype_code,
                    a.moneytype_code,
                    a.document_no,
                    a.slip_date,
                    a.operate_date,
                    a.sharestk_value as sharestk_value ,
                    a.intaccum_amt as intaccum_amt,
                    a.sharestkbf_value,
                    a.slip_amt as slip_amt,
                    a.slip_status,
                    a.entry_id,
                    a.entry_bycoopid,
                    a.ref_system,
                    b.slipitemtype_code,
                    b.shrlontype_code,
                    b.loancontract_no,
                    b.slipitem_desc,
                    b.period,
                    b.principal_payamt,
                    b.interest_payamt,
                    b.item_payamt,
                    ft_getmbaddr(c.coop_id, c.member_no, 1) as memaddr,
		            ft_getgrpaddr(a.coop_id, a.membgroup_code, 1) as grpaddr,
		            e.printreceiptaddr_type,
                    b.item_balance,
                    b.calint_to,
                    d.prename_desc||c.memb_name||'  '||c.memb_surname as member_name,
                    a.membgroup_code,
                    e.membgroup_desc,	
                    c.membtype_code,			    
                    c.retry_status,
                    f.membtype_desc,
                    g.receipt_remark1 as remark_line1,
                    g.receipt_remark2 as remark_line2,
                    ft_readtbaht( a.slip_amt ) AS  money_thaibaht 
                    from	slslippayin a, slslippayindet b, mbmembmaster c, mbucfprename d, mbucfmembgroup e, mbucfmembtype f, cmcoopmaster g 
                    where	a.coop_id = '" + coop_id + @"'
                    and		a.payinslip_no in (" + payinslip_no + @")
                    and     a.coop_id		    = b.coop_id
                    and		a.payinslip_no	    = b.payinslip_no
                    and		a.memcoop_id	    = c.coop_id
                    and		a.member_no			= c.member_no
                    and		c.prename_code		= d.prename_code (+)
                    and		a.memcoop_id	    = e.coop_id (+)
                    and		a.membgroup_code	= e.membgroup_code (+)
                    and		c.coop_id		    = f.coop_id (+)
                    and		c.membtype_code		= f.membtype_code (+)
                    and		a.coop_id		    = g.coop_id
                    ";
            DataTable data = WebUtil.Query(sql);
            Printing.PrintApplet(page, "RECEIPT", data);
        }
        public static void SlipNoPrintSlipSlpayin(PageWeb page, string spayinslip_no, string epayinslip_no, string coop_id)
        {

            string sql = @"select
                    a.payinslip_no,
                    a.member_no,
                    a.sliptype_code,
                    a.moneytype_code,
                    a.document_no,
                    a.slip_date,
                    a.operate_date,
                    a.sharestk_value,
                    a.intaccum_amt,
                    a.sharestkbf_value,
                    a.slip_amt,
                    a.slip_status,
                    a.entry_id,
                    a.entry_bycoopid,
                    b.slipitemtype_code,
                    b.shrlontype_code,
                    b.loancontract_no,
                    b.slipitem_desc,
                    b.period,
                    b.principal_payamt,
                    b.interest_payamt,
                    b.item_payamt,
                    c.addr_moo,
                    c.addr_soi,
                    c.addr_village,
                    c.addr_road,
                    j.province_code,
				    j.province_desc,
                    i.district_desc,
                    c.addr_postcode,
                    h.tambol_desc,
                    c.addr_no,
                    e.printreceiptaddr_type,
                    b.item_balance,
                    b.calint_to,
                    d.prename_desc||c.memb_name||'  '||c.memb_surname as member_name,
                    a.membgroup_code,
                    e.membgroup_desc,				    
                    c.membtype_code,
                    f.membtype_desc,
                    g.receipt_remark1 as remark_line1,
                    g.receipt_remark2 as remark_line2,
                    ftreadtbath( a.slip_amt ) AS  money_thaibaht 
                    from	slslippayin a, slslippayindet b, mbmembmaster c, mbucfprename d, mbucfmembgroup e, mbucfmembtype f, cmcoopmaster g, mbucftambol h, mbucfdistrict i, mbucfprovince j 
                    where	a.coop_id = '" + coop_id + @"'
                    and		a.payinslip_no between '" + spayinslip_no + "' and '" + epayinslip_no + @"'
                    and     a.coop_id		    = b.coop_id
                    and		a.payinslip_no	    = b.payinslip_no
                    and		a.memcoop_id	    = c.coop_id
                    and		a.member_no			= c.member_no
                    and		c.prename_code		= d.prename_code (+)
                    and		a.memcoop_id	    = e.coop_id (+)
                    and		a.membgroup_code	= e.membgroup_code (+)
                    and		c.coop_id		    = f.coop_id (+)
                    and		c.membtype_code		= f.membtype_code (+)
                    and		a.coop_id		    = g.coop_id
                    and		c.tambol_code	    = h.tambol_code (+)
                    and		c.amphur_code	    = i.district_code (+)
                    and		c.province_code		= j.province_code (+)
                    ";
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "RECEIPT", data);
        }

        public static void PrintSlippayoutPEA(PageWeb page, string payoutslip_no, string coop_id)
        {

            string sql = @"select
mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
trim(TO_CHAR( so.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI')) as slip_date ,
nvl(si.payinslip_no,'') as payinslip_no,
nvl(si.document_no,'') as document_no,
nvl(sum(sid.principal_payamt),0) as sum_princ,
nvl(sum(sid.interest_payamt),0) as sum_int,
sum(CASE sid.slipitemtype_code WHEN 'LON' THEN sid.item_payamt ELSE 0 end   ) as item_lon,
sum(CASE sid.slipitemtype_code WHEN 'MUT' THEN sid.item_payamt ELSE 0 end   ) as item_mut,
nvl((LN_SRV.OF_GETCONTCLR(so.payoutslip_no)),'') as list_cont,
nvl((LN_SRV.OF_GETCONTCLRDAY(so.payoutslip_no)),'') as list_contday,
am.full_name

from slslippayout so,slslippayin si ,slslippayindet sid,mbmembmaster mb ,mbucfprename mp,cmucfbank cb,amsecusers am
where so.payoutslip_no ={0}
and so.slipclear_no = si.payinslip_no(+)
and si.payinslip_no = sid.payinslip_no(+)
and so.coop_id = si.coop_id(+)
and so.member_no = si.member_no(+)
and si.coop_id = sid.coop_id (+)
and so.member_no = mb.member_no
and mb.prename_code = mp.prename_code
and so.expense_bank = cb.bank_code(+)
and so.entry_id=am.user_name
group by mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
so.slip_date,
si.payinslip_no,
si.document_no
,(LN_SRV.OF_GETCONTCLR(so.payoutslip_no))
,(LN_SRV.OF_GETCONTCLRDAY(so.payoutslip_no))
,am.full_name";

            sql = WebUtil.SQLFormat(sql, payoutslip_no);
            DataTable data = WebUtil.Query(sql);
            DataTable data2 = WebUtil.Query(sql);
            string shrlontype_code = "";
            foreach (DataRow row in data2.Rows)
            {
                shrlontype_code = row["shrlontype_code"].ToString();

            }


            if (shrlontype_code.Trim() == "10")
            {
                Printing.PrintAppletPB(page, "sl_slip_payout_emer", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "sl_slip_payout", data);
            }
        }

        public static void RePrintSlippayoutPEA(PageWeb page, string payoutslip_no, string coop_id)
        {

            string sql = @"select
mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
trim(TO_CHAR( so.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI')) as slip_date ,
nvl(si.payinslip_no,'') as payinslip_no,
nvl(si.document_no,'') as document_no,
nvl(sum(sid.principal_payamt),0) as sum_princ,
nvl(sum(sid.interest_payamt),0) as sum_int,
sum(CASE sid.slipitemtype_code WHEN 'LON' THEN sid.item_payamt ELSE 0 end   ) as item_lon,
sum(CASE sid.slipitemtype_code WHEN 'MUT' THEN sid.item_payamt ELSE 0 end   ) as item_mut,
nvl((LN_SRV.OF_GETCONTCLR(so.payoutslip_no)),'') as list_cont,
nvl((LN_SRV.OF_GETCONTCLRDAY(so.payoutslip_no)),'') as list_contday,
am.full_name

from slslippayout so,slslippayin si ,slslippayindet sid,mbmembmaster mb ,mbucfprename mp,cmucfbank cb,amsecusers am
where so.payoutslip_no in (" + payoutslip_no + @")
and so.slipclear_no = si.payinslip_no(+)
and si.payinslip_no = sid.payinslip_no(+)
and so.coop_id = si.coop_id(+)
and so.member_no = si.member_no(+)
and si.coop_id = sid.coop_id (+)
and so.member_no = mb.member_no
and mb.prename_code = mp.prename_code
and so.expense_bank = cb.bank_code(+)
and so.entry_id=am.user_name
group by mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
so.slip_date,
si.payinslip_no,
si.document_no
,(LN_SRV.OF_GETCONTCLR(so.payoutslip_no))
,(LN_SRV.OF_GETCONTCLRDAY(so.payoutslip_no))
,am.full_name";

            //sql = WebUtil.SQLFormat(sql, payoutslip_no);
            DataTable data = WebUtil.Query(sql);
            DataTable data2 = WebUtil.Query(sql);
            string shrlontype_code = "";
            foreach (DataRow row in data2.Rows)
            {
                shrlontype_code = row["shrlontype_code"].ToString();

            }


            if (shrlontype_code.Trim() == "10")
            {
                Printing.PrintAppletPB(page, "sl_slip_payout_emer", data);
            }
            else
            {
                Printing.PrintAppletPB(page, "sl_slip_payout", data);
            }
        }

        public static void PrintSlippayinPEA(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";
            sql = @"SELECT pin.PAYINSLIP_NO,
TO_CHAR( pin.SLIP_DATE, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as TSLIPDATE,
pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,
mas.MEMBER_NO,
mgrp.MEMBGROUP_DESC as memgroup,
pin.INTACCUM_AMT,
decode(pindet.slipitemtype_code,
'SHR','ซื้อหุ้นพิเศษ',
'LON','ชำระหนี้ '||nvl(pindet.loancontract_no,''),
'MUT',pindet.SLIPITEM_DESC,'') as slip_desc,
pindet.PERIOD,
pindet.PRINCIPAL_PAYAMT,
pindet.INTEREST_PAYAMT,
pindet.ITEM_PAYAMT,
decode(pindet.slipitemtype_code,'SHR',shr.sharestk_amt*10,pindet.ITEM_BALANCE) as ITEM_BALANCE,
pindet.Shrlontype_Code,
pin.slip_amt as sumitempay,
ftreadtbaht(pin.slip_amt) as tbaht,
SUBSTR( pin.document_no, 0 ,4 ) as  docno1,
SUBSTR( pin.document_no, 5 ,6 ) as docno2,
cm.office_finance,
cmt.moneytype_desc,
am.full_name

FROM
SLSLIPPAYIN pin,
MBMEMBMASTER mas,
SHSHAREMASTER shr,
MBUCFPRENAME pre,
SLSLIPPAYINDET pindet,
MBUCFMEMBGROUP mgrp,
cmcoopconstant cm,
cmucfmoneytype cmt,
amsecusers am

WHERE (mas.MEMBER_NO=shr.MEMBER_NO ) AND
( mas.MEMBER_NO = pin.MEMBER_NO ) AND
( mas.COOP_ID = pin.MEMCOOP_ID ) AND
( mas.PRENAME_CODE = pre.PRENAME_CODE ) AND
( mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE ) AND
( mas.COOP_ID = mgrp.COOP_ID ) AND
( pin.PAYINSLIP_NO = pindet.PAYINSLIP_NO ) AND
( pin.COOP_ID = pindet.COOP_ID ) AND
( ( pin.PAYINSLIP_NO = {0} ) AND
( pin.COOP_ID = {1}) ) and
mas.coop_id=cm.coop_no and 
cmt.moneytype_code = pin.moneytype_code and 
pin.entry_id = am.user_name
ORDER BY pindet.Shrlontype_Code
";
            sql = WebUtil.SQLFormat(sql, payinslip_no, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "sl_slip_payin", data);
        }

        public static void RePrintSlippayinPEA(PageWeb page, string payinslip_no, string coop_id)
        {
            string sql = "";
            sql = @"SELECT pin.PAYINSLIP_NO,
TO_CHAR( pin.SLIP_DATE, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as TSLIPDATE,
pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,
mas.MEMBER_NO,
mgrp.MEMBGROUP_DESC as memgroup,
pin.INTACCUM_AMT,
decode(pindet.slipitemtype_code,
'SHR','ซื้อหุ้นพิเศษ',
'LON','ชำระหนี้ '||nvl(pindet.loancontract_no,''),
'MUT',pindet.SLIPITEM_DESC,'') as slip_desc,
pindet.PERIOD,
pindet.PRINCIPAL_PAYAMT,
pindet.INTEREST_PAYAMT,
pindet.ITEM_PAYAMT,
decode(pindet.slipitemtype_code,'SHR',shr.sharestk_amt*10,pindet.ITEM_BALANCE) as ITEM_BALANCE,
pindet.Shrlontype_Code,
pin.slip_amt as sumitempay,
ftreadtbaht(pin.slip_amt) as tbaht,
SUBSTR( pin.document_no, 0 ,4 ) as  docno1,
SUBSTR( pin.document_no, 5 ,6 ) as docno2,
cm.office_finance,
cmt.moneytype_desc,
am.full_name

FROM
SLSLIPPAYIN pin,
MBMEMBMASTER mas,
SHSHAREMASTER shr,
MBUCFPRENAME pre,
SLSLIPPAYINDET pindet,
MBUCFMEMBGROUP mgrp,
cmcoopconstant cm,
cmucfmoneytype cmt,
amsecusers am

WHERE (mas.MEMBER_NO=shr.MEMBER_NO ) AND
( mas.MEMBER_NO = pin.MEMBER_NO ) AND
( mas.COOP_ID = pin.MEMCOOP_ID ) AND
( mas.PRENAME_CODE = pre.PRENAME_CODE ) AND
( mas.MEMBGROUP_CODE = mgrp.MEMBGROUP_CODE ) AND
( mas.COOP_ID = mgrp.COOP_ID ) AND
( pin.PAYINSLIP_NO = pindet.PAYINSLIP_NO ) AND
( pin.COOP_ID = pindet.COOP_ID ) AND
( ( pin.PAYINSLIP_NO in (" + payinslip_no + @") ) AND
( pin.COOP_ID = {0}) ) and
mas.coop_id=cm.coop_no and 
cmt.moneytype_code = pin.moneytype_code and 
pin.entry_id = am.user_name
ORDER BY pindet.Shrlontype_Code
";
            sql = WebUtil.SQLFormat(sql, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "sl_slip_payin", data);
        }

        public static void RePrintSlipWrt(PageWeb page, string payout_no, string coop_id)
        {
            string sql = "";
            sql = @"select
mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
TO_CHAR( so.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as tslip_date,
decode(so.sliptype_code,
'WRT','จ่ายคืนกองทุน กสส. สัญญา '||nvl(so.loancontract_no,''),'') as slip_desc

from slslippayout so,mbmembmaster mb ,mbucfprename mp,cmucfbank cb
where so.payoutslip_no in (" + payout_no + @")
and so.coop_id ={0}
and so.member_no = mb.member_no
and mb.prename_code = mp.prename_code
and so.expense_bank = cb.bank_code(+)
group by mp.prename_desc,
mb.memb_name,
mb.memb_surname,
so.loancontract_no,
so.shrlontype_code,
so.payoutslip_no,
so.member_no,
so.payout_amt,
so.returnetc_amt ,
so.payoutnet_amt,
so.moneytype_code,
so.expense_bank,
cb.bank_desc,
so.expense_accid,
so.slip_date,
decode(so.sliptype_code,'WRT','จ่ายคืนกองทุน กสส. สัญญา '||nvl(so.loancontract_no,''),'') ";
            sql = WebUtil.SQLFormat(sql, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "sl_slip_payout_wrt", data);
        }

        public static void PrintFinslipRecvPEA(PageWeb page, string slip_no, string coop_id)
        {
            //            string sql = @"SELECT fin.slip_no as payinslip_no,
            //TO_CHAR( fin.operate_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as TSLIPDATE,
            //pre.PRENAME_DESC || mas.MEMB_NAME || ' ' || mas.MEMB_SURNAME AS FULLNAME,
            //mas.MEMBER_NO,
            //mgrp.MEMBGROUP_DESC as memgroup,
            //findet.slipitem_desc as slip_desc,
            //findet.ITEMPAY_AMT as ITEM_PAYAMT,
            //fin.item_amtnet as sumitempay,
            //ftreadtbaht(fin.item_amtnet) as tbaht,
            //SUBSTR( fin.receipt_no, 0 ,4 ) as  docno1,
            //SUBSTR( fin.receipt_no, 5 ,6 ) as docno2,
            //cm.office_finance,
            //cmt.moneytype_desc,
            //am.full_name
            //
            //FROM
            //finslip fin,
            //finslipdet findet,
            //MBMEMBMASTER mas,
            //MBUCFPRENAME pre,
            //MBUCFMEMBGROUP mgrp,
            //cmcoopconstant cm,
            //cmucfmoneytype cmt,
            //amsecusers am
            //
            //WHERE
            //( mas.MEMBER_NO = fin.MEMBER_NO ) AND
            //( mas.COOP_ID = fin.coop_id ) AND
            //( mas.PRENAME_CODE = pre.PRENAME_CODE ) AND
            //( mas.MEMBGROUP_CODE= mgrp.MEMBGROUP_CODE ) AND
            //( mas.COOP_ID = mgrp.COOP_ID ) AND
            //( fin.slip_no = findet.slip_no ) AND
            //( fin.COOP_ID = findet.COOP_ID ) AND
            //( ( fin.slip_no = {0}    ) AND
            //( fin.COOP_ID = {1}) ) and
            //mas.coop_id=cm.coop_no and 
            //cmt.moneytype_code = fin.cash_type and 
            //fin.entry_id = am.user_name";
            string sql = @"SELECT fin.slip_no as payinslip_no,
TO_CHAR( fin.operate_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as TSLIPDATE,
fin.pay_towhom AS FULLNAME,
fin.MEMBER_NO,
findet.slipitem_desc as slip_desc,
findet.ITEMPAY_AMT as ITEM_PAYAMT,
fin.item_amtnet as sumitempay,
ftreadtbaht(fin.item_amtnet) as tbaht,
SUBSTR( fin.receipt_no, 0 ,4 ) as  docno1,
SUBSTR( fin.receipt_no, 5 ,6 ) as docno2,
cm.office_finance,
cmt.moneytype_desc,
am.full_name

FROM
finslip fin,
finslipdet findet,
cmcoopconstant cm,
cmucfmoneytype cmt,
amsecusers am

WHERE
( fin.slip_no = findet.slip_no ) AND
( fin.COOP_ID = findet.COOP_ID ) AND
( ( fin.slip_no = {0}    ) AND
( fin.COOP_ID = {1}) ) and
cmt.moneytype_code = fin.cash_type and  
( fin.pay_recv_status = 1 ) and
( fin.payment_status <> -9 ) and
fin.entry_id = am.user_name";

            sql = WebUtil.SQLFormat(sql, slip_no, coop_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "sl_slip_payin", data);
        }

        //ใบเสร็จประจำเดือน kptempreceive
        public static void PrintKptempreceive(PageWeb page, string coop_id, string as_recvperiod, string as_sgroup, string as_egroup, string as_membtype, string as_membno, string as_receiptno)
        {
            string sql = @"select kptempreceive.kpslip_no as payinslip_no,
                kptempreceive.member_no,
                'LPM' as sliptype_code,
                'CSH' as moneytype_code,
                kptempreceive.receipt_no as document_no,
                kptempreceive.receipt_date as slip_date,
                null as operate_date,
                kptempreceive.sharestk_value,
                0 as intaccum_amt,
                kptempreceive.sharestkbf_value,
                kptempreceive.receive_amt as slip_amt,
                1 as slip_status,
                '' as entry_id,
                '' as entry_bycoopid,
                '' as ref_system,
                kpucfkeepitemtype.keepitemtype_grp as slipitemtype_code,
                kptempreceivedet.shrlontype_code,
                kptempreceivedet.loancontract_no,
                (case when kptempreceivedet.keepitemtype_code in ( 'L01' , 'L02' , 'L03' ) then 'ชำระรายเดือน' else kptempreceivedet.description end ) as slipitem_desc,
                kptempreceivedet.period,
                kptempreceivedet.principal_payment as principal_payamt,
                kptempreceivedet.interest_payment as interest_payamt,
                kptempreceivedet.item_payment as item_payamt,
                '' as memaddr,
                '' as grpaddr,
                0 as printreceiptaddr_type,
                kptempreceivedet.item_balance,
                null as calint_to,
                mbucfprename.prename_desc||mbmembmaster.memb_name||'  '||mbmembmaster.memb_surname as member_name,
                mbmembmaster.membgroup_code,
                mbucfmembgroup.membgroup_desc,
                kptempreceive.membtype_code,
                0 as retry_status,
                mbucfmembtype.membtype_desc,
                '' as remark_line1,
                '' as remark_line2,
                kptempreceive.money_text as money_thaibaht                
                from kptempreceive,
                kptempreceivedet,
                kpucfkeepitemtype,
                mbmembmaster,
                mbucfprename,
                mbucfmembgroup,
                mbucfmembtype
                where ( kptempreceive.coop_id = kptempreceivedet.coop_id )
                and ( kptempreceive.kpslip_no = kptempreceivedet.kpslip_no )
                and ( kptempreceivedet.coop_id = kpucfkeepitemtype.coop_id )
                and ( kptempreceivedet.keepitemtype_code = kpucfkeepitemtype.keepitemtype_code )
                and ( mbmembmaster.coop_id = kptempreceive.memcoop_id )
                and ( mbmembmaster.member_no = kptempreceive.member_no )
                and ( mbmembmaster.prename_code = mbucfprename.prename_code )
                and ( kptempreceive.coop_id = mbucfmembgroup.coop_id )
                and ( kptempreceive.membgroup_code = mbucfmembgroup.membgroup_code )
                and ( mbmembmaster.coop_id = mbucfmembtype.coop_id )
                and ( mbmembmaster.membtype_code = mbucfmembtype.membtype_code )
                and ( kptempreceive.coop_id = {0} )
                and ( kptempreceive.recv_period = {1} )
                and ( kptempreceive.membgroup_code between {2} and {3} )
                and ( kptempreceive.membtype_code in (" + as_membtype + @") )
                and ( kptempreceive.member_no like {4} )
                and ( kptempreceive.receipt_no like {5} )
                order by kptempreceive.membgroup_code,
                kptempreceive.member_no,
                kptempreceivedet.seq_no";
            sql = WebUtil.SQLFormat(sql, coop_id, as_recvperiod, as_sgroup, as_egroup, as_membno, as_receiptno);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "RECEIPT", data);
        }

        //ใบเสร็จประจำเดือน kpmastreceive
        public static void PrintKpmastreceive(PageWeb page, string coop_id, string as_recvperiod, string as_sgroup, string as_egroup, string as_membtype, string as_membno, string as_receiptno)
        {
            string sql = @"select kpmastreceive.kpslip_no as payinslip_no,
                kpmastreceive.member_no,
                'LPM' as sliptype_code,
                'CSH' as moneytype_code,
                kpmastreceive.receipt_no as document_no,
                kpmastreceive.receipt_date as slip_date,
                null as operate_date,
                kpmastreceive.sharestk_value,
                0 as intaccum_amt,
                kpmastreceive.sharestkbf_value,
                kpmastreceive.receive_amt as slip_amt,
                1 as slip_status,
                '' as entry_id,
                '' as entry_bycoopid,
                '' as ref_system,
                kpucfkeepitemtype.keepitemtype_grp as slipitemtype_code,
                kpmastreceivedet.shrlontype_code,
                kpmastreceivedet.loancontract_no,
                (case when kpmastreceivedet.keepitemtype_code in ( 'L01' , 'L02' , 'L03' ) then 'ชำระรายเดือน' else kpmastreceivedet.description end ) as slipitem_desc,
                kpmastreceivedet.period,
                kpmastreceivedet.principal_payment as principal_payamt,
                kpmastreceivedet.interest_payment as interest_payamt,
                kpmastreceivedet.item_payment as item_payamt,
                '' as memaddr,
                '' as grpaddr,
                0 as printreceiptaddr_type,
                kpmastreceivedet.item_balance,
                null as calint_to,
                mbucfprename.prename_desc||mbmembmaster.memb_name||'  '||mbmembmaster.memb_surname as member_name,
                mbmembmaster.membgroup_code,
                mbucfmembgroup.membgroup_desc,
                kpmastreceive.membtype_code,
                0 as retry_status,
                mbucfmembtype.membtype_desc,
                '' as remark_line1,
                '' as remark_line2,
                kpmastreceive.money_text as money_thaibaht                
                from kpmastreceive,
                kpmastreceivedet,
                kpucfkeepitemtype,
                mbmembmaster,
                mbucfprename,
                mbucfmembgroup,
                mbucfmembtype
                where ( kpmastreceive.coop_id = kpmastreceivedet.coop_id )
                and ( kpmastreceive.kpslip_no = kpmastreceivedet.kpslip_no )
                and ( kpmastreceivedet.coop_id = kpucfkeepitemtype.coop_id )
                and ( kpmastreceivedet.keepitemtype_code = kpucfkeepitemtype.keepitemtype_code )
                and ( mbmembmaster.coop_id = kpmastreceive.memcoop_id )
                and ( mbmembmaster.member_no = kpmastreceive.member_no )
                and ( mbmembmaster.prename_code = mbucfprename.prename_code )
                and ( kpmastreceive.coop_id = mbucfmembgroup.coop_id )
                and ( kpmastreceive.membgroup_code = mbucfmembgroup.membgroup_code )
                and ( mbmembmaster.coop_id = mbucfmembtype.coop_id )
                and ( mbmembmaster.membtype_code = mbucfmembtype.membtype_code )
                and ( kpmastreceive.coop_id = {0} )
                and ( kpmastreceive.recv_period = {1} )
                and ( kpmastreceive.membgroup_code between {2} and {3} )
                and ( kpmastreceive.membtype_code in (" + as_membtype + @") )
                and ( kpmastreceive.member_no like {4} )
                and ( kpmastreceive.receipt_no like {5} )
                order by kpmastreceive.membgroup_code,
                kpmastreceive.member_no,
                kpmastreceivedet.seq_no";
            sql = WebUtil.SQLFormat(sql, coop_id, as_recvperiod, as_sgroup, as_egroup, as_membno, as_receiptno);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "RECEIPT", data);
        }

        public static void PrintSlipSlInIreportGsb(PageWebSheet page, string payinslip_no, string coop_id)
        {

            string report_name = "", report_label = "";
            report_name = "r_sl_slip_in_gsb";
            report_label = "ใบเสร็จรับเงิน";

            iReportArgument args = new iReportArgument();
            args.Add("as_payinslip_no", iReportArgumentType.String, payinslip_no);
            args.Add("as_coop_id", iReportArgumentType.String, coop_id);
            iReportBuider report = new iReportBuider(page, "");
            report.AddCriteria(report_name, report_label, ReportType.pdf, args);
            report.AutoOpenPDF = true;
            report.Retrieve();

        }

        public static void PrintSlipSlOutIreportGsb(PageWebSheet page, string payoutslip_no, string coop_id)
        {

            string report_name = "", report_label = "";
            report_name = "r_sl_slip_out_gsb";
            report_label = "ใบสำคัญจ่าย";

            iReportArgument args = new iReportArgument();

            args.Add("as_payoutslip_no", iReportArgumentType.String, payoutslip_no);
            args.Add("as_coop_id", iReportArgumentType.String, coop_id);
            iReportBuider report = new iReportBuider(page, "");
            report.AddCriteria(report_name, report_label, ReportType.pdf, args);
            report.AutoOpenPDF = true;
            report.Retrieve();

        }

        //ใบสำคัญจ่ายไทยฮอนด้า
        public static void PrintFinSlipPayHND(PageWeb page, string coop_id, string slip_no)
        {
            string sql = @" SELECT finslip.payslip_no,   
                            finslip.cash_type,
		                    finslip.entry_date,
		                    finslip.pay_towhom,
		                    finslip.item_amtnet,
                            ft_readtbaht( finslip.item_amtnet ) AS money_thaibaht, 
		                    finslipdet.slipitem_desc,
		                    finslipdet.itempayamt_net,
                            amsecusers.full_name  
                    FROM 	finslip,   
			                finslipdet,    
			                amsecusers 
                    WHERE 
                            ( trim(finslip.entry_id) = trim( amsecusers.user_name (+))) and  
                            ( finslip.coop_id = finslipdet.coop_id ) and  
                            ( finslip.slip_no = finslipdet.slip_no ) and  
                            ( finslip.coop_id = amsecusers.coop_id ) and  
		                    ( finslip.pay_recv_status = 0 ) and
		                    ( finslip.payment_status <> -9 ) and
                            ( finslip.coop_id = {0} ) and
                            ( finslip.slip_no = {1} )";
            sql = WebUtil.SQLFormat(sql, coop_id, slip_no);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "fin_slip_pay", data);
        }
        //ใบเสร็จไทยฮอนด้า
        public static void PrintFinSlipRecvHND(PageWeb page, string coop_id, string slip_no)
        {
            string sql = @" SELECT finslip.receipt_no,   
                            finslip.cash_type,
		                    finslip.entry_date,
		                    finslip.pay_towhom,
		                    finslip.item_amtnet,
                            ft_readtbaht( finslip.item_amtnet ) AS money_thaibaht, 
		                    finslipdet.slipitem_desc,
		                    finslipdet.itempayamt_net,
                            amsecusers.full_name  
                    FROM 	finslip,   
			                finslipdet,    
			                amsecusers 
                    WHERE 
                            ( trim(finslip.entry_id) = trim( amsecusers.user_name (+))) and  
                            ( finslip.coop_id = finslipdet.coop_id ) and  
                            ( finslip.slip_no = finslipdet.slip_no ) and  
                            ( finslip.coop_id = amsecusers.coop_id ) and  
		                    ( finslip.pay_recv_status = 1 ) and
		                    ( finslip.payment_status <> -9 ) and
                            ( finslip.coop_id = {0} ) and
                            ( finslip.slip_no = {1} )";
            sql = WebUtil.SQLFormat(sql, coop_id, slip_no);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, "fin_slip_receive", data);
        }


        public static void PrintSlipMarketKSV(PageWeb page, string report_name, string coop_id, string store_id, string slip_no)
        {
            if (Sta.IS_MYSQL_MODE)
            {
                string sql = @"select 
c.coop_name,s.store_id,s.sliptype_code,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.invoicedoc_no,s.debt_name
,(k.debt_addr||' หมู่ '|| '-' ||' ต. '||k.debt_tumbon ||' อ. '||k.debt_amphur  ||' จ. '||k.debt_province || ' '|| k.debt_postcode )  as addr
,m.vat_flag,d.product_no , p.product_desc,sum(d.item_qty) item_qty , u.unit_desc,d.product_price,sum(d.discount_amt) discount_amt,sum(d.itemnet_amt) itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt,FTREADTBATH(s.slipnet_amt) AS MONEY_THAI
 from ststockslip s 
left join ststockslipdet d on d.coop_id = s.coop_id and d.store_id = s.store_id and d.slip_no = s.slip_no and d.slipdet_status = 1
left join ststockmaster m on m.coop_id = d.coop_id and m.store_id = d.store_id and m.product_no = d.product_no and m.product_status = 1
left join stproductmaster p on p.coop_id = d.coop_id and p.product_no = d.product_no
left join stucfunit u on u.coop_id = p.coop_id and u.unit_code = p.unit_code
left join stdebtmaster k on k.coop_id = s.coop_id and k.debt_no = s.debt_no
left join cmcoopmaster c on c.coop_id = s.coop_id
where  s.coop_id={0} and s.store_id={1} and s.slip_no={2} and s.slip_status = 1
group by c.coop_name,s.store_id,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.sliptype_code,s.invoicedoc_no,s.debt_name
,k.debt_addr,k.debt_tumbon ,k.debt_amphur  ,k.debt_province , k.debt_postcode ,d.product_no
,m.vat_flag , p.product_desc, u.unit_desc,d.product_price,d.discount_amt,d.itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt
order by s.slip_no,d.product_no";
                sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
            else
            {
                string sql = @"select 
c.coop_name,s.store_id,s.sliptype_code,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.invoicedoc_no,s.debt_name
,(k.debt_addr||' หมู่ '|| '-' ||' ต. '||k.debt_tumbon ||' อ. '||k.debt_amphur  ||' จ. '||k.debt_province || ' '|| k.debt_postcode )  as addr
,m.vat_flag,d.product_no , p.product_desc,sum(d.item_qty) item_qty , u.unit_desc,d.product_price,sum(d.discount_amt) discount_amt,sum(d.itemnet_amt) itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt,FTREADTBATH(s.slipnet_amt) AS MONEY_THAI
 from ststockslip s 
left join ststockslipdet d on d.coop_id = s.coop_id and d.store_id = s.store_id and d.slip_no = s.slip_no and d.slipdet_status = 1
left join ststockmaster m on m.coop_id = d.coop_id and m.store_id = d.store_id and m.product_no = d.product_no and m.product_status = 1
left join stproductmaster p on p.coop_id = d.coop_id and p.product_no = d.product_no
left join stucfunit u on u.coop_id = p.coop_id and u.unit_code = p.unit_code
left join stdebtmaster k on k.coop_id = s.coop_id and k.debt_no = s.debt_no
left join cmcoopmaster c on c.coop_id = s.coop_id
where  s.coop_id={0} and s.store_id={1} and s.slip_no={2} and s.slip_status = 1
group by c.coop_name,s.store_id,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.sliptype_code,s.invoicedoc_no,s.debt_name
,k.debt_addr,k.debt_tumbon ,k.debt_amphur  ,k.debt_province , k.debt_postcode ,d.product_no
,m.vat_flag , p.product_desc, u.unit_desc,d.product_price,d.discount_amt,d.itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt
order by s.slip_no,d.product_no";
                sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
        }


        public static void PrintSlipMarket(PageWeb page, string report_name, string coop_id, string store_id, string slip_no)
        {

            if (Sta.IS_MYSQL_MODE)
            {
                string sql = @"SELECT CMCOOPCONSTANT.COOP_TAXID as COOP_TAXID,STSTOCKSLIP.SLIP_NO as sno,STSTOCKSLIP.SLIPNET_AMT,
                STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) as qty,
                STSTOCKSLIPDET.PRODUCT_PRICE,sum(STSTOCKSLIPDET.ITEMNET_AMT) as ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,FTREADBAHT(SLIP_AMT) AS MONEY_THAI,
                CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode ) as addr,
                concat(DATE_FORMAT(DATE_ADD(STSTOCKSLIP.SLIP_DATE,INTERVAL 543 YEAR), '%d/%m/%Y'), ' #' , DATE_FORMAT(STSTOCKSLIP.entry_date, '%H:%i')  ) as  mdate,
                STSTOCKSLIP.TERMINAL_NO,
                CMCOOPMASTER.COOP_NAME as COOP_NAME
                
                FROM STSTOCKSLIP, STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT ,stdebtmaster m  
                WHERE 
                ( m.debt_no = STSTOCKSLIP.debt_no   ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = {2} ) AND
		        ( STSTOCKSLIP.COOP_ID = {0} ) AND
		        ( STSTOCKSLIP.STORE_ID = {1} )) and m.debttype_code='002'
                
                group by  CMCOOPCONSTANT.COOP_TAXID
                ,STSTOCKSLIP.SLIP_NO ,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID
                ,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,SLIP_AMT
                ,CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode )
                ,STSTOCKSLIP.SLIP_DATE,STSTOCKSLIP.entry_date,STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME order by STSTOCKSLIPDET.PRODUCT_NO";
                sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
            else
            {
                string sql = @" SELECT CMCOOPCONSTANT.COOP_TAXID as COOP_TAXID,STSTOCKSLIP.SLIP_NO as sno,STSTOCKSLIP.SLIPNET_AMT,
                STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) as qty,
                STSTOCKSLIPDET.PRODUCT_PRICE,sum(STSTOCKSLIPDET.ITEMNET_AMT) as ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,FTREADTBATH(SLIP_AMT) AS MONEY_THAI,
                (m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) as addr,
                TO_CHAR(STSTOCKSLIP.SLIP_DATE, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') || ' #' || TO_CHAR(STSTOCKSLIP.entry_date, 'HH24:MI')|| '#'   as  mdate,
                STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME as COOP_NAME
                
                FROM STSTOCKSLIP, STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT ,stdebtmaster m  
                WHERE (m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = {2} ) AND
		        ( STSTOCKSLIP.COOP_ID = {0} ) AND
		        ( STSTOCKSLIP.STORE_ID = {1} )) and m.debttype_code='002'
                
                group by  CMCOOPCONSTANT.COOP_TAXID,
                STSTOCKSLIP.SLIP_NO ,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.RECEIVE_AMT,
                STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,
                STPRODUCTMASTER.PRODUCT_DESC,SLIP_AMT,
                (m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) ,
                STSTOCKSLIP.SLIP_DATE,STSTOCKSLIP.entry_date  ,STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME order by STSTOCKSLIPDET.PRODUCT_NO";
                sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
        }

        public static void PrintSlipMarketLoan(PageWeb page, string report_name, string coop_id, string store_id, string slip_no)
        {
            if (Sta.IS_MYSQL_MODE)
            {
                string sql = @" SELECT CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no as sno,FTREADBAHT(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI,
                STSTOCKSLIP.SLIPNET_AMT as slip_amt,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY,STSTOCKSLIPDET.PRODUCT_PRICE,
                sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,CMCOOPMASTER.COOP_NAME,
                CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person

                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m
                WHERE (m.debt_no = STSTOCKSLIP.debt_no  ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = '" + slip_no + "') AND ( STSTOCKSLIP.COOP_ID = '" + coop_id + "') AND	( STSTOCKSLIP.STORE_ID =  '" + store_id + "')  ) and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,CMCOOPMASTER.COOP_NAME,CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode ) ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no order by STSTOCKSLIPDET.PRODUCT_NO";
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
            else
            {
                string sql = @"select rownum as num ,COOP_TAXID,sno,MONEY_THAI,PRODUCT_NO,ITEM_QTY,PRODUCT_PRICE,ITEM_AMT,slip_amt,PRODUCT_DESC,SLIP_DATE,COOP_NAME,addr,DEBT_NO,debt_name,card_person,discount_amt ,slipvat_amt,slipitem_amt
                from( SELECT CMCOOPCONSTANT.COOP_TAXID, STSTOCKSLIP.slip_no as sno, FTREADTBATH(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI, STSTOCKSLIP.SLIPNET_AMT as slip_amt,
                STSTOCKSLIPDET.PRODUCT_NO, sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY, STSTOCKSLIPDET.PRODUCT_PRICE, sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,
                STPRODUCTMASTER.PRODUCT_DESC, STSTOCKSLIP.SLIP_DATE, CMCOOPMASTER.COOP_NAME,ststockslip.discount_amt,
                (m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person,STSTOCKSLIP.vat_amt slipvat_amt ,STSTOCKSLIP.slip_amt slipitem_amt
                
                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m
                WHERE ( m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = '" + slip_no + "') AND ( STSTOCKSLIP.COOP_ID = '" + coop_id + "') AND	( STSTOCKSLIP.STORE_ID =  '" + store_id + "')  ) and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,ststockslip.discount_amt,CMCOOPMASTER.COOP_NAME,(m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no,STSTOCKSLIP.vat_amt,STSTOCKSLIP.slip_amt order by STSTOCKSLIPDET.PRODUCT_NO)";

                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
        }

        public static void PrintSlipDebtLoan(PageWeb page, string report_name, string coop_id, string ref_incdecno, string debtincdec_type, string store_id)
        {
            string sql = @"select * from(
SELECT 1 sort,d.debt_no,d.ref_incdecno,
TO_CHAR(d.slip_date, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') || ' #' || TO_CHAR(d.slip_date, 'HH24:MI')|| '#' slip_date,
'ชำระต้นเงิน' || t.store_desc|| '  '||'ตามสัญญาเลขที่ '||d.contract_no detail,NVL(d.principal_payment+d.principal_arrear_amt,0) payment_amt
,coop_name,m.addr_no,'หมู่ '|| m.addr_moo addr_moo,'ต. '||m.addr_tambol addr_tambol,'อ. '||m.addr_amphur addr_amphur,'จ. '||m.addr_province addr_province
,m.addr_postcode,'Tel. '||m.addr_phone addr_phone,'Fax. '||m.addr_fax addr_fax,FTREADTBATH(d.principal_payment+d.int_payment+d.fine_payment+d.principal_arrear_amt) txt_bath,d.entry_id,NVL(mb.membgroup_code,'000') membgroup_code
, dm.debt_name, NVL(dm.debt_addr,'-') debt_addr,'ต. '||NVL(dm.debt_tumbon,'-') debt_tambol,'อ. '||NVL(dm.debt_amphur,'-')  debt_amphur,'จ. '|| NVL(dm.debt_province,'-')  debt_province
,NVL(dm.debt_postcode,'-') debt_postcode ,'Tel. '||NVL(dm.debt_phone,'-')  debt_phone,d.principal_balance as balance_amt
from stcontractslip d
left join ststockslip s on s.coop_id = d.coop_id and s.slip_no = d.ref_slipno and s.store_id={3}
left join ststore t on t.coop_id = s.coop_id and t.store_id = s.store_id
left join cmcoopmaster m on m.coop_id = d.coop_id
left join mbmembmaster mb on mb.member_no = d.debt_no and mb.coop_id = d.coop_id
left join stdebtmaster dm on dm.debt_no = d.debt_no and dm.coop_id = d.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
union 
SELECT  2 sort,'','',
'' slip_date,
'ชำระค่าปรับ' || t.store_desc|| '  '|| to_char(d.calfine_from,'dd/mm/yyyy') || ' - ' || to_char(d.calfine_to,'dd/mm/yyyy') , NVL(d.fine_payment,0) payment_amt
,'','','','','','','','','','','','','','','','','','','',0
 from stcontractslip d
left join ststockslip s on s.slip_no = d.ref_slipno and s.coop_id = d.coop_id and s.store_id={3}
left join ststore t on t.store_id = s.store_id and t.coop_id = s.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
union 
SELECT 3 sort,'','',
'' slip_date,
'ชำระดอกเบี้ย' || t.store_desc|| '  '|| to_char(d.calint_from,'dd/mm/yyyy') || ' - ' || to_char(d.calint_to,'dd/mm/yyyy') ,NVL(d.int_payment,0) payment_amt
,'','','','','','','','','','','','','','','','','','','',0
 from stcontractlimitdet d
left join ststockslip s on s.slip_no = d.ref_slipno and s.coop_id = d.coop_id and s.store_id={3}
left join ststore t on t.store_id = s.store_id and t.coop_id = s.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
)where payment_amt >0  ";
            sql = WebUtil.SQLFormat(sql, coop_id, ref_incdecno, debtincdec_type, store_id);
            DataTable data = WebUtil.Query(sql);
            Printing.PrintAppletPB(page, report_name, data);
        }
        public static void of_prinslip_mrk(PageWeb page, string function_id, string report_name, string coop_id, string store_id, string slip_no, DateTime dateStart_year)
        {
            #region fuction ใบเสร็จซ์้อ/ขาย แม่จัน
            if (function_id == "of_prinslip_mini_csh_mja")
            {
                #region fuction ใบเสร็จมินิมาร์ท
                if (Sta.IS_MYSQL_MODE)
                {
                    string sql = @"SELECT CMCOOPCONSTANT.COOP_TAXID as COOP_TAXID,STSTOCKSLIP.SLIP_NO as sno,STSTOCKSLIP.SLIPNET_AMT,
                STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) as qty,
                STSTOCKSLIPDET.PRODUCT_PRICE,sum(STSTOCKSLIPDET.ITEMNET_AMT) as ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,FTREADBAHT(SLIP_AMT) AS MONEY_THAI,
                CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode ) as addr,
                concat(DATE_FORMAT(DATE_ADD(STSTOCKSLIP.SLIP_DATE,INTERVAL 543 YEAR), '%d/%m/%Y'), ' #' , DATE_FORMAT(STSTOCKSLIP.entry_date, '%H:%i')  ) as  mdate,
                STSTOCKSLIP.TERMINAL_NO,
                CMCOOPMASTER.COOP_NAME as COOP_NAME
                
                FROM STSTOCKSLIP, STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT ,stdebtmaster m  
                WHERE 
                ( m.debt_no = STSTOCKSLIP.debt_no   ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = {2} ) AND
		        ( STSTOCKSLIP.COOP_ID = {0} ) AND
		        ( STSTOCKSLIP.STORE_ID = {1} )) and m.debttype_code='002'
                
                group by  CMCOOPCONSTANT.COOP_TAXID
                ,STSTOCKSLIP.SLIP_NO ,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID
                ,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,SLIP_AMT
                ,CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode )
                ,STSTOCKSLIP.SLIP_DATE,STSTOCKSLIP.entry_date,STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME order by STSTOCKSLIPDET.PRODUCT_NO";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                else
                {
                    string sql = @" SELECT CMCOOPCONSTANT.COOP_TAXID as COOP_TAXID,STSTOCKSLIP.SLIP_NO as sno,STSTOCKSLIP.SLIPNET_AMT,
                STSTOCKSLIP.RECEIVE_AMT,STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) as qty,
                STSTOCKSLIPDET.PRODUCT_PRICE,sum(STSTOCKSLIPDET.ITEMNET_AMT) as ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,FTREADTBATH(SLIP_AMT) AS MONEY_THAI,
                (m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) as addr,
                TO_CHAR(STSTOCKSLIP.SLIP_DATE, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') || ' #' || TO_CHAR(STSTOCKSLIP.entry_date, 'HH24:MI')|| '#'   as  mdate,
                STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME as COOP_NAME
                
                FROM STSTOCKSLIP, STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT ,stdebtmaster m  
                WHERE (m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = {2} ) AND
		        ( STSTOCKSLIP.COOP_ID = {0} ) AND
		        ( STSTOCKSLIP.STORE_ID = {1} )) and m.debttype_code='002'
                
                group by  CMCOOPCONSTANT.COOP_TAXID,
                STSTOCKSLIP.SLIP_NO ,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.RECEIVE_AMT,
                STSTOCKSLIP.CHANGE_AMT,STSTOCKSLIP.ENTRY_ID,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,
                STPRODUCTMASTER.PRODUCT_DESC,SLIP_AMT,
                (m.debt_addr||' หมู่ '|| '-' ||' ต. '||m.debt_tumbon ||' อ. '||m.debt_amphur  ||' จ. '||m.debt_province || ' '|| m.debt_postcode ) ,
                STSTOCKSLIP.SLIP_DATE,STSTOCKSLIP.entry_date  ,STSTOCKSLIP.TERMINAL_NO,CMCOOPMASTER.COOP_NAME order by STSTOCKSLIPDET.PRODUCT_NO";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                #endregion
            }
            else if (function_id == "of_prinslip_csh_mja")
            {
                #region fuction ใบเสร็จขายเงินสดแม่จัน
                if (Sta.IS_MYSQL_MODE)
                {
                    string sql = @" SELECT CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no as sno,FTREADBAHT(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI,
                STSTOCKSLIP.SLIPNET_AMT as slip_amt,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY,STSTOCKSLIPDET.PRODUCT_PRICE,
                sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,TO_CHAR(STSTOCKSLIP.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as SLIP_DATE,CMCOOPMASTER.COOP_NAME,
                CONCAT(m.debt_addr,' หมู่ ', '-' ,' ตำบล/แขวง  ',m.debt_tumbon ,' อำเภอ/เขต ',m.debt_amphur  ,' จังหวัด ',m.debt_province , ' ', m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person

                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m
                WHERE (m.debt_no = STSTOCKSLIP.debt_no  ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = '" + slip_no + "') AND ( STSTOCKSLIP.COOP_ID = '" + coop_id + "') AND	( STSTOCKSLIP.STORE_ID =  '" + store_id + "')  ) and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,CMCOOPMASTER.COOP_NAME,CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode ) ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no order by STSTOCKSLIPDET.PRODUCT_NO";
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                else
                {
                    string sql = @"select rownum as num ,COOP_TAXID,sno,MONEY_THAI,PRODUCT_NO,ITEM_QTY,PRODUCT_PRICE,ITEM_AMT,slip_amt,PRODUCT_DESC,SLIP_DATE,COOP_NAME,addr,DEBT_NO,debt_name,card_person,discount_amt ,slipvat_amt,slipitem_amt
                from( SELECT CMCOOPCONSTANT.COOP_TAXID, STSTOCKSLIP.slip_no as sno, FTREADTBATH(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI, STSTOCKSLIP.SLIPNET_AMT as slip_amt,
                STSTOCKSLIPDET.PRODUCT_NO, sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY, STSTOCKSLIPDET.PRODUCT_PRICE, sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,
                STPRODUCTMASTER.PRODUCT_DESC, TO_CHAR(STSTOCKSLIP.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as SLIP_DATE, CMCOOPMASTER.COOP_NAME,nvl(ststockslip.discount_amt,0) as discount_amt,
                (m.debt_addr||' หมู่ '|| '-' ||' ตำบล/แขวง '||m.debt_tumbon ||' อำเภอ/เขต '||m.debt_amphur  ||' จังหวัด '||m.debt_province || ' '|| m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person,nvl(STSTOCKSLIP.vat_amt,0) slipvat_amt ,STSTOCKSLIP.slip_amt slipitem_amt
                
                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m
                WHERE ( m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = '" + slip_no + "') AND ( STSTOCKSLIP.COOP_ID = '" + coop_id + "') AND	( STSTOCKSLIP.STORE_ID =  '" + store_id + "')  ) and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,ststockslip.discount_amt,CMCOOPMASTER.COOP_NAME, m.debt_addr,m.debt_tumbon,m.debt_amphur,m.debt_province,m.debt_postcode  ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no,STSTOCKSLIP.vat_amt,STSTOCKSLIP.slip_amt order by STSTOCKSLIPDET.PRODUCT_NO)";

                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                #endregion
            }
            else if (function_id == "of_prinslip_lon_mja")
            {
                #region fuction ใบเสร็จขายเงินเชื่อแม่จัน
                if (Sta.IS_MYSQL_MODE)
                {
                    string sql = @" SELECT CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no as sno,FTREADBAHT(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI,
                STSTOCKSLIP.SLIPNET_AMT as slip_amt,STSTOCKSLIPDET.PRODUCT_NO,sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY,STSTOCKSLIPDET.PRODUCT_PRICE,
                sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,CMCOOPMASTER.COOP_NAME,
                CONCAT(m.debt_addr,' หมู่ ', '-' ,' ตำบล/แขวง ',m.debt_tumbon ,' อำเภอ/เขต ',m.debt_amphur  ,' จังหวัด ',m.debt_province , ' ', m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person

                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m
                WHERE (m.debt_no = STSTOCKSLIP.debt_no  ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
 		        ( ( STSTOCKSLIP.SLIP_NO = '" + slip_no + "') AND ( STSTOCKSLIP.COOP_ID = '" + coop_id + "') AND	( STSTOCKSLIP.STORE_ID =  '" + store_id + "')  ) and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,CMCOOPMASTER.COOP_NAME,CONCAT(m.debt_addr,' หมู่ ', '-' ,' ต. ',m.debt_tumbon ,' อ. ',m.debt_amphur  ,' จ. ',m.debt_province , ' ', m.debt_postcode ) ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no order by STSTOCKSLIPDET.PRODUCT_NO";
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                else
                {
                    string sql = @"select rownum as num ,COOP_TAXID,sno,MONEY_THAI,PRODUCT_NO,ITEM_QTY,PRODUCT_PRICE,ITEM_AMT,slip_amt,PRODUCT_DESC,SLIP_DATE,COOP_NAME,addr,DEBT_NO,debt_name,card_person,discount_amt ,slipvat_amt,slipitem_amt,contract_no,creditbalance_amt
                from( SELECT CMCOOPCONSTANT.COOP_TAXID, STSTOCKSLIP.slip_no as sno, FTREADTBATH(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI, STSTOCKSLIP.SLIPNET_AMT as slip_amt,
                STSTOCKSLIPDET.PRODUCT_NO, sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY, STSTOCKSLIPDET.PRODUCT_PRICE, sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,
                STPRODUCTMASTER.PRODUCT_DESC, STSTOCKSLIP.SLIP_DATE, CMCOOPMASTER.COOP_NAME,nvl(ststockslip.discount_amt,0) as discount_amt,
                (m.debt_addr||' หมู่ '|| '-' ||' ตำบล/แขวง '||m.debt_tumbon ||' อำเภอ/เขต '||m.debt_amphur  ||' จังหวัด '||m.debt_province || ' '|| m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person,nvl(STSTOCKSLIP.vat_amt,0) slipvat_amt ,STSTOCKSLIP.slip_amt slipitem_amt
                , STSTOCKSLIP.taxdoc_no as contract_no,
                stcontractlimit.itemnet_amt - (select (case when((nvl(sum((case when d.debtincdec_type= 'B/F' then d.bfprincipal_arrear else 0 end)),0) + nvl(sum((case when d.debtincdec_type = '001' then d.principal_payment else 0 end)),0) ) - nvl(sum((case when d.debtincdec_type in('002','003') then d.principal_payment else 0 end)),0)) >0  then ((nvl(sum((case when d.debtincdec_type= 'B/F' then d.bfprincipal_arrear else 0 end)),0) + nvl(sum((case when d.debtincdec_type = '001' then d.principal_payment else 0 end)),0) ) - nvl(sum((case when d.debtincdec_type in('002','003') then d.principal_payment else 0 end)),0)) else 0 end) as bfprincipal_arrear from stcontractlimitdet d where d.coop_id={0} and d.contract_no = STSTOCKSLIP.taxdoc_no and slip_status <> -9 and slip_date between {3} and STSTOCKSLIP.slip_date) as creditbalance_amt
                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m,stcontractlimit
                WHERE ( m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
		        (stcontractlimit.contract_no = STSTOCKSLIP.taxdoc_no) and 
 		        ( ( STSTOCKSLIP.SLIP_NO = {2}) AND ( STSTOCKSLIP.COOP_ID = {0}) AND	( STSTOCKSLIP.STORE_ID =  {1})  ) 
                  and m.debttype_code='002' group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT
                    ,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE
                ,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,ststockslip.discount_amt,CMCOOPMASTER.COOP_NAME
                , m.debt_addr,m.debt_tumbon,m.debt_amphur,m.debt_province,m.debt_postcode  ,STSTOCKSLIP.DEBT_NO 
                , m.debt_name,m.debt_tax_no,STSTOCKSLIP.vat_amt,STSTOCKSLIP.slip_amt, STSTOCKSLIP.taxdoc_no,stcontractlimit.itemnet_amt
                order by STSTOCKSLIPDET.PRODUCT_NO)";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no, dateStart_year);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                #endregion
            }
            else if (function_id == "of_prinslip_oil_lon_mja")
            {
                #region fuction ใบเสร็จขายเงินเชื่อน้ำมันแม่จัน
                if (Sta.IS_MYSQL_MODE)
                {
                }
                else
                {
                    string sql = @"select rownum as num ,COOP_TAXID,sno,MONEY_THAI,PRODUCT_NO,ITEM_QTY,PRODUCT_PRICE,ITEM_AMT,slip_amt,PRODUCT_DESC,SLIP_DATE,COOP_NAME,addr,DEBT_NO,debt_name,card_person,discount_amt ,slipvat_amt,slipitem_amt
               ,car_id,order_id,contract_no,lastcalfine_date,creditbalance_amt
                from( SELECT CMCOOPCONSTANT.COOP_TAXID, STSTOCKSLIP.slip_no as sno, FTREADTBATH(STSTOCKSLIP.SLIPNET_AMT) AS MONEY_THAI, STSTOCKSLIP.SLIPNET_AMT as slip_amt,
                STSTOCKSLIPDET.PRODUCT_NO, sum(STSTOCKSLIPDET.ITEM_QTY) ITEM_QTY, STSTOCKSLIPDET.PRODUCT_PRICE, sum(STSTOCKSLIPDET.ITEMNET_AMT) ITEM_AMT,
                STPRODUCTMASTER.PRODUCT_DESC,  TO_CHAR(STSTOCKSLIP.slip_date, 'DD/MM/YYYY', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') as SLIP_DATE, CMCOOPMASTER.COOP_NAME,nvl(ststockslip.discount_amt,0) as discount_amt,
                (m.debt_addr||' หมู่ '|| '-' ||' ตำบล/แขวง '||m.debt_tumbon ||' อำเภอ/เขต '||m.debt_amphur  ||' จังหวัด '||m.debt_province || ' '|| m.debt_postcode )  as addr,
                STSTOCKSLIP.DEBT_NO as DEBT_NO,    m.debt_name,m.debt_tax_no as card_person,nvl(STSTOCKSLIP.vat_amt,0) slipvat_amt ,STSTOCKSLIP.slip_amt slipitem_amt
               , STSTOCKSLIP.taxdoc_no as contract_no ,STSTOCKSLIP.car_id,STSTOCKSLIP.order_id,
                stcontractlimit.itemnet_amt - (select (case when((nvl(sum((case when d.debtincdec_type= 'B/F' then d.bfprincipal_arrear else 0 end)),0) + nvl(sum((case when d.debtincdec_type = '001' then d.principal_payment else 0 end)),0) ) - nvl(sum((case when d.debtincdec_type in('002','003') then d.principal_payment else 0 end)),0)) >0  then ((nvl(sum((case when d.debtincdec_type= 'B/F' then d.bfprincipal_arrear else 0 end)),0) + nvl(sum((case when d.debtincdec_type = '001' then d.principal_payment else 0 end)),0) ) - nvl(sum((case when d.debtincdec_type in('002','003') then d.principal_payment else 0 end)),0)) else 0 end) as bfprincipal_arrear from stcontractlimitdet d where d.coop_id={0} and d.contract_no = STSTOCKSLIP.taxdoc_no and slip_status <> -9 and slip_date between {3} and STSTOCKSLIP.slip_date) as creditbalance_amt
                ,(case when stcontract.fine_amt > 0 then to_char(stcontractlimitdet.lastcalfine_date,'dd/mm/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') else '-' end) as  lastcalfine_date
                FROM  STSTOCKSLIPDET, STPRODUCTMASTER, CMCOOPMASTER, CMCOOPCONSTANT,STSTOCKSLIP ,stdebtmaster m,stcontractlimit,stcontractlimitdet,stcontract
                WHERE ( m.debt_no = STSTOCKSLIP.debt_no  (+) ) and
                ( STSTOCKSLIPDET.SLIP_NO = STSTOCKSLIP.SLIP_NO ) and
                ( STSTOCKSLIPDET.COOP_ID = STSTOCKSLIP.COOP_ID ) and
                ( STSTOCKSLIPDET.STORE_ID = STSTOCKSLIP.STORE_ID ) and
                ( STSTOCKSLIPDET.COOP_ID = STPRODUCTMASTER.COOP_ID ) and
                ( STSTOCKSLIPDET.PRODUCT_NO = STPRODUCTMASTER.PRODUCT_NO ) and
			    (stcontract.contract_no = STSTOCKSLIP.taxdoc_no) and 
				(stcontractlimit.contract_no = STSTOCKSLIP.taxdoc_no) and 
				(stcontractlimitdet.contract_no = STSTOCKSLIP.taxdoc_no) and 
				(stcontractlimitdet.ref_slipno = STSTOCKSLIP.slip_no) and 	stcontractlimitdet.debtincdec_type='001' and stcontractlimitdet.slip_status <> -9 and 
 		          ( ( STSTOCKSLIP.SLIP_NO = {2}) AND ( STSTOCKSLIP.COOP_ID ={0})  AND	( STSTOCKSLIP.STORE_ID ={1})  ) and m.debttype_code='002' 
                group by CMCOOPCONSTANT.COOP_TAXID,STSTOCKSLIP.slip_no,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIP.SLIP_AMT,STSTOCKSLIP.SLIPNET_AMT,STSTOCKSLIPDET.PRODUCT_NO,STSTOCKSLIPDET.PRODUCT_PRICE,STPRODUCTMASTER.PRODUCT_DESC,STSTOCKSLIP.SLIP_DATE,ststockslip.discount_amt
                ,CMCOOPMASTER.COOP_NAME,m.debt_addr,m.debt_tumbon ,m.debt_amphur,m.debt_province , m.debt_postcode ,STSTOCKSLIP.DEBT_NO ,   m.debt_name,m.debt_tax_no,STSTOCKSLIP.vat_amt,STSTOCKSLIP.slip_amt, STSTOCKSLIP.car_id,STSTOCKSLIP.order_id,stcontractlimit.balance_amt,stcontractlimitdet.lastcalfine_date,STSTOCKSLIP.taxdoc_no,stcontract.fine_amt  
                ,debtincdec_type,bfprincipal_arrear,principal_payment ,stcontractlimit.itemnet_amt
                order by STSTOCKSLIPDET.PRODUCT_NO)";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no, dateStart_year);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                #endregion
            }
            #endregion

            #region fuction ใบเสร็จซ์้อ/ขาย เกษตรวิสัย
            if (function_id == "of_prinslip_csh_kvs")
            {
                #region fuction ใบเสร็จขายเงินสดเกษตรวิสัย
                if (Sta.IS_MYSQL_MODE)
                {
                    string sql = @"select 
c.coop_name,s.store_id,s.sliptype_code,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.invoicedoc_no,s.debt_name
,(k.debt_addr||' หมู่ '|| '-' ||' ตำบล/แขวง '||k.debt_tumbon ||' อำเภอ/เขต '||k.debt_amphur  ||' จังหวัด '||k.debt_province || ' '|| k.debt_postcode )  as addr
,m.vat_flag,d.product_no , p.product_desc,sum(d.item_qty) item_qty , u.unit_desc,d.product_price,sum(d.discount_amt) discount_amt,sum(d.itemnet_amt) itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt,FTREADTBATH(s.slipnet_amt) AS MONEY_THAI
 from ststockslip s 
left join ststockslipdet d on d.coop_id = s.coop_id and d.store_id = s.store_id and d.slip_no = s.slip_no and d.slipdet_status = 1
left join ststockmaster m on m.coop_id = d.coop_id and m.store_id = d.store_id and m.product_no = d.product_no and m.product_status = 1
left join stproductmaster p on p.coop_id = d.coop_id and p.product_no = d.product_no
left join stucfunit u on u.coop_id = p.coop_id and u.unit_code = p.unit_code
left join stdebtmaster k on k.coop_id = s.coop_id and k.debt_no = s.debt_no
left join cmcoopmaster c on c.coop_id = s.coop_id
where  s.coop_id={0} and s.store_id={1} and s.slip_no={2} and s.slip_status = 1
group by c.coop_name,s.store_id,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.sliptype_code,s.invoicedoc_no,s.debt_name
,k.debt_addr,k.debt_tumbon ,k.debt_amphur  ,k.debt_province , k.debt_postcode ,d.product_no
,m.vat_flag , p.product_desc, u.unit_desc,d.product_price,d.discount_amt,d.itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt
order by s.slip_no,d.product_no";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                else
                {
                    string sql = @"select 
c.coop_name,s.store_id,s.sliptype_code,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.invoicedoc_no,s.debt_name
,(k.debt_addr||' หมู่ '|| '-' ||' ต. '||k.debt_tumbon ||' อ. '||k.debt_amphur  ||' จ. '||k.debt_province || ' '|| k.debt_postcode )  as addr
,m.vat_flag,d.product_no , p.product_desc,sum(d.item_qty) item_qty , u.unit_desc,d.product_price,sum(d.discount_amt) discount_amt,sum(d.itemnet_amt) itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt,FTREADTBATH(s.slipnet_amt) AS MONEY_THAI
 from ststockslip s 
left join ststockslipdet d on d.coop_id = s.coop_id and d.store_id = s.store_id and d.slip_no = s.slip_no and d.slipdet_status = 1
left join ststockmaster m on m.coop_id = d.coop_id and m.store_id = d.store_id and m.product_no = d.product_no and m.product_status = 1
left join stproductmaster p on p.coop_id = d.coop_id and p.product_no = d.product_no
left join stucfunit u on u.coop_id = p.coop_id and u.unit_code = p.unit_code
left join stdebtmaster k on k.coop_id = s.coop_id and k.debt_no = s.debt_no
left join cmcoopmaster c on c.coop_id = s.coop_id
where  s.coop_id={0} and s.store_id={1} and s.slip_no={2} and s.slip_status = 1
group by c.coop_name,s.store_id,c.addr_no,c.addr_moo,c.addr_tambol,c.addr_amphur,c.addr_province,c.addr_postcode,
s.debt_no,s.slip_no,s.sliptype_code,s.invoicedoc_no,s.debt_name
,k.debt_addr,k.debt_tumbon ,k.debt_amphur  ,k.debt_province , k.debt_postcode ,d.product_no
,m.vat_flag , p.product_desc, u.unit_desc,d.product_price,d.discount_amt,d.itemnet_amt,s.slip_amt,s.vat_amt ,s.slipnet_amt
order by s.slip_no,d.product_no";
                    sql = WebUtil.SQLFormat(sql, coop_id, store_id, slip_no);
                    DataTable data = WebUtil.Query(sql);
                    Printing.PrintAppletPB(page, report_name, data);
                }
                #endregion
            }
            #endregion
        }

        public static void of_prin_debt_mrk(PageWeb page, string function_id, string report_name, string coop_id, string ref_incdecno, string debtincdec_type, string store_id)
        {
            #region fuction ใบเสร็จชำระลูกหนี้ แม่จัน
            if (function_id == "of_print_debt_mja")
            {
                string sql = @"select * from(
SELECT 1 sort,d.debt_no,d.ref_incdecno,
TO_CHAR(d.slip_date, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') || ' #' || TO_CHAR(d.slip_date, 'HH24:MI')|| '#' slip_date,
'ชำระต้นเงิน' || t.store_desc|| '  '||'ตามสัญญาเลขที่ '||d.contract_no detail,NVL(d.principal_payment+d.principal_arrear_amt,0) payment_amt
,coop_name,m.addr_no,'หมู่ '|| m.addr_moo addr_moo,'ตำบล/แขวง '||m.addr_tambol addr_tambol,'อำเภอ/เขต '||m.addr_amphur addr_amphur,'จังหวัด '||m.addr_province addr_province
,m.addr_postcode,'Tel. '||m.addr_phone addr_phone,'Fax. '||m.addr_fax addr_fax,FTREADTBATH(d.principal_payment+d.int_payment+d.fine_payment+d.principal_arrear_amt) txt_bath,d.entry_id,NVL(mb.membgroup_code,'000') membgroup_code
, dm.debt_name, NVL(dm.debt_addr,'-') debt_addr,'ต. '||NVL(dm.debt_tumbon,'-') debt_tambol,'อ. '||NVL(dm.debt_amphur,'-')  debt_amphur,'จ. '|| NVL(dm.debt_province,'-')  debt_province
,NVL(dm.debt_postcode,'-') debt_postcode ,'Tel. '||NVL(dm.debt_phone,'-')  debt_phone,d.principal_balance as balance_amt
from stcontractslip d
left join ststockslip s on s.coop_id = d.coop_id and s.slip_no = d.ref_slipno and s.store_id={3}
left join ststore t on t.coop_id = s.coop_id and t.store_id = s.store_id
left join cmcoopmaster m on m.coop_id = d.coop_id
left join mbmembmaster mb on mb.member_no = d.debt_no and mb.coop_id = d.coop_id
left join stdebtmaster dm on dm.debt_no = d.debt_no and dm.coop_id = d.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
union 
SELECT  2 sort,'','',
'' slip_date,
'ชำระค่าปรับ' || t.store_desc|| '  '||  TO_CHAR(d.calfine_from, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') || ' - ' || TO_CHAR(d.calfine_to, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI'), NVL(d.fine_payment,0) payment_amt
,'','','','','','','','','','','','','','','','','','','',0
 from stcontractslip d
left join ststockslip s on s.slip_no = d.ref_slipno and s.coop_id = d.coop_id and s.store_id={3}
left join ststore t on t.store_id = s.store_id and t.coop_id = s.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
union 
SELECT 3 sort,'','',
'' slip_date,
'ชำระดอกเบี้ย' || t.store_desc|| '  '|| TO_CHAR(d.calint_from, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI')|| ' - ' || TO_CHAR(d.calint_to, 'dd/MM/yyyy', 'NLS_CALENDAR=''THAI BUDDHA'' NLS_DATE_LANGUAGE=THAI') ,NVL(d.int_payment,0) payment_amt
,'','','','','','','','','','','','','','','','','','','',0
 from stcontractlimitdet d
left join ststockslip s on s.slip_no = d.ref_slipno and s.coop_id = d.coop_id and s.store_id={3}
left join ststore t on t.store_id = s.store_id and t.coop_id = s.coop_id
 where d.coop_id={0}  and d.ref_incdecno={1} and d.debtincdec_type={2}
)where payment_amt >0  ";
                sql = WebUtil.SQLFormat(sql, coop_id, ref_incdecno, debtincdec_type, store_id);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
            #endregion
        }

        public static void of_print_credebt_mrk(PageWeb page, string function_id, string report_name, string coop_id, string store_id, string debttype_code, string debt_no, string seq_no, string refdoc_no)
        {
            #region fuction ใบเสร็จชำระลูกหนี้/เจ้าหนี้ เกษตรวิสัย
            if (function_id == "of_print_debt_kvs")
            {
                string sql = @"select c.coop_name as coop_name , b.membgroup_desc as membgroup_desc , d.debt_no as debt_no ,
m.debt_name as debt_name , d.refdoc_no as refdoc_no , d.debtdet_date as debtdet_date , d.debtdet_amt as debtdet_amt ,
ftreadbaht(d.debtdet_amt) as money_thai ,  
concat (c.addr_no,' ต. ',c.addr_tambol ,' อ. ',c.addr_amphur,' จ. ',c.addr_province,' ',c.addr_postcode ) as coop_addr, s.store_desc as store_desc,g.refdoc_no as ref_slipno
            from stdebtdet d 
            left join stdebtmaster m on m.debt_no = d.debt_no  and m.debttype_code = {2}  
            left join mbucfmembgroup b on trim(b.membgroup_code) = substr(d.debt_no,1,3)
            left join cmcoopmaster c on c.coop_id = d.coop_id
		   left join ststore s on s.coop_id =  d.coop_id and s.store_id = d.store_id
			left join stdebtdecdet g on g.coop_id = d.coop_id and g.store_id = d.store_id and g.debtdecdoc_no = d.refdoc_no
            where  d.coop_id = {0} and d.store_id ={1}  and d.debttype_code = {2} and d.debt_no = {3}
            and d.seq_no = {4} and d.refdoc_no = {5} ";
                sql = WebUtil.SQLFormat(sql, coop_id, store_id, debttype_code, debt_no, seq_no, refdoc_no);
                DataTable data = WebUtil.Query(sql);
                Printing.PrintAppletPB(page, report_name, data);
            }
            #endregion
        }
        public static void LoanPrintBook(PageWeb page, String xml)
        {
            Printing.PrintApplet(page, "loan_printbook", xml);

        }

    }
}