YNU_JEUS/app_home/himed/xpapps/lis/qcmngtxp/xp/SMLQP00600_혈당기QC월별현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLQP00600" position="absolute 0 0 1199 786" titletext="혈당기 QC 월별 현황 조회" oninit="SMLQP00600_oninit" onload="SMLQP00600_onload">
    <Layouts>
      <Layout>
        <Static id="caption14" text="혈당기 QC 월별 현황 조회" class="tit_1" position="absolute 0 0 264 23"/>
        <Button id="button11" taborder="1" text="출력" class="btn6" position="absolute 0 24 56 46" onclick="button11_onclick"/>
        <Shape id="line7" linetype="horizontal" class="line_2" position="absolute 0 45 1194 51" anchor="left top right"/>
        <Button id="button1" taborder="2" text="저장" class="btn4" position="absolute 1068 24 1124 46" anchor="top right" onclick="button1_onclick"/>
        <Button id="button5" taborder="3" text="초기화" class="btn4" position="absolute 1127 24 1195 46" anchor="top right" onclick="button5_onclick"/>
        <Static id="caption13" text="혈당기기 사용 현황" class="tit_2" position="absolute 0 95 154 116" anchor="left top"/>
        <Shape id="line6" class="line_10" position="absolute 0 111 1193 117" anchor="left top right"/>
        <Shape id="line1" linetype="vertical" class="line_3" position="absolute 0 170 1193 176"/>
        <Shape id="line2" class="line_10" position="absolute 0 197 1193 203" anchor="left top right"/>
        <Static id="caption1" text="혈당기기 정도관리 시행 현황" class="tit_2" position="absolute 0 181 235 202" anchor="left top"/>
        <Div id="group1" taborder="4" class="div_SA" position="absolute 0 50 1195 90" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="button3" taborder="5" text="조회" class="btn1" position="absolute 1124 10 1180 32" anchor="top right" onclick="group1_button3_onclick"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1106 10 1112 32" anchor="top right"/>
              <Static id="caption5" text="조회 구분 :" class="search_name" position="absolute 15 11 106 28"/>
              <Calendar id="input3" taborder="6" autoselect="true" autoskip="true" dateformat="yyyy-MM" class="input_search" position="absolute 108 10 193 29" mask="yyyy-mm" value="null" editformat="yyyy-MM" onchanged="group1_input3_onchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="datagrid1" class="datagrid2" taborder="5" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 202 1193 295" anchor="left top right" binddataset="ds_main_qclist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="123"/>
                <Column size="80"/>
                <Column size="95"/>
                <Column size="124"/>
                <Column size="117"/>
                <Column size="105"/>
                <Column size="107"/>
                <Column size="77"/>
                <Column size="88"/>
                <Column size="92"/>
                <Column size="116"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24" band="head"/>
                <Row size="24"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell rowspan="2" text="월 정도관리 현황" taborder="undefined"/>
                <Cell col="1" rowspan="2" text="측정 기기" taborder="undefined"/>
                <Cell col="2" rowspan="2" text="High Control" taborder="undefined"/>
                <Cell col="3" rowspan="2" text="범위내 Data" taborder="undefined"/>
                <Cell col="4" colspan="2" text="범위를벗어난 Data" taborder="undefined"/>
                <Cell col="6" rowspan="2" text="Low Control" taborder="undefined"/>
                <Cell col="7" rowspan="2" text="범위내 Data" taborder="undefined"/>
                <Cell col="8" colspan="2" text="범위를 벗어난Data" taborder="undefined"/>
                <Cell col="10" rowspan="2" text="Result Flagged as&#13;&#10;Procedure Error" taborder="undefined"/>
                <Cell row="1" col="4" text="Above"/>
                <Cell row="1" col="5" text="Below"/>
                <Cell row="1" col="8" text="Above"/>
                <Cell row="1" col="9" text="Below"/>
              </Band>
              <Band id="body">
                <Cell text="bind:title2"/>
                <Cell col="1" text="bind:qcmetcnt"/>
                <Cell col="2" text="bind:highcnt"/>
                <Cell col="3" text="bind:hight"/>
                <Cell col="4" text="bind:highh"/>
                <Cell col="5" text="bind:highl"/>
                <Cell col="6" text="bind:lowcnt"/>
                <Cell col="7" text="bind:lowt"/>
                <Cell col="8" text="bind:lowh"/>
                <Cell col="9" text="bind:lowl"/>
                <Cell col="10" text="bind:errcnt"/>
                <Cell row="1" text="bind:title3"/>
                <Cell row="1" col="1" text="bind:qcmeterper"/>
                <Cell row="1" col="2" text="bind:highper"/>
                <Cell row="1" col="3" text="bind:hightper"/>
                <Cell row="1" col="4" text="bind:highhper"/>
                <Cell row="1" col="5" text="bind:highlper"/>
                <Cell row="1" col="6" text="bind:lowper"/>
                <Cell row="1" col="7" text="bind:lowtper"/>
                <Cell row="1" col="8" text="bind:lowhper"/>
                <Cell row="1" col="9" text="bind:lowlper"/>
                <Cell row="1" col="10" text="bind:errper"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="datagrid2" class="datagrid2" taborder="6" binddataset="ds_main_uselist" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 116 1193 176" anchor="left top right">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="175"/>
                <Column size="158"/>
                <Column size="164"/>
                <Column size="167"/>
                <Column size="175"/>
                <Column size="177"/>
                <Column size="174"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="월"/>
                <Cell col="1" text="측정기기 총 수량"/>
                <Cell col="2" text="총 Test 수"/>
                <Cell col="3" text="환자 검사 총 건수"/>
                <Cell col="4" text="환자 검사 / 총 건수(%)"/>
                <Cell col="5" text="정도관리 총 건수"/>
                <Cell col="6" text="정도관리 / 총건수(%)"/>
              </Band>
              <Band id="body">
                <Cell text="bind:title1"/>
                <Cell col="1" text="bind:metercnt"/>
                <Cell col="2" text="bind:totalcnt"/>
                <Cell col="3" text="bind:patcnt"/>
                <Cell col="4" text="bind:patper"/>
                <Cell col="5" text="bind:qccnt"/>
                <Cell col="6" text="bind:qcper"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption2" text="병동별 정도관리 지침 오류 현황" class="tit_2" position="absolute 0 309 235 330" anchor="left top"/>
        <Button id="btn_addrow" taborder="7" text="행추가" class="btn2" position="absolute 1138 305 1191 324" anchor="top right" onclick="btn_addrow_onclick"/>
        <Shape id="line4" class="line_10" position="absolute 0 325 1193 331" anchor="left top right"/>
        <Grid id="datagrid3" class="datagrid" taborder="8" binddataset="ds_main_errlist" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 330 1193 615" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="250"/>
                <Column size="200"/>
                <Column size="540"/>
                <Column size="200"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="정도관리 지침 미시행 구분"/>
                <Cell col="1" text="해당 병동"/>
                <Cell col="2" text="미실행 내용(장비별)"/>
                <Cell col="3" text="UM 확인"/>
              </Band>
              <Band id="body">
                <Cell text="bind:flag" edittype="text" displaytype="text"/>
                <Cell col="1" text="bind:ward" edittype="text" displaytype="text"/>
                <Cell col="2" text="bind:info" edittype="text" displaytype="text"/>
                <Cell col="3" text="bind:um" edittype="text" displaytype="text"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line5" linetype="horizontal" class="line_3" position="absolute 0 294 1194 300" anchor="left top right"/>
        <TextArea id="textarea1" taborder="9" position="absolute 95 618 1195 778" anchor="left right bottom" wordwrap="word"/>
        <Static id="caption3" text="요 청 사 항" position="absolute 0 618 94 778" anchor="left bottom" style="background:#99ccffff;align:center middle;font:Dotum,9,bold;"/>
        <Shape id="line8" linetype="horizontal" class="line_3" position="absolute 0 614 1194 620" anchor="left right bottom"/>
        <Shape id="line10" linetype="horizontal" class="line_3" position="absolute 0 777 1194 783" anchor="left right bottom"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqym" type="STRING" size="256"/>
          <Column id="descrslt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="reqym"/>
            <Col id="descrslt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_uselist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="title1" type="STRING" size="256" sumtext="혈당기기사용현황"/>
          <Column id="metercnt" type="STRING" size="256" sumtext="장비총수량"/>
          <Column id="totalcnt" type="STRING" size="256" sumtext="총검사건수"/>
          <Column id="patcnt" type="STRING" size="256" sumtext="환자검사건수"/>
          <Column id="patper" type="STRING" size="256" sumtext="환자퍼센트"/>
          <Column id="qccnt" type="STRING" size="256" sumtext="정도관리총건수"/>
          <Column id="qcper" type="STRING" size="256" sumtext="정도관리퍼센트"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_qclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="title2" type="STRING" size="256" sumtext="제목"/>
          <Column id="qcmetcnt" type="STRING" size="256" sumtext="층정기기건수"/>
          <Column id="highcnt" type="STRING" size="256" sumtext="-"/>
          <Column id="hight" type="STRING" size="256" sumtext="-"/>
          <Column id="highh" type="STRING" size="256" sumtext="-"/>
          <Column id="highl" type="STRING" size="256" sumtext="-"/>
          <Column id="lowcnt" type="STRING" size="256" sumtext="-"/>
          <Column id="lowt" type="STRING" size="256" sumtext="-"/>
          <Column id="lowh" type="STRING" size="256" sumtext="-"/>
          <Column id="lowl" type="STRING" size="256" sumtext="-"/>
          <Column id="errcnt" type="STRING" size="256" sumtext="-"/>
          <Column id="title3" type="STRING" size="256" sumtext="-"/>
          <Column id="qcmeterper" type="STRING" size="256" sumtext="-"/>
          <Column id="highper" type="STRING" size="256" sumtext="-"/>
          <Column id="hightper" type="STRING" size="256" sumtext="-"/>
          <Column id="highhper" type="STRING" size="256" sumtext="-"/>
          <Column id="highlper" type="STRING" size="256" sumtext="-"/>
          <Column id="lowper" type="STRING" size="256" sumtext="-"/>
          <Column id="lowtper" type="STRING" size="256" sumtext="-"/>
          <Column id="lowhper" type="STRING" size="256" sumtext="-"/>
          <Column id="lowlper" type="STRING" size="256" sumtext="-"/>
          <Column id="errper" type="STRING" size="256" sumtext="-"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_errlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256" sumtext="-"/>
          <Column id="ward" type="STRING" size="256" sumtext="-"/>
          <Column id="info" type="STRING" size="256" sumtext="-"/>
          <Column id="um" type="STRING" size="256" sumtext="-"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_srltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srlt" type="STRING" size="256" sumtext="xml"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_request" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="request" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_print_errlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input3" propid="value" datasetid="ds_send" columnid="reqym"/>
      <BindItem id="item1" compid="textarea1" propid="value" datasetid="ds_main_request" columnid="request"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";

var vMonth = group1.input3.value;
function SMLQP00600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
}

function SMLQP00600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(datagrid2);
	grdf_initGrid(datagrid1);
	grdf_initGrid(datagrid3);
	
	fSetInit();	
}

function fSetInit()
{
	ds_send.setColumn(0, "reqym", utlf_getCurrentDate());
	
	vMonth = utlf_getCurrentDate().toDate("YYYYMMDD").getDateFormat("YYYY-MM");
	
	datagrid2.setCellProperty("Head", 0, "text", vMonth+"월");
	datagrid1.setCellProperty("Head", 0, "text", vMonth+"월");
}

function group1_input3_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	vMonth = obj.text;
	datagrid2.setCellProperty("Head", 0, "text", vMonth+"월");
	datagrid1.setCellProperty("Head", 0, "text", vMonth+"월");
	
	ds_send.setColumn(0, "reqym", String(obj.value).substr(0,6))
}

function group1_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetList();
}

function fGetList()
{
	var oParam = {};
		oParam.id          = "TRLQP00601";
		oParam.service     = "grademngtprintapp.QCRsltReference";
		oParam.method      = "reqGetSureList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_main_uselist=return ds_main_qclist=return ds_main_errlist=errlist ds_main_request=return ds_main_srltlist=return";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLQP00601";

	tranf_submit(oParam);
	
	if(ds_main_srltlist.rowcount > 0)
	{
		ds_main_request.setColumn(0, "request", ds_main_srltlist.getColumn(0, "srlt")); // model.getValue("/root/main/srltlist/srlt/main/request/request"));
		//copyNodesetType("/root/main/errlist", "/root/main/srltlist/srlt/main/errlist", "replace");
		
		//model.removeNodeset("/root/main/srltlist/srlt");	//서식결과 내용 삭제
	}
}

function btn_addrow_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_errlist.addRow();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveInfo();
}

function fSaveInfo()
{
// 	var node = instance1.selectSingleNode("/root/main");
// 	model.setValue("/root/send/descrslt", node.xml);
	var oParam = {};
		oParam.id          = "TXLQP00601";
		oParam.service     = "grademngtprintapp.QCRsltReference";
		oParam.method      = "reqSetSureList";
		oParam.inds        = "cond=ds_send";
		oParam.async       = false;
		//oParam.callback    = "cf_TXLQP00601";

	tranf_submit(oParam);
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	this.reload();
}

function button11_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrint();
}

function fPrint()
{
	ds_hidden_print_errlist.clearData();
	
	ds_hidden_print_errlist.copyData(ds_main_errlist);
	
	var strYM = ds_send.getColumn(0, "reqym");
	
	var vErrCnt = 0;
	var vFlag = "";
	var vWard = "";
	var vInfo = "";
	var vUM = "";

	while(ds_hidden_print_errlist.rowcount != 0)
	{
		vFlag 	+= ds_hidden_print_errlist.getColumn(0, "flag") + "\n";
		vWard 	+= ds_hidden_print_errlist.getColumn(0, "ward") + "\n";
		vInfo 	+= ds_hidden_print_errlist.getColumn(0, "info") + "\n";
		vUM 	+= ds_hidden_print_errlist.getColumn(0, "um") + "\n";
	}
	
	dsf_makeValue(ds_hidden_print_errlist, "flag", "string", vFlag, 0);
	dsf_makeValue(ds_hidden_print_errlist, "ward", "string", vWard, 0);
	dsf_makeValue(ds_hidden_print_errlist, "info", "string", vInfo, 0);
	dsf_makeValue(ds_hidden_print_errlist, "um", "string", vUM, 0);

	var objDOM = rptf_createDOM();                // DOM 객체 설정 
	rptf_setNodeListToDOM(objDOM, "/root/hidden/print/uselist", ds_hidden_print_errlist);
	rptf_setNodeListToDOM(objDOM, "/root/hidden/print/qclist", ds_main_qclist);
	rptf_setNodeListToDOM(objDOM, "/root/hidden/print/errlist", ds_main_errlist);
	rptf_setNodeListToDOM(objDOM, "/root/hidden/print/request", ds_main_request);
	rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
	var option = ""; 
	rptf_exeReportPreview30(["RPLQP00600"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>