YNU_JEUS/app_home/himed/xpapps/pam/insubasecdmngtxp/xp/SMPIB03000_희귀난치질환기준정보관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIB03000" position="absolute 0 0 1223 777" titletext="희귀난치성질환 등록기준(건강보험_결핵포함)" oninit="SMPIB03000_oninit" onload="SMPIB03000_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1212 745" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 12 1209 52" align="align:center top;" id="group2" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 1139 9 1195 31" id="btn_search" class="btn1" taborder="6" text="조회" anchor="top right" onclick="group3_group2_btn_search_onclick"/>
                    <Shape position="absolute 1113 6 1119 33" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Static text="상     병 :" position="absolute 18 10 104 27" id="caption5" class="search_name" anchor="default"/>
                    <Static text="특정기호 :" position="absolute 485 11 571 28" id="caption2" class="search_name" visible="true" anchor="default"/>
                    <Static text="적 용 일 :" position="absolute 658 11 744 28" id="caption4" class="search_name" anchor="default"/>
                    <Edit position="absolute 561 9 632 28" id="ipt_spclcd" class="input_search" visible="true" anchor="default" onkeyup="group3_group2_ipt_spclcd_onkeyup"/>
                    <Calendar position="absolute 733 9 820 28" id="ipt_aplydd" class="input_search" mask="yyyy-mm-dd" anchor="default" dateformat="yyyy-MM-dd" value="null" onchanged="group3_group2_ipt_aplydd_onchanged"/>
                    <Button position="absolute 185 11 201 27" id="button2" class="icon_search" taborder="5" text="" anchor="default" onclick="group3_group2_button2_onclick"/>
                    <Edit position="absolute 93 9 180 28" id="ipt_diagcd" class="input_search" anchor="default"/>
                    <Edit position="absolute 207 9 460 28" id="ipt_diagnm" class="input_search" anchor="default"/>
                    <Static text="생성구분 :" position="absolute 844 11 930 28" id="caption3" class="search_name" visible="true" anchor="default"/>
                    <Combo position="absolute 924 10 1009 29" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group3_group2_combo1_onitemchanged">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">C</Col>
                            <Col id="datacolumn">생성</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">R</Col>
                            <Col id="datacolumn">재생성</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">
                            </Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                  </Layout>
                </Layouts>
              </Div>
              <Static text="희귀난치성질환 등록기준List" position="absolute 0 61 194 83" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 78 1204 79" linetype="vertical" id="line1" class="line_1" anchor="default"/>
              <Grid position="absolute 0 82 1209 722" id="grd_picmesrglist" class="datagrid2" binddataset="ds_main_picmesrglist" anchor="all" onexpanddown="group3_grd_picmesrglist_onexpanddown" autosizingtype="none" cellsizingtype="row" selecttype="multirow">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="35"/>
                      <Column size="50"/>
                      <Column size="50"/>
                      <Column size="41"/>
                      <Column size="45"/>
                      <Column size="80"/>
                      <Column size="220"/>
                      <Column size="220"/>
                      <Column size="300"/>
                      <Column size="27"/>
                      <Column size="74"/>
                      <Column size="30"/>
                      <Column size="29"/>
                      <Column size="25"/>
                      <Column size="100"/>
                      <Column size="136"/>
                      <Column size="250"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="93" band="head"/>
                      <Row size="23"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="순번"/>
                      <Cell col="2" text="생성&#13;&#10;구분"/>
                      <Cell col="3" text="SEQ"/>
                      <Cell col="4" text="특정&#13;&#10;기호"/>
                      <Cell col="5" text="용어&#13;&#10;코드"/>
                      <Cell col="6" text="상병코드"/>
                      <Cell col="7" text="질환명"/>
                      <Cell col="8" text="영문명"/>
                      <Cell col="9" text="등록기준"/>
                      <Cell col="10" text="1.&#13;&#10;영상&#13;&#10;검사"/>
                      <Cell col="11" text="2.&#13;&#10;특수생&#13;&#10;화학/&#13;&#10;면역학&#13;&#10;검사,도말/&#13;&#10;배양검사"/>
                      <Cell col="12" text="3.&#13;&#10;유전&#13;&#10;학검&#13;&#10;사"/>
                      <Cell col="13" text="4.&#13;&#10;조직&#13;&#10;학검&#13;&#10;사"/>
                      <Cell col="14" text="5.&#13;&#10;임상&#13;&#10;진단"/>
                      <Cell col="15" text="6.기타"/>
                      <Cell col="16" text="필수검사조합"/>
                      <Cell col="17" text="기타"/>
                      <Cell col="18" text="관련학회1"/>
                      <Cell col="19" text="관련학회2"/>
                      <Cell col="20" text="관련학회3"/>
                      <Cell col="21" text="시작일"/>
                      <Cell col="22" text="종료일"/>
                      <Cell col="23" text="유일키"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="normal" edittype="none" style="align:center middle;" text="bind:rowno"/>
                      <Cell col="2" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:cretflag" combodataset="ds_cmb_cretflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="3" displaytype="normal" edittype="none" style="align:center middle;" text="bind:seq"/>
                      <Cell col="4" displaytype="text" edittype="text" style="align:center middle;" text="bind:spclcd"/>
                      <Cell col="5" displaytype="text" edittype="text" style="align:center middle;" text="bind:termcd"/>
                      <Cell col="6" displaytype="text" edittype="text" style="align:center middle;" text="bind:diagcd" expandshow="show"/>
                      <Cell col="7" displaytype="text" edittype="text" style="align:left top;" text="bind:diagnm" wordwrap="word"/>
                      <Cell col="8" displaytype="text" edittype="text" style="align:left top;" text="bind:diagengnm" wordwrap="word"/>
                      <Cell col="9" displaytype="text" edittype="text" style="align:left top;" text="bind:rgstbase" wordwrap="word" autosizerow="limitmax"/>
                      <Cell col="10" displaytype="checkbox" edittype="checkbox" text="bind:test1"/>
                      <Cell col="11" displaytype="checkbox" edittype="checkbox" text="bind:test2"/>
                      <Cell col="12" displaytype="checkbox" edittype="checkbox" text="bind:test3"/>
                      <Cell col="13" displaytype="checkbox" edittype="checkbox" text="bind:test4"/>
                      <Cell col="14" displaytype="checkbox" edittype="checkbox" text="bind:test5"/>
                      <Cell col="15" displaytype="combo" edittype="combo" text="bind:test6" combodataset="ds_init_P0509list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="16" displaytype="text" edittype="text" text="bind:essntestasso"/>
                      <Cell col="17" displaytype="text" edittype="text" text="bind:remark"/>
                      <Cell col="18" displaytype="text" edittype="text" text="bind:rellnscity1"/>
                      <Cell col="19" displaytype="text" edittype="text" text="bind:rellnscity2"/>
                      <Cell col="20" displaytype="text" edittype="text" text="bind:rellnscity3"/>
                      <Cell col="21" displaytype="date" edittype="date" text="bind:fromdd" mask="yyyy-MM-dd"/>
                      <Cell col="22" displaytype="date" edittype="date" text="bind:todd" mask="yyyy-MM-dd"/>
                      <Cell col="23" displaytype="text" edittype="text" text="bind:uniqseq"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 1130 58 1210 77" id="button5" class="btn7" visible="true" text="엑셀저장" anchor="top right" onclick="group3_button5_onclick"/>
              <Button position="absolute 1075 58 1128 77" id="btn_rowdel" class="btn2" text="행삭제" anchor="top right" onclick="group3_btn_rowdel_onclick"/>
              <Button position="absolute 1019 58 1072 77" id="btn_rowadd" class="btn2" text="행추가" anchor="top right" onclick="group3_btn_rowadd_onclick"/>
              <Shape id="line00" class="line_10" position="absolute 0 77 1209 83" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 734 1211 774" id="group4" scrollbars="autoboth" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 0 1211 6" linetype="horizontal" id="line23" class="line_6" anchor="left right bottom"/>
              <Button position="absolute 1143 5 1211 27" id="button1" class="btn4" text="저 장" anchor="right bottom" onclick="group4_button1_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="희귀난치성질환 등록기준(건강보험_결핵포함)" class="tit_1" position="absolute 1 1 329 24"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_picmesrglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rowno" type="STRING"/>
          <Column id="cretflag" type="STRING"/>
          <Column id="seq" type="STRING"/>
          <Column id="spclcd" type="STRING"/>
          <Column id="termcd" type="STRING"/>
          <Column id="diagcd" type="STRING"/>
          <Column id="diagnm" type="STRING"/>
          <Column id="diagengnm" type="STRING"/>
          <Column id="rgstbase" type="STRING"/>
          <Column id="test1" type="STRING"/>
          <Column id="test2" type="STRING"/>
          <Column id="test3" type="STRING"/>
          <Column id="test4" type="STRING"/>
          <Column id="test5" type="STRING"/>
          <Column id="test6" type="STRING"/>
          <Column id="essntestasso" type="STRING"/>
          <Column id="remark" type="STRING"/>
          <Column id="rellnscity1" type="STRING"/>
          <Column id="rellnscity2" type="STRING"/>
          <Column id="rellnscity3" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="uniqseq" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="cretflag" type="STRING" size="256"/>
          <Column id="aplydd" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="spclcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_cretflag" 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"/>
            <Col id="value"/>
          </Row>
          <Row>
            <Col id="label">생성</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">재생성</Col>
            <Col id="value">R</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0509list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="currendate" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.ipt_diagcd" propid="value" datasetid="ds_send_data1" columnid="diagcd"/>
      <BindItem id="item1" compid="group3.group2.ipt_diagnm" propid="value" datasetid="ds_send_data1" columnid="diagnm"/>
      <BindItem id="item2" compid="group3.group2.combo1" propid="value" datasetid="ds_send_data1" columnid="cretflag"/>
      <BindItem id="item3" compid="group3.group2.ipt_aplydd" propid="value" datasetid="ds_send_data1" columnid="aplydd"/>
      <BindItem id="item4" compid="group3.group2.ipt_spclcd" propid="value" datasetid="ds_send_data1" columnid="spclcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM.xjs";
function SMPIB03000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIB03000_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group3.grd_picmesrglist);
	grdf_setRowTypeIcon(group3.grd_picmesrglist, 0);
	
	pamGetDeptCDDrIDList();	
	 
	var arrParam = [{dsNm: "ds_init_P0509list", cdGrpId: "P0509"}]
	appf_getCodeList(arrParam);	
	
	ds_send_data1.setColumn(0, "aplydd", utlf_getCurrentDate());
	ds_hidden.setColumn(0, "currendate", utlf_getCurrentDate());

	group3.group2.combo1.index = 2;
	
	if (frmf_checkOpener())
	{
		ds_send_data1.setColumn(0, "diagcd", frmf_getParameter("SMPIB03000_diagcd"));
		ds_send_data1.setColumn(0, "diagnm", frmf_getParameter("SMPIB03000_diagnm"));
		ds_send_data1.setColumn(0, "spclcd", frmf_getParameter("SMPIB03000_spclcd"));
		ds_send_data1.setColumn(0, "aplydd", frmf_getParameter("SMPIB03000_aplydd"));
		ds_send_data1.setColumn(0, "cretflag", frmf_getParameter("SMPIB03000_cretflag"));
		ds_send_data1.setColumn(0, "seq", frmf_getParameter("SMPIB03000_seq"));
		
		group3_group2_btn_search_onclick();
	} 
}

function group3_group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRPIB03001";
		oParam.service     = "insubasecdmngtapp.RareSickMngt";
		oParam.method      = "reqGetPicmesrgList";
		oParam.inds        = "req=ds_send_data1";
		oParam.outds       = "ds_main_picmesrglist=picmesrglist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB03001";

	tranf_submit(oParam);
}

function group3_group2_ipt_spclcd_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group3_group2_btn_search_onclick();
	}
}

function group3_group2_ipt_spclcd00_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group3_group2_btn_search_onclick();
	}
}

function group3_group2_ipt_aplydd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	group3_group2_btn_search_onclick();
}

function group3_group2_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	group3_group2_btn_search_onclick();
}

function group3_btn_rowadd_onclick(obj:Button,  e:ClickEventInfo)
{
	var rowno = ds_main_picmesrglist.addRow();
	
	ds_main_picmesrglist.setColumn(rowno, "fromdd", utlf_getCurrentDate());
	ds_main_picmesrglist.setColumn(rowno, "todd", "99991231");
	ds_main_picmesrglist.setColumn(rowno, "termcd", "-");	
}

function group3_btn_rowdel_onclick(obj:Button,  e:ClickEventInfo)
{
	var row =  ds_main_picmesrglist.rowposition;
	ds_main_picmesrglist.deleteRow(row);
}

function group3_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_picmesrglist.rowcount > 0)
	{
		grdf_exportExcel(group3.grd_picmesrglist, "희귀난치질환기준자료", "see");
	}
	else
	{
		sysf_messageBox("엑셀저장할 대상자가", "I004");	
	}
}

function group3_grd_picmesrglist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	var rowno = e.row;
	
	if(e.col == 6)
	{
		var objArg = new Object();

		objArg.sDiagcd = ds_main_picmesrglist.getColumn(rowno, "diagcd");
		objArg.sSelectedrdodiagkind = 2;
		objArg.sSingleFlag = "P";

		var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg, "", "", "", "", "", "", "", "", "", "M");
		
		ds_main_picmesrglist.updatecontrol = false;
		ds_main_picmesrglist.setColumn(rowno, "diagcd", objDs.sDiagcd);
		ds_main_picmesrglist.setColumn(rowno, "diagnm", objDs.sDiagnm);
		ds_main_picmesrglist.setColumn(rowno, "diagengnm", objDs.sDiagengnm);
		ds_main_picmesrglist.updatecontrol = true;
	}
}

function group3_group2_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();

	objArg.sDiagcd = ds_send_data1.getColumn(0, "diagcd");
	objArg.sSelectedrdodiagkind = 2;
	objArg.sSingleFlag = "M";

	var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", "", "", "", "", "", "", "", "", "", "", "M");
	
	ds_send_data1.setColumn(0, "diagcd", objDs.sDiagcd);
	ds_send_data1.setColumn(0, "diagnm", objDs.sDiagnm);
}

function group4_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( sysf_messageBox("","Q002")==6 )
	{
		var update = grdf_getGridUpdateData(group3.grd_picmesrglist);
	
		if(update.rowcount == 0)
		{
			sysf_messageBox("업데이트 정보가 없습니다.", "I");
			return 0;
		
		} 
		else 
		{
			var oParam = {};
				oParam.id          = "TXPIB03001";
				oParam.service     = "insubasecdmngtapp.RareSickMngt";
				oParam.method      = "reqSetPicmesrgList";
				oParam.inds        = "req=ds_main_picmesrglist:U";
				oParam.outds       = "ds_temp_item=item";
				oParam.typeStr	   = "m";
				oParam.async       = false;
				//oParam.callback    = "cf_TXPIB03001";

			tranf_submit(oParam);
		}	
	}
	group3_group2_btn_search_onclick();
}
]]></Script>
  </Form>
</FDL>