YNU_JEUS/app_home/himed/xpapps/ast/healexamxp/xp/SMAHB02400_질환코드관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHB02400" position="absolute 0 0 1205 805" titletext="질환코드관리" oninit="SMAHB02400_oninit" onload="SMAHB02400_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="질환코드 관리" class="tit_1" position="absolute 0 0 142 25"/>
        <Static id="caption1" text="사업체정보" class="tit_2" position="absolute 0 79 90 101"/>
        <Shape id="line1" class="line_10" position="absolute 0 95 534 101"/>
        <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 25 1195 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 1123 10 1179 32" anchor="top right" onclick="grp_sea_btn_search_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 10 1110 32" anchor="top right"/>
              <Static id="caption2" text="사업체코드 :" class="search_name" position="absolute 16 12 115 29"/>
              <Static id="caption4" text="사업체명 :" class="search_name" position="absolute 250 12 336 29"/>
              <Edit id="ipt_cmpycd" taborder="2" class="input_search" position="absolute 115 11 235 30" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_cmpycd_onkeyup"/>
              <Edit id="ipt_cmpynm" taborder="3" class="input_search" position="absolute 339 11 514 30" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_cmpynm_onkeyup"/>
              <Static id="caption21" text="질환명 :" class="search_name" position="absolute 803 12 876 29"/>
              <Static id="caption59" text="질환코드 :" class="search_name" position="absolute 534 12 620 29"/>
              <Edit id="ipt_sickcd" taborder="4" class="input_search" position="absolute 623 11 778 30" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_sickcd_onkeyup"/>
              <Edit id="ipt_sicknm" taborder="5" class="input_search" position="absolute 880 11 1095 30" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_sicknm_onkeyup"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_cmpylst" taborder="2" binddataset="ds_main_cmpylst_item" useinputpanel="false" position="absolute 0 100 534 763" autoenter="select" autofittype="col" cellsizingtype="col" anchor="left top bottom" oncelldblclick="grd_cmpylst_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="103"/>
                <Column size="359"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="사업체코드"/>
                <Cell col="2" text="사업체명"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 3;" text="bind:cmpycd"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 3;" text="bind:cmpynm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption3" text="질환코드" class="tit_2" position="absolute 539 79 617 100"/>
        <Shape id="line2" class="line_10" position="absolute 539 95 1195 101" anchor="left top right"/>
        <Button id="btn_del" taborder="3" text="행삭제" class="btn2" position="absolute 1064 76 1117 95" anchor="top right" onclick="btn_del_onclick"/>
        <Button id="btn_add" taborder="4" text="행추가" class="btn2" position="absolute 1008 76 1061 95" anchor="top right" onclick="btn_add_onclick"/>
        <Grid id="grd_sicklst" taborder="5" binddataset="ds_main_sicklst_item" useinputpanel="false" position="absolute 539 100 1195 763" autoenter="select" cellsizingtype="col" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="0"/>
                <Column size="83"/>
                <Column size="236"/>
                <Column size="72"/>
                <Column size="107"/>
                <Column size="122"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="codekey"/>
                <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" text="bind:sickcdkey"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 3;" text="bind:sickcd"/>
                <Cell col="3" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 3;" text="bind:sicknm"/>
                <Cell col="4" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:judgcd" combodataset="ds_cmb_judgcd" combocodecol="value" combodatacol="label"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:sickcdcnts"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:mappsickcd"/>
                <Cell col="7" text="bind:lastupdtrid"/>
                <Cell col="8" text="bind:lastupdtdt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_fileupload" taborder="6" text="파일업로드" class="btn2" position="absolute 1120 76 1195 95" anchor="top right" onclick="btn_fileupload_onclick"/>
        <Button id="button1" taborder="7" text="질환전체보기" class="btn5" position="absolute 620 76 717 95" onclick="button1_onclick"/>
        <Static id="caption5" text="* 질환은 사업체별로 관리되어집니다." position="absolute 0 769 212 789" style="color:#ff0000ff;font:Dotum,8,bold;" anchor="left bottom"/>
        <Button id="btn_save" taborder="8" text="저장" class="btn4" position="absolute 1070 773 1126 795" anchor="right bottom" onclick="btn_save_onclick"/>
        <Button id="btn_clear" taborder="9" text="초기화" class="btn4" position="absolute 1128 773 1196 795" anchor="right bottom" onclick="btn_clear_onclick"/>
      </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="srchcmpycd" type="STRING" size="256"/>
          <Column id="srchcmpycd2" type="STRING" size="256"/>
          <Column id="srchcmpynm" type="STRING" size="256"/>
          <Column id="srchsickcd" type="STRING" size="256"/>
          <Column id="srchsicknm" type="STRING" size="256"/>
          <Column id="srchinstcd" type="STRING" size="256"/>
          <Column id="srchcond" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcmpycd"/>
            <Col id="srchcmpycd2"/>
            <Col id="srchcmpynm"/>
            <Col id="srchsickcd"/>
            <Col id="srchsicknm"/>
            <Col id="srchinstcd"/>
            <Col id="srchcond"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cmpylst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cmpycd" type="STRING" size="256" sumtext="사업체코드"/>
          <Column id="cmpynm" type="STRING" size="256" sumtext="사업체명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_sicklst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sickcdkey" type="STRING" size="256" sumtext="질환코드"/>
          <Column id="sel" type="STRING" size="256" sumtext="선택여부"/>
          <Column id="sickcd" type="STRING" size="256" sumtext="질환코드"/>
          <Column id="sicknm" type="STRING" size="256" sumtext="질환명"/>
          <Column id="judgcd" type="STRING" size="256" sumtext="판정코드"/>
          <Column id="mappsickcd" type="STRING" size="256" sumtext="질환코드"/>
          <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종수정자"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
          <Column id="sickcdcnts" type="STRING" size="256" sumtext="질환소견"/>
          <Column id="cmpycd" type="STRING" size="256" sumtext="단체코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_judgcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">A</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">B</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">C</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">D</Col>
            <Col id="value">D</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_allchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_cmpymatch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cmpycd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_save" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_cmpycd" propid="value" datasetid="ds_send" columnid="srchcmpycd"/>
      <BindItem id="item1" compid="grp_sea.ipt_cmpynm" propid="value" datasetid="ds_send" columnid="srchcmpynm"/>
      <BindItem id="item2" compid="grp_sea.ipt_sickcd" propid="value" datasetid="ds_send" columnid="srchsickcd"/>
      <BindItem id="item3" compid="grp_sea.ipt_sicknm" propid="value" datasetid="ds_send" columnid="srchsicknm"/>
    </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";
include "ast_healexamxp::AHA001.xjs";
include "ast_healthexambasexp::healcombolist.xjs";
var arErrorCode = new HashArray();
function SMAHB02400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHB02400_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_cmpylst);
	grdf_initGrid(grd_sicklst);
	grdf_setRowTypeIcon(grd_sicklst, 0);
	
	fGetCmpyList();
}

function fInit(bAll) 
{
	if(bAll == true) 
	{
		ds_main_cmpylst_item.clearData();
	}
	ds_main_sicklst_item.clearData();
}

function fGetCmpyList() 
{
	fInit(true); 

	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));
	ds_send.setColumn(0, "srchcond", "N");
	
	if(!utlf_isNull(ds_send.getColumn(0, "srchsickcd")) || !utlf_isNull(ds_send.getColumn(0, "srchsicknm")))
	{
		ds_send.setColumn(0, "srchcond", "Y");
	}
	
	var oParam = {};
		oParam.id          = "TRAHB02401";
		oParam.service     = "healexambaseapp.SickCode";
		oParam.method      = "reqGetCmpyList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_cmpylst_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHB02401";

	tranf_submit(oParam);

	if(utlf_isNull(ds_send.getColumn(0, "srchcmpycd")) && utlf_isNull(ds_send.getColumn(0, "srchcmpynm")))
	{
		ds_init_allchk.setColumn(0, "chk", "ALL");
		ds_send_cmpymatch.setColumn(0, "cmpycd", "A");
		
		var oParam = {};
			oParam.id          = "TRAHB02403";
			oParam.service     = "healexambaseapp.SickCode";
			oParam.method      = "reqGetCmpyMatchSickList";
			oParam.inds        = "req=ds_send_cmpymatch";
			oParam.outds       = "ds_main_sicklst_item=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHB02403";

		tranf_submit(oParam);
	}
}

function grd_cmpylst_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	ds_init_allchk.setColumn(0, "chk","NOT");
	fGetCmpyMatchSickList();
}

function fGetCmpyMatchSickList()
{
	var row = ds_main_cmpylst_item.rowposition;
	if(row < 0)
	{
	}
	else
	{
		var cmpycd = ds_main_cmpylst_item.getColumn(row, "cmpycd")
		if(cmpycd == "" || cmpycd == " " || utlf_isNull(cmpycd))
		{
		}
		else
		{
			ds_send_cmpymatch.setColumn(0, "cmpycd", ds_main_cmpylst_item.getColumn(row, "cmpycd"));
			var oParam = {};
				oParam.id          = "TRAHB02403";
				oParam.service     = "healexambaseapp.SickCode";
				oParam.method      = "reqGetCmpyMatchSickList";
				oParam.inds        = "req=ds_send_cmpymatch";
				oParam.outds       = "ds_main_sicklst_item=item";
				oParam.async       = false;
				//oParam.callback    = "cf_TRAHB02403";

			tranf_submit(oParam);
		}
	}
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_init_allchk.setColumn(0, "chk","NOT");
	ds_send_cmpymatch.setColumn(0, "cmpycd", "A");
	var oParam = {};
		oParam.id          = "TRAHB02403";
		oParam.service     = "healexambaseapp.SickCode";
		oParam.method      = "reqGetCmpyMatchSickList";
		oParam.inds        = "req=ds_send_cmpymatch";
		oParam.outds       = "ds_main_sicklst_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHB02403";

	tranf_submit(oParam);
}

function btn_add_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_sicklst_item.addRow();
	grd_sicklst.setCellPos(2);
	grd_sicklst.showEditor(true);
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_sicklst_item.getRowType(ds_main_sicklst_item.rowposition) == 2)
	{
		ds_main_sicklst_item.deleteRow(ds_main_sicklst_item.rowposition);
	}
	else
	{
		ds_main_sicklst_item.updatecontrol = false;
		ds_main_sicklst_item.setRowType(ds_main_sicklst_item.rowposition, "d");
		ds_main_sicklst_item.updatecontrol = true;
	}
}

function btn_fileupload_onclick(obj:Button,  e:ClickEventInfo)
{
	fExcelUpload();
}

function fExcelUpload()
{
	grdf_ImportExcel("ds_main_sicklst_item ", 2, grd_sicklst, 0);
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if(fSaveSickCd()  ==  true )
	{
		fGetSickList();	
	}
}


function fSaveSickCd() 
{ 
	if(grdf_getGridUpdateData(grd_sicklst).rowcount == 0 )
	{
		alert("저장할 내역이 없습니다.");
		return ;
	}
	
	var ret = false;
	if ( sysf_messageBox("질환코드정보를","Q002")==6 )
	{
		var idx = ds_main_cmpylst_item.rowposition;
		var vCmpycd = ds_main_cmpylst_item.getColumn(idx, "cmpycd" ); 

		if(utlf_isNull(vCmpycd))
		{
			dsf_makeValue(ds_send_save, "cmpycd", "string", sysf_getUserInfo("dutplceinstcd"));   
		}
		else
		{
			var allyn = ds_init_allchk.getColumn(0, "chk");
			if(allyn == "ALL")
			{
				dsf_makeValue(ds_send_save, "cmpycd", "string", sysf_getUserInfo("dutplceinstcd"));   
			}
			else if(allyn == "NOT")
			{
				dsf_makeValue(ds_send_save, "cmpycd", "string", vCmpycd);
			}
			else
			{
				alert("사업체확인요청");
				return;
			}
		}
		
		var oParam = {};
			oParam.id          = "TXAHB02401";
			oParam.service     = "healexambaseapp.SickCode";
			oParam.method      = "reqExeSickCode";
			oParam.inds        = "req=ds_send_save req1=ds_main_sicklst_item:u";
			oParam.outds       = "ds_=item";
			oParam.typeStr     = "m";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHB02401";

		tranf_submit(oParam);

		if(arErrorCode.pop("TXAHB02401") > -1)
		{
			ret = true;
		}
	}
	return ret;				
}

function cf_TXAHB02401(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

function fGetSickList() 
{
	fInit(false);
	var idx = ds_main_cmpylst_item.rowposition;
	if( idx < 0) return ;
	var vCmpycd = ds_main_cmpylst_item.getColumn(idx, "cmpycd" ); 
	
	ds_send.setColumn(0, "srchcmpycd2", vCmpycd);   
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));   
	
	var oParam = {};
		oParam.id          = "TRAHB02402";
		oParam.service     = "healexambaseapp.SickCode";
		oParam.method      = "reqGetSickList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_sicklst_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHB02402";

	tranf_submit(oParam);
}

function btn_clear_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetSickList();	
}

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

function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetCmpyList();
}

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

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

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