YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SPPID33100_뇌사기증자별수혜자관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPID33100" classname="SPPID32200_외국인진료비예상금액산정" inheritanceid="" position="absolute 0 0 1196 768" titletext="뇌사기증자별수혜자관리" onload="SPPID32400_onload">
    <Layouts>
      <Layout>
        <Static id="caption00" text="뇌사 기증자별 수혜자 관리" class="tit_1" position="absolute 0 0 200 25"/>
        <Static id="caption18" text="수혜자 리스트" onclick="caption1_onclick" class="tit_2" position="absolute 0 73 158 92" anchor="left top"/>
        <Shape id="line01" onclick="grp_tstmemo_line5_onclick" class="line_10" position="absolute 0 89 1195 95" anchor="left top right"/>
        <Button id="btn_close" taborder="31" text="닫기" class="btn4" position="absolute 1139 741 1195 763" anchor="right bottom" onclick="btn_close_onclick"/>
        <Grid id="datagrid1" taborder="33" binddataset="ds_main_pmihdobflist" autoenter="select" useinputpanel="false" cellsizingtype="col" position="absolute 0 94 1195 736" anchor="all" scrollpixel="all" cellclickbound="cell">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24" band="left"/>
                <Column size="24" band="left"/>
                <Column size="65" band="left"/>
                <Column size="120" band="left"/>
                <Column size="30" band="left"/>
                <Column size="100" band="left"/>
                <Column size="60" band="left"/>
                <Column size="60" band="left"/>
                <Column size="85" band="left"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="30" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell rowspan="2" taborder="undefined"/>
                <Cell col="1" rowspan="2" taborder="undefined"/>
                <Cell col="2" colspan="7" text="수혜자 정보" taborder="undefined"/>
                <Cell col="9" colspan="9" text="분할 계산 내역" taborder="undefined"/>
                <Cell col="18" rowspan="2" text="총진료비" taborder="undefined"/>
                <Cell col="19" rowspan="2" text="뇌사장기기증&#13;&#10;관리료" taborder="undefined"/>
                <Cell row="1" col="2" text="성명"/>
                <Cell row="1" col="3" text="수혜병원"/>
                <Cell row="1" col="4" text="원내&#13;&#10;적출"/>
                <Cell row="1" col="5" text="병원분류"/>
                <Cell row="1" col="6" text="부위"/>
                <Cell row="1" col="7" text="부위상세"/>
                <Cell row="1" col="8" text="자격유형"/>
                <Cell row="1" col="9" text="진료비1항"/>
                <Cell row="1" col="10" text="진료비2항"/>
                <Cell row="1" col="11" text="수술료&#13;&#10;(가산포함)"/>
                <Cell row="1" col="12" text="가산율(%)"/>
                <Cell row="1" col="13" text="가산금액"/>
                <Cell row="1" col="14" text="선별A항"/>
                <Cell row="1" col="15" text="선별B항"/>
                <Cell row="1" col="16" text="선별D항"/>
                <Cell row="1" col="17" text="선별E항"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" celltype="head" text="expr:currow+1"/>
                <Cell col="2" displaytype="text" edittype="text" style="padding:5 2 3 2;" text="bind:bfhngnm"/>
                <Cell col="3" displaytype="text" edittype="text" text="bind:hospnm"/>
                <Cell col="4" displaytype="checkbox" edittype="checkbox" style="align:center middle;" text="bind:bfpid" expr="expr:(bfpid==&quot;Y&quot;||bfpid==1)?1:0"/>
                <Cell col="5" displaytype="combo" edittype="combo" text="bind:hospgrade" combodataset="ds_init_P0553" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="20"/>
                <Cell col="6" displaytype="combo" edittype="combo" text="bind:bdpart" combodataset="ds_init_A0224" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="20"/>
                <Cell col="7" displaytype="combo" edittype="combo" text="bind:bdpartdtl" combodataset="ds_init_P0140" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="20"/>
                <Cell col="8" displaytype="combo" edittype="combo" text="bind:insukind" combodataset="ds_init_P0008" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="20"/>
                <Cell col="9" displaytype="number" edittype="masknumber" text="bind:treatamt1" editautoselect="true"/>
                <Cell col="10" displaytype="number" edittype="masknumber" text="bind:treatamt2" editautoselect="true"/>
                <Cell col="11" displaytype="number" edittype="masknumber" text="bind:opamt" editautoselect="true"/>
                <Cell col="12" displaytype="number" edittype="masknumber" text="bind:addrate" editautoselect="true"/>
                <Cell col="13" displaytype="number" edittype="masknumber" text="bind:addrateamt" editautoselect="true"/>
                <Cell col="14" displaytype="number" edittype="masknumber" text="bind:sorta" editautoselect="true"/>
                <Cell col="15" displaytype="number" edittype="masknumber" text="bind:sortb" editautoselect="true"/>
                <Cell col="16" displaytype="number" edittype="masknumber" text="bind:sortd" editautoselect="true"/>
                <Cell col="17" displaytype="number" edittype="masknumber" text="bind:sorte" editautoselect="true"/>
                <Cell col="18" displaytype="number" text="bind:alltreatamt" editautoselect="true"/>
                <Cell col="19" displaytype="number" edittype="masknumber" text="bind:manageamt" editautoselect="true"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_add" taborder="34" text="행추가" class="btn2" position="absolute 985 67 1038 89" anchor="top right" onclick="btn_add_onclick"/>
        <Button id="btn_del" taborder="35" text="행삭제" class="btn2" position="absolute 1040 67 1093 89" anchor="top right" onclick="btn_del_onclick"/>
        <Button id="btn_save" taborder="36" text="저장" class="btn2" position="absolute 1095 67 1137 89" anchor="top right" onclick="btn_save_onclick"/>
        <Div id="grp_search" taborder="32" class="div_SA" position="absolute 0 25 1195 65">
          <Layouts>
            <Layout width="1195" height="40">
              <Button id="btn_search" taborder="0" text="조회" class="btn1" position="absolute 1124 10 1180 32" onclick="grp_search_btn_search_onclick" anchor="default"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1108 9 1111 32" anchor="default"/>
              <Static id="caption1" text="등록번호" class="search_name" position="absolute 8 13 88 30" anchor="default"/>
              <Button id="btn_patsrch" taborder="1" class="icon_search" position="absolute 178 11 198 31" onclick="grp_search_btn_patsrch_onclick" anchor="default" enable="false"/>
              <Edit id="ipt_hngnm" taborder="2" autoselect="true" class="input_search" position="absolute 199 11 377 31" anchor="default" readonly="true"/>
              <Edit id="input2" taborder="3" autoselect="true" position="absolute 86 11 178 31" anchor="default" onkeyup="grp_search_input2_onkeyup" enable="true" readonly="true"/>
              <Static id="caption00" text="적출일 : " class="search_name" position="absolute 439 12 506 29"/>
              <Calendar id="cal_srch_extdd" taborder="4" position="absolute 504 10 612 30" readonly="true"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_calc" taborder="37" text="계산" onclick="btn_calc_onclick" class="btn4" position="absolute 1139 67 1195 89" anchor="right bottom"/>
      </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="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="extdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="extdd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_pmihdobflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_pmihdobflist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="extdd" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="bfhngnm" type="STRING" size="256"/>
          <Column id="bfpid" type="STRING" size="256"/>
          <Column id="hospnm" type="STRING" size="256"/>
          <Column id="hospgrade" type="STRING" size="256"/>
          <Column id="bdpart" type="STRING" size="256"/>
          <Column id="bdpartdtl" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="treatamt1" type="STRING" size="256"/>
          <Column id="treatamt2" type="STRING" size="256"/>
          <Column id="opamt" type="STRING" size="256"/>
          <Column id="addrate" type="STRING" size="256"/>
          <Column id="addrateamt" type="STRING" size="256"/>
          <Column id="sorta" type="STRING" size="256"/>
          <Column id="sortb" type="STRING" size="256"/>
          <Column id="sortd" type="STRING" size="256"/>
          <Column id="sorte" type="STRING" size="256"/>
          <Column id="alltreatamt" type="STRING" size="256"/>
          <Column id="manageamt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0553" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_A0224" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0140" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0008" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_calcbenefitlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item2" compid="grp_search.ipt_hngnm" propid="value" datasetid="ds_send" columnid="hngnm"/>
      <BindItem id="item1" compid="grp_search.input2" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item0" compid="grp_search.cal_srch_extdd" propid="value" datasetid="ds_send" columnid="extdd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";

var seqno = 0;

function fInitialize() {
	grdf_setRowTypeIcon(datagrid1, 0);
	
	var arrParam = [{dsNm: "ds_init_P0553", cdGrpId: "P0553"},
					{dsNm: "ds_init_A0224", cdGrpId: "A0224"},
					{dsNm: "ds_init_P0008", cdGrpId: "P0008"}
					];
	appf_getCodeList(arrParam);	
	
	var arrParam = [{dsNm: "ds_init_P0140", cdGrpId: "P0140"}
					];
	pamfGetCodeList(arrParam);	
	
	try{
		ds_send.copyData(arg_ds_send);
	}catch(e){}
	
	if(!utlf_isNull(ds_send.getColumn(0, "pid"))) fSearch();
}

function fSearch() {
	var oParam = {};
		oParam.id          = "getBenefitList";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetBenefitList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_pmihdobflist=item";
		oParam.async       = false;

	tranf_submit(oParam);
	
	if(ds_main_pmihdobflist.rowcount > 0) {
		seqno = Number(ds_main_pmihdobflist.getMax("seq"));
	}
}

function fSave() {
	dsf_createDs("ds_send_savedata");
	var dsUpdate = grdf_getGridUpdateData(datagrid1, "all");
	grdf_setStatusColumn(dsUpdate, "m");
	ds_send_savedata.copyData(dsUpdate, true);
	var oParam = {};
		oParam.id          = "exeBenefitList";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqExeBenefitList";
		oParam.inds        = "req=ds_send_savedata";
		oParam.async       = false;

	tranf_submit(oParam);
	
	
}

function fCalc() {
	var oParam = {};
		oParam.id          = "getCalcBenefitList";
		oParam.service     = "aftjudgapp.InAftJudg";
		oParam.method      = "reqGetCalcBenefitList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_calcbenefitlist=item";
		oParam.async       = false;

	tranf_submit(oParam);
	
	dsf_mergeColumn(ds_main_pmihdobflist, ds_temp_calcbenefitlist, true);
}

function SPPID32400_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	
	fInitialize();
}

function grp_search_btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_temp", [{col:"srchcond", val:"2"}
	                           ,{col:"hngnm", val:ds_send.getColumn(0,"hngnm")}]);
	var objArg = new Object();
	objArg.arg_ds_send = ds_temp;
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", 1, 150, 150, "", "", "", "", "", "M");

	ds_send.setColumn(0, "pid", ds_patinfolist.getColumn(0,"pid"));
	ds_send.setColumn(0, "hngnm", ds_patinfolist.getColumn(0,"hngnm"));
}

function grp_search_input2_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		fSearch();
	}
}

function grp_search_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

function btn_add_onclick(obj:Button,  e:ClickEventInfo)
{
	if(utlf_isNull(ds_send.getColumn(0, "pid"))) return;
	
	seqno = seqno + 1;
	var selRow = ds_main_pmihdobflist.addRow();
	ds_main_pmihdobflist.setColumn(selRow, "seq", seqno);
	ds_main_pmihdobflist.setColumn(selRow, "pid", ds_send.getColumn(0,"pid"));
	ds_main_pmihdobflist.setColumn(selRow, "extdd", ds_send.getColumn(0,"extdd"));
	ds_main_pmihdobflist.setColumn(selRow, "bdpartdtl", "5");
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	var selRow = ds_main_pmihdobflist.rowposition;
	if(ds_main_pmihdobflist.getRowType(selRow) == 2) {
		ds_main_pmihdobflist.deleteRow(selRow);
	} else {
		grdf_setStatus(datagrid1, "D", [selRow]);
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSave();
	
	fSearch();
}

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

function btn_calc_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDs("ds_send_savedata");
	var dsUpdate = grdf_getGridUpdateData(datagrid1, "all");
	grdf_setStatusColumn(dsUpdate, "m");
	ds_send_savedata.copyData(dsUpdate, true);
	
	if(ds_send_savedata.rowcount > 0) {
		if(sysf_messageBox("편집된 데이터가 있습니다. 저장 후","Q003") == 6) {
			var oParam = {};
				oParam.id          = "exeBenefitList";
				oParam.service     = "aftjudgapp.InAftJudg";
				oParam.method      = "reqExeBenefitList";
				oParam.inds        = "req=ds_send_savedata";
				oParam.async       = false;

			tranf_submit(oParam);
			
			fCalc();
		} else return;
	} else fCalc();
}

function ds_main_pmihdobflist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "treatamt1" || e.columnid == "treatamt2" || e.columnid == "opamt" || e.columnid == "addrate"
	 || e.columnid == "addrateamt" || e.columnid == "sorta" || e.columnid == "sortb" || e.columnid == "sortd" || e.columnid == "sorte") {
		var alltreatamt = obj.getColumn(e.row, "alltreatamt");
		alltreatamt = alltreatamt - e.oldvalue + e.newvalue;
		obj.setColumn(e.row, "alltreatamt", alltreatamt);		
	}
	
	if(e.columnid == "bfpid") {
		obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"");
	}
}
]]></Script>
  </Form>
</FDL>