YNU_JEUS/app_home/himed/xpapps/ast/healexamstatxp/xp/SMAHS03600_월별건진내시경현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHS03600" position="absolute 0 0 1196 745" titletext="월별건진내시경현황" oninit="SMAHS03600_oninit" onload="SMAHS03600_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 1195 65" id="group2" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape position="absolute 1124 5 1130 37" linetype="vertical" id="line2" class="line_4" anchor="top right"/>
              <Button position="absolute 1134 10 1190 32" id="btn_search" class="btn1" text="조회" anchor="top right" onclick="group2_btn_search_onclick"/>
              <Button position="absolute 1041 10 1121 32" id="btn_excelsave" class="btn7" visible="true" text="엑셀저장" anchor="top right" onclick="group2_btn_excelsave_onclick"/>
              <Button position="absolute 970 10 1026 32" id="btn_prt" class="btn6" text="출력" anchor="top right" onclick="group2_btn_prt_onclick"/>
              <Shape position="absolute 1030 5 1036 37" linetype="vertical" id="line3" class="line_4" visible="false" anchor="top right"/>
              <Static text="기준월 :" position="absolute 10 11 83 28" id="caption3" class="search_name" anchor="default"/>
              <Calendar position="absolute 90 10 200 29" id="ipt_srchfromdd" class="input_search" mask="yyyy-mm" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" style="align:center middle;" onkeyup="group2_ipt_srchfromdd_onkeyup" onchanged="group2_ipt_srchfromdd_onchanged"/>
              <Static text="조회기준 :" position="absolute 240 13 335 30" id="caption1" class="search_name" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Tab position="absolute 0 72 1195 744" id="swt_endo" anchor="all">
          <Tabpages>
            <Tabpage text="판독의별" id="case_cnfmmanlst">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 1195 645" id="grd_cnfmmanlst" binddataset="ds_main_cnfmmanlst_item" autoenter="select" autofittype="col" cellsizingtype="col" anchor="all">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="26" band="left"/>
                          <Column size="100"/>
                          <Column size="68"/>
                          <Column size="120"/>
                          <Column size="120"/>
                          <Column size="120"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" text="판독의"/>
                          <Cell col="2" text="날짜"/>
                          <Cell col="3" text="상부내시경"/>
                          <Cell col="4" text="수면내시경"/>
                          <Cell col="5" text="대장내시경"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" expr="currow+1"/>
                          <Cell col="1" displaytype="text" style="align:center middle;background:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');color:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');color2:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:cnfmmanid" suppress="1" suppressalign="middle,over"/>
                          <Cell col="2" style="background:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');color:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');color2:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:prcpdd"/>
                          <Cell col="3" style="background:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');color:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');color2:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:endo"/>
                          <Cell col="4" style="background:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');color:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');color2:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:sendo" calendardisplaynulltype="nulltext"/>
                          <Cell col="5" style="background:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');background2:EXPR(getRowLevel(currow) == 1 ? '#7CBBDD' : '');color:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');color2:EXPR(getRowLevel(currow) == 1 ? '#ffffff' : '');font:EXPR(getRowLevel(currow) == 1 ? 'arial,9,bold' : '');" text="bind:colon"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="환자명단" id="case_endodetllst">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 1195 645" id="grd_endodetllst" binddataset="ds_main_endodetllst_item" autoenter="select" autofittype="col" cellsizingtype="col" anchor="all">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="27" band="left"/>
                          <Column size="135"/>
                          <Column size="106"/>
                          <Column size="100"/>
                          <Column size="110"/>
                          <Column size="135"/>
                          <Column size="100"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell/>
                          <Cell col="1" text="처방일자"/>
                          <Cell col="2" text="차트번호"/>
                          <Cell col="3" text="성명"/>
                          <Cell col="4" text="처방명"/>
                          <Cell col="5" text="실시일자"/>
                          <Cell col="6" text="판독의"/>
                        </Band>
                        <Band id="body">
                          <Cell celltype="head" expr="currow+1"/>
                          <Cell col="1" displaytype="date" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
                          <Cell col="2" text="bind:pid"/>
                          <Cell col="3" text="bind:hngnm"/>
                          <Cell col="4" text="bind:calcscorcd"/>
                          <Cell col="5" displaytype="date" text="bind:excuexectodd" calendardisplaynulltype="nulltext"/>
                          <Cell col="6" text="bind:cnfmman"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Radio position="absolute 340 35 490 55" id="rdo_search" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">처방일자</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">실시일자</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption60" text="월별 건진내시경 현황" class="tit_1" position="absolute 0 0 183 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_srch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="srchdate" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="srchdate">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_endodetllst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="차트번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="처방명"/>
          <Column id="excuexectodd" type="STRING" size="256" sumtext="실시일자"/>
          <Column id="cnfmman" type="STRING" size="256" sumtext="판독의"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cnfmmanlst_item" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnfmmanid" type="STRING" size="256" sumtext="소계" prop="TEXT"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="일자"/>
          <Column id="endo" type="BIGDECIMAL" size="256" sumtext="이수옥일반" prop="SUM"/>
          <Column id="sendo" type="BIGDECIMAL" size="256" sumtext="이수옥수면" prop="SUM"/>
          <Column id="colon" type="BIGDECIMAL" size="256" sumtext="이수옥대장" prop="SUM"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="srchdate" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="srchdate"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_print_cnfmmanlst" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnfmmanid" type="STRING" size="256" prop="NONE"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="일자"/>
          <Column id="endo" type="BIGDECIMAL" size="256" sumtext="이수옥일반" prop="SUM"/>
          <Column id="sendo" type="BIGDECIMAL" size="256" sumtext="이수옥수면" prop="SUM"/>
          <Column id="colon" type="BIGDECIMAL" size="256" sumtext="이수옥대장" prop="SUM"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_srchfromdd" propid="value" datasetid="ds_init_srch" columnid="fromdd"/>
      <BindItem id="item1" compid="rdo_search" propid="value" datasetid="ds_init_srch" columnid="srchdate"/>
    </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 SMAHS03600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHS03600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(swt_endo.case_cnfmmanlst.grd_cnfmmanlst);
	grdf_initGrid(swt_endo.case_endodetllst.grd_endodetllst);
	
	fInit();
}

function fInit()
{
	var curDt = String(utlf_getCurrentDate()).substr(0,6);
	group2.ipt_srchfromdd.value = curDt;
	rdo_search.enable = true;
}

function group2_ipt_srchfromdd_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group2.btn_search.click();
	}
}

function group2_ipt_srchfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_init_srch.setColumn(0, "fromdd", String(obj.value).substr(0,6));
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var idx = swt_endo.tabindex;
	var ret = false;
	var initdd = ds_init_srch.getColumn(0, "fromdd");
	//trace("initdd = " + initdd.substr(0,6));
	var fromdd = initdd.substr(0,6) + "01";
	var todd = initdd.substr(0,6) + "31";
	
	ds_send.setColumn(0, "srchfromdd", fromdd);
	ds_send.setColumn(0, "srchtodd", todd);
	ds_send.setColumn(0, "srchdate", ds_init_srch.getColumn(0, "srchdate"));
	
	if(idx == 0) 
	{
		var oParam = {};
			oParam.id          = "TRAHS03601";
			oParam.service     = "healexamstatapp.StatRef";
			oParam.method      = "reqGetHealEndoCntList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_cnfmmanlst_item=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHS03601";

		tranf_submit(oParam);
		
		ds_main_cnfmmanlst_item.keystring = "G:cnfmmanid";
	}
	else 
	{
		var oParam = {};
			oParam.id          = "TRAHS03602";
			oParam.service     = "healexamstatapp.StatRef";
			oParam.method      = "reqGetHealEndoPatList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_endodetllst_item=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHS03602";

		tranf_submit(oParam);
	}
}


function group2_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	var idx = swt_endo.tabindex;
	if(idx == 0) 
	{
		grdf_exportExcel(swt_endo.case_cnfmmanlst.grd_cnfmmanlst, "excel", "Sheet1", "true", "", "");
	}
	else if(idx == 1) 
	{
		grdf_exportExcel(swt_endo.case_endodetllst.grd_endodetllst, "excel", "Sheet1", "true", "", "");
	}
}

function group2_btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	var idx = swt_endo.tabindex;
	if(idx == 0) 
	{
		for(var i = 0; i < ds_main_cnfmmanlst_item.rowcount; i++)
		{
			if(ds_main_cnfmmanlst_item.getColumn(i, "cnfmmanid") != "소계")
			{
				var addRow = ds_print_cnfmmanlst.addRow();
				ds_print_cnfmmanlst.copyRow(addRow, ds_main_cnfmmanlst_item, i)
			}
		}
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/export", ds_init_srch);
			rptf_setNodeListToDOM(objDOM, "/root/main/cnfmmanlst/item", ds_print_cnfmmanlst);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source; 
		var option = ""; 
		rptf_exeReportPreview30(["RPAHS03601"],[objParam], option);
	}
	else if(idx == 1) 
	{
		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/export", ds_init_srch);
			rptf_setNodeListToDOM(objDOM, "/root/main/endodetllst/item", ds_main_endodetllst_item);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source; 
		var option = ""; 
		rptf_exeReportPreview30(["RPAHS03602"],[objParam], option);
	}	
}
]]></Script>
  </Form>
</FDL>