YNU_JEUS/app_home/himed/xpapps/lis/plgystatsmngtxp/xp/SMLPS01500_세포진단비율.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPS01500" position="absolute 0 0 1197 761" titletext="세포 진단비율 통계" oninit="SMLPS01500_oninit" onload="SMLPS01500_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="세포 진단비율" class="tit_1" position="absolute 0 0 116 25" anchor="left top"/>
        <Button id="button13" taborder="1" text="EXCEL저장" class="btn7" position="absolute 1103 66 1195 88" onclick="button13_onclick" anchor="top right"/>
        <Static id="caption4" text="접수검사목록" class="tit_2" position="absolute 1 84 102 100" anchor="left top"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 100 1194 106" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Grid id="grd_statsinfolist" class="datagrid2" taborder="2" binddataset="ds_grd_statsinfolist" useinputpanel="false" position="absolute 0 104 1194 757" autofittype="col" autosizingtype="none" cellsizingtype="none" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="32"/>
                <Column size="447"/>
                <Column size="100"/>
                <Column size="120"/>
                <Column size="120"/>
                <Column size="120"/>
                <Column size="120"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
                <Row size="24" band="summ"/>
              </Rows>
              <Band id="head">
                <Cell text="기관코드"/>
                <Cell col="1"/>
                <Cell col="2" text="진단명"/>
                <Cell col="3" text="진단명"/>
                <Cell col="4" text="Unsatisfactory for &#10;evaluation" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="5" text="Negative(Benign)"/>
                <Cell col="6" text="Atypical cells"/>
                <Cell col="7" text="Malignant&#10;Neoplasm"/>
                <Cell col="8" text="Others"/>
                <Cell col="9" text="총건수"/>
                <Cell col="10" text="비율"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="expr:currow+1"/>
                <Cell col="2" class="text_center" text="bind:diagmain"/>
                <Cell col="3" class="text_center" text="bind:diagnm"/>
                <Cell col="4" class="text_right" text="bind:diagcnt1"/>
                <Cell col="5" class="text_right" text="bind:diagcnt2"/>
                <Cell col="6" class="text_right" text="bind:diagcnt3"/>
                <Cell col="7" class="text_right" text="bind:diagcnt4"/>
                <Cell col="8" class="text_right" text="bind:diagcnt5"/>
                <Cell col="9" class="text_right" text="bind:diagtotal"/>
                <Cell col="10" class="text_right" text="bind:diagrate"/>
              </Band>
              <Band id="summary">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="Total"/>
                <Cell col="3" text="Total"/>
                <Cell col="4" text="expr:getSum('diagcnt1')"/>
                <Cell col="5" text="expr:getSum('diagcnt2')"/>
                <Cell col="6" text="expr:getSum('diagcnt3')"/>
                <Cell col="7" text="expr:getSum('diagcnt4')"/>
                <Cell col="8" text="expr:getSum('diagcnt5')"/>
                <Cell col="9"/>
                <Cell col="10" text="expr:getSum('diagcnt6')"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div id="grp_sea" taborder="3" position="absolute 0 25 1195 60" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1105 7 1111 29" anchor="top right"/>
              <Static id="caption2" text="진단일자 :" class="search_name" position="absolute 15 9 87 26" anchor="left top"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 198 11 210 28" anchor="left top"/>
              <Button id="btn_sea" taborder="6" text="조회" class="btn1" position="absolute 1123 7 1179 29" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Calendar id="ipt_cnclfromdd" taborder="7" class="input_s_essential" position="absolute 92 8 192 27" mask="yyyy-mm-dd" anchor="left top"/>
              <Calendar id="ipt_cncltodd" taborder="8" class="input_s_essential" position="absolute 216 8 316 27" mask="yyyy-mm-dd" anchor="left top" onkeyup="grp_sea_ipt_cncltodd_onkeyup"/>
              <Static id="caption8" text="통계구분 :" class="search_name" visible="false" position="absolute 441 9 515 27" anchor="left top"/>
              <Combo id="cbo_statsflagcd" taborder="9" innerdataset="ds_init_cbo_statsflagcd" codecolumn="resncd" datacolumn="resncnts" visible="false" position="absolute 530 8 678 27" anchor="left top"/>
              <Static id="caption1" text="진단구분 :" class="search_name" position="absolute 906 10 984 27" anchor="top right"/>
              <Combo id="combo1" taborder="10" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 995 8 1095 27" anchor="top right" onitemchanged="grp_sea_combo1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">부인과</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">비부인과</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_statsinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="diagmain" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="diagcnt1" type="STRING"/>
          <Column id="diagcnt2" type="STRING"/>
          <Column id="diagcnt3" type="STRING"/>
          <Column id="diagcnt4" type="STRING"/>
          <Column id="diagcnt5" type="STRING"/>
          <Column id="diagtotal" type="STRING"/>
          <Column id="diagrate" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cbo_statsflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncnts" type="STRING"/>
          <Column id="resncd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_resncd_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="baseflagcd" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="resncnts" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sysdt" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="statsfromdd" type="STRING" size="256"/>
          <Column id="statstodd" type="STRING" size="256"/>
          <Column id="statsworkflagcd" type="STRING" size="256"/>
          <Column id="diagflagcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_cnclfromdd" propid="value" datasetid="ds_init" columnid="statsfromdd"/>
      <BindItem id="item1" compid="grp_sea.ipt_cncltodd" propid="value" datasetid="ds_init" columnid="statstodd"/>
      <BindItem id="item2" compid="grp_sea.combo1" propid="value" datasetid="ds_init" columnid="diagflagcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

function SMLPS01500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLPS01500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_statsinfolist);
	fExeInitialize();
}

function fExeInitialize()
{
	dsf_createDsRow("ds_send", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);
	
	var oParam = {};
		oParam.id          = "TRLPZ00102";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetSystemDateTimeInformation";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_data_sysdtinfo=sysdtinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00102";

		tranf_submit(oParam);
		
	dsf_createDsRow("ds_send", [{col: "baseflagcd", val: "84"}]);
	
	var oParam = {};
		oParam.id          = "TRLPZ00103";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetReasonCodeList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_resncd_resncdlist=refrslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00103";

	tranf_submit(oParam);
	
	ds_init.setColumn(0, "statsfromdd", utlf_getCurrentDate()); 							
	ds_init.setColumn(0, "statstodd",   utlf_getCurrentDate());	
	ds_init.setColumn(0, "statsworkflagcd",   "0101"); 		
	ds_init.setColumn(0, "diagflagcd",   "0"); 		
				
	fExeDiagFlagChange();
}

function fExeDiagFlagChange() 
{
	if(ds_init.getColumn(0, "diagflagcd") == "0")
	{
		grd_statsinfolist.setCellProperty("head", 2, "text", "진단명");
		grd_statsinfolist.setFormatColProperty(3, "size", 450);
		grd_statsinfolist.setCellProperty("head", 3, "text", "진단명");
		grd_statsinfolist.setCellProperty("head", 4, "text", "총건수");
		grd_statsinfolist.setCellProperty("head", 10, "text", "비율");
		
		for(i = 5; i <= 9; i++)
		{
			grd_statsinfolist.setFormatColProperty(i, "size", 0);
		}
	} 
	else 
	{
		grd_statsinfolist.setFormatColProperty(2, "size", 400);
		grd_statsinfolist.setFormatColProperty(10, "size", 100);
		
		for(i = 4; i <= 8; i++)
		{
			grd_statsinfolist.setFormatColProperty(i, "size", 120);
			grd_statsinfolist.setCellProperty("head", 4, "text", "Unsatisfactory for evaluation");
		} 
		grd_statsinfolist.setFormatColProperty(3, "size", 0);
		grd_statsinfolist.setFormatColProperty(9, "size", 0);
	}
	
}

//조회
function fGetStatsInfoList()
{
	dsf_createDsRow("ds_send", [{col: "instcd",      	   val : sysf_getUserInfo("dutplceinstcd")}
							   ,{col: "statsfromdd",  	   val : ds_init.getColumn(0, "statsfromdd")}
						       ,{col: "statstodd",	 	   val : ds_init.getColumn(0, "statstodd")}
						       ,{col: "diagflagcd",   	   val : ds_init.getColumn(0, "diagflagcd")}]);	
	//-------------------
	//submit("TRLPS01501");
	var oParam = {};
		oParam.id          = "TRLPS01501";
		oParam.service     = "plgystatsmngtapp.StatsMngtRef";
		oParam.method      = "reqGetCellDiagStats";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_statsinfolist=reflist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPS01501";
	tranf_submit(oParam);
}
				
function grp_sea_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fExeDiagFlagChange();
}

//조회
function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetStatsInfoList();
}

function grp_sea_ipt_cncltodd_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetStatsInfoList();
	}
}

//엑셀저장
function button13_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_statsinfolist, "세포 진단 비율통계", "sheet1", false);
}
]]></Script>
  </Form>
</FDL>