YNU_JEUS/app_home/himed/webapps/sts/stspamweb/xrw/SPSTP00700_종합수익일보(건진제외).xrw

<?xml version="1.0" encoding="EUC-KR"?>
<?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/css" ?>
<xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
	<xhtml:head>
		<xhtml:title>종합수익일보(건진제외)</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<cond>
						<fromdd/>
						<todd/>
						<srchflag/>
					</cond>
					<grdlist>
					</grdlist>
				</root>
			</instance>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
				fInitialize();
			]]>
			</script>
			<submission id="TRSTP01601" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/cond" resultref="/root/grdlist"/>
		</model>
		<script type="javascript" src="../../../com/commonweb/js/common.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
		<!-- <script type="javascript" src="../../../sts/stspamweb/js/SPSTP00700.js"/> -->
		<script type="javascript">
			<![CDATA[
			function fInitialize() {
				model.setValue("/root/cond/fromdd", getCurrentDate()-1);
				model.setValue("/root/cond/todd", getCurrentDate()-1);
				
				model.refresh();
				//model.resetInstanceNode("/root/grdlist");
			}
			
			function fDispAprvCnclChng(grdObj){
				var nodePath = grdObj.attribute("nodeset");

				var chagValue = "";
				var mdlcd = "";
				var smlcd = "";
				
				grdObj.rebuildStyle();
				
				if (grdObj.attribute("id") == "grd_ordearn") {
					 for(var i = 1; i < grdObj.rows; i++){
						chagValue = model.getValue(nodePath + "[" + i + "]/dpt");
						if(chagValue == "1"){
							grdObj.rowStyle(i, "data", "background-color") = "#ffff99";
							grdObj.rowStyle(i, "data", "font-weight") = "bold";
						}
						//진료수익(본인,청구)만 펼쳐지도록(선택진료는 제외)
						mdlcd= model.getValue(nodePath + "[" + i + "]/mdlcd");
						smlcd= model.getValue(nodePath + "[" + i + "]/smlcd");
						if (smlcd == "12" || mdlcd == "03" || mdlcd == "04") {
							grdObj.iscollapsed(i) = true;
						} else {
							grdObj.iscollapsed(i) = false;
						}
					}
					
				} else if (grdObj.attribute("id") == "grd_unco") {
					 for(var i = 1; i < grdObj.rows; i++){
						chagValue = model.getValue(nodePath + "[" + i + "]/dpt");
						if(chagValue == "1"){
							grdObj.rowStyle(i+1, "data", "background-color") = "#ffff99";
							grdObj.rowStyle(i+1, "data", "font-weight") = "bold";
						}
						//본인부담미수,재원미수(본인,청구),퇴원미수는 펼쳐지게
						mdlcd = model.getValue(nodePath + "[" + i + "]/mdlcd");
						if (mdlcd == "01" || mdlcd == "06" || mdlcd == "07" || mdlcd == "08") {
							grdObj.iscollapsed(i) = false;
						} else {
							grdObj.iscollapsed(i) = true;
						}
					}
				} else if (grdObj.attribute("id") == "grd_incm") {
					grdObj.rowStyle(1, "data", "background-color") = "#ffff99";
					grdObj.rowStyle(1, "data", "font-weight") = "bold";
					
				} else if (grdObj.attribute("id") == "grd_incm2") {
					grdObj.rowStyle(1, "data", "background-color") = "#ffff99";
					grdObj.rowStyle(1, "data", "font-weight") = "bold";
				}
			}

			function fInitDisp(){
				group1.attribute("height") = "355px";
				grd_ordearn.attribute("height") = "334px";
//				
//				group2.attribute("left") = "0px";
//				group2.attribute("top") = "220px";
				group2.attribute("height") = "424px";
				grd_unco.attribute("height") = "403px";
				
				group1.attribute("visibility") = "visible";
				group2.attribute("visibility") = "visible";
				group3.attribute("visibility") = "visible";
				group4.attribute("visibility") = "visible";
				group5.attribute("visibility") = "visible";
				
				setTree(grd_ordearn, grd_ordearn.colRef("dpt"), grd_ordearn.colRef("lrgnm"), true);	
				setTree(grd_unco, grd_unco.colRef("dpt"), grd_unco.colRef("lrgnm"), true);	
			}

			function fChangeDspl(groupObj){
				var grpNm = groupObj.attribute("id");
				
				if(grpNm == "group1"){
						if(groupObj.attribute("height") == "712px"){
							groupObj.attribute("height") = "355px";
							grd_ordearn.attribute("height") = "334px";
							
//							group2.attribute("visibility") = "visible";
//							group3.attribute("visibility") = "visible";
//							group4.attribute("visibility") = "visible";
//							group5.attribute("visibility") = "visible";
//							
							setTree(grd_ordearn, grd_ordearn.colRef("dpt"), grd_ordearn.colRef("lrgnm"), true);	
							
						}else{
							groupObj.attribute("visibility") = "visible";
							groupObj.attribute("height") = "712px";
							grd_ordearn.attribute("height") = "688px";
							
//							group2.attribute("visibility") = "hidden";
//							group3.attribute("visibility") = "hidden";
//							group4.attribute("visibility") = "hidden";
//							group5.attribute("visibility") = "hidden";
							
							setTree(grd_ordearn, grd_ordearn.colRef("dpt"), grd_ordearn.colRef("lrgnm"), false);	
						}
						
				}else if(grpNm == "group2"){
						if(groupObj.attribute("height") == "712px" ){
							groupObj.attribute("height") = "424px";
							grd_unco.attribute("height") = "403px";
							
//							group1.attribute("visibility") = "visible";
//							group3.attribute("visibility") = "visible";
//							group4.attribute("visibility") = "visible";
//							group5.attribute("visibility") = "visible";
							setTree(grd_unco, grd_unco.colRef("dpt"), grd_unco.colRef("lrgnm"), true);	
							
						}else{
							groupObj.attribute("height") = "712px";
							grd_unco.attribute("height") = "688px";
							
//							group1.attribute("visibility") = "hidden";
//							group3.attribute("visibility") = "hidden";
//							group4.attribute("visibility") = "hidden";
//							group5.attribute("visibility") = "hidden";
							setTree(grd_unco, grd_unco.colRef("dpt"), grd_unco.colRef("lrgnm"), false);	
						}
				}
			}
			]]>
		</script>
	</xhtml:head>
	<xhtml:body guideline="2,780;1,1198;" style="background-color:transparent; border-color:transparent; margin-left:8; margin-top:0; margin-right:0; margin-bottom:0; ">
		<group id="group6" visibility="visible" style="left:0px; top:639px; width:520px; height:137px; ">
			<caption id="caption8" class="tit_2" style="left:0px; top:0px; width:65px; height:14px; ">가수금</caption>
			<line id="line6" class="line_1" style="x1:0px; y1:15px; x2:520px; y2:15px; "/>
			<datagrid id="grd_incm2" nodeset="/root/grdlist/list06" caption="계정^입원^외래^합계" colsep="^" colwidth="150, 120, 120, 120" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:520px; height:117px; ">
				<col ref="earnclsnm"/>
				<col ref="inamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="outamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt" format="(-)#,###" style="text-align:right; "/>
			</datagrid>
		</group>
		<group id="group4" visibility="visible" style="left:522px; top:616px; width:678px; height:168px; ">
			<caption id="caption4" class="tit_2" style="left:0px; top:0px; width:55px; height:13px; ">기타</caption>
			<line id="line4" class="line_1" style="x1:0px; y1:15px; x2:678px; y2:15px; "/>
			<datagrid id="grd_etc" nodeset="/root/grdlist/list04" caption="계정^입원^외래^합계^계정^입원^외래^합계" colsep="^" colwidth="91, 82, 82, 82,91, 82, 82, 82" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:678px; height:140px; ">
				<col ref="smlnm1"/>
				<col ref="inamt1" format="(-)#,###" style="text-align:right; "/>
				<col ref="outamt1" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt1" format="(-)#,###" style="text-align:right; "/>
				<col ref="smlnm2"/>
				<col ref="inamt2" format="(-)#,###" style="text-align:right; "/>
				<col ref="outamt2" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt2" format="(-)#,###" style="text-align:right; "/>
			</datagrid>
		</group>
		<group id="group3" visibility="visible" style="left:522px; top:497px; width:678px; height:116px; ">
			<caption id="caption3" class="tit_2" style="left:0px; top:0px; width:55px; height:13px; ">선수</caption>
			<line id="line3" class="line_1" style="x1:0px; y1:15px; x2:678px; y2:15px; "/>
			<datagrid id="grd_upco" nodeset="/root/grdlist/list03" caption="계정^발생^대체^합계^계정^발생^대체^합계" colsep="^" colwidth="91, 82, 82, 82, 91,82, 82, 82" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:678px; height:94px; ">
				<col ref="smlnm1"/>
				<col ref="addamt1" format="(-)#,###" style="text-align:right; "/>
				<col ref="downamt1" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt1" format="(-)#,###" style="left:426px; top:23px; width:150px; height:23px; text-align:right; "/>
				<col ref="smlnm2"/>
				<col ref="addamt2" format="(-)#,###" style="text-align:right; "/>
				<col ref="downamt2" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt2" format="(-)#,###" style="text-align:right; "/>
			</datagrid>
		</group>
		<group id="group5" visibility="visible" style="left:0px; top:428px; width:520px; height:209px; ">
			<caption id="caption5" class="tit_2" style="left:0px; top:0px; width:65px; height:13px; ">수입</caption>
			<line id="line5" class="line_1" style="x1:0px; y1:15px; x2:520px; y2:15px; "/>
			<datagrid id="grd_incm" nodeset="/root/grdlist/list05" caption="계정^입원^외래^합계" colsep="^" colwidth="150, 120, 120, 120" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:520px; height:186px; ">
				<col ref="earnclsnm"/>
				<col ref="inamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="outamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt" format="(-)#,###" style="text-align:right; "/>
				<script type="javascript" ev:event="ondblclick">
					<![CDATA[
					
						if (getNodesetCount("/root/grdlist/list05") < 1) {
							
							messageBox("대상자료가 존재하지 않습니다.", "C000");
							return;
						}
						
						// 수입구분
						var earnclsnm = model.getValue("/root/grdlist/list05[" + grd_incm.row + "]/earnclsnm");
						
						var worktype = "all"; // 수납계정(PK021)
						var rcpttype  = "all"; // 수납방법(cash, card, online)
						var ioflag      = "A"; // 외래:O, 입원:I, 전체:A
						
						// 수입구분별, 외래/입원 구분별 파라미터 세팅
						if (isDataCell()) {
							
							// 열에 따른 구분
							if (grd_incm.col == grd_incm.colRef("outamt")){
								
								ioflag = "O";
								
								// 외래수납장표
								worktype = "A01";
								
							} else if (grd_incm.col == grd_incm.colRef("inamt")){
								
								ioflag = "I"
								
								// 입원수납장표
								worktype = "A02";
							}
							
							// 행에 따른 구분
							if (earnclsnm == "현금입금액") {
								
								rcpttype = "cashamt";
								
							} else if (earnclsnm == "온라인입금액") {
								
								rcpttype = "onlineamt";
								
							} else if (earnclsnm == "신용카드미수입금액") {
								
								worktype = "B03";
								rcpttype = "onlineamt";
								
							} else if (earnclsnm == "산전지원미수입금액") {
								
								worktype = "B04";
								rcpttype = "onlineamt";
								
							} else if (earnclsnm == "건유비미수입금액") {
								
								worktype = "B04";
								rcpttype = "onlineamt";
								
							} else if (earnclsnm == "혈액미수입금액") {
								
								worktype = "B02";
								rcpttype = "onlineamt";
								
							} else if (earnclsnm == "의사소견서미수입금") {
								
								worktype = "B05";
								rcpttype = "onlineamt";
								
							} else {
								
								rcpttype = "all";
							}
							
							setParameter("SMPAE00102_WORKTYPE",  worktype);
							setParameter("SMPAE00102_RCPTTYPE",    rcpttype);
							setParameter("SMPAE00102_IOFLAG",         ioflag);
							setParameter("SMPAE00102_FROMDD",       model.getValue("/root/cond/fromdd"));
							setParameter("SMPAE00102_TODD",           model.getValue("/root/cond/todd"));
							
							// SMPAE00102_KU일일마감공통장표
							open("SMPAE00102");
						}
					]]>
				</script>
			</datagrid>
		</group>
		<shape id="roundrect1" class="roundrect_search" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:0px; top:20px; width:1200px; height:43px; background-color:#fffbf2; border-color:#ffd799; "/>
		<line id="line13" class="line_4" style="x1:1001px; y1:28px; x2:1001px; y2:55px; border-color:#ffe4bb; border-left-style:solid; "/>
		<caption id="caption21" class="search_name" style="left:15px; top:32px; width:86px; height:17px; ">조회기간</caption>
		<button id="btn_search" class="btn1_letter2" navindex="3" style="left:1015px; top:30px; width:56px; height:22px; background-image:../../../com/commonweb/images/btn1_letter2.gif; ">
			<caption>조회</caption>
			<script type="javascript" ev:event="DOMActivate">
				<![CDATA[
						if(model.getValue("/root/cond/fromdd") == ""){
							return;
						}
						fInitDisp();
						model.removeNodeset("/root/grdlist");
						model.refresh();
						
						if(submit("TRSTP01601")){
							//model.refresh();
							setTree(grd_ordearn, grd_ordearn.colRef("dpt"), grd_ordearn.colRef("lrgnm"), true);	
							setTree(grd_unco, grd_unco.colRef("dpt"), grd_unco.colRef("lrgnm"), true);	
							
							fDispAprvCnclChng(grd_ordearn);
							fDispAprvCnclChng(grd_unco);
							fDispAprvCnclChng(grd_incm);
							fDispAprvCnclChng(grd_incm2);
						}
						]]>
			</script>
		</button>
		<button id="button1" class="btn1_letter2" navindex="26" disable.background-image="../../../com/commonweb/images/dis_btn2_letter3.gif" style="left:1133px; top:30px; width:56px; height:22px; background-image:../../../com/commonweb/images/btn2_letter3.gif; ">
			<caption>출력</caption>
			<script type="javascript" ev:event="DOMActivate">
				<![CDATA[
					exeReportPreview("RPSTP00903", "XMLSTR");
			]]>
			</script>
		</button>
		<button id="btn_clear" class="btn1_letter2" navindex="30" disable.background-image="../../../com/commonweb/images/dis_btn2_letter3.gif" style="left:1074px; top:30px; width:56px; height:22px; background-image:../../../com/commonweb/images/btn2_letter3.gif; ">
			<caption>엑셀</caption>
			<script type="javascript" ev:event="DOMActivate">
				<![CDATA[
				var today = model.getValue("/root/cond/fromdd");
				var filename = window.fileDialog("save", ",", false, "종합수익일보(건진제외)_"+today, "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
				
				if(filename != "" )
				{
					// ***** SaveExcel 수행 *****//
					// 1. 각각 엑셀 파일로 저장
					grd_ordearn.saveExcel("c:\\test1.xls");
					grd_unco.saveExcel("c:\\test2.xls");
					grd_upco.saveExcel("c:\\test3.xls");
					grd_etc.saveExcel("c:\\test4.xls");
					grd_incm.saveExcel("c:\\test5.xls");
					// ***** TFExcel Application 실행 *****//
					// 2. TFExcel App 실행
					tfexcel.launchnewinstance(0);
					
					// 3. 실행된 excel app 에서 새로운 workbook 생성
					tfexcel.createworkbook();
					
					
					// ***** TFExcel Application 실행 *****//
					// 4. 저장한 두개의 엑셀을 하나의 엑셀에서 로드
					// ----- 첫번째 엑셀 파일 수행
					tfexcel.addsheet(1,"text001");
					tfexcel.activatesheet(1);
					
					// CSV 포맷된 file 을 excel 에 Load
					var nResult1 = tfexcel.loadCSV("c:\\test1.xls");
					
					if(nResult1 < 0) {
						alert("Excel Load Error.");
						
						return;
					}
					
					// ----- 두번째 엑셀 파일 수행
					tfexcel.addsheet(2,"text002");
					tfexcel.activatesheet(2);
				
					// CSV 포맷된 file 을 excel 에 Load
					var nResult2 = tfexcel.loadCSV("c:\\test2.xls");
					
					if(nResult2 < 0) {
						alert("Excel Load Error.");
						
						return;
					}
					
					// 03
					tfexcel.addsheet(3,"text003");
					tfexcel.activatesheet(3);
					
					// CSV 포맷된 file 을 excel 에 Load
					var nResult3 = tfexcel.loadCSV("c:\\test3.xls");
					
					if(nResult3 < 0) {
						alert("Excel Load Error.");
						
						return;
					}
					
					//04
					tfexcel.addsheet(4,"text004");
					tfexcel.activatesheet(4);
					
					// CSV 포맷된 file 을 excel 에 Load
					var nResult4 = tfexcel.loadCSV("c:\\test4.xls");
					
					if(nResult4 < 0) {
						alert("Excel Load Error.");
						
						return;
					}
					
					//05
					tfexcel.addsheet(5,"text005");
					tfexcel.activatesheet(5);
					
					// CSV 포맷된 file 을 excel 에 Load
					var nResult5 = tfexcel.loadCSV("c:\\test5.xls");
					
					if(nResult5 < 0) {
						alert("Excel Load Error.");
						
						return;
					}
					
					// ***** TFExcel Sheet 설정 *****//
//					var sResult1 = tfexcel.sheetname(1) = "test001";
//					var sResult2 = tfexcel.sheetname(2) = "test002";
//					var sResult3 = tfexcel.sheetname(3) = "test003";
//					var sResult4 = tfexcel.sheetname(4) = "test004";
//					var sResult5 = tfexcel.sheetname(5) = "test005";
					
					// ***** 하나의 Excel 파일로 저장 *****//
					// 5. workbook 저장
					tfexcel.save(filename);
					
					// 6. TFExcel App 종료. - Excel  App 생성 후 반드시 Close 필요
					tfexcel.close();
					
					//7. 생성된  test1,test2.xls 삭제 
					var fso = new ActiveXObject("Scripting.FileSystemObject");
					fso.DeleteFile("c:\\test1.xls");
					fso.DeleteFile("c:\\test2.xls");
					fso.DeleteFile("c:\\test3.xls");
					fso.DeleteFile("c:\\test4.xls");
					fso.DeleteFile("c:\\test5.xls");
										
//					window.exec("excel.exe", filename);
				}

				
			]]>
			</script>
		</button>
		<object id="tfexcel" clsid="{fe8d1001-6a9d-424d-ae2a-301493bb12da}" visibility="hidden" style="left:235px; top:165px; width:220px; height:50px; "/>
		<group id="group1" visibility="visible" scroll="auto" style="left:0px; top:68px; width:520px; height:355px; border-style:none; ">
			<caption id="caption1" class="tit_2" style="left:0px; top:0px; width:80px; height:13px; ">
				<![CDATA[진료수익]]>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						fChangeDspl(group1);
					]]>
				</script>
			</caption>
			<line id="line1" class="line_1" style="x1:0px; y1:15px; x2:520px; y2:15px; "/>
			<datagrid id="grd_ordearn" nodeset="/root/grdlist/list01" class="datagrid2" caption="±^계정^^^입원^입원^외래^외래^합계" colsep="^" colwidth="0, 150, 0, 0, 0, 120, 0, 120, 130" defaultrows="2" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:520px; height:334px; ">
				<col ref="dpt"/>
				<col ref="lrgnm"/>
				<col ref="mdlnm"/>
				<col ref="smlnm"/>
				<col ref="inaccntcd"/>
				<col ref="inamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="outaccntcd"/>
				<col ref="outamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt" format="(-)#,###" style="text-align:right; "/>
			</datagrid>
		</group>
		<group id="group2" visibility="visible" style="left:522px; top:68px; width:678px; height:424px; border-style:none; ">
			<caption id="caption2" class="tit_2" style="left:0px; top:0px; width:85px; height:13px; ">
				<![CDATA[미수]]>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						fChangeDspl(group2);
					]]>
				</script>
			</caption>
			<line id="line2" class="line_1" style="x1:0px; y1:15px; x2:678px; y2:15px; "/>
			<datagrid id="grd_unco" nodeset="/root/grdlist/list02" caption="±^계정^^입원^입원^외래^외래^합계|±^계정^^발생^입금(대체)^발생^입금(대체)^합계" colsep="^" colwidth="0, 140, 0, 105, 105, 105, 105, 115" extendlastcol="scroll" mergecellsfixedrows="bycolrec" rowsep="|" style="left:0px; top:20px; width:678px; height:403px; ">
				<col ref="dpt"/>
				<col ref="lrgnm"/>
				<col ref="smlnm"/>
				<col ref="inuncoamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="inrcptamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="outuncoamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="outrcptamt" format="(-)#,###" style="text-align:right; "/>
				<col ref="totamt" format="(-)#,###" style="text-align:right; "/>
			</datagrid>
		</group>
		<caption id="caption60" class="tit_1" style="left:0px; top:0px; width:183px; height:14px; font-family:돋움; vertical-align:middle; ">종합수익일보(건진제외)</caption>
		<caption id="caption6" style="left:199px; top:34px; width:25px; height:15px; ">~</caption>
		<input id="ipt_fromdd" ref="/root/cond/fromdd" class="input_search" navindex="1" inputtype="date" style="left:100px; top:31px; width:95px; height:19px; text-align:center; vertical-align:middle; "/>
		<input id="ipt_todd" ref="/root/cond/todd" class="input_search" navindex="1" inputtype="date" style="left:212px; top:31px; width:95px; height:19px; text-align:center; vertical-align:middle; "/>
		<caption id="caption7" style="left:533px; top:34px; width:375px; height:14px; font-weight:bold; color:#ff0000; ">※ 입원/외래수익일보의 [순수입원,순수외래] 기준입니다.</caption>
		<select id="checkbox1" ref="/root/cond/srchflag" overflow="visible" appearance="full" style="left:330px; top:34px; width:195px; height:15px; border-style:none; ">
			<choices>
				<item>
					<label>중간청구 및 삭감환수 포함</label>
					<value>Y</value>
				</item>
			</choices>
		</select>
	</xhtml:body>
</xhtml:html>