YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLNP00700_핵의학구분별검사수.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLNP00700" position="absolute 0 0 1256 805" titletext="핵의학구분별조회" onload="SMLNP00700_onload" oninit="SMLNP00700_oninit">
    <Layouts>
      <Layout>
        <Static id="caption6" text="핵의학 구분별 검사수" class="tit_1" position="absolute 0 0 168 24"/>
        <Button id="button11" taborder="1" text="출력" class="btn6" visible="false" position="absolute 0 28 56 50" onclick="button11_onclick"/>
        <Button id="btn_reset" taborder="2" text="초기화" class="btn4" position="absolute 1167 28 1235 50"/>
        <Button id="btn_excel" taborder="3" text="엑셀저장" class="btn2" visible="false" position="absolute 0 768 64 787" onclick="btn_excel_onclick"/>
        <Grid id="grd_cntlist" taborder="4" binddataset="ds_grd_cntlist" useinputpanel="false" position="absolute 0 120 220 760" autofittype="col" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="150"/>
                <Column size="65"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="검사명"/>
                <Cell col="1" text="건수"/>
                <Cell col="2"/>
              </Band>
              <Band id="body">
                <Cell style="align:left;" text="bind:tclsnm"/>
                <Cell col="1" text="bind:tclscnt"/>
                <Cell col="2" text="bind:testcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_cntdetlist" taborder="5" binddataset="ds_grd_cntdetlist" useinputpanel="false" position="absolute 230 120 1235 760" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="75"/>
                <Column size="75"/>
                <Column size="35"/>
                <Column size="35"/>
                <Column size="80"/>
                <Column size="75"/>
                <Column size="180"/>
                <Column size="80"/>
                <Column size="130"/>
                <Column size="90"/>
                <Column size="130"/>
                <Column size="130"/>
                <Column size="130"/>
              </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="주치의"/>
                <Cell col="7" text="검사명"/>
                <Cell col="8" text="결과"/>
                <Cell col="9" text="등록일자"/>
                <Cell col="10" text="처방일자"/>
                <Cell col="11" text="채혈일자"/>
                <Cell col="12" text="접수일자"/>
                <Cell col="13" text="결과일자"/>
              </Band>
              <Band id="body">
                <Cell text="bind:dispseq" expr="expr:dispseq != &quot;0&quot; ? dispseq:&quot;&quot;"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:patnm"/>
                <Cell col="3" text="bind:patage"/>
                <Cell col="4" text="bind:patsex"/>
                <Cell col="5" text="bind:orddeptnm"/>
                <Cell col="6" text="bind:orddrnm"/>
                <Cell col="7" text="bind:tclsnm"/>
                <Cell col="8" text="bind:reptrslt"/>
                <Cell col="9" text="bind:rgstdd" mask="####-##-## ##:##:##"/>
                <Cell col="10" text="bind:prcpdd" mask="####-##-##"/>
                <Cell col="11" text="bind:bcolldt" mask="####-##-## ##:##:##"/>
                <Cell col="12" text="bind:spcacptdt" mask="####-##-## ##:##:##"/>
                <Cell col="13" text="bind:lastreptdt" mask="####-##-## ##:##:##"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption3" text="검사별 건수" class="tit_2" position="absolute 5 100 139 114"/>
        <Static id="caption1" text="상세조회" class="tit_2" position="absolute 235 100 309 113"/>
        <CheckBox id="checkbox1" taborder="6" position="absolute 313 96 333 116" onclick="checkbox1_onclick"/>
        <Div id="group1" taborder="7" class="div_SA" position="absolute 0 56 1235 91">
          <Layouts>
            <Layout>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1145 7 1151 29" anchor="default"/>
              <Button id="btn_Ref" taborder="8" text="조회" class="btn1" position="absolute 1163 8 1219 30" anchor="default" onclick="group1_btn_Ref_onclick"/>
              <Static id="caption11" text="조회일자 :" class="search_name" position="absolute 9 11 82 28" anchor="default"/>
              <Calendar id="input3" taborder="9" class="input_default" position="absolute 130 9 234 28" mask="yyyy-mm" anchor="default"/>
              <Calendar id="input1" taborder="10" class="input_default" position="absolute 297 9 401 28" mask="yyyy-mm" anchor="default"/>
              <Static id="caption8" text="~" position="absolute 240 9 253 29" anchor="default"/>
              <Combo id="combo1" taborder="11" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 826 9 931 28" anchor="default" value="1" text="환자명순" index="0">
                <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>
              </Combo>
              <Static id="caption2" text="조회구분 :" class="search_name" position="absolute 444 11 517 28" anchor="default"/>
              <CheckBox id="checkbox2" taborder="12" position="absolute 521 8 569 28" anchor="default" text="외래" onclick="group1_checkbox2_onclick"/>
              <CheckBox id="checkbox3" taborder="13" position="absolute 580 8 638 28" anchor="default" text="입원" onclick="group1_checkbox3_onclick"/>
              <CheckBox id="checkbox4" taborder="14" position="absolute 641 8 699 28" anchor="default" text="건진" onclick="group1_checkbox4_onclick"/>
              <Static id="caption4" text="채혈일" position="absolute 89 9 134 29" anchor="default"/>
              <Static id="caption5" text="결과일" position="absolute 257 9 302 29" anchor="default"/>
              <Static id="caption7" text="정렬순서 :" class="search_name" position="absolute 745 11 819 28" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_cntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tclsnm" type="STRING"/>
          <Column id="tclscnt" type="STRING"/>
          <Column id="testcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_cntdetlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dispseq" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="patage" type="STRING"/>
          <Column id="patsex" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="reptrslt" type="STRING"/>
          <Column id="rgstdd" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="bcolldt" type="STRING"/>
          <Column id="spcacptdt" type="STRING"/>
          <Column id="lastreptdt" type="STRING"/>
        </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="srchym" type="STRING" size="256"/>
          <Column id="srchym2" type="STRING" size="256"/>
          <Column id="srchbdioflag" type="STRING" size="256"/>
          <Column id="getgbn" type="STRING" size="256"/>
          <Column id="detgbn" type="STRING" size="256"/>
          <Column id="oflag" type="STRING" size="256"/>
          <Column id="iflag" type="STRING" size="256"/>
          <Column id="sflag" type="STRING" size="256"/>
          <Column id="ois" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="getgbn">1</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input3" propid="value" datasetid="ds_send" columnid="srchym"/>
      <BindItem id="item1" compid="group1.input1" propid="value" datasetid="ds_send" columnid="srchym2"/>
      <BindItem id="item5" compid="group1.combo1" propid="value" datasetid="ds_send" columnid="getgbn"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-05-02
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-05-02      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

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

function SMLNP00700_onload(obj:Form, e:LoadEventInfo)
{
	fInit();
}

function fInit() 
{
	ds_send.setColumn(0, "srchym", utlf_getCurrentDate());
	ds_send.setColumn(0, "srchym2", utlf_getCurrentDate());
}

function fGetTestCntList()
{
	var O = ds_send.getColumn(0, "oflag"); // 외래
	var I = ds_send.getColumn(0, "iflag"); // 입원 
	var S = ds_send.getColumn(0, "sflag"); // 건진
	var OIS = "";
	
	if(O == "1"){
		OIS = OIS + "1";
	}else{
		OIS = OIS + "0";
	}
	if(I == "1"){
		OIS = OIS + "1";
	}else{
		OIS = OIS + "0";
	}
	if(S == "1"){
		OIS = OIS + "1";
	}else{
		OIS = OIS + "0";
	}
	
	// 000 전체 
	// 001 건진
	// 010 입원 
	// 011 입원 건진
	// 100 외래 
	// 101 외래 건진
	// 110 외래 입원 
	// 111 전체
	
	
	ds_send.setColumn(0, "ois", OIS);
	
	var oParam = {};
		oParam.id          = "TRLNP00701";
		oParam.service     = "refprintmngtapp.NmedRefPrintMngt";
		oParam.method      = "reqGetTestCntList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_cntlist=getTestCntList";
		oParam.async       = true;
		oParam.callback    = "cf_TRLNP00701";

	tranf_submit(oParam);
	
	var detgbn = ds_send.getColumn(0, "detgbn");
	
	if(detgbn == "1"){
		var oParam = {};
			oParam.id          = "TRLNP00702";
			oParam.service     = "refprintmngtapp.NmedRefPrintMngt";
			oParam.method      = "reqGetTestCntDetList";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_grd_cntdetlist=getTestCntDetList";
			oParam.async       = true;
			oParam.callback    = "cf_TRLNP00702";

		tranf_submit(oParam);
	}	
}

function cf_TRLNP00701(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}

function cf_TRLNP00702(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}

function fReportPrint(){					
		
	var objDOM = rptf_createDOM();			// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "root/main/cntdetlist", ds_grd_cntdetlist);	// 데이터셋 1
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;		// 최상위노드 XML 스트링 추출

	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
	rptf_exeReportPreview30(["RPLNP00600"],[objParam], option);
}

function group1_btn_Ref_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetTestCntList();
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	var rowcnt = ds_grd_cntdetlist.rowcount;
	if(utlf_isNull(rowcnt)){
		sysf_messageBox("엑셀로 다운로드 할 데이터가", "I004");
	}else{
		grdf_exportExcel(grd_cntlist, "핵의학결과대장" , "핵의학결과대장");
	}
}

function checkbox1_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(checkbox1.value == true){
		ds_send.setColumn(0, "detgbn", "1");
	}else{
		ds_send.setColumn(0, "detgbn", "0");
	}
}

function group1_checkbox2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(group1.checkbox2.value == true){
		ds_send.setColumn(0, "oflag", "1");
	}else{
		ds_send.setColumn(0, "oflag", "0");
	}
}

function group1_checkbox3_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(group1.checkbox3.value == true){
		ds_send.setColumn(0, "iflag", "1");
	}else{
		ds_send.setColumn(0, "iflag", "0");
	}
}

function group1_checkbox4_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(group1.checkbox4.value == true){
		ds_send.setColumn(0, "sflag", "1");
	}else{
		ds_send.setColumn(0, "sflag", "0");
	}
}

function button11_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();			// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "root/main/cntdetlist", ds_grd_cntdetlist);	// 데이터셋 1
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;		// 최상위노드 XML 스트링 추출

	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
	rptf_exeReportPreview30(["RPLNP00600"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>