미스토리 :: 임시

『 지금의 나는... 』
1 지금 내가 하고 있는 일의 목표는 분명한가?
2 지금 내가 하고 있는 일에 가치가 부여되고 있고 일의 성과를 추출하고 있는가?
3 지금 나는 다양한 성격의 사람과 대화를 잘 할 수 있는가? 또, 협상의 기술이 있는가?
4 지금 나는 프레젠테이션 스킬이 우수한가?
5 지금 나는 기획문서를 쉽고 빠르게 작성할 수 있는가?
6 지금 나는 시간관리를 하고 있는가?
7 지금 나는 변화와 개선점을 파악할 수 있고 제시할 수 있는가?
* 내 아들,딸과 아내가 그리고 내 부모님과 하나님이 나의 성공을 간절히 바라고 있다.

임시

분류없음 : 2009/05/11 12:44

Dim gotopage, pagesize
gotopage = Request("gotopage")
If gotopage = "" Then
gotopage = 1
End If
pagesize = 30

Dim selViewCols, GroupBy, Year1, Year2
Dim moncnt, mon1, mon2, mon3, mon4, mon5, mon6, mon7, mon8, mon9, mon10, mon11, mon12, mons(12)
Dim extcnt, ext0, ext50, ext150, ext200, ext250, ext300, ext350, ext400,extsum
Dim OTTime, HourlyPay

selViewCols = Trim(request("selViewCols"))
GroupBy = Trim(request("GroupBy"))
Year1 = Trim(request("Year1"))
If Year1 <> "" Then
    Year2 = CStr(cint(Year1) + 1)
End If

If session("Influence") <> "HR Master" then
    OTTime = 1
    HourlyPay = 0
Else
    OTTime = inStr(1,selViewCols,"OTTime")
    HourlyPay = inStr(1,selViewCols,"HourlyPay")
End If
mon1 =   inStr(1,selViewCols,"mon1")
mon2 =   inStr(1,selViewCols,"mon2")
mon3 =   inStr(1,selViewCols,"mon3")
mon4 =   inStr(1,selViewCols,"mon4")
mon5 =   inStr(1,selViewCols,"mon5")
mon6 =   inStr(1,selViewCols,"mon6")
mon7 =   inStr(1,selViewCols,"mon7")
mon8 =   inStr(1,selViewCols,"mon8")
mon9 =   inStr(1,selViewCols,"mon9")
mon10 = inStr(1,selViewCols,"mon10")
mon11 = inStr(1,selViewCols,"mon11")
mon12 = inStr(1,selViewCols,"mon12")
ext0 =   inStr(1,selViewCols,"Extra0")
ext50 = inStr(1,selViewCols,"Extra50")
ext150 = inStr(1,selViewCols,"Extra150")
ext200 = inStr(1,selViewCols,"Extra200")
ext250 = inStr(1,selViewCols,"Extra250")
ext300 = inStr(1,selViewCols,"Extra300")
ext350 = inStr(1,selViewCols,"Extra350")
ext400 = inStr(1,selViewCols,"Extra400")
extsum = inStr(1,selViewCols,"ExtraSum")
extcnt = 0
If ext0 > 0 Then
    extcnt = extcnt + 1
End If
If ext50 > 0 Then
    extcnt = extcnt + 1
End If
If ext150 > 0 Then
    extcnt = extcnt + 1
End If
If ext200 > 0 Then
    extcnt = extcnt + 1
End If
If ext250 > 0 Then
    extcnt = extcnt + 1
End If
If ext300 > 0 Then
    extcnt = extcnt + 1
End If
If ext350 > 0 Then
    extcnt = extcnt + 1
End If
If ext400 > 0 Then
    extcnt = extcnt + 1
End If
If extsum > 0 Then
    extcnt = extcnt + 1
End If

ReportTitle = setTitle() ' html table의 타이틀

' response.write request("selViewCols")
Dim ExtraSql, PaySql, SQLQuery1, SQLGroup
Dim strCols,tmpCol

'보기열 처리
ExtraSql = ""
ExtraSql = ExtraSql & "SELECT " & GroupBy & " RsTitle , SYear, SMon "
ExtraSql = ExtraSql & getExtItem()
ExtraSql = ExtraSql & " FROM Tb_OT_Summery "

PaySql = ""
PaySql = PaySql & "SELECT " & GroupBy & " RsTitle , SYear, SMon "
PaySql = PaySql & getPayItem()
PaySql = PaySql & " FROM Tb_OT_Summery "

'합계
SQLGroup = ""
SQLGroup = SQLGroup & " Group By " & GroupBy & ", SYear, Smon "
SQLGroup = SQLGroup & " Order By " & GroupBy & ", SYear, Smon "

'조건절 처리
SQLQuery1 = ""
if session("Influence") = "HR Master" then
      SQLQuery1 = SQLQuery1 & " Where (SYear = '" & Year1 & "' OR SYear = '" & Year2 & "') "
    SQLQuery1 = SQLQuery1 & " And " & getWhere()
Else
    SQLQuery1 = SQLQuery1 & " WHERE (Order_Group in (" & session("OrderGroup") & ")) "
      SQLQuery1 = SQLQuery1 & " And (SYear = '" & Year1 & "' OR SYear = '" & Year2 & "') "
    SQLQuery1 = SQLQuery1 & " And " & getWhere()
End if

IF Trim(request("selViewCols")) <> "" Then
ExtraSql = ExtraSql & SQLQuery1 & SQLGroup
PaySql = PaySql & SQLQuery1 & SQLGroup
End If

%>
<html>
<head>
  <meta http-equiv="content-type" content="text/html; charset=euc-kr">
  <title>LINDE OT관리시스템</title>
  <link href="/workhour/css/style.css" rel="stylesheet" media="screen,print" type="text/css" />
    <link href="/workhour/css/style.css" rel="stylesheet" media="screen,print" type="text/css" />
    <script src="/workhour/common/js/service.js" type="text/javascript"></script>
    <script src="/workhour/common/js/popcal2.js" type="text/javascript"></script>
    <script src="/workhour/common/js/util.js" type="text/javascript"></script>
    <script language="JavaScript">
    <!--
      //-- selectField : 조회 기준 선텍 레이어
      //-- ReportField : 레포트 레이어
      function optSelecRecord(opt){
        if(opt == "date"){
          searchTab1.style.display = 'none';
          searchTab2.style.display = 'block';
        }else{
          var params = "";

          if(opt == "name"){
            SearchName(params);
          }
          if(opt == "dept"){
            SearchDept(params);
          }

          searchTab1.style.display = 'block';
          searchTab2.style.display = 'none';
        }
      }

      function moveSelOptions(sObjName,tObjName){
        var sObj = document.getElementById(sObjName);
        var tObj = document.getElementById(tObjName);
        var tmpsel = document.createElement("select");

for (var i = (sObj.length-1) ; i >-1 ; i--){
var tmpobj = sObj.options[i];

          if (tmpobj.selected == true){
            tmpsel.appendChild(tmpobj);
          }
        }

        for (var i = (tmpsel.length-1) ; i >-1 ; i--){
          tObj.appendChild(tmpsel.options[i]);
        }
        tmpsel.removeNode();

        sObj.selectedIndex = -1;
        tObj.selectedIndex = -1;
      }

      function selLeft(sObjName,tObjName){
        var sObj = document.getElementById(sObjName);
        var tObj = document.getElementById(tObjName);
        var tmpsel = document.createElement("select");

for (var i = (sObj.length-1) ; i >-1 ; i--){
var tmpobj = sObj.options[i];

          if (tmpobj.selected == true){
            tmpsel.appendChild(tmpobj);
          }
        }

        for (var i = (tmpsel.length-1) ; i >-1 ; i--){
          if (tObj.length > 0){
            var insert = false;
            for(j=0;j<tObj.length;j++){
              if (parseInt(tObj.options[j].idx,10) > parseInt(tmpsel.options[i].idx,10)){
                tObj.insertBefore(tmpsel.options[i],tObj.options[j])
                insert = true;
                break;
              }
            }

            if (insert == false){
              tObj.appendChild(tmpsel.options[i]);
            }
          }else{
            tObj.appendChild(tmpsel.options[i]);
          }
        }

        tmpsel.removeNode();
        sObj.selectedIndex = -1;
        tObj.selectedIndex = -1;
      }

      /*=========================================================================
    //   콤보 박스 모든 항복 복사
    ==========================================================================*/
      function copyAllOptions(sObjName,tObjName){
        var sObj = document.getElementById(sObjName);
        var tObj = document.getElementById(tObjName);

        for (var i = 0; i < sObj.length ; i++){
          var selOp = sObj.options[i];
          var optionEl = document.createElement("option");

          optionEl.value = selOp.value;
          optionEl.idx = selOp.idx;
          optionEl.innerText = selOp.innerText;

tObj.appendChild(optionEl);
}

sObj.selectedIndex = -1;
tObj.selectedIndex = -1;

      }
      /*=========================================================================
    //   콤보 박스 선택된 항복 복사
    ==========================================================================*/
      function copySelOptions(sObjName,tObjName){
        var sObj = document.getElementById(sObjName);
        var tObj = document.getElementById(tObjName);

for (var i = 0; i < sObj.length ; i++){
var selOp = sObj.options[i];

if (selOp.selected == true){
var append = true;

            for(var j=0;j<tObj.length;j++){
              if (tObj.options[j].value == selOp.value){
                append = false;
                break;
              }
            }
            if (append){
              var optionEl = document.createElement("option");

              optionEl.value = selOp.value;
              optionEl.idx = selOp.idx;
              optionEl.innerText = selOp.innerText;

              tObj.appendChild(optionEl);
            }
          }
        }

        sObj.selectedIndex = -1;
        tObj.selectedIndex = -1;
      }

function deleteOptions(ObjName){
var Obj = document.getElementById(ObjName);

for (var i = (Obj.length-1) ; i >-1 ; i--){
var tmpobj = Obj.options[i];

          if (tmpobj.selected == true){
            Obj.removeChild(tmpobj);
          }
        }

Obj.selectedIndex = -1;
}

      function deleteDifferentOptions(sObjName,tObjName){
        var sObj = document.getElementById(sObjName);
        var tObj = document.getElementById(tObjName);

        for (var i = (tObj.length-1); i > -1 ; i--){
          var del = true;
          var selOp = tObj.options[i];

          for(var j=0;j<sObj.length;j++){
            if (sObj.options[j].value == selOp.value){
              del = false;
              break;
            }
          }
          if(del)
            tObj.removeChild(selOp);
        }

        sObj.selectedIndex = -1;
        tObj.selectedIndex = -1;
      }

     /*=========================================================================
    //   조회대상 조회 : 이름
    ==========================================================================*/
    function SearchName(params){
      new ajax.xhr.Request("SearchName","/workhour/common/query/search_name.asp", params, Callback, "POST");
    }

     /*=========================================================================
    //   조회대상 조회 : 부서별
    ==========================================================================*/
    function SearchDept(params){
      new ajax.xhr.Request("SearchDept","/workhour/common/query/search_dept.asp", params, Callback, "POST");
    }

    /*=========================================================================
    //   결과리턴
    ==========================================================================*/
    function Callback(req, svcid){
      if (req.readyState == 4){
       if (req.status == 200){
        //성명별
        if (svcid == "SearchName"){
         var xmlRet = req.responseText;

var xmlTeam1 = document.getElementById("xmlName");
xmlTeam1.loadXML(xmlRet);

var xmlRow = xmlTeam1.getElementsByTagName("ROW");

        //부서별
        if (svcid == "SearchDept"){
         var xmlRet = req.responseText;

var xmlTeam1 = document.getElementById("xmlDept");
xmlTeam1.loadXML(xmlRet);

var xmlRow = xmlTeam1.getElementsByTagName("ROW");

         if (xmlRow.length == 0){
          InitCombo(document.getElementById("searchList"),null);
         }
         else{
          InitCombo(document.getElementById("searchList"),null);
          BindCombo(document.getElementById("searchList"), xmlRow, '');
         }
        }
       }
       else{
        alert("error:"+req.status);
       }
      }
    }

    function selectAllOptions(ObjNm){
       var Obj = document.all[ObjNm];
       for (var i = 0; i< Obj.length; i++){
         Obj.options[i].selected = true;
       }
    }

    function goReport(){
     selectAllOptions("selViewCols");

     document.forms[0].submit();
    }

   function ExcelDownLoad(){

     var selViewCols = "<%=Trim(selViewCols)%>";
        var GroupBy = "<%=Trim(GroupBy)%>";
        var Year1 = "<%=Trim(Year1)%>";
        var Year2 = "<%=Trim(Year2)%>";

        var param = "" ;

        param += "selViewCols=" + selViewCols;
        param += "&GroupBy="+GroupBy;
        param += "&Year1=" + Year1;
        param += "&Year2=" + Year2;

   OpenDownLoadPage("otmng_4_7_Excel.asp?" + param);
   }
  // -->
  </script>
</head>

<body bgcolor="white" >
  <form name="nform" method="post" action="otmng_4_7.asp">
  <table border="0" cellpadding="0" cellspacing="0" width="766">
      <tr>
        <td width="30"><img src="/workhour/img/blank.gif" /></td>
        <td align="left" valign="top" width="736">
       <table width="100%">
     <tr>
      <td height="40" valign="middle"><img src="/workhour/img/title_2_4.gif"></td>
     </tr>
         <tr>
           <td align="center">
             <p>
                  <a href="otmng_4.asp">
                    <img src="/workhour/img/btn_s_user.gif" border="0" alt="시용자정의">
                  </a>
<%if session("Influence") = "HR Master" then %>
                  <a href="otmng_4_6.asp">
                    <img src="/workhour/img/btn_s_pay.gif" border="0" alt="급여반영자료">
                  </a>
<%end if%>
                  <a href="otmng_4_7.asp">
                    <img src="/workhour/img/btn_s_year.gif" border="0" alt="년간합계비교">
                  </a>
<%if session("Influence") = "HR Master" then %>
                  <a href="otmng_4_8.asp">
                    <img src="/workhour/img/btn_s_hr.gif" border="0" alt="HR">
                  </a>
<%end if%>
                </p>
           </td>
        </tr>
            <tr>
              <td height="20" align="right" bgcolor="white" >
                <a href="#" onclick="ExcelDownLoad();">Excel내려받기</a> 
              </td>
            </tr>
            <tr>
              <td height="25" align="center">


                
             <div id=selectField style="<%If extcnt = 0 Then%>display:block<%Else%>display:none<%End If%>">
                <table border="0" cellpadding="0" cellspacing="0" width="570">
                  <tr>
                    <td>
                      <table border="0" cellpadding="0" cellspacing="0" width="570" bgcolor="#F7F7F7" background="/workhour/img/otmng_4_bg.gif">
                        <tr>
                          <td align="center" colspan="3" height="54">
                            <p><img src="/workhour/img/otmng_4_ti1.gif" border="0"></p>
                          </td>
                        </tr>
                        <tr>
                          <td align="center" colspan="3" height="54">
                            조회기준 <select name="GroupBy" size="1" class="sel" style="width:90;" >
                              <option value="KName" selected>이름별
                              <option value="Location" <%IF Groupby = "Location" Then%>selected<%End if%>>지역별
                              <option value="Division" <%IF Groupby = "Division" Then%>selected<%End if%>>부문별
                              <option value="Department" <%IF Groupby = "Department" Then%>selected<%End if%>>부서별
                              <option value="Team" <%IF Groupby = "Team" Then%>selected<%End if%>>팀별
                            </select>
                               비교 년도
                            <select name="Year1" size="1" class="sel" style="width:90;">
<%if session("Influence") = "HR Master" then%>
                              <option value="2007" >2007/2008
<%End if%>
                              <option value="2008" selected>2008/2009
                            </select>
                          </td>
                        </tr>
                        <tr>
                          <th align="center" height="25">
                            <p>[열목록]</p>
                          </th>
                          <th width="50" align="center" height="25">
                            <p> </p>
                          </th>
                          <th align="center" height="25">
                            <p>[선택된 목록]</p>
                          </th>
                        </tr>
                        <tr>
                          <td align="center" valign="top">
                            <p align="center">
                              <select id="viewCols" name="viewCols" style="width:230;height:140;" multiple class="intxt_textarea1">
                                <option value="mon1" idx="1">1월</option>
                                <option value="mon2" idx="2">2월</option>
                                <option value="mon3" idx="3">3월</option>
                                <option value="mon4" idx="4">4월</option>
                                <option value="mon5" idx="5">5월</option>
                                <option value="mon6" idx="6">6월</option>
                                <option value="mon7" idx="7">7월</option>
                                <option value="mon8" idx="8">8월</option>
                                <option value="mon9" idx="9">9월</option>
                                <option value="mon10" idx="10">10월</option>
                                <option value="mon11" idx="11">11월</option>
                                <option value="mon12" idx="12">12월</option>
                                
                                <option value="Extra50" idx="13">50%</option>
                                <option value="Extra150" idx="14">150%</option>
                                <option value="Extra200" idx="15">200%</option>
                                <option value="Extra250" idx="16">250%</option>
                                <option value="Extra300" idx="17">300%</option>
                                <option value="Extra350" idx="18">350%</option>
                                <option value="Extra400" idx="19">400%</option>
                                <option value="ExtraSum" idx="20">할증합계</option>
<%if session("Influence") = "HR Master" then%>
                                <option value="OTTime" idx="21">OT시간</option>
                                <option value="HourlyPay" idx="22">시급</option>
<%end if%>
                              </select>
                            </p>
                          </td>
                          <td width="50" align="center" valign="middle">
                            <p>
                              <a href="#" onclick="moveSelOptions('viewCols','selViewCols')">
                                <img src="/workhour/img/arrow_big.gif" border="0">
                              </a>
                              <br><br>
                              <a href="#" onclick="selLeft('selViewCols','viewCols')">
                                <img src="/workhour/img/arrow_big2.gif" border="0"></a>
                              </p>
                          </td>
                          <td align="center" valign="top">
                            <p align="center">
                              <select id="selViewCols" name="selViewCols" style="width:230;height:140;" multiple class="intxt_textarea1">
                              </select>
                            </p>
                          </td>
                        </tr>
                        <tr>
                          <td align="center" valign="top" height="10" colspan="3">
                            <p><img src="/workhour/img/otmng_4_bot.gif" border="0"></p>
                          </td>
                        </tr>
                      </table>
                    </td>
                  </tr>
                  <tr>
                    <td>
                       <p> </p>
                    </td>
                  </tr>
                  <tr>
                    <td align="center">
                      <p>
                          <a href="#" onclick="goReport();">
                            <img src="/workhour/img/btn_report.gif" border="0" alt="레포트조회">
                          </a>
                      </p>
                    </td>
                  </tr>
                </table>
                </div>

</td>
            </tr>
     <tr>
      <td>


                
                <div align="left" style="width:736;height:380;overflow-y:scroll;overflow-x:scroll;<%If extcnt <> 0 Then%>display:block<%Else%>display:none<%End If%>">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
    <td width="50" height="100%">
      <table border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" height="100%" style="table-layout:fixed">
        <tr>
           <th width="50" height="100%" align="center" bgcolor="#D7E8F9"><span id="years">년도</span></th>
        </tr>
      </table>
    </td>
    <td height="100%">
      <table border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" height="100%" style="table-layout:fixed">
        <tr height="100%">
          <th width="110" height="100%" align="center" bgcolor="#D7E8F9"><span id="RecodeTitle">
<%IF Groupby = "KName" Then%>이름<%End if%>
<%IF Groupby = "Location" Then%>지역<%End if%>
<%IF Groupby = "Division" Then%>부문<%End if%>
<%IF Groupby = "Department" Then%>부서<%End if%>
<%IF Groupby = "Team" Then%>팀<%End if%>
          </span></th>
        </tr>
      </table>
    </td>
    <%
      moncnt = 0
      If mon1 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "01"
    %>
    <td>
      <table id="Title1" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          1월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon2 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "02"
    %>
    <td>
      <table id="Title2" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          2월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon3 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "03"
    %>
    <td>
      <table id="Title3" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          3월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon4 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "04"
    %>
    <td>
      <table id="Title4" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          4월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon5 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "05"
    %>
    <td>
      <table id="Title5" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          5월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon6 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "06"
    %>
    <td>
      <table id="Title6" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          6월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon7 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "07"
    %>
    <td>
      <table id="Title7" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          7월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon8 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "08"
    %>
    <td>
      <table id="Title8" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          8월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon9 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "09"
    %>
    <td>
      <table id="Title9" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          9월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon10 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "10"
    %>
    <td>
      <table id="Title10" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          10월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon11 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "11"
    %>
    <td>
      <table id="Title11" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          11월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
    <%
      If mon12 > 0 Then
        moncnt = moncnt + 1
        mons(moncnt) = "12"
    %>
    <td>
      <table id="Title12" border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <tr>
          <th width="100%" height="20" colspan="<%=extcnt%>" align="center" bgcolor="#D7E8F9"><p>
          12월</p></th>
        </tr>
        <tr>
          <%=ReportTitle%>
        </tr>
      </table>
    </td>
    <%End If%>
</tr>

<%

' response.write ExtraSql & "<br><br>"
' response.write PaySql & "<br><br>"
' response.end

on error resume next

If extcnt <> 0 Then

    ExtraRs.Open ExtraSql, con, adOpenKeyset, adLockReadOnly, adCmdText
    If HourlyPay > 0 Then
      PayRs.Open PaySql, con, adOpenKeyset, adLockReadOnly, adCmdText
    End If

i = 0

Do Until ExtraRs.Eof

i = i + 1

      If oldtitle <> ExtraRs("RsTitle") Then
        oldtitle = Trim(ExtraRs("RsTitle"))
      End If
%>

<tr>
    <td width="50">
      <%=RowHead()%>
    </td>
<%
      Dim monsLoop

For monsLoop = 1 to moncnt
%>
    <td>
      <table border="0" cellspacing="1" bgcolor="#CCCCCC" width="100%" style="table-layout:fixed">
        <%=ExtraRow(oldtitle, Year1, mons(monsLoop))%>
        <%If HourlyPay > 0 Then%>
          <%=PayRow(oldtitle, Year1, mons(monsLoop))%>
        <%End If%>
        <%=ExtraRow(oldtitle, Year2, mons(monsLoop))%>
        <%If HourlyPay > 0 Then%>
          <%=PayRow(oldtitle, Year2, mons(monsLoop))%>
        <%End If%>
      </table>
    </td>
<%
      Next
%>
</tr>

<%
    loop

    ExtraRs.close
    PayRs.close
    con.close

End if

' if Err.Number <> 0 Then
'    Response.Write "에러 상세 설명<BR> "
'    Response.Write Err.Number & " - 에러 번호<BR>"
'    Response.Write Err.Description & " - 에러 메시지<BR>"
'    Response.Write Err.Source & " - 에러 출처<BR>"
'    Response.Write Err.NativeError & " - DB 에러번호<BR>"
'    Response.Write Err.HelpFile & " - 에러 파일<BR>"
'    Response.Write Err.HelpContext & " - 에러 Context<BR>"
'    response.write " i = " & i
' End If
%>

</table>

        </div>
      </td>
     </tr>
            <tr>
              <td height="30" align="center" valign="bottom">
              </td>
            </tr>
    </table>
   </td>
      </tr>
  </table>
  </form>
</body>

</html>