YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SPPIJ03300_DRG수술코드관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIJ03300" position="absolute 0 0 944 648" titletext="DRG 수술코드 기준자료 관리" oninit="SPPIJ03300_oninit" onload="SPPIJ03300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 26 942 618" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Grid position="absolute 0 78 940 592" id="grd_opcdlist" class="datagrid3" binddataset="ds_grd_opcdlist" anchor="all" autofittype="none" selecttype="multirow" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="20"/>
                      <Column size="54"/>
                      <Column size="196"/>
                      <Column size="79"/>
                      <Column size="43"/>
                      <Column size="75"/>
                      <Column size="92"/>
                      <Column size="30"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="50"/>
                      <Column size="100"/>
                      <Column size="50"/>
                      <Column size="105"/>
                    </Columns>
                    <Rows>
                      <Row size="59" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="수술코드"/>
                      <Cell col="2" text="수술명"/>
                      <Cell col="3" text="외과&#13;&#10;가산&#13;&#10;유무" combodisplay="edit"/>
                      <Cell col="4" displaytype="normal" edittype="normal" style="accessibility:disable all '' '';" text="신생아&#10;제외"/>
                      <Cell col="5" text="분류번호"/>
                      <Cell col="6" text="진료과"/>
                      <Cell col="7" text="수술&#10;코드&#10;구분"/>
                      <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 celltype="head"/>
                      <Cell col="1" displaytype="text" edittype="text" style="align:center middle;" text="bind:opedicode" enable="false"/>
                      <Cell col="2" displaytype="text" edittype="text" style="align:left middle;" text="bind:opnm" enable="false"/>
                      <Cell col="3" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:gsaddflag" combodataset="ds_init_PK028list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="4" displaytype="checkbox" edittype="checkbox" style="align:center middle;" text="bind:babyexceptyn" expr="expr:babyexceptyn == 'Y' || babyexceptyn == '1' ? 1 : 0"/>
                      <Cell col="5" displaytype="text" edittype="text" style="align:center middle;" text="bind:classno"/>
                      <Cell col="6" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:orddeptcd" combodataset="ds_init_cmb_orddeptcd" combocodecol="deptcd" combodatacol="depthngnm" enable="true"/>
                      <Cell col="7" displaytype="text" edittype="text" style="align:center middle;" text="bind:opgbn"/>
                      <Cell col="8" displaytype="date" edittype="date" style="align:center middle;" text="bind:fromdd" mask="yyyy-MM-dd"/>
                      <Cell col="9" displaytype="date" edittype="date" style="align:center middle;" text="bind:todd" mask="yyyy-MM-dd" enable="false"/>
                      <Cell col="10" displaytype="text" edittype="none" style="align:center middle;" text="bind:fstrgstrid"/>
                      <Cell col="11" displaytype="date" edittype="none" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm"/>
                      <Cell col="12" displaytype="text" style="align:center middle;" text="bind:lastupdtrid"/>
                      <Cell col="13" displaytype="date" style="align:center middle;" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="DRG 수술코드 기준자료 리스트" position="absolute 0 56 234 79" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Shape position="absolute -1 73 940 79" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Div position="absolute 0 0 940 40" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="수술코드 :" position="absolute 8 11 95 28" id="caption30" class="search_name" anchor="default"/>
                    <Button position="absolute 875 10 931 32" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 857 5 863 38" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
                    <Edit position="absolute 100 10 200 29" id="ipt_opedicode" anchor="default" oneditclick="grp_biz_group1_ipt_opedicode_oneditclick" onkeydown="grp_biz_group1_ipt_opedicode_onkeydown"/>
                    <Static text="수술코드구분 :" position="absolute 213 11 321 28" id="caption1" class="search_name" anchor="default"/>
                    <Edit position="absolute 330 10 430 29" id="ipt_opgbn" anchor="default" oneditclick="grp_biz_group1_ipt_opgbn_oneditclick" onkeydown="grp_biz_group1_ipt_opgbn_onkeydown"/>
                    <Static text="진료과 :" position="absolute 453 11 540 28" id="caption2" class="search_name" anchor="default"/>
                    <Combo position="absolute 545 10 645 29" id="cmb_orddeptcd" innerdataset="ds_init_cmb_orddeptcd" datacolumn="depthngnm" codecolumn="deptcd" anchor="default" onitemchanged="grp_biz_group1_cmb_orddeptcd_onitemchanged"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 709 52 789 71" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
              <Button position="absolute 898 52 940 71" id="button1" class="btn5" text="저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
              <Button position="absolute 790 52 843 71" id="button2" class="btn2" text="행종료" anchor="top right" onclick="grp_biz_button2_onclick"/>
              <Button position="absolute 844 52 897 71" id="button3" class="btn2" text="행추가" anchor="top right" onclick="grp_biz_button3_onclick"/>
              <Grid position="absolute 500 40 550 75" id="datagrid1" visible="false" binddataset="ds_datagrid1" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="caption1"/>
                      <Cell col="1" text="caption2"/>
                      <Cell col="2" text="caption3"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:deptcd"/>
                      <Cell col="1" text="bind:depthngnm"/>
                      <Cell col="2" text="bind:deptengabbr"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 884 622 940 644" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
        <Static id="cap_title" text="DRG 수술코드 기준자료 관리" class="tit_1" position="absolute 0 0 216 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_opcdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_opcdlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="opedicode" type="STRING"/>
          <Column id="opnm" type="STRING"/>
          <Column id="gsaddflag" type="STRING"/>
          <Column id="babyexceptyn" type="STRING"/>
          <Column id="classno" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="opgbn" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="fstrgstrid" type="STRING"/>
          <Column id="fstrgstdt" type="STRING"/>
          <Column id="lastupdtrid" type="STRING"/>
          <Column id="lastupdtdt" type="STRING"/>
        </ColumnInfo>
        <Rows/>
      </Dataset>
      <Dataset id="ds_init_cmb_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING"/>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptengabbr" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="Dataset00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_PK028list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <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::PAM001.xjs";

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

function SPPIJ03300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_opcdlist);
	grdf_setRowTypeIcon(grp_biz.grd_opcdlist, 0);
	
	grdf_setToolTipBind(grp_biz.grd_opcdlist)
	
	fInitialize();
}

function fInitialize() {
	dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256 , val :sysf_getUserInfo("dutplceinstcd") }
                             ,  {col:"ordfildcd", type:"STRING", size:256}
                             ,  {col:"ordflag", type:"STRING", size:256}]);			
                                
	var oParam = {};
		oParam.id          = "TRPIJ00203";
		oParam.service     = "bfjudgapp.InHospJudgTrgtMan";
		oParam.method      = "reqGetDeptList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_cmb_orddeptcd=deptlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ00203";

	tranf_submit(oParam);

	var arrParam1 = new Array();
		arrParam1 = [{dsNm: "ds_init_PK028list", cdGrpId: "PK028", showValue: false}];
	pamfGetCodeList(arrParam1, true, ""); //비동기
			
	fGetDocuList();
}

function fGetDocuList() {
	dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd") }
							 ,  {col:"opedicode", type:"STRING", size:256, val :grp_biz.group1.ipt_opedicode.value}
							 ,  {col:"orddeptcd", type:"STRING", size:256, val :grp_biz.group1.cmb_orddeptcd.value}
							 ,  {col:"opgbn", type:"STRING", size:256, val : grp_biz.group1.ipt_opgbn.value}]);


	var oParam = {};
		oParam.id          = "TRPIJ03300";
		oParam.service     = "bfjudgapp.DRGCdIF";
		oParam.method      = "reqGetDrgOperateCode";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_opcdlist=rslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ03300";
	tranf_submit(oParam);
	

}

function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDocuList();
}

function grp_biz_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_grd_opcdlist.rowcount > 0) {
		grdf_exportExcel(grp_biz.grd_opcdlist, "exportExcel", "see");
	}else{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}			
}

function grp_biz_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}

function fSpclGridDeleteRow()
{
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_opcdlist);
	
	for(var i = 0; i < SelectedRows.length; i ++)
	{
		var sel = SelectedRows[i];
		
		var arrRow = new Array();
		arrRow[0] = sel; 
		grdf_setStatus(grp_biz.grd_opcdlist, "D", arrRow);
	}
	
}

function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridInsertRow();
}

function fSpclGridInsertRow(){
	var addRw = ds_grd_opcdlist.addRow();
}
 
function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grp_biz.grd_opcdlist, "all");

	if ( updtdata.rowcount == 0)
	{
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	for (var i = 0; i < ds_grd_opcdlist.rowcount; i++)
	{
		if (ds_grd_opcdlist.getRowType(i) == 2 || ds_grd_opcdlist.getRowType(i) == 4 ) 
		{
			var opedicode = grp_biz.grd_opcdlist.getBindCellIndex("body","opedicode");
			var orddeptcd = grp_biz.grd_opcdlist.getBindCellIndex("body","orddeptcd");
			var opgbn = grp_biz.grd_opcdlist.getBindCellIndex("body","opgbn");
			var fromdd = grp_biz.grd_opcdlist.getBindCellIndex("body","fromdd");
			var todd = grp_biz.grd_opcdlist.getBindCellIndex("body","todd");
				
			if(!frmf_chkMdtGrid(grp_biz.grd_opcdlist,[opedicode,orddeptcd,opgbn,fromdd,todd]
													,["수술코드","진료과","수술코드구분","시작일자","종료일자"]))
				{
					return;
				}
		}
	}
	
	if (sysf_messageBox("저장", "S001") == 6) {
		dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd") }
								 , {col:"opedicode", type:"STRING", size:256, val :grp_biz.group1.ipt_opedicode.value}
								 , {col:"orddeptcd", type:"STRING", size:256, val :grp_biz.group1.cmb_orddeptcd.value}
								 , {col:"opgbn", type:"STRING", size:256, val : grp_biz.group1.ipt_opgbn.value}]);
		var oParam = {};
			oParam.id          = "TXPIJ03300";
			oParam.service     = "bfjudgapp.DRGCdIF";
			oParam.method      = "reqExeDrgOperateCode";
			oParam.inds        = "srch=ds_send req=ds_grd_opcdlist:U";
			oParam.outds       = "ds_grd_opcdlist=rslt";
			oParam.async       = false;
			oParam.callback    = "cf_TXPIJ03300";

		tranf_submit(oParam);		
	}
}

function cf_TXPIJ03300(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    sysf_messageBox("저장이","I002");
}

function btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function ds_grd_opcdlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "babyexceptyn" )
	{
		obj.setColumn(e.row, "babyexceptyn", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

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

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

function grp_biz_group1_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	grp_biz_group1_btn_select_onclick();
}
]]></Script>
  </Form>
</FDL>