function Cal_Hb(d,a){if(a){halbuSel=new Array(1);halbuSel[0]=a}else{halbuSel=document.getElementById("halbuSel_"+lineupSet[3]).value.split(",")}HbRsltList="";HbRsltGap="";HbRsltWol="";if(document.getElementById("halbuSel_"+lineupSet[3]).value){for(hj=0;hj<halbuSel.length;hj++){var c=0;var b=-1;halbuSet=document.getElementById("halbuSet_"+halbuSel[hj]).value.split("^");PrRsltSet=document.getElementById("PrRslt_"+d).value.split("^");DrRsltSet=document.getElementById("DrRslt_"+d).value.split("^");YjRsltSet=document.getElementById("YjRslt_"+d).value.split("^");ilsibul=parseInt(PrRsltSet[11])+parseInt(DrRsltSet[6]);if(halbuSet[0]<50){Hkd="H"}else{if(halbuSet[0]==90){Hkd="R"}else{Hkd="L"}}month=alphaNum(document.getElementById("Smonth"+Hkd+actNo).value);HbSel=document.getElementById("SHbSel"+actNo).value;halNo=halbuSel[hj].substring(0,4);if(HbSel=="GY"){gayong=alphaNum(document.getElementById("Sgayong"+actNo).value)*10000}else{gayong=0}if(!c&&halbuSet[0]==90){tmpRT=lineupSet[21].split(":");if(tmpRT[0]){c=98}else{c=2}}if(!c&&gayong>ilsibul){c=1}if(!c&&lineupSet[16].indexOf(halNo)>=0){c=2}if(!c){temp=halbuSet[2].split(":");for(k=0;k<temp.length;k++){temp2=temp[k].split("~");if(temp2.length==1&&month==temp2[0]){b=k}else{if(temp2.length==2&&month>=temp2[0]&&month<=temp2[1]){b=k}}}if(b<0){c=3}if(halbuSel[hj].indexOf("B")>=0){costAlt=halbuSet[14].split("/");costAlt[1]=parseInt(costAlt[1]);if(costAlt[2]){temp2=costAlt[2].split("~");if(month<temp2[0]||month>temp2[1]){c=3}}}limitHW=limitJW=limitYW=limitWN="";if(halbuSet[15]){temp=halbuSet[15].split(",");for(k=0;k<temp.length;k++){temp2=temp[k].split(":");if(temp2[0]=="HW"){limitHW=temp2[1]}else{if(temp2[0]=="JW"){limitJW=temp2[1]}else{if(temp2[0]=="YW"){limitYW=temp2[1]}else{if(temp2[0]=="WN"){limitWN=temp2[1]}}}}}}}if(!c||c==98){addcostWon=new Array();if(halbuSet[13]){tempJ=halbuSet[13].split(":");if(tempJ.length==1){tempJ2=tempJ[0].split(",")}else{selLoc=0;if(tempJ[0]=="G"){tempJa=tempJ[1].split(",");for(m=0;m<tempJa.length;m++){if(selLoc==0&&(tempJa[m].indexOf(lineupSet[3])>=0||tempJa[m].indexOf("M"+lineupSet[2])>=0)){selLoc=m+2}}}if(selLoc!=0){tempJ2=tempJ[selLoc].split(",")}else{halbuSet[13]=""}}if(halbuSet[13]){for(m=0;m<tempJ2.length;m++){tempJ3=tempJ2[m].split("/");addcostWon[tempJ3[0]]=tempJ3[1]}}}}if(!c){CalSet=halbuSet[9].split(":");gab=0;soosoo=0;injidae=0;judang=0;bojeung=0;BDTotal=0;HalWon=0;YouWon=0;SunSoo=0;halwonR=0;youwonR=0;sunsooR=0;halwonS=CalSet[0];youwonS="";sunsooS="";chogiNap=0;wolNapSum=0;wolIjaSum=0;mangiNap=0;NapTotal=0;MonSet="";WolRst="";HalRate="";Jrate="";Yrate="";etcSet="";youselSet=""}if(!c&&halbuSet[0]<90){dcAdd=0;if(halbuSet[13]&&halbuSet[13].indexOf("DC")>=0){Cal_Pr(d,"DC","");Cal_Dr(d,"DC","");PrRsltSet=document.getElementById("PrRslt_Temp").value.split("^");DrRsltSet=document.getElementById("DrRslt_Temp").value.split("^");dcAdd=parseInt(PrRsltSet[11])+parseInt(DrRsltSet[6])-ilsibul}if(!c&&halbuSet[0]>50){if(halbuSet[18]=="S"){CalSet=halbuSet[9].split(":");job2=CalSet[8].split("/");jangaeSet=document.getElementById("Sjangae"+actNo)[0].value.split(":");if(job2[0]=="A"){if(lineupSet[10]<1000){localSet=document.getElementById("Slocal"+actNo)[8].value.split(":")}else{if(lineupSet[7]==1&&lineupSet[12]>=7){localSet=document.getElementById("Slocal"+actNo)[8].value.split(":")}else{if(lineupSet[8].indexOf("M")>=0&&lineupSet[10]>2000){localSet=document.getElementById("Slocal"+actNo)[8].value.split(":")}else{if(lineupSet[7]==2||lineupSet[7]==3){localSet=document.getElementById("Slocal"+actNo)[8].value.split(":")}else{localSet=document.getElementById("Slocal"+actNo)[2].value.split(":");addcostWon.DR=parseInt(addcostWon.DR)+parseInt(addcostWon.TB)}}}}}else{if(job2[0]==""){localSet=document.getElementById("Slocal"+actNo)[2].value.split(":")}else{localSet=document.getElementById("Slocal"+actNo)[job2[0]].value.split(":")}}Cal_Pr(d,"LS","");Cal_Dr(d,"LS","");jangaeSet=document.getElementById("Sjangae"+actNo)[document.getElementById("Sjangae"+actNo).selectedIndex].value.split(":");localSet=document.getElementById("Slocal"+actNo)[document.getElementById("Slocal"+actNo).selectedIndex].value.split(":");PrRsltSet=document.getElementById("PrRslt_Temp").value.split("^");DrRsltSet=document.getElementById("DrRslt_Temp").value.split("^")}addSet=halbuSet[10].split("/");leaseWon=0;sunsooWon=0;if(halbuSet[14].indexOf("P")>=0){leaseWon+=parseInt(PrRsltSet[12])}else{sunsooWon+=parseInt(PrRsltSet[12])}if(halbuSet[14].indexOf("D")>=0){leaseWon+=parseInt(DrRsltSet[1])}else{sunsooWon+=parseInt(DrRsltSet[1])}if(halbuSet[14].indexOf("C")>=0){leaseWon+=parseInt(DrRsltSet[2])}else{sunsooWon+=parseInt(DrRsltSet[2])}if(halbuSet[14].indexOf("G")>=0){leaseWon+=parseInt(DrRsltSet[4])}else{sunsooWon+=parseInt(DrRsltSet[4])}if(halbuSet[14].indexOf("B")>=0){if(halbuSet[13]&&halbuSet[13].indexOf("DR")>=0){leaseWon+=parseInt(addcostWon.DR)}else{leaseWon+=parseInt(DrRsltSet[5])}}else{if(halbuSet[13]&&halbuSet[13].indexOf("DR")>=0){sunsooWon+=parseInt(addcostWon.DR)}else{sunsooWon+=parseInt(DrRsltSet[5])}}if(halbuSet[14].indexOf("T")>=0){leaseWon+=parseInt(YjRsltSet[1])}}if(CalSet[0]=="TS"){CarPrice=parseInt(PrRsltSet[12])}else{if(CalSet[0]=="CW"){CarPrice=parseInt(leaseWon)}else{CarPrice=parseInt(PrRsltSet[13])}}if(halbuSet[5]){temp=halbuSet[5].split(":");if(temp.length==1){temp2=temp[0].split("~")}else{temp2=temp[b].split("~")}if(temp2[0]>100){MaxWon=updown(CarPrice-temp2[0],CalSet[1],"down")}else{MaxWon=updown(CarPrice-CarPrice*temp2[0]/100,CalSet[1],"down")}if(temp2[1]>100){MinWon=updown(CarPrice-temp2[1],CalSet[1],"up")}else{MinWon=updown(CarPrice-CarPrice*temp2[1]/100,CalSet[1],"up")}}else{if(halbuSet[6]){temp=halbuSet[6].split(":");if(temp.length==1){temp2=temp[0].split("~")}else{temp2=temp[b].split("~")}if(temp2[0]>100){MinWon=temp2[0]}else{MinWon=updown(CarPrice*temp2[0]/100,CalSet[1],"up")}if(temp2[1]>100){MaxWon=temp2[1]}else{MaxWon=updown(CarPrice*temp2[1]/100,CalSet[1],"down")}}else{MinWon=0;MaxWon=CarPrice}}if(!c&&halbuSet[0]==60){if(halbuSet[13]&&halbuSet[13].indexOf("JD")>=0){judang=cal_judang(HalWon,addcostWon.JD)}if(halbuSet[13]&&halbuSet[13].indexOf("IJ")>=0){injidae=cal_inji(HalWon,addcostWon.IJ)}BDTotal=injidae+judang;if(halbuSet[18]=="S"&&addSet[2]){SunSoo=updown(CarPrice*addSet[2]/100,CalSet[1],"up")}else{SunSoo=updown(gayong-BDTotal-sunsooWon,CalSet[1],"up")}temp=halbuSet[7].split(":");if(temp.length==1){temp2=temp[0].split("~")}else{temp2=temp[b].split("~")}MinSun=updown(CarPrice*temp2[0]/100,CalSet[1],"down");MaxSun=updown(CarPrice*temp2[1]/100,CalSet[1],"down");if(MinSun>SunSoo){c=12}else{if(MaxSun<SunSoo){c=13}}sunsooR=updown(SunSoo/CarPrice*10000,1,"down")/100}else{if(!c){if(HbSel=="GY"){HalWon=updown(ilsibul-gayong,CalSet[1],"down")}else{if(HbSel=="HW"){HalWon=updown(alphaNum(document.getElementById("Shalwon"+actNo).value)*10000,CalSet[1],"down")}else{if(HbSel=="SS"){HalWon=updown((100-alphaNum(document.getElementById("Ssunsoo"+actNo).value))*CarPrice/100,CalSet[1],"down")}}}if(halbuSel[hj].indexOf("B")>=0){temp=costAlt[0].split(":")}else{temp=halbuSet[12].split(":")}if(temp.length==1){soosooR=temp[0]}else{soosooR=temp[b]}for(k=0;k<3;k++){HalWon=HalWon+gab;if(HbSel=="HW"||HbSel=="SS"){k=3}sunsooR=updown((CarPrice-HalWon)/CarPrice*10000,1,"down")/100;if(halbuSet[0]<50){soosoo=cal_soosoo(month,HalWon,sunsooR,soosooR,CalSet[3]);injidae=cal_inji(HalWon,-1)}if(halbuSet[13]&&halbuSet[13].indexOf("JD")>=0){judang=cal_judang(HalWon,addcostWon.JD)}if(halbuSet[13]&&halbuSet[13].indexOf("IJ")>=0){injidae=cal_inji(HalWon,addcostWon.IJ)}if(halbuSel[hj].indexOf("B")>=0){BDTotal=injidae+judang+bojeung+dcAdd}else{BDTotal=soosoo+injidae+judang+bojeung+dcAdd}if(k<3){gab0=gab=ilsibul-gayong+BDTotal-HalWon;if(gab>0){gab=updown(gab,CalSet[1],"up")}else{if(gab<-100000){gab=updown(gab,CalSet[1],"up")}else{k=3}}}}if(HalWon>MaxWon){c=4}else{if(HalWon<MinWon){c=5}}halwonR=updown((100-sunsooR)*100,1,"down")/100;if(limitHW&&!c){temp=limitHW.split("~");if(temp[0]&&temp[0]<100&&halwonR<temp[0]){c=4}else{if(temp[0]&&temp[0]>100&&HalWon<temp[0]){c=4}else{if(temp[1]&&temp[1]<100&&halwonR>temp[1]){c=5}else{if(temp[1]&&temp[1]>100&&HalWon>temp[1]){c=5}}}}}}}if(halbuSet[0]==60){chogiNap=SunSoo+BDTotal+sunsooWon}else{chogiNap=ilsibul-HalWon+BDTotal}if(!c&&(halbuSet[0]==20||halbuSet[0]==60||halbuSet[0]==80)){if(halbuSet[8]){temp=halbuSet[8].split(":");if(temp.length==1){YouSet=temp[0]}else{YouSet=temp[b]}temp=YouSet.split("~")}else{temp=halbuSet[16].split(",");janNo="";for(n=0;n<temp.length;n++){if(lineupSet[17].indexOf(temp[n])>=0&&!janNo){janNo=temp[n]}}if(!janNo){janNo=temp[0]}jangaSet=document.getElementById("jangaSet_"+janNo).value.split("^");temp2=jangaSet[1].split(":");temp3=jangaSet[2].split(":");janRate="";for(m=0;m<temp2.length;m++){temp4=temp2[m].split("~");if(temp4.length==1&&month==temp4[0]){janRate=temp3[m]}else{if(temp4.length==2&&month>=temp4[0]&&month<=temp4[1]){janRate=temp3[m]}}}temp=janRate.split("~");CalSet[5]=jangaSet[0]}if(CalSet[5]=="TS"){YouPrice=parseInt(PrRsltSet[12])}else{if(CalSet[5]=="PR"){YouPrice=parseInt(PrRsltSet[13])}else{if(CalSet[5]=="CW"){YouPrice=parseInt(leaseWon)}else{YouPrice=HalWon}}}if(halbuSet[0]==60){MaxYou=updown(YouPrice*temp[0]/100,CalSet[1],"up");eqR=updown(SunSoo/CarPrice*10000,1,"up")/100;mxR=updown(MaxYou/CarPrice*10000,1,"up")/100;eqR2=updown(eqR*100,100,"down")/100;mxR2=updown(mxR*100,100,"up")/100;StartR=updown(eqR/CalSet[7]*100,100,"up")*CalSet[7]/100;EndR=updown(mxR/CalSet[7]*100,100,"up")*CalSet[7]/100;if(halbuSet[18]=="S"&&addSet[3]){selYr=addSet[3]}else{if(GviewType=="M"){selYr="EQ"}else{if(document.getElementById("YouyeSel_"+halbuSel[hj]).value==""){selYr=addSet[3]}else{selYr=document.getElementById("YouyeSel_"+halbuSel[hj]).value}}}if(halbuSet[18]=="S"&&addSet[3]=="MX"){youwonR=mxR}else{if(eqR>mxR){c=14}else{if(eqR==mxR){youwonR=mxR}else{txt="";sel=0;if(selYr=="EQ"){txt+="<option value='EQ' selected>"+eqR2+"%</option>";sel=1;youwonR=eqR;YouRate="EQ"}else{txt+="<option value='EQ'>"+eqR2+"%</option>"}youselSet=eqR+"/"+eqR2+",";if(StartR<EndR){cont=(EndR-StartR)/CalSet[7]+1;youselSet+=StartR+"/"+EndR+"/"+CalSet[7];for(n=0;n<cont;n++){Rat=parseInt(StartR)+CalSet[7]*n;if(sel==0&&Rat==selYr){txt+="<option value='"+Rat+"' selected>"+Rat+"%</option>";sel=1;youwonR=Rat;YouRate=Rat}else{txt+="<option value='"+Rat+"'>"+Rat+"%</option>"}}}if(selYr=="MX"||sel==0){txt+="<option value='MX' selected>"+mxR2+"%</option>";youwonR=mxR;YouRate="MX"}else{txt+="<option value='MX'>"+mxR2+"%</option>"}youselSet+=","+mxR+"/"+mxR2;txt2="잔존가치 <select name='Syouye_"+halbuSel[hj]+"' id='Syouye_"+halbuSel[hj]+"' onchange=\"javascript:change_YouRate('"+halbuSel[hj]+"',this)\">";txt2+=txt;txt2+="</select>"}}}if(youwonR==eqR){YouWon=SunSoo}else{if(youwonR==mxR){YouWon=MaxYou}else{YouWon=updown(youwonR*CarPrice/100,CalSet[1],"down")}}}else{if(temp.length==1){YouRate=temp[0]}else{if(halbuSel[hj].indexOf("B")>=0){if(document.getElementById("YouyeSel_"+halNo).value==""){YouRate=temp[1]}else{YouRate=document.getElementById("YouyeSel_"+halNo).value}youselSet=","+temp[0]+"/"+temp[1]+"/"+CalSet[7]+","}else{if(document.getElementById("YouyeSel_"+halbuSel[hj]).value==""){selYr=temp[1]}else{selYr=document.getElementById("YouyeSel_"+halbuSel[hj]).value}cont=(temp[1]-temp[0])/CalSet[7]+1;youselSet=","+temp[0]+"/"+temp[1]+"/"+CalSet[7]+",";txt="";sel=0;for(n=0;n<cont;n++){Rat=parseInt(temp[0])+CalSet[7]*n;if((sel==0&&selYr==Rat)||(sel==0&&n==cont-1)){txt+="<option value='"+Rat+"' selected>"+Rat+"%</option>";sel=1;YouRate=Rat}else{txt+="<option value='"+Rat+"'>"+Rat+"%</option>"}}txt2="유예비율 <select name='Syouye_"+halbuSel[hj]+"' id='Syouye_"+halbuSel[hj]+"' onchange=\"javascript:change_YouRate('"+halbuSel[hj]+"',this)\">";txt2+=txt;txt2+="</select>";document.getElementById("YouyeInn_"+halbuSel[hj]).innerHTML=txt2}}YouWon=updown(YouPrice*YouRate/100,CalSet[6],"down");HalWon=HalWon-YouWon;youwonR=updown(YouWon/CarPrice*10000,1,"down")/100;halwonR=updown((halwonR-youwonR)*100,1,"down")/100;youwonS=CalSet[5];if(limitJW&&!c){temp=limitJW.split("~");if(temp[0]&&temp[0]<100&&halwonR<temp[0]){c=6}else{if(temp[0]&&temp[0]>100&&HalWon<temp[0]){c=6}else{if(temp[1]&&temp[1]<100&&halwonR>temp[1]){c=7}else{if(temp[1]&&temp[1]>100&&HalWon>temp[1]){c=7}}}}}if(limitYW&&!c){temp=limitYW.split("~");if(temp[0]&&temp[0]<100&&youwonR<temp[0]){c=8}else{if(temp[0]&&temp[0]>100&&YouWon<temp[0]){c=8}else{if(temp[1]&&temp[1]<100&&youwonR>temp[1]){c=9}else{if(temp[1]&&temp[1]>100&&YouWon>temp[1]){c=9}}}}}youwonR=YouRate}}temp=halbuSet[3].split(":");if(temp.length==1){Jrate=temp[0]}else{if(halbuSet[17]==""||halbuSet[17].indexOf("M")>=0){Jrate=temp[b]}else{if(halbuSet[17].indexOf("S")>=0||halbuSet[17].indexOf("B")>=0||halbuSet[17].indexOf("W")>=0){selLoc=-1;tempA=halbuSet[17].split(":");tempB=tempA[1].split("/");if(halbuSet[17].indexOf("S")>=0||halbuSet[17].indexOf("B")>=0){compS=sunsooR}else{compS=HalWon}for(n=0;n<tempB.length;n++){temp2=tempB[n].split("~");if(temp2[0]&&compS>=temp2[0]&&selLoc==-1){selLoc=n}else{if(temp2[1]&&compS<=temp2[1]&&selLoc==-1){selLoc=n}}}if(selLoc==-1){selLoc=n}Jrate=temp[selLoc]}}}if(!c&&halbuSet[0]==10){if(addcostWon.HW){Tmpwon=cal_wonDC(HalWon,addcostWon.HW);wolhal=cal_wolhal(Tmpwon,Jrate,month,CalSet[2])}else{wolhal=cal_wolhal(HalWon,Jrate,month,CalSet[2])}wolNapSum=wolhal*month;wolIjaSum=wolNapSum-HalWon;HalRate=Jrate;if(halbuSel[hj].indexOf("B")>=0){wolNapSum+=soosoo;wolsoosoo=updown(soosoo/costAlt[1],1,"mid");wolhalA=wolhal+wolsoosoo;if(month>costAlt[1]){monthB=parseInt(costAlt[1])+1;MonSet="1~"+costAlt[1]+","+monthB+"~"+month;WolRst=wolhalA+","+wolhal}else{WolRst=wolhalA}}else{WolRst=wolhal}halwonInn=addpt(HalWon)+"&nbsp;<br>";if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolhal<temp[0]){c=10}else{if(temp[1]&&wolhal>temp[1]){c=11}}}}else{if(!c&&halbuSet[0]==20){temp=halbuSet[4].split(":");if(temp.length==1){Yrate=temp[0]}else{Yrate=temp[b]}wolhal=cal_wolhal(HalWon,Jrate,month,CalSet[2]);wolija=cal_ija(YouWon,Yrate,CalSet[4]);wolNapSum=(wolija+wolhal)*month;wolIjaSum=wolNapSum-HalWon;HalRate=Jrate;if(Jrate!=Yrate){HalRate+=","+Yrate}if(halbuSel[hj].indexOf("B")>=0){wolNapSum+=soosoo;wolsoosoo=updown(soosoo/costAlt[1],1,"mid");wolhalA=wolija+wolhal+wolsoosoo;wolhalB=wolija+wolhal;if(month>costAlt[1]){monthB=parseInt(costAlt[1])+1;MonSet="1~"+costAlt[1]+","+monthB+"~"+month;WolRst=wolhalA+","+wolhalB}else{WolRst=wolhalA}}else{WolRst=wolija+wolhal}halwonInn=addpt(HalWon)+"&nbsp;<br>";halwonInn+=addpt(YouWon)+"&nbsp;<br>";mangiNap=YouWon;if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&(wolija+wolhal)<temp[0]){c=10}else{if(temp[1]&&(wolija+wolhal)>temp[1]){c=11}}}}else{if(!c&&halbuSet[0]==30){temp=halbuSet[4].split(":");if(temp.length==1){Yrate=temp[0]}else{Yrate=temp[b]}halbuSet[10]=parseInt(halbuSet[10]);wolhal=cal_wolhal(HalWon,Jrate,month-halbuSet[10],CalSet[2]);wolija=cal_ija(HalWon,Yrate,CalSet[4]);wolNapSum=wolija*halbuSet[10]+wolhal*(month-halbuSet[10]);wolIjaSum=wolNapSum-HalWon;HalRate=Jrate;if(Jrate!=Yrate){HalRate+=","+Yrate}if(halbuSel[hj].indexOf("B")>=0){wolNapSum+=soosoo;wolsoosoo=updown(soosoo/costAlt[1],1,"mid");if(costAlt[1]<halbuSet[10]){monthB=parseInt(costAlt[1])+1;monthC=parseInt(halbuSet[10])+1;wolhalA=wolija+wolsoosoo;MonSet="1~"+costAlt[1]+","+monthB+"~"+halbuSet[10]+","+monthC+"~"+month;WolRst=wolhalA+","+wolija+","+wolhal}else{if(costAlt[1]>halbuSet[10]){monthB=parseInt(halbuSet[10])+1;monthC=parseInt(costAlt[1])+1;wolhalA=wolija+wolsoosoo;wolhalB=wolsoosoo+wolhal;MonSet="1~"+halbuSet[10]+","+monthB+"~"+costAlt[1]+","+monthC+"~"+month;WolRst=wolhalA+","+wolhalB+","+wolhal}else{wolhalA=wolija+wolsoosoo;monthB=parseInt(halbuSet[10])+1;MonSet="1~"+halbuSet[10]+","+monthB+"~"+month;WolRst=wolhalA+","+wolhal}}}else{monthB=parseInt(halbuSet[10])+1;MonSet="1~"+halbuSet[10]+","+monthB+"~"+month;WolRst=wolija+","+wolhal}halwonInn=addpt(HalWon)+"&nbsp;<br>";if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolija<temp[0]){c=10}else{if(temp[1]&&wolija>temp[1]){c=11}}}}else{if(!c&&halbuSet[0]==40){wolija=cal_ija(HalWon,Jrate,CalSet[4]);wolNapSum=wolija*month;wolIjaSum=wolNapSum;HalRate=Jrate;if(halbuSel[hj].indexOf("B")>=0){wolNapSum+=soosoo;wolsoosoo=updown(soosoo/costAlt[1],1,"mid");monthB=parseInt(costAlt[1])+1;wolhalA=wolija+wolsoosoo;MonSet="1~"+costAlt[1]+","+monthB+"~"+month;WolRst=wolhalA+","+wolhal}else{WolRst=wolija}halwonInn=addpt(HalWon)+"&nbsp;<br>";mangiNap=HalWon;if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolija<temp[0]){c=10}else{if(temp[1]&&wolija>temp[1]){c=11}}}}else{if(!c&&halbuSet[0]==60){wolLSet=CalSet[4].split("/");incentCM=updown(leaseWon*addSet[4]/100,wolLSet[0],wolLSet[1]);incentAG=updown(leaseWon*halbuSet[12]/100,wolLSet[0],wolLSet[1]);if(halbuSet[17].indexOf("I")>=0){Awon=leaseWon+incentCM+incentAG-SunSoo;Ywon=YouWon-SunSoo;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);etcSet=Jrate;Prate=cal_PMrate(wolhal,month,leaseWon-YouWon,YouWon);HalRate=updown(Prate*100,1,"mid")/100}else{Awon=leaseWon;Ywon=YouWon;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);HalRate=Jrate;Awon=leaseWon+incentCM+incentAG-SunSoo;Ywon=YouWon-SunSoo;Irate=cal_PMirr(wolhal,month,Awon,Ywon);etcSet=updown(Irate*100,1,"mid")/100}wolNapSum=wolhal*month;wolIjaSum=wolNapSum-(leaseWon-YouWon);WolRst=wolhal;halwonInn=addpt(leaseWon)+"&nbsp;<br>";halwonInn+=addpt(YouWon)+"&nbsp;<br>";mangiNap=YouWon-SunSoo;if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolhal<temp[0]){c=10}else{if(temp[1]&&wolhal>temp[1]){c=11}}}HalWon=leaseWon}else{if(!c&&halbuSet[0]==70){wolLSet=CalSet[4].split("/");incentCM=updown(HalWon*addSet[4]/100,wolLSet[0],wolLSet[1]);incentAG=updown(HalWon*halbuSet[12]/100,wolLSet[0],wolLSet[1]);if(halbuSet[17].indexOf("I")>=0){Awon=HalWon+incentCM+incentAG;Ywon=0;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);etcSet=Jrate;Prate=cal_PMrate(wolhal,month,HalWon,0);HalRate=updown(Prate*100,1,"mid")/100}else{Awon=HalWon;Ywon=0;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);HalRate=Jrate;Awon=HalWon+incentCM+incentAG;Ywon=0;Irate=cal_PMirr(wolhal,month,Awon,Ywon);etcSet=updown(Irate*100,1,"mid")/100}wolNapSum=wolhal*month;wolIjaSum=wolNapSum-HalWon;WolRst=wolhal;halwonInn=addpt(HalWon)+"&nbsp;<br>";if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolhal<temp[0]){c=10}else{if(temp[1]&&wolhal>temp[1]){c=11}}}}else{if(!c&&halbuSet[0]==80){wolLSet=CalSet[4].split("/");incentCM=updown((HalWon+YouWon)*addSet[4]/100,wolLSet[0],wolLSet[1]);incentAG=updown((HalWon+YouWon)*halbuSet[12]/100,wolLSet[0],wolLSet[1]);if(halbuSet[17].indexOf("I")>=0){Awon=HalWon+YouWon+incentCM+incentAG;Ywon=YouWon;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);etcSet=Jrate;Prate=cal_PMrate(wolhal,month,HalWon,YouWon);HalRate=updown(Prate*100,1,"mid")/100}else{Awon=HalWon+YouWon;Ywon=YouWon;wolhal=updown(cal_PMT(Jrate,month,Awon,Ywon),wolLSet[0],wolLSet[1]);HalRate=Jrate;Awon=HalWon+YouWon+incentCM+incentAG;Ywon=YouWon;Irate=cal_PMirr(wolhal,month,Awon,Ywon);etcSet=updown(Irate*100,1,"mid")/100}wolNapSum=wolhal*month;wolIjaSum=wolNapSum-HalWon;WolRst=wolhal;halwonInn=addpt(HalWon)+"&nbsp;<br>";halwonInn+=addpt(YouWon)+"&nbsp;<br>";mangiNap=YouWon;if(limitWN&&!c){temp=limitWN.split("~");if(temp[0]&&wolhal<temp[0]){c=10}else{if(temp[1]&&wolhal>temp[1]){c=11}}}}}}}}}}if(!c){NapTotal=chogiNap+wolNapSum+mangiNap;GapTotal=NapTotal-ilsibul;JanNap=ilsibul-HalWon-YouWon-SunSoo}}if(halbuSet[0]==90&&c!=2){tempValRT="";tempValCP="";tempValMN="";CalSet=halbuSet[9].split(":");job2=CalSet[4].split("/");jangaeSet=document.getElementById("Sjangae"+actNo)[9].value.split(":");localSet=document.getElementById("Slocal"+actNo)[job2[0]].value.split(":");Cal_Pr(d,"RT","");Cal_Dr(d,"RT","");ComCarTax=YjRsltSet[3];jangaeSet=document.getElementById("Sjangae"+actNo)[document.getElementById("Sjangae"+actNo).selectedIndex].value.split(":");localSet=document.getElementById("Slocal"+actNo)[document.getElementById("Slocal"+actNo).selectedIndex].value.split(":");if(month==48){Oldmon=48}else{Oldmon=36}PrRsltSet=document.getElementById("PrRslt_Temp").value.split("^");DrRsltSet=document.getElementById("DrRslt_Temp").value.split("^");priceD=updown(PrRsltSet[12]*10/11,1,"mid");DrTotal=parseInt(DrRsltSet[1])+parseInt(DrRsltSet[2])+parseInt(DrRsltSet[4])+parseInt(addcostWon.DR);CDwon=DrTotal+priceD;Tmon=halbuSet[2].split(":");Wolsang=updown(CDwon/60,1,"mid");temp=halbuSet[5].split("~");if(temp.length==1){YouRate=temp[0]}else{if(document.getElementById("YouyeSel_"+halbuSel[hj]).value==""){selYr=temp[0]}else{selYr=document.getElementById("YouyeSel_"+halbuSel[hj]).value}cont=(temp[1]-temp[0])/CalSet[2]+1;youselSet=","+temp[0]+"/"+temp[1]+"/"+CalSet[2]+",";txt="";sel=0;for(n=0;n<cont;n++){Rat=parseInt(temp[0])+CalSet[2]*n;if((sel==0&&selYr==Rat)||(sel==0&&n==cont-1)){txt+="<option value='"+Rat+"' selected>"+Rat+"%</option>";sel=1;YouRate=Rat}else{txt+="<option value='"+Rat+"'>"+Rat+"%</option>"}}txt2="선수비율 <select name='Syouye_"+halbuSel[hj]+"' id='Syouye_"+halbuSel[hj]+"' onchange=\"javascript:change_YouRate('"+halbuSel[hj]+"',this)\">";txt2+=txt;txt2+="</select>";document.getElementById("YouyeInn_"+halbuSel[hj]).innerHTML=txt2}TaxWhonap=updown(PrRsltSet[8]*56.2/100,1,"mid");Sunting=parseInt(addcostWon.ST);WonSet=updown(PrRsltSet[13]*10/100,1000,"mid");SunWon=WonSet*YouRate/10;lochal=CalSet[4].split("/");lochal[0]=parseInt(lochal[0])+4;tempValRT+=halbuSet[2]+"^";tempValRT+=DrRsltSet[1]+":"+DrRsltSet[2]+":"+DrRsltSet[3]+":"+DrRsltSet[4]+":"+addcostWon.DR+":"+DrTotal+":"+lochal[1]+":"+lochal[0];tempValCP+=ilsibul+":";tempValCP+=ComCarTax+":";for(k=0;k<Tmon.length;k++){month=Tmon[k];Gamsang=Wolsang*month;temp=halbuSet[3].split(":");if(temp.length==1){Jrate=temp[0]}else{Jrate=temp[k]}temp=halbuSet[4].split(":");if(temp.length==1){Yrate=temp[0]}else{Yrate=temp[k]}temp=halbuSet[7].split(":");if(temp.length==1){Brate=temp[0]}else{Brate=temp[k]}TujaIjaSum=updown(cal_tuja(CDwon,Wolsang,Jrate,month),1,"mid");if(month==36){Joonggo=updown(CDwon*tmpRT[3]/100,1,"mid")}else{Joonggo=updown(CDwon*tmpRT[5]/100,1,"mid")}Jungbi=0;Bohum=updown((parseInt(tmpRT[6])+parseInt(addcostWon.BH))*month/12,1,"mid");if(month==36){tempValCP+=Bohum+":"}DrCarTax=cal_cartax(lineupSet[7],lineupSet[10],lineupSet[12],lineupSet[13],"1");CarTaxSum=updown(DrCarTax*month/12,1,"mid");CarTaxCom=Sum_cartax(ComCarTax,month/12);BoWon=WonSet*Brate/10;BoIja=BoWon*Yrate/100*month/12;Wonga=Gamsang+TujaIjaSum+Joonggo+Jungbi+Bohum+CarTaxSum+TaxWhonap+Sunting-BoIja;Margin=updown(Wonga/(100-tmpRT[0])*tmpRT[0],1,"mid");Wolrent=updown((Wonga+Margin)/month*1.1,1000,"mid");Chagam=updown(((BoWon+SunWon)-PrRsltSet[13]*0.3)/2*0.05/12,1000,"down");WolNap=updown((Wolrent-Chagam-SunWon/month),1000,"up");wolNapSum=WolNap*month;WolDae=updown(WolNap+SunWon/month,1,"mid");chogiNap=BoWon+SunWon;if(month==Oldmon){outWolNap=WolNap;outchogiNap=chogiNap}if(month==36){Insurate=tmpRT[2]}else{Insurate=tmpRT[4]}Insuga=updown(PrRsltSet[13]*Insurate/100,1,"up");NapTotal=wolNapSum+SunWon+Insuga;NapTotal2=NapTotal-Bohum-CarTaxCom;GapTotal=NapTotal2-ilsibul;tempValMN+=BoWon+":"+SunWon+"::"+chogiNap+":"+WolNap+":"+WolDae+":"+Insurate+":"+Insuga+":"+wolNapSum+":"+NapTotal+":"+NapTotal2+":"+GapTotal+":"+Bohum+":"+CarTaxSum+":"+CarTaxCom+":"+Brate+":"+YouRate+":"+Insurate+"`"}youwonR=YouRate}tempVal="";tempVal+=halNo+"^";tempVal+=halbuSel[hj].substring(4,5)+"^";tempVal+=halbuSet[0]+"^";if(!c){if(wolIjaSum<100){wolIjaSum=0}tempVal+=halbuSet[19]+"`"+halbuSet[1]+"^";tempVal+=month+"^";tempVal+=gayong+"^";tempVal+=NapTotal+"^";tempVal+=ilsibul+"^";tempVal+=GapTotal+"^";tempVal+=chogiNap+"^";tempVal+=HalWon+"^";tempVal+=YouWon+"^";tempVal+=SunSoo+"^";tempVal+=halwonR+"^";tempVal+=youwonR+":"+youselSet+"^";tempVal+=sunsooR+"^";tempVal+=halwonS+"^";tempVal+=youwonS+"^";tempVal+=sunsooS+"^";tempVal+=JanNap+"^";tempVal+=MonSet+"^";tempVal+=WolRst+"^";tempVal+=HalRate+"^";tempVal+=etcSet+"^";tempVal+=BDTotal+"^";tempVal+=soosoo+"^";tempVal+=injidae+"^";tempVal+=judang+"^";tempVal+=bojeung+"^";tempVal+=dcAdd+"^";tempVal+=wolIjaSum+"^";tempVal+=wolNapSum+"^";tempVal+=halbuSet[18]+"^";if(HbRsltList){HbRsltList+=",";HbRsltGap+=",";HbRsltWol+=","}HbRsltList+=halbuSel[hj];HbRsltGap+=NapTotal;HbRsltWol+=wolNapSum}else{if(c==98){tempVal+=halbuSet[19]+"`"+halbuSet[1]+"^"+tempValRT+"^"+tempValMN+"^"+tempValCP+"^"+youwonR+":"+youselSet+"^"}else{tempVal+=c+"^"}}if(GviewType=="M"){document.getElementById("HbRslt_"+d+"_"+halbuSel[hj]).value=tempVal;if(MNtab=="H"){if(halbuSet[0]==10&&halbuSet[18]=="S"&&wolNapSum>0){document.getElementById("HBChoInn_"+d).innerHTML=addpt(chogiNap);document.getElementById("HBWolInn_"+d).innerHTML=addpt(wolNapSum/month)}}else{if(MNtab=="L"){if(halbuSet[0]==60&&halbuSet[18]=="S"&&wolNapSum>0){document.getElementById("LSChoInn_"+d).innerHTML=addpt(chogiNap);document.getElementById("LSWolInn_"+d).innerHTML=addpt(wolNapSum/month)}}else{if(MNtab=="R"){if(halbuSet[0]==90&&halbuSet[18]=="S"&&wolNapSum>0){document.getElementById("RTChoInn_"+d).innerHTML=addpt(outchogiNap);document.getElementById("RTWolInn_"+d).innerHTML=addpt(outWolNap)}}}}if(halbuSet[0]==10&&halbuSet[18]=="S"&&wolNapSum>0){if(HbSel!="GY"){document.getElementById("Sgayong_"+d).value=updown(chogiNap/10000,10,"up")}if(HbSel!="HW"){document.getElementById("Shalwon_"+d).value=updown((HalWon+YouWon)/10000,10,"up")}if(HbSel!="SS"){document.getElementById("Ssunsoo_"+d).value=updown(sunsooR,1,"down")}}}else{if(GviewType=="L"){document.getElementById("HbRslt_"+halbuSel[hj]).value=tempVal}}}if(GviewType=="L"){document.getElementById("RsltHbList").value=HbRsltList;document.getElementById("RsltHbGap").value=HbRsltGap;document.getElementById("RsltHbWol").value=HbRsltWol;Output_Horder(d,"")}}}function cal_soosoo(mon,won,suns,rate,set){if(rate<100){return updown(won*rate/100,10,"down")}else{return eval("cal_soosoo_"+rate)(mon,won,suns,set)}}function cal_inji(b,a){if(a<0){if(b<=40000000){return 0}else{if(b<=50000000){return 40000}else{if(b<=100000000){return 70000}else{if(b<=1000000000){return 150000}else{return 350000}}}}}else{if(a==0){return 0}else{}}}function cal_judang(b,a){if(a<=100){return updown(b*a/100*0.6/100,1,"mid")}else{}}function cal_wolhal(c,b,a,d){if(c==0){return 0}else{if(b==0){return parseInt(c/a)}}b=parseFloat(b/1200);if(d=="D"){rpow=Math.pow(1+b,a);rpow2=Math.floor(100000*b*rpow/(rpow-1)+0.9);return updown(c*rpow2/100000,1,"down")}else{rpow=Math.pow(1+b,a);rpow2=b*rpow/(rpow-1);return updown(c*rpow2,1,"mid")}}function cal_wolhoo(d,a,c,b){for(t=0;t<b;t++){d=d-(a-(d*c/100/12))}return d}function cal_ija(b,a,c){a=Math.abs(a);if(c=="C"){return updown(b*a*30/36500,1,"down")}else{if(c=="H"){a=updown(a/12*1000,1,"mid")/1000;return updown(b*a/100,1,"down")}else{return updown(b*a/12/100,1,"down")}}}function cal_PMT(c,b,d,a){c=parseFloat(c/12/100);rpow=Math.pow(1+c,b);wol=(d-(a/rpow))*(c*rpow)/(rpow-1);return updown(wol,1,"mid")}function cal_PMrate(d,c,b,a){Lrate=15;maxR=30;minR=0;for(t=0;t<15;t++){Jwol=cal_wolhal(b,Lrate,c,"B");Ywol=cal_ija(a,Lrate,"B");tmp=Jwol+Ywol;if((d-Jwol-Ywol)>50){minR=Lrate;Lrate+=(maxR-minR)*0.5}else{if((d-Jwol-Ywol)<-50){maxR=Lrate;Lrate-=(maxR-minR)*0.5}else{t=15}}}return Lrate}function cal_PMirr(d,c,b,a){Lrate=20;maxR=40;minR=0;for(t=0;t<15;t++){Lwol=cal_PMT(Lrate,c,b,a);if((d-Lwol)>50){minR=Lrate;Lrate+=(maxR-minR)*0.5}else{if((d-Lwol)<-50){maxR=Lrate;Lrate-=(maxR-minR)*0.5}else{t=15}}}return(Lrate)}function cal_tuja(c,d,b,a){sum=0;for(t=0;t<a;t++){sum+=c*b/12/100,1;c=c-d}return(sum)}function cal_wonDC(a,b){b=parseInt(b);if(b>200||b<100){a+=b}else{if(b==110){if(a>=24000000){a-=200000}else{if(a>=14000000){a-=150000}else{if(a>=10000000){a-=60000}else{if(a>=6000000){a-=40000}}}}}}return(a)};