YNU_JEUS/app_home/himed/xpapps/pam/bfjudgcarexp/xp/SMPPI00900_사전신청요법기준관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPPI00900" position="absolute 0 0 1168 726" titletext="사전신청요법기준 관리" oninit="SMPPI00900_oninit" onload="SMPPI00900_onload">
    <Layouts>
      <Layout>
        <Static id="cap_title" text="사전신청요법기준 관리" class="tit_1" position="absolute 1 0 225 25"/>
        <Grid id="grd_dpcdlist" class="datagrid3" taborder="1" binddataset="ds_grd_dpcdlist" useinputpanel="false" position="absolute 1 102 1161 723" anchor="all" onrbuttondown="grd_dpcdlist_onrbuttondown" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="45"/>
                <Column size="66"/>
                <Column size="110"/>
                <Column size="82"/>
                <Column size="205"/>
                <Column size="387"/>
                <Column size="100"/>
                <Column size="107"/>
                <Column size="98"/>
                <Column size="100"/>
                <Column size="92"/>
                <Column size="91"/>
                <Column size="68"/>
                <Column size="100"/>
                <Column size="69"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="33" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="사용&#10;여부"/>
                <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="투여요법"/>
                <Cell col="9" text="급여상세사항"/>
                <Cell col="10" text="기타사항"/>
                <Cell col="11" text="시작일자"/>
                <Cell col="12" text="종료일자"/>
                <Cell col="13" text="등록자"/>
                <Cell col="14" text="등록일자"/>
                <Cell col="15" text="수정자"/>
                <Cell col="16" text="수정일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:useyn"/>
                <Cell col="2" displaytype="text" edittype="text" text="bind:regmcd" enable="false"/>
                <Cell col="3" displaytype="text" edittype="text" text="bind:cncrkind"/>
                <Cell col="4" displaytype="text" edittype="text" text="bind:cncrdetl" enable="true"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:antichem"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:drugtrgt"/>
                <Cell col="7" displaytype="text" edittype="text" text="bind:drugstage"/>
                <Cell col="8" displaytype="text" edittype="text" text="bind:drugregm"/>
                <Cell col="9" displaytype="text" edittype="text" text="bind:paydetl"/>
                <Cell col="10" displaytype="text" edittype="text" text="bind:etcdetl"/>
                <Cell col="11" displaytype="text" edittype="date" text="bind:fromdd"/>
                <Cell col="12" displaytype="text" edittype="date" text="bind:todd"/>
                <Cell col="13" displaytype="normal" edittype="none" text="bind:fstrgstrid"/>
                <Cell col="14" displaytype="date" edittype="none" text="bind:fstrgstdt" mask="yyyy-mm-dd hh:nn"/>
                <Cell col="15" text="bind:lastupdtrid"/>
                <Cell col="16" displaytype="date" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="cap_judgtrgtman" text="사전신청요법기준 리스트" class="tit_2" position="absolute 4 80 238 103"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 97 1161 103" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Div id="group1" taborder="2" class="div_SA" position="absolute 1 26 1161 66" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_select" taborder="1" text="조회" class="btn1" position="absolute 1095 9 1151 31" anchor="top right" onclick="group1_btn_select_onclick"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1077 4 1083 37" anchor="top right"/>
              <Static id="caption30" text="요법코드 :" class="search_name" position="absolute 8 11 95 28" anchor="default"/>
              <Edit id="ipt_diagcd" taborder="2" position="absolute 100 10 200 29" anchor="default" onkeydown="group1_ipt_diagcd_onkeydown"/>
              <Edit id="input1" taborder="3" position="absolute 315 10 435 29" anchor="default" onkeydown="group1_input1_onkeydown"/>
              <Static id="caption1" text="암종 :" class="search_name" position="absolute 223 11 310 28" anchor="default"/>
              <Static id="caption2" text="항암화학요법 :" class="search_name" position="absolute 453 11 565 28" anchor="default"/>
              <Edit id="input2" taborder="4" position="absolute 570 10 770 29" anchor="default" onkeydown="group1_input2_onkeydown"/>
              <Static id="caption3" text="투여요법 :" class="search_name" position="absolute 788 11 900 28" anchor="default"/>
              <Edit id="input3" taborder="5" position="absolute 880 10 1015 29" anchor="default" onkeydown="group1_input3_onkeydown"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="button4" taborder="3" text="엑셀업로드" class="btn7" position="absolute 834 77 925 96" anchor="top right" onclick="button4_onclick"/>
        <Button id="btn_excelsave" taborder="4" text="엑셀저장" class="btn7" position="absolute 928 77 1008 96" anchor="top right" onclick="btn_excelsave_onclick"/>
        <Button id="button2" taborder="5" text="행삭제" class="btn2" position="absolute 1011 77 1064 96" anchor="top right" onclick="button2_onclick"/>
        <Button id="button3" taborder="6" text="행추가" class="btn2" position="absolute 1065 77 1118 96" anchor="top right" onclick="button3_onclick"/>
        <Button id="button1" taborder="7" text="저장" class="btn5" position="absolute 1119 77 1161 96" anchor="top right" onclick="button1_onclick"/>
        <PopupMenu id="pmn_menu1" innerdataset="ds_menu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu1_onmenuclick" onmouseleave="pmn_menu1_onmouseleave" position="absolute 1191 104 1296 150"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_dpcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="useyn" type="STRING"/>
          <Column id="regmcd" type="STRING"/>
          <Column id="cncrkind" type="STRING"/>
          <Column id="cncrdetl" type="STRING"/>
          <Column id="antichem" type="STRING"/>
          <Column id="drugtrgt" type="STRING"/>
          <Column id="drugstage" type="STRING"/>
          <Column id="drugregm" type="STRING"/>
          <Column id="paydetl" type="STRING"/>
          <Column id="etcdetl" 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>
      </Dataset>
      <Dataset id="ds_menu" 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="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">행추가</Col>
            <Col id="func">fSpclGridInsertRow</Col>
          </Row>
          <Row>
            <Col id="label">행삭제</Col>
            <Col id="func">fSpclGridDeleteRow</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="진단코드"/>
          <Column id="regmcd" type="STRING" size="256" sumtext="진단코드"/>
          <Column id="cncrkind" type="STRING" size="256" sumtext="진단코드"/>
          <Column id="antichem" type="STRING" size="256" sumtext="진단코드"/>
          <Column id="drugregm" type="STRING" size="256" sumtext="진단코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.ipt_diagcd" propid="value" datasetid="ds_main_send" columnid="regmcd"/>
      <BindItem id="item1" compid="group1.input1" propid="value" datasetid="ds_main_send" columnid="cncrkind"/>
      <BindItem id="item2" compid="group1.input2" propid="value" datasetid="ds_main_send" columnid="antichem"/>
      <BindItem id="item3" compid="group1.input3" propid="value" datasetid="ds_main_send" columnid="drugregm"/>
    </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::PAM001.xjs";

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

function SMPPI00900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_dpcdlist);
	grdf_setRowTypeIcon(grd_dpcdlist, 0);
	fInitialize();
}

function fInitialize(){
	group1_btn_select_onclick();
}
//조회
function group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDocuList();
}

function fGetDocuList(){
	var chk = true;
	ds_main_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	if(chk == true){
		var oParam = {};
			oParam.id          = "TXPPI00901";
			oParam.service     = "bfjudgcareapp.BfJudgCareMngt";
			oParam.method      = "reqGetPicmbfreList";
			oParam.inds        = "req=ds_main_send";
			oParam.outds       = "ds_grd_dpcdlist=rslt";
			oParam.async       = false;
			//oParam.callback    = "cf_TXPPI00901";

		tranf_submit(oParam);

	}
}

function fSpclGridInsertRow(){
	var addRw = ds_grd_dpcdlist.addRow();
}

function fSpclGridDeleteRow(){
	var SelectedRows = grdf_getSelectedRows(grd_dpcdlist);
	grdf_setStatus(grd_dpcdlist, "D", SelectedRows);
}

function grd_dpcdlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	pmn_menu1.trackPopup(e.screenX,e.screenY);
}

function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id +"();");
}

function pmn_menu1_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
{
	obj.closePopup();
}
//엑셀업로드
function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_grd_dpcdlist.clearData();
	grdf_ImportExcel("ds_grd_dpcdlist", 2, grd_dpcdlist, 2);
}
//엑셀저장
function btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grd_dpcdlist.setFormatColProperty(0, "size", 0);
	
	if (ds_grd_dpcdlist.rowcount > 0) {
		grdf_exportExcel(grd_dpcdlist, "exportExcel", "see");
	}else{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	
	var suc = grd_dpcdlist.setFormatColProperty(0, "size", 21);
	trace(suc);
	
}
//행삭제
function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}
//행추가
function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridInsertRow();
}
//저장
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grd_dpcdlist);
	if(updtdata.rowcount == 0){
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	for(var i=0; i<ds_grd_dpcdlist.rowcount; i++)
	{
		if(ds_grd_dpcdlist.getRowType(i) == 2 || ds_grd_dpcdlist.getRowType(i) == 4 && utlf_isNull(ds_grd_dpcdlist.getColumn(i, "regmcd"))){
			var errmsg = "";
			if(utlf_isNull(ds_grd_dpcdlist.getColumn(i, "regmcd"))){
				errmsg = "요법코드";
				
				sysf_messageBox(errmsg+"는","I003");
				return false;
			}
		}
	}
	
	if(sysf_messageBox("저장", "S001") == 6){
		var oParam = {};
			oParam.id          = "TXPIJ03202";
			oParam.service     = "bfjudgcareapp.BfJudgCareMngt";
			oParam.method      = "reqExePicmbfreList";
			oParam.inds        = "req=ds_grd_dpcdlist:U";
			oParam.outds       = "ds_=rslt";
			oParam.async       = false;
			//oParam.callback    = "cf_TXPIJ03202";

		tranf_submit(oParam);
		
		sysf_messageBox("저장이","I002");
		
		fGetDocuList();
	}
}

function group1_ipt_diagcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group1.btn_select.setFocus();
		fGetDocuList();
	}
}

function group1_input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group1.btn_select.setFocus();
		fGetDocuList();
	}
}

function group1_input2_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group1.btn_select.setFocus();
		fGetDocuList();
	}
}

function group1_input3_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		group1.btn_select.setFocus();
		fGetDocuList();
	}
}
]]></Script>
  </Form>
</FDL>