YNU_JEUS/app_home/himed/webapps/pam/aftjudgweb/xrw/SMPID24400_KDRG 통계 프로그램.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<!--
 * @(#)SMPID23300_DRG상세정보 .xrw
 * 수정이력
 *   - 2010.07.19 / 최초작성 / 김용민

-->
<?xml-stylesheet type="text/css" href="../../../com/commonweb/css/common.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>KDRG 통계프로그램</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<main>
						<patinfo>
							<patinfolist/>
						</patinfo>
						<kdrglist/>
					</main>
					<send>
						<filepath/>
						<attach>
							<file/>
						</attach>
						<pid/>
						<clamfromym/>
						<clamtoym/>
						<clamym/>
						<offset/>
						<daywardyn>N</daywardyn>
						<ioflagyn>N</ioflagyn>
					</send>
					<init>
						<item1>
							<clamym/>
							<clamdg/>
							<pid/>
							<pidsn/>
							<patnm/>
							<insukind/>
							<suppkind/>
							<orddeptcd/>
							<indd/>
						</item1>
						<!-- 보험유형 -->
						<P0008list>
							<P0008>
								<cdnm/>
								<cdid/>
							</P0008>
						</P0008list>
						<!-- 보조유형 -->
						<P0010list>
							<P0010>
								<cdnm/>
								<cdid/>
							</P0010>
						</P0010list>
						<!-- 진료결과 -->
						<P0110list>
							<P0110>
								<cdnm/>
								<cdid/>
							</P0110>
						</P0110list>
						<orddeptcd2/>
						<PAM>
							<PK015list/>
							<PK016list/>
							<PK054list/>
							<PK055list/>
						</PAM>
					</init>
					<hidden>
						<sppmc02500>
							<cond>
								<srchcond/>
								<pid/>
							</cond>
						</sppmc02500>
					</hidden>
				</root>
			</instance>
			<submission id="TRZBC00101" mediatype="application/x-www-form-urlencoded" method="post" replace="instance"/>
			<submission id="TRPID20309" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/item1/ioflag" resultref="root/hidden/tmp"/>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[	

				    // ---------------------------------------------------------------									
					// 공통코드를 조회한다.
					// (ZBC001.js) com.ZBCMCODE 에서 기초코드 값 Get
				    // ---------------------------------------------------------------											
					zbcfGetCodeList(
					new Array("P0008"				// 보험유형
							      ,"P0010"				// 보조유형
								  ,"P0110"               // 진료결과
								),
					new Array("/root/init/P0008list"
							      ,"/root/init/P0010list"
							      ,"/root/init/P0110list"
							) );										

					// 2013.02.19 - 부가코드 원무공통코드조회
					pamfGetCodeList(new Array(
									"PK015"
									,"PK016"
									,"PK054"
									,"PK055"
									),
					new Array("/root/init/PAM/PK015list"
									,"/root/init/PAM/PK016list"
									,"/root/init/PAM/PK054list"
									,"/root/init/PAM/PK055list"
							));
							
			    	// ---------------------------------------------------------------									
					// 진료과 초기화 
			    	// ---------------------------------------------------------------
					submit("TRPID20309", false);
					model.copyNode("/root/init/orddeptcd2", "/root/hidden/tmp/orddeptcd2");		

					model.removeNodeset("/root/hidden/tmp/orddeptcd");
					model.removeNodeset("/root/hidden/tmp/orddeptcd2");		
					model.removeNodeset("/root/hidden/tmp/orddrid");
					model.removeNodeset("/root/hidden/tmp/orddrid2");		

					fInitialize();
					
					btn_clspcd.selected  = true;
				]]>
			</script>
			<submission id="TXPIJ03200" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/main/drginfo" resultref="/root/rslt"/>
			<submission id="TXPID24301" mediatype="multipart/form-data" method="form-data-post" ref="/root/send"/>
			<submission id="TXPID24302" mediatype="multipart/form-data" method="form-data-post" ref="/root/send" resultref="/root/main"/>
			<submission id="TRPIJ03200" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main"/>
			<submission id="TRPAM00105" mediatype="application/x-www-form-urlencoded" method="post"/>
			<submission id="TXPID24300" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/tmp/tmp"/>
			<submission id="TXPIJ03208" mediatype="multipart/form-data" method="form-data-post"/>
			<submission id="TRPIJ03203" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/drginfo" resultref="/root/main/endchkinfo"/>
			<submission id="TRPID24400" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/kdrglist"/>
			<submission id="TRPID24301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/"/>
		</model>
		<script type="javascript" src="../../../com/commonweb/js/common.js"/>
		<script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/numericHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
		<script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
		<script type="javascript" src="../../../pam/pamcomnweb/js/PAM001.js"/>
		<script type="javascript" src="../../../pam/pamcomnweb/js/PAM.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelperAsync.js"/>
		<script type="javascript">
			<![CDATA[
				function fInitialize() {
					
					var gToday = new Date();
					var gBaseyear  = gToday.getDateFormat("YYYY");	// (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
					var gBasemonth = gToday.getDateFormat("MM");
					var gBaseday   = gToday.getDateFormat("DD");
					var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
					var gCurrentym  = gBaseyear + gBasemonth;
					var gUserid 		= getUserId();
					
					model.setValue(ipt_clamfromym.attribute("ref"), gCurrentym );
					model.setValue(ipt_clamtoym.attribute("ref"), gCurrentym);
					//fGetdrgDetail();
					model.refresh();
				}
				
				function fGetdrgDetail() {
					submit("TRPIJ03200");
					
					//진료결과 체크		- 중간청구인경우 : 계속, 퇴원인경우 : 퇴원
					var dschnotiyn = model.getValue("/root/main/drginfo/dschnotiyn");
					var ordrslt = model.getValue("/root/main/drginfo/ordrsltcd");
					
					if(dschnotiyn == "Y"){
						if(ordrslt == "" || ordrslt == "-" || ordrslt == "1"){
							if(ordrslt != "4"){
								model.setValue("/root/main/drginfo/ordrsltcd","9");
							}
						}
					}else{
						if(ordrslt == "" || ordrslt == "-"){
							model.setValue("/root/main/drginfo/ordrsltcd","1");
						}
					}
					
				}
		
				function fSleep(filenm) {
					var now = new Date();
					var exitTime = now.getTime() + 30000;
					var fldr = model.getValue("/root/init/PAM/PK054list/PK054[cdid='01']/cdnm");//"C:/Program Files/himed/components/KDRG/";
					var infile = model.getValue("/root/init/PAM/PK054list/PK054[cdid='02']/cdnm");//"kdrg33.in";
					var outfile = model.getValue("/root/init/PAM/PK054list/PK054[cdid='03']/cdnm");//"kdrg33.out";
					var fso = new ActiveXObject("Scripting.FileSystemObject");
					 
					while (true) {
						now = new Date();
						
						//3초동안 파일이 있는지 체크한다. 생성되었으면 루프를 나온다.
						if (fso.FileExists(fldr+filenm) && fso.GetFile(fldr+filenm).Size > "0") { break; }
						
						//3초동안 파일이 없으면 빠져나온다.
						if (now.getTime() > exitTime) { break; }
					}
				}
				
				function fStandby() {
					var now = new Date();
					var exitTime = now.getTime() + 3000; 
					while (true) {
						now = new Date();
						

						//3초동안 후 빠져나온다.
						if (now.getTime() > exitTime) { break; }
					}
				}
			
				function fGetDocuList() {
					var offcnt = model.getXPathValue("count(/root/main/kdrglist/kdrg)");
					model.setValue("/root/send/offset", offcnt);
					submit("TRPID24400");
				}
				function responseHandlerTXPID24300() {
					removeLoadingWindow();
				}
			]]>
		</script>
	</xhtml:head>
	<xhtml:body pagewidth="910" pageheight="910" guideline="1,1143;2,879;1,50;" style="margin-left:5; margin-top:0; margin-right:5; margin-bottom:0; ">
		<group id="grp_tle" style="left:0px; top:0px; width:785px; height:13px; ">
			<caption id="cap_title" class="tit_1" style="left:0px; top:0px; width:195px; height:14px; ">KDRG 통계프로그램</caption>
		</group>
		<group id="group1" scroll="auto" style="left:0px; top:15px; width:900px; height:890px; ">
			<group id="group2" style="left:0px; top:4px; width:895px; height:41px; vertical-align:top; ">
				<shape id="roundrect1" appearance="roundrect" style="left:0px; top:0px; width:895px; height:40px; "/>
				<caption id="caption30" class="search_name" style="left:3px; top:11px; width:87px; height:17px; ">청구년월 :</caption>
				<input id="ipt_clamfromym" ref="/root/send/clamfromym" class="input_search" navindex="1" inputtype="date" format="yyyy-mm" style="left:90px; top:10px; width:69px; height:19px; text-align:center; "/>
				<input id="ipt_clamtoym" ref="/root/send/clamtoym" class="input_search" navindex="1" inputtype="date" format="yyyy-mm" style="left:185px; top:10px; width:69px; height:19px; text-align:center; "/>
				<caption id="caption2" style="left:165px; top:10px; width:15px; height:20px; ">~</caption>
				<button id="btn_select" class="btn1_letter2" navindex="32" style="left:835px; top:10px; width:56px; height:22px; ">
					<caption>조회</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
						fGetDocuList();
						]]>
					</script>
				</button>
				<line id="line3" class="line_4" style="x1:825px; y1:5px; x2:825px; y2:38px; "/>
				<bool id="bool1" checkvalue="Y,N" ref="/root/send/daywardyn" style="left:264px; top:10px; width:20px; height:20px; "/>
				<caption id="caption3" style="left:285px; top:10px; width:100px; height:20px; ">낮병동포함</caption>
				<bool id="bool2" checkvalue="Y,N" ref="/root/send/ioflagyn" style="left:366px; top:10px; width:20px; height:20px; "/>
				<caption id="caption4" style="left:387px; top:10px; width:100px; height:20px; ">응급실퇴원포함</caption>
			</group>
			<button id="button3" class="btn4_letter2" style="left:839px; top:866px; width:56px; height:22px; ">
				<caption>종료</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						model.dispatch("xforms-close");
					]]>
				</script>
			</button>
			<switch id="switch1" style="left:0px; top:76px; width:895px; height:789px; ">
				<case id="case1" selected="true" style="left:0px; top:0px; width:895px; height:789px; ">
					<button id="btn_excelsave" class="btn2_letter4" style="left:830px; top:2px; width:64px; height:19px; ">
						<caption>엑셀저장</caption>
						<script type="javascript" ev:event="DOMActivate">
							<![CDATA[
							if (grd_kdrglist.rows > 1) {
								var fileName = window.fileDialog("save", "", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
								if (fileName != "") {
									//datagrid.saveExcel의 7번째 인자 값(boolean) : 그리드의 col type=combo일 경우 엑셀저장내용이 lable 또는 value로 설정 함
		//							grd_clbsmast.saveExcel(fileName, "SheetName", true, true, "", "", true);
									grd_kdrglist.saveExcel(fileName, "sheetname:;colhiddenextend:false;rowhiddenextend:false;col_2:label;", true, true, "", "", true);
								}
							} else {
								messageBox("엑셀저장할 대상자가", "I004");		///엑셀저장할 대상자가 없습니다.
							}
						]]>
						</script>
					</button>
					<line id="line1" class="line_1" style="x1:0px; y1:22px; x2:895px; y2:22px; "/>
					<datagrid id="grd_kdrglist" nodeset="/root/main/kdrglist/kdrg" class="datagrid3" caption="대분류^진료과^MDC^DRG번호^DRG명^환자수^총입원일수" colsep="^" colwidth="57, 100, 42, 54, 408, 45, 66" explorerbar="sortshowmove" mergecellsfixedrows="bycolrec" rowheader="seq" rowsep="|" style="left:0px; top:27px; width:895px; height:761px; text-align:center; ">
						<col ref="drgtype"/>
						<col ref="orddeptcd" type="combo">
							<choices>
								<itemset nodeset="/root/init/orddeptcd2/orddeptcdlist">
									<label ref="nm"/>
									<value ref="cd"/>
								</itemset>
							</choices>
						</col>
						<col ref="mdc"/>
						<col ref="drgno"/>
						<col ref="drgname"/>
						<col ref="pidcnt"/>
						<col ref="chosindaynocnt"/>
						<script type="javascript" ev:event="onscrollpos">
							<![CDATA[
						
					]]>
						</script>
						<script type="javascript" ev:event="onscroll">
							<![CDATA[
						var rowno = grd_kdrglist.rows - grd_kdrglist.fixedRows;
						var cvalue	= 0;
						
						if(rowno / 10000 >= 1) {
							cvalue = (rowno/10000) / Math.floor(rowno/10000);
						}
						
						if(grd_kdrglist.vscroll.attribute("max") == grd_kdrglist.vscroll.attribute("pos") && grd_kdrglist.row > 0 && cvalue == 1) {
							// end of scroll
							var offcnt = model.getXPathValue("count(/root/main/kdrglist/kdrg)");
							model.setValue("/root/send/offset", offcnt);
							
							submit("TRPID24301");

							grd_kdrglist.dispatch("onmouseup");  // 스크롤바 처리를 위한 이벤트 발생
							
							
						}
//						
//						if (model.getValue("/root/main/kdrglist/kdrg/tot_cnt") == rowno) {
//							alert("마지막");
//							return false;
//						} 
//						
					]]>
						</script>
					</datagrid>
				</case>
				<case id="case2" style="left:0px; top:0px; width:895px; height:789px; ">
					<button id="button1" class="btn2_letter4" style="left:830px; top:2px; width:64px; height:19px; ">
						<caption>엑셀저장</caption>
						<script type="javascript" ev:event="DOMActivate">
							<![CDATA[
							if (datagrid1.rows > 1) {
								var fileName = window.fileDialog("save", "", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
								if (fileName != "") {
									//datagrid.saveExcel의 7번째 인자 값(boolean) : 그리드의 col type=combo일 경우 엑셀저장내용이 lable 또는 value로 설정 함
		//							grd_clbsmast.saveExcel(fileName, "SheetName", true, true, "", "", true);
									datagrid1.saveExcel(fileName, "sheetname:;colhiddenextend:false;rowhiddenextend:false;col_2:label;", true, true, "", "", true);
								}
							} else {
								messageBox("엑셀저장할 대상자가", "I004");		///엑셀저장할 대상자가 없습니다.
							}
						]]>
						</script>
					</button>
					<line id="line2" class="line_1" style="x1:0px; y1:22px; x2:895px; y2:22px; "/>
					<datagrid id="datagrid1" nodeset="/root/main/kdrgdrlist/kdrg" class="datagrid3" caption="대분류^진료과^진료의^MDC^DRG번호^DRG명^환자수^총입원일수" colsep="^" colwidth="57, 100, 82, 42, 54, 377, 45, 66" explorerbar="sortshowmove" mergecellsfixedrows="bycolrec" rowheader="seq" rowsep="|" style="left:0px; top:27px; width:895px; height:761px; text-align:center; ">
						<col ref="drgtype"/>
						<col ref="orddeptcd" type="combo">
							<choices>
								<itemset nodeset="/root/init/orddeptcd2/orddeptcdlist">
									<label ref="nm"/>
									<value ref="cd"/>
								</itemset>
							</choices>
						</col>
						<col ref="orddrnm"/>
						<col ref="mdc"/>
						<col ref="drgno"/>
						<col ref="drgname"/>
						<col ref="pidcnt"/>
						<col ref="chosindaynocnt"/>
					</datagrid>
				</case>
			</switch>
			<button id="btn_clspcd" class="btn_sw" group="tab" style="left:0px; top:55px; width:100px; height:22px; ">
				<caption>진료과별</caption>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						model.toggle("case1");	// 해당 tab 으로 토글시킨다.
					]]>
				</script>
			</button>
			<button id="button2" class="btn_sw" group="tab" style="left:100px; top:55px; width:100px; height:22px; ">
				<caption>진료과별의사별</caption>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						model.toggle("case2");	// 해당 tab 으로 토글시킨다.
					]]>
				</script>
			</button>
		</group>
	</xhtml:body>
</xhtml:html>