YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMB01700_처방분류관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMB01700" position="absolute 0 0 1198 788" titletext="처방분류관리" oninit="SMMMB01700_oninit" onload="SMMMB01700_onload">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="9" position="absolute 0 24 1195 64" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Edit id="ipt_calcscorcd" taborder="7" class="input_search" position="absolute 278 11 428 30" visible="false" tooltiptext="처방코드를 2자리이상 입력하세요." tooltiptype="hover,mouseleave" autoselect="true" onkeyup="grp_sea_ipt_calcscorcd_onkeyup"/>
              <Edit id="ipt_prcpnm" taborder="2" class="input_search" position="absolute 278 11 478 30" visible="false" tooltiptext="처방명을 2자리이상 입력하세요." tooltiptype="hover,mouseleave" onkeyup="grp_sea_ipt_prcpnm_onkeyup"/>
              <Static id="caption2" text="검색조건 :" class="search_name" position="absolute 13 11 118 28"/>
              <Combo id="cmb_srchcond" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 113 11 253 30" onitemchanged="grp_sea_cmb_srchcond_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">CD</Col>
                      <Col id="datacolumn">처방코드</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">NM</Col>
                      <Col id="datacolumn">처방명</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">CLS</Col>
                      <Col id="datacolumn">처방분류</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Button id="btn_req" taborder="3" text="조회" class="btn1" position="absolute 1121 10 1177 32" anchor="top right" onclick="grp_sea_btn_req_onclick"/>
              <Combo id="cmb_earncls1" taborder="4" innerdataset="@ds_main_earncls1info_earncls1list" codecolumn="earncls1" datacolumn="earncls1nm" position="absolute 278 11 408 30" onitemchanged="grp_sea_cmb_earncls1_onitemchanged"/>
              <Combo id="cmb_earncls2" taborder="5" innerdataset="@ds_main_earncls2info_earncls2list" codecolumn="earncls2" datacolumn="earncls2nm" position="absolute 413 11 543 30" onitemchanged="grp_sea_cmb_earncls2_onitemchanged"/>
              <Combo id="cmb_earncls3" taborder="6" innerdataset="@ds_main_earncls3info_earncls3list" codecolumn="earncls3" datacolumn="earncls3nm" position="absolute 548 11 678 30"/>
              <Shape id="line3" linetype="vertical" position="absolute 1106 5 1112 35" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="처방분류관리" position="absolute 0 0 188 24" id="caption1" class="tit_1"/>
        <Static text="처방분류리스트" position="absolute 0 73 139 94" id="caption25" class="tit_2"/>
        <Shape position="absolute 0 89 1195 95" linetype="horizontal" id="line1" class="line_10" anchor="left top right"/>
        <Grid position="absolute 0 94 1195 781" id="grd_prcpclsmngtlist" taborder="6" binddataset="ds_main_prcpclsmngtinfo_prcpclsmngtlist" autoenter="select" cellsizingtype="both" anchor="all" extendsizetype="row" autosizingtype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="100"/>
                <Column size="280"/>
                <Column size="280"/>
                <Column size="280"/>
                <Column size="55"/>
                <Column size="70"/>
              </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="시작일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="combo" edittype="combo" style="align:left middle;padding:0 0 0 2;" text="bind:prcpclscd" combodataset="ds_init_cond_M0005_M0005" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="30"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 2;" text="bind:todd"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 2;" text="bind:calcscorcd"/>
                <Cell col="4" style="align:left middle;padding:2 2 2 2;" text="bind:ordnm" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="5" style="align:left middle;padding:2 2 2 2;" text="bind:engnm" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="6" style="align:left middle;padding:2 2 2 2;" text="bind:earncls" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="7" displaytype="combo" edittype="combo" style="align:center middle;padding:2 2 2 2;" text="bind:ordinptflag" wordwrap="word" combodataset="ds_init_cond_P0141_P0141" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="8" displaytype="date" style="align:left middle;padding:0 0 0 2;" text="bind:ordinptfromdd" calendardisplaynulltype="nulltext"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 1139 67 1195 89" id="btn_save" class="btn4" taborder="7" text="저장" anchor="top right" onclick="btn_save_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="calcscorcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="earncls1" type="STRING" size="256"/>
          <Column id="earncls2" type="STRING" size="256"/>
          <Column id="earncls3" type="STRING" size="256"/>
          <Column id="stnddd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond"/>
            <Col id="calcscorcd"/>
            <Col id="prcpnm"/>
            <Col id="earncls1"/>
            <Col id="earncls2"/>
            <Col id="earncls3"/>
            <Col id="stnddd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_earncls1info_earncls1list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_earncls2info_earncls2list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_earncls3info_earncls3list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cond_M0005_M0005" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cond_P0141_P0141" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prcpclsmngtinfo_prcpclsmngtlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="수가코드"/>
          <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="engnm" type="STRING" size="256" sumtext="처방영문명"/>
          <Column id="earncls" type="STRING" size="256" sumtext="처방분류"/>
          <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
          <Column id="ordinptflag" type="STRING" size="256" sumtext="처방입력구분"/>
          <Column id="ordinptfromdd" type="STRING" size="256" sumtext="처방불가능시작일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_srchcond" propid="value" datasetid="ds_main_cond" columnid="srchcond"/>
      <BindItem id="item1" compid="grp_sea.cmb_earncls1" propid="value" datasetid="ds_main_cond" columnid="earncls1"/>
      <BindItem id="item2" compid="grp_sea.cmb_earncls2" propid="value" datasetid="ds_main_cond" columnid="earncls2"/>
      <BindItem id="item3" compid="grp_sea.cmb_earncls3" propid="value" datasetid="ds_main_cond" columnid="earncls3"/>
      <BindItem id="item4" compid="grp_sea.ipt_calcscorcd" propid="value" datasetid="ds_main_cond" columnid="calcscorcd"/>
      <BindItem id="item5" compid="grp_sea.ipt_prcpnm" propid="value" datasetid="ds_main_cond" columnid="prcpnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-09-07
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-09-07      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
function SMMMB01700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMMB01700_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_prcpclsmngtlist);
	grdf_setRowTypeIcon(grd_prcpclsmngtlist, 0);
	
	//처방분류를 공통코드로 받아옴
	var arrParam = [{dsNm: "ds_init_cond_M0005_M0005", cdGrpId: "M0005"}]
	appf_getCodeList(arrParam); 
					 
	//************코드가 '00'~'09'까지 나타나지 않게 하기
	//인스턴스 개수를 받아온다.
	var dataCnt = ds_init_cond_M0005_M0005.rowcount;
	for(var i = dataCnt; i > 0 ; i--)
	{
		var cdid = ds_init_cond_M0005_M0005.getColumn(i, "cdid");
		//해당 코드 값이 있으면 인스턴스를 삭제
		if((cdid == '00')||(cdid == '01')||(cdid == '02')||(cdid == '03')||(cdid == '04')||(cdid == '05')||(cdid == '06')||(cdid == '07')||(cdid == '08')||(cdid == '09'))
		{
			ds_init_cond_M0005_M0005.deleteRow(i);
		}
	}
	//처방입력구분을 공통코드로 받아옴
	var arrParam = [{dsNm: "ds_init_cond_P0141_P0141", cdGrpId: "P0141"}]
	appf_getCodeList(arrParam); 

	//현재 날짜를 받아옴
	ds_main_cond.setColumn(0, "stnddd", utlf_getCurrentDate());

	//초기화시 검색조건에 따라 조건 박스가 뜨도록 처음에는 안뜨게 표시
	grp_sea.ipt_calcscorcd.visible = false;
	grp_sea.ipt_prcpnm.visible = false;
	grp_sea.cmb_earncls1.visible= true;
	grp_sea.cmb_earncls2.visible= true;
	grp_sea.cmb_earncls3.visible= true;
	
	//리스트 화면을 초기화
	ds_main_prcpclsmngtinfo_prcpclsmngtlist.clearData();
	
	//처방분류 대 콤보 박스에 리스트가 조회
	var oParam = {};
		oParam.id          = "TRMMB01702";
		oParam.service     = "prcpbaseapp.PrcpClsMngt";
		oParam.method      = "reqGetEarncls1";
		oParam.inds        = "";
		oParam.outds       = "ds_main_earncls1info_earncls1list=earncls1list";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMMB01702";

	tranf_submit(oParam);
	
	//검색조건에 기본적으로 처방분류가 들어가 있는 상태로 초기화
	grp_sea.cmb_srchcond.index = 2;  //처방분류
	frmf_inputEnterKey("grp_sea.cmb_srchcond", "onitemchanged", new ItemChangeEventInfo ); 
	grp_sea.cmb_earncls1.index = 0;	//처방분류 조회후 첫번째 값
	grp_sea.cmb_earncls2.index = 0;	//전체
	grp_sea.cmb_earncls3.index = 0;	//전체
}

function grp_sea_cmb_srchcond_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	// 콤보박스에서 선택한 값에 따라 조건 옆에 박스가 뜨게 선택하고 각 input박스나 콤보박스에 포커스가 가있게 한다.
	if(obj.value == "CD")
	{
		grp_sea.ipt_calcscorcd.visible = true;
		grp_sea.ipt_prcpnm.visible = false;
		grp_sea.cmb_earncls1.visible= false;
		grp_sea.cmb_earncls2.visible= false;
		grp_sea.cmb_earncls3.visible= false;
		grp_sea.ipt_calcscorcd.setFocus();
	}
	else if(obj.value == "NM")
	{
		grp_sea.ipt_calcscorcd.visible = false;
		grp_sea.ipt_prcpnm.visible = true;
		grp_sea.cmb_earncls1.visible= false;
		grp_sea.cmb_earncls2.visible= false;
		grp_sea.cmb_earncls3.visible= false;
		grp_sea.ipt_prcpnm.setFocus();
	}
	else if(obj.value == "CLS")
	{
		grp_sea.ipt_calcscorcd.visible = false;
		grp_sea.ipt_prcpnm.visible = false;
		grp_sea.cmb_earncls1.visible= true;
		grp_sea.cmb_earncls2.visible= true;
		grp_sea.cmb_earncls3.visible= true;
		grp_sea.cmb_earncls1.setFocus();
	}
	
	//input박스에 예전에 검색한 data값이 남지 않도록 지워준다.
	ds_main_cond.setColumn(0, "calcscorcd", "");
	ds_main_cond.setColumn(0, "prcpnm", "");
	
	//콤보박스에 예전에 검색한 data값이 남지 않고 언제나 첫조건이 조회되도록 한다.
	grp_sea.cmb_earncls1.index = 0;
	frmf_inputEnterKey("grp_sea.cmb_earncls1", "onitemchanged", new ItemChangeEventInfo ); 
	grp_sea.cmb_earncls2.index = 0;
	grp_sea.cmb_earncls3.index = 0;
}

function grp_sea_cmb_earncls1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	//콤보박스 리스트를 제거
	ds_main_earncls2info_earncls2list.clearData();

   //콤보박스에 나올 리스트 조회
   ds_send_reqdata.copyData(ds_main_cond);
   var oParam = {};
		oParam.id          = "TRMMB01703";
		oParam.service     = "prcpbaseapp.PrcpClsMngt";
		oParam.method      = "reqGetEarncls2";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_earncls2info_earncls2list=earncls2list";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMMB01703";

	tranf_submit(oParam);
	
	ds_main_earncls2info_earncls2list.insertRow(0);
	ds_main_earncls2info_earncls2list.setColumn(0, "earncls2", "all");
	ds_main_earncls2info_earncls2list.setColumn(0, "earncls2nm", "전체");
	
	//콤보박스 리스트 변경시 다시 전체가 조회되도록 선택      
	grp_sea.cmb_earncls2.index = 0;
	frmf_inputEnterKey("grp_sea.cmb_earncls2", "onitemchanged", new ItemChangeEventInfo ); 
}

function grp_sea_cmb_earncls2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	//콤보박스 리스트를 제거
	ds_main_earncls3info_earncls3list.clearData();

	//콤보박스에 나올 리스트 조회
	ds_send_reqdata.copyData(ds_main_cond);
	var oParam = {};
		oParam.id          = "TRMMB01704";
		oParam.service     = "prcpbaseapp.PrcpClsMngt";
		oParam.method      = "reqGetEarncls3";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_earncls3info_earncls3list=earncls3list";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMMB01704";

	tranf_submit(oParam);
	
	ds_main_earncls3info_earncls3list.insertRow(0);
	ds_main_earncls3info_earncls3list.setColumn(0, "earncls3", "all");
	ds_main_earncls3info_earncls3list.setColumn(0, "earncls3nm", "전체");
	
	//콤보박스 리스트 변경시 다시 전체가 조회되도록 선택      
	grp_sea.cmb_earncls3.index = 0;
}

function grp_sea_btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	//한글인지 영문인지 판단하고 data개수도 판단하여 작은 경우 메세지가 뜨게 한다.
	var srchcond = ds_main_cond.getColumn(0, "srchcond");
	var codenm = "";
	
	if(srchcond == "CD")
	{
		codenm = ds_main_cond.getColumn(0, "calcscorcd");
		if (utlf_isNull(codenm)) 
		{
			alert ( "처방코드를 입력하세요..!." );
			grp_sea.ipt_calcscorcd.setFocus();
			return;
		} 
		else if (String(codenm).length < 2) 
		{
			alert ( "처방코드를 2자리 이상 입력하세요..!." );
			grp_sea.ipt_calcscorcd.setFocus();
			return;
		}
	}
	else if(srchcond == "NM")
	{
		codenm = ds_main_cond.getColumn(0, "prcpnm");

		if (utlf_isNull(codenm)) 
		{
			alert ( "처방명을 입력하세요..!." );
			grp_sea.ipt_prcpnm.setFocus();
			return;
		}
		//한글인지 확인
		if (fIsHangul(codenm) == "H") 
		{
			if (codenm.length < 2) 
			{
				alert ( "한글 처방명 2자리 이상 입력하세요..!." );
				grp_sea.ipt_prcpnm.setFocus();
				return;
			}
		}
		else 
		{
			if (String(codenm).length < 4) 
			{
				alert ( "영문 처방명 2자리 이상 입력하세요..!." );
				grp_sea.ipt_prcpnm.setFocus();
				return;
			}
		}
	}

	//조건에 맞는 데이터 조회
	ds_send_reqdata.copyData(ds_main_cond);
	var oParam = {};
		oParam.id          = "TRMMB01701";
		oParam.service     = "prcpbaseapp.PrcpClsMngt";
		oParam.method      = "reqGetPrcpClsList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_prcpclsmngtinfo_prcpclsmngtlist=prcpclsmngtlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMMB01701";

	tranf_submit(oParam);
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	//처방분류를 변경하고 data 저장하고 다시 조회
	//처방분류가 변경되 데아타를 가지고 감
	
	//검색조건으로 조회하기 위해 데이터를 가지고고 감
	ds_send_reqdata.copyData(ds_main_cond);
	//변경된 데이타를 수가기분테이블에서 수정
	var oParam = {};
		oParam.id          = "TXMMB01701";
		oParam.service     = "prcpbaseapp.PrcpClsMngt";
		oParam.method      = "reqSavePrcpClsList";
		oParam.inds        = "save=ds_main_prcpclsmngtinfo_prcpclsmngtlist:u req=ds_send_reqdata";
		oParam.outds       = "ds_main_prcpclsmngtinfo_prcpclsmngtlist=prcpclsmngtlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMMB01701";

	tranf_submit(oParam);
}

function grp_sea_ipt_calcscorcd_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_req.click();
	}
}

function grp_sea_ipt_prcpnm_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_req.click();
	}
}
]]></Script>
  </Form>
</FDL>