YNU_JEUS/app_home/himed/xpapps/pam/ipatmngtxp/xp/SPPMI04001_퇴원지원사유입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMI04001" position="absolute 0 0 806 610" titletext="퇴원지연사유입력" onload="SPPMI04001_onload">
    <Layouts>
      <Layout>
        <Shape position="absolute 1 27 799 30" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="퇴원지연사유" position="absolute 0 0 120 25" id="caption6" class="tit_1"/>
        <Static text="등 록 번 호" position="absolute 0 30 90 50" align="align:center middle;" id="caption3" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="성      명" position="absolute 215 30 305 50" align="align:center middle;" id="caption1" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Shape position="absolute 1 96 799 102" linetype="horizontal" id="line104" class="line_2"/>
        <Static text="퇴원예정일" position="absolute 430 77 520 97" align="align:center middle;" id="caption2" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Shape position="absolute 0 322 800 328" linetype="vertical" id="line127" class="line_3"/>
        <Edit position="absolute 92 30 213 49" align="align:center middle;" id="ipt_pid" enable="true" style="align:center middle;" onkeydown="ipt_pid_onkeydown"/>
        <Edit position="absolute 307 30 428 49" align="align:center middle;" id="ipt_hngnm" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Calendar position="absolute 522 77 643 96" align="align:center middle;" id="ipt_dschschdd" mask="yyyy-mm-dd" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" style="align:center middle;"/>
        <Grid position="absolute 0 200 800 576" id="grd_pmihdsrn" binddataset="ds_main_dsrnlist" autoenter="select">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="97"/>
                <Column size="60"/>
                <Column size="45"/>
                <Column size="90"/>
                <Column size="222"/>
                <Column size="177"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="입력일자"/>
                <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="생성번호"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" style="align:center middle;" text="bind:rgstdt" enable="false"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:center middle;" text="bind:cnstnm"/>
                <Cell col="3" displaytype="text" edittype="text" style="align:center middle;" text="bind:cnstrela"/>
                <Cell col="4" displaytype="text" edittype="text" style="align:center middle;" text="bind:telnum"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:dschdelayresn"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:cnslttxt"/>
                <Cell col="7" style="align:center middle;" text="bind:rgstid"/>
                <Cell col="8" text="bind:pid"/>
                <Cell col="9" text="bind:hngnm"/>
                <Cell col="10" text="bind:indd"/>
                <Cell col="11" text="bind:dschschdd"/>
                <Cell col="12" text="bind:cretno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 744 176 797 195" id="btn_msg_del" class="btn2" text="행삭제" onclick="btn_msg_del_onclick"/>
        <Button position="absolute 688 176 741 195" id="btn_msg_add" class="btn2" text="행추가" onclick="btn_msg_add_onclick"/>
        <Button position="absolute 621 176 685 195" id="button1" class="btn2" text="엑셀저장" onclick="button1_onclick"/>
        <Edit position="absolute 522 30 613 49" align="align:center middle;" id="input1" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Static text="성      별" position="absolute 430 30 520 50" align="align:center middle;" id="caption4" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="연      령" position="absolute 615 30 705 50" align="align:center middle;" id="caption5" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="입 원 일 자" position="absolute 0 77 90 97" align="align:center middle;" id="caption7" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Edit position="absolute 522 54 613 73" align="align:center middle;" id="input2" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Static text="병      동" position="absolute 430 54 520 74" align="align:center middle;" id="caption8" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="병      실" position="absolute 615 54 705 74" align="align:center middle;" id="caption9" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Edit position="absolute 92 54 213 73" align="align:center middle;" id="input4" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Edit position="absolute 307 77 428 96" align="align:center middle;" id="input5" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Static text="입 원 과" position="absolute 0 54 90 74" align="align:center middle;" id="caption10" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="보 험 유 형" position="absolute 215 54 305 74" align="align:center middle;" id="caption11" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="현재입원일수" position="absolute 215 77 305 97" align="align:center middle;" id="caption12" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Shape position="absolute 1 49 799 55" linetype="horizontal" id="line2" class="line_2"/>
        <Edit position="absolute 707 30 798 49" align="align:center middle;" id="input3" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Edit position="absolute 707 54 798 73" align="align:center middle;" id="input6" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Shape position="absolute 1 73 799 79" linetype="horizontal" id="line3" class="line_2"/>
        <Edit position="absolute 307 54 428 73" align="align:center middle;" id="input7" enable="false" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Calendar position="absolute 92 78 213 97" align="align:center middle;" id="input8" mask="yyyy-mm-dd" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}" enable="false"/>
        <Shape position="absolute 1 123 799 126" linetype="horizontal" id="line4" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="중간진료비 현황" position="absolute 0 103 125 119" align="align:center middle;" id="caption13" class="tit_2"/>
        <Shape position="absolute 1 145 799 151" linetype="horizontal" id="line5" class="line_2"/>
        <MaskEdit position="absolute 98 126 198 145" align="align:right middle;" id="input9" enable="true" mask="9,999"/>
        <Static text="본인부담총액" position="absolute 200 126 297 146" align="align:center middle;" id="caption14" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="총 진 료 비" position="absolute 0 126 97 146" align="align:center middle;" id="caption15" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="기 납 부 액" position="absolute 401 126 498 146" align="align:center middle;" id="caption16" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <MaskEdit position="absolute 299 126 399 145" align="align:right middle;" id="input10" enable="false" mask="9,999" style=":disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Static text="감 면 액" position="absolute 602 126 699 146" align="align:center middle;" id="caption17" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <MaskEdit position="absolute 500 126 600 145" align="align:right middle;" id="input11" enable="false" mask="9,999" style=":disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <MaskEdit position="absolute 700 126 798 145" align="align:right middle;" id="input12" enable="false" mask="9,999" style=":disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Shape position="absolute 1 168 799 174" linetype="horizontal" id="line6" class="line_2"/>
        <MaskEdit position="absolute 98 149 198 168" align="align:right middle;" id="input13" enable="true" mask="9,999"/>
        <MaskEdit position="absolute 299 149 399 168" align="align:right middle;" id="input14" enable="false" mask="9,999" style=":disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}"/>
        <Static text="미 수 총 액" position="absolute 200 149 297 169" align="align:center middle;" id="caption18" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Static text="대 불 액" position="absolute 0 149 97 169" align="align:center middle;" id="caption19" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Shape position="absolute 0 198 800 201" linetype="horizontal" id="line7" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="상담내역" position="absolute 0 180 125 196" align="align:center middle;" id="caption20" class="tit_2"/>
        <Static text="계 산 일 자" position="absolute 401 149 498 169" align="align:center middle;" id="caption21" class="cell_1" style="padding:0 0 0 0;align:center middle;"/>
        <Calendar position="absolute 500 149 621 168" align="align:center middle;" id="input15" mask="yyyy-mm-dd" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}" enable="false"/>
        <Calendar position="absolute 640 149 761 168" align="align:center middle;" id="input16" mask="yyyy-mm-dd" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" value="null" style="align:center middle; :disabled {background:URL('theme://images/bg_edit_N.png') stretch 5,5;}" enable="false"/>
        <Static text="~" position="absolute 625 152 636 166" id="caption22"/>
        <Edit readonly="true" position="absolute 133 102 438 121" id="opt_midamtmsg" style="color:red;font:Dotum,9,bold;"/>
        <Button position="absolute 576 176 618 195" id="button2" class="btn2" text="출력" onclick="button2_onclick"/>
        <Button id="btn_confirm" taborder="1" text="저장" class="btn4" position="absolute 681 581 737 603" onclick="btn_confirm_onclick"/>
        <Button id="btn_cancel" taborder="2" text="닫기" class="btn4" position="absolute 740 581 796 603" onclick="btn_cancel_onclick"/>
        <Shape id="line32" linetype="horizontal" class="line_6" position="absolute 0 575 800 581"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main" 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="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="dschschdd" type="STRING" size="256"/>
          <Column id="dschdelayresn" type="STRING" size="256"/>
          <Column id="cnslttxt" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="insukindnm" type="STRING" size="256"/>
          <Column id="wardnm" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="indaycnt" type="STRING" size="256"/>
          <Column id="totamt" type="STRING" size="256"/>
          <Column id="owntotamt" type="STRING" size="256"/>
          <Column id="allowninsubamt" type="STRING" size="256"/>
          <Column id="rcptexptamt" type="STRING" size="256"/>
          <Column id="totpreamt" type="STRING" size="256"/>
          <Column id="instpayamt" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="midamtmsg" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="hngnm"/>
            <Col id="dschschdd"/>
            <Col id="dschdelayresn"/>
            <Col id="cnslttxt"/>
            <Col id="sex"/>
            <Col id="age"/>
            <Col id="orddeptnm"/>
            <Col id="insukindnm"/>
            <Col id="wardnm"/>
            <Col id="roomcd"/>
            <Col id="indaycnt"/>
            <Col id="totamt"/>
            <Col id="owntotamt"/>
            <Col id="allowninsubamt"/>
            <Col id="rcptexptamt"/>
            <Col id="totpreamt"/>
            <Col id="instpayamt"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="midamtmsg"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_dsrnlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="rgstdt" type="STRING" size="256" sumtext="입력일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="cnstnm" type="STRING" size="256" sumtext="상담자명"/>
          <Column id="cnstrela" type="STRING" size="256" sumtext="환자와의관계"/>
          <Column id="telnum" type="STRING" size="256" sumtext="전화번호"/>
          <Column id="dschschdd" type="STRING" size="256" sumtext="퇴원예정일"/>
          <Column id="dschdelayresn" type="STRING" size="256" sumtext="퇴원지연사유"/>
          <Column id="cnslttxt" type="STRING" size="256" sumtext="상담내용"/>
          <Column id="rgstid" type="STRING" size="256" sumtext="등록자"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="rgstdd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_dsrnbaseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <!--  기본정보  -->
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="insukindnm" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
          <Column id="indaycnt" type="STRING" size="256" sumtext="입원일수"/>
          <Column id="atdoctid" type="STRING" size="256" sumtext="주치의"/>
          <Column id="medispclid" type="STRING" size="256" sumtext="전문의"/>
          <!--  미납진료비  -->
          <Column id="totamt" type="STRING" size="256" sumtext="총진료비"/>
          <Column id="owntotamt" type="STRING" size="256" sumtext="환자본인부담총액"/>
          <Column id="allowninsubamt" type="STRING" size="256" sumtext="환자감면액"/>
          <Column id="rcptexptamt" type="STRING" size="256" sumtext="수납금액"/>
          <Column id="totpreamt" type="STRING" size="256" sumtext="기수납액"/>
          <Column id="instpayamt" type="STRING" size="256" sumtext="대불액"/>
          <Column id="fromdd" type="STRING" size="256" sumtext="계산시작일"/>
          <Column id="todd" type="STRING" size="256" sumtext="계산종료일"/>
          <Column id="midamtmsg" type="STRING" size="256" sumtext="메세지"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input16" propid="value" datasetid="ds_main" columnid="todd"/>
      <BindItem id="item1" compid="input12" propid="value" datasetid="ds_main" columnid="allowninsubamt"/>
      <BindItem id="item2" compid="input11" propid="value" datasetid="ds_main" columnid="totpreamt"/>
      <BindItem id="item3" compid="input15" propid="value" datasetid="ds_main" columnid="fromdd"/>
      <BindItem id="item4" compid="input14" propid="value" datasetid="ds_main" columnid="rcptexptamt"/>
      <BindItem id="item5" compid="input10" propid="value" datasetid="ds_main" columnid="owntotamt"/>
      <BindItem id="item6" compid="input9" propid="value" datasetid="ds_main" columnid="totamt"/>
      <BindItem id="item7" compid="input13" propid="value" datasetid="ds_main" columnid="instpayamt"/>
      <BindItem id="item8" compid="opt_midamtmsg" propid="value" datasetid="ds_main" columnid="midamtmsg"/>
      <BindItem id="item9" compid="input8" propid="value" datasetid="ds_main" columnid="indd"/>
      <BindItem id="item10" compid="input4" propid="value" datasetid="ds_main" columnid="orddeptnm"/>
      <BindItem id="item11" compid="ipt_pid" propid="value" datasetid="ds_main" columnid="pid"/>
      <BindItem id="item12" compid="ipt_hngnm" propid="value" datasetid="ds_main" columnid="hngnm"/>
      <BindItem id="item13" compid="input7" propid="value" datasetid="ds_main" columnid="insukindnm"/>
      <BindItem id="item14" compid="input5" propid="value" datasetid="ds_main" columnid="indaycnt"/>
      <BindItem id="item15" compid="ipt_dschschdd" propid="value" datasetid="ds_main" columnid="dschschdd"/>
      <BindItem id="item16" compid="input2" propid="value" datasetid="ds_main" columnid="wardnm"/>
      <BindItem id="item17" compid="input1" propid="value" datasetid="ds_main" columnid="sex"/>
      <BindItem id="item18" compid="input3" propid="value" datasetid="ds_main" columnid="age"/>
      <BindItem id="item19" compid="input6" propid="value" datasetid="ds_main" columnid="roomcd"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include 'com_commonxp::comm_main.xjs';

var arErrorCode = new HashArray();
//=======================================================================================
// Local methods
//---------------------------------------------------------------------------------------

/**
 * submit 후 호출 될 공통 콜백
 * @param  {[type]}   sSvcId     [description]
 * @param  {[type]}   nErrorCode [description]
 * @param  {[type]}   sErrorMsg  [description]
 * @return {Function}            [description]
 */
function callback(sSvcId, nErrorCode, sErrorMsg){
    arErrorCode.push(sSvcId, nErrorCode);
}

//=======================================================================================
// Events
//---------------------------------------------------------------------------------------
/**
 * onload 이벤트 발생 시 호출
 * @param {[type]} obj:Form        [description]
 * @param {[type]} e:LoadEventInfo [description]
 */
function SPPMI04001_onload(obj: Form, e: LoadEventInfo) {
    frmf_initForm(obj);
    grdf_setRowTypeIcon(grd_pmihdsrn, 0);
    
    var vflag = opener.frmf_getParameter("vflag");

    if (vflag != "1") {

        if (frmf_checkOpener()) {

            ds_main_dsrnlist.clearData();

            var pid = opener.frmf_getParameter("SPPMI04001_PID");
            var indd = opener.frmf_getParameter("SPPMI04001_INDD");
            var cretno = opener.frmf_getParameter("SPPMI04001_CRETNO");
            var hgnm = opener.frmf_getParameter("SPPMI04001_HNGNM");
            var dschschdd = opener.frmf_getParameter("SPPMI04001_DSCHSCHDD");
            var dscgdelayresn = opener.frmf_getParameter("SPPMI04001_DSCHDELAYRESN");
            var cnslttxt = opener.frmf_getParameter("SPPMI04001_CNSLTTXT");

            ds_main.setColumn(0, "pid", pid);
            ds_main.setColumn(0, "indd", indd);
            ds_main.setColumn(0, "cretno", cretno);
            ds_main.setColumn(0, "hngnm", hgnm);
            ds_main.setColumn(0, "dschschdd", dschschdd);
            ds_main.setColumn(0, "dschdelayresn", dscgdelayresn);
            ds_main.setColumn(0, "cnslttxt", cnslttxt);

            // 해당 환자의 퇴원지연사유 리스트 조회
            dsf_createDsRow('ds_TRPMI04002', [
                { col: 'pid', type: 'string', size: 256, val: '' },
                { col: 'indd', type: 'string', size: 256, val: '' },
                { col: 'cretno', type: 'string', size: 256, val: '' }
            ], false);

            ds_TRPMI04002.copyRow(0, ds_main, 0);

            var oParam = {};
                oParam.id          = "TRPMI04002";
                oParam.service     = "ipatmngtapp.InhospPat";
                oParam.method      = "reqGetLongTimeInHospResn";
                oParam.inds        = "req=ds_TRPMI04002";
                oParam.outds       = "ds_main_dsrnlist=dsrnlist";
                oParam.async       = false;

            tranf_submit(oParam);

            dsf_createDsRow('ds_TRPMI04003', [
                { col: 'pid', type: 'string', size: 256, val: '' },
                { col: 'indd', type: 'string', size: 256, val: '' },
                { col: 'cretno', type: 'string', size: 256, val: '' }
            ], false);

            ds_TRPMI04003.copyRow(0, ds_main, 0);
            ds_main_dsrnbaseinfo.clearData();

            oParam = {};
            oParam.id          = "TRPMI04003";
            oParam.service     = "ipatmngtapp.InhospPat";
            oParam.method      = "reqGetLongTimeInHospBaseInfo";
            oParam.inds        = "req=ds_TRPMI04003";
            oParam.outds       = "ds_main_dsrnbaseinfo=dsrnbaseinfo";
            oParam.async       = false;

            tranf_submit(oParam);
            
            ds_main_dsrnbaseinfo.updateColID('calc_fromdd', 'fromdd');
            ds_main_dsrnbaseinfo.updateColID('calc_todd', 'todddd');

            // 기본정보 추가
            ds_main.setColumn(0, "sex", ds_main_dsrnbaseinfo.getColumn(0, "sex"));
            ds_main.setColumn(0, "age", ds_main_dsrnbaseinfo.getColumn(0, "age"));
            ds_main.setColumn(0, "orddeptnm", ds_main_dsrnbaseinfo.getColumn(0, "orddeptnm"));
            ds_main.setColumn(0, "insukindnm", ds_main_dsrnbaseinfo.getColumn(0, "insukindnm"));
            ds_main.setColumn(0, "wardnm", ds_main_dsrnbaseinfo.getColumn(0, "wardnm"));
            ds_main.setColumn(0, "roomcd", ds_main_dsrnbaseinfo.getColumn(0, "roomcd"));
            ds_main.setColumn(0, "indaycnt", ds_main_dsrnbaseinfo.getColumn(0, "indaycnt"));

            // 진료비 정보
            ds_main.setColumn(0, "totamt", ds_main_dsrnbaseinfo.getColumn(0, "totamt"));
            ds_main.setColumn(0, "owntotamt", ds_main_dsrnbaseinfo.getColumn(0, "owntotamt"));
            ds_main.setColumn(0, "allowninsubamt", ds_main_dsrnbaseinfo.getColumn(0, "allowninsubamt"));
            ds_main.setColumn(0, "rcptexptamt", ds_main_dsrnbaseinfo.getColumn(0, "rcptexptamt"));
            ds_main.setColumn(0, "totpreamt", ds_main_dsrnbaseinfo.getColumn(0, "totpreamt"));
            ds_main.setColumn(0, "instpayamt", ds_main_dsrnbaseinfo.getColumn(0, "instpayamt"));
            ds_main.setColumn(0, "fromdd", ds_main_dsrnbaseinfo.getColumn(0, "fromdd"));
            ds_main.setColumn(0, "todd", ds_main_dsrnbaseinfo.getColumn(0, "todd"));
            ds_main.setColumn(0, "midamtmsg", ds_main_dsrnbaseinfo.getColumn(0, "midamtmsg"));
        }
        else {
            sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
            //return false;
        }
    }
}


/**
 * [퇴원지연사유]등록번호 키보드 입력 이벤트
 * @param  {[type]} obj: Edit          [description]
 * @param  {[type]} e:   KeyEventInfo  [description]
 * @return {[type]}      [description]
 */
function ipt_pid_onkeydown(obj: Edit, e: KeyEventInfo) {
    if (e.keycode != 13) {
        return;
    }
    obj.updateToDataset();
    var value = utlf_transNullToEmpty(ds_main.getColumn(0, 'pid'));

    if (value == '') {
        return;
    }
    
    dsf_createDsRow('ds_TRPMI04002', [
        { col: 'pid', type: 'string', size: 256, val: '' },
        { col: 'indd', type: 'string', size: 256, val: '' },
        { col: 'cretno', type: 'string', size: 256, val: '' }
    ], false);

    ds_TRPMI04002.copyRow(0, ds_main, 0);

    ds_main_dsrnlist.clearData();

    var oParam = {};
        oParam.id          = "TRPMI04002";
        oParam.service     = "ipatmngtapp.InhospPat";
        oParam.method      = "reqGetLongTimeInHospResn";
        oParam.inds        = "req=ds_TRPMI04002";
        oParam.outds       = "ds_main_dsrnlist=dsrnlist";
        oParam.async       = false;

    tranf_submit(oParam);
    
    dsf_createDsRow('ds_TRPMI04003', [
        { col: 'pid', type: 'string', size: 256, val: '' },
        { col: 'indd', type: 'string', size: 256, val: '' },
        { col: 'cretno', type: 'string', size: 256, val: '' }
    ], false);

    ds_TRPMI04003.copyRow(0, ds_main, 0);
    ds_main_dsrnbaseinfo.clearData();

    oParam = {};
    oParam.id          = "TRPMI04003";
    oParam.service     = "ipatmngtapp.InhospPat";
    oParam.method      = "reqGetLongTimeInHospBaseInfo";
    oParam.inds        = "req=ds_TRPMI04003";
    oParam.outds       = "ds_main_dsrnbaseinfo=dsrnbaseinfo";
    oParam.async       = false;

    tranf_submit(oParam);
    
    ds_main_dsrnbaseinfo.updateColID('calc_fromdd', 'fromdd');
    ds_main_dsrnbaseinfo.updateColID('calc_todd', 'todddd');

    ds_main.setColumn(0, "hngnm", ds_main_dsrnbaseinfo.getColumn(0, "hngnm"));
    ds_main.setColumn(0, "indd", ds_main_dsrnbaseinfo.getColumn(0, "indd"));
    ds_main.setColumn(0, "cretno", ds_main_dsrnbaseinfo.getColumn(0, "cretno"));
    ds_main.setColumn(0, "dschschdd", ds_main_dsrnbaseinfo.getColumn(0, "dschschdd"));

    // 기본정보 추가
    ds_main.setColumn(0, "sex", ds_main_dsrnbaseinfo.getColumn(0, "sex"));
    ds_main.setColumn(0, "age", ds_main_dsrnbaseinfo.getColumn(0, "age"));
    ds_main.setColumn(0, "orddeptnm", ds_main_dsrnbaseinfo.getColumn(0, "orddeptnm"));
    ds_main.setColumn(0, "insukindnm", ds_main_dsrnbaseinfo.getColumn(0, "insukindnm"));
    ds_main.setColumn(0, "wardnm", ds_main_dsrnbaseinfo.getColumn(0, "wardnm"));
    ds_main.setColumn(0, "roomcd", ds_main_dsrnbaseinfo.getColumn(0, "roomcd"));
    ds_main.setColumn(0, "indaycnt", ds_main_dsrnbaseinfo.getColumn(0, "indaycnt"));

    // 진료비 정보
    ds_main.setColumn(0, "totamt", ds_main_dsrnbaseinfo.getColumn(0, "totamt"));
    ds_main.setColumn(0, "owntotamt", ds_main_dsrnbaseinfo.getColumn(0, "owntotamt"));
    ds_main.setColumn(0, "allowninsubamt", ds_main_dsrnbaseinfo.getColumn(0, "allowninsubamt"));
    ds_main.setColumn(0, "rcptexptamt", ds_main_dsrnbaseinfo.getColumn(0, "rcptexptamt"));
    ds_main.setColumn(0, "totpreamt", ds_main_dsrnbaseinfo.getColumn(0, "totpreamt"));
    ds_main.setColumn(0, "instpayamt", ds_main_dsrnbaseinfo.getColumn(0, "instpayamt"));
    ds_main.setColumn(0, "fromdd", ds_main_dsrnbaseinfo.getColumn(0, "fromdd"));
    ds_main.setColumn(0, "todd", ds_main_dsrnbaseinfo.getColumn(0, "todd"));
    ds_main.setColumn(0, "midamtmsg", ds_main_dsrnbaseinfo.getColumn(0, "midamtmsg"));
}

/**
 * 출력 버튼 클릭 이벤트
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function button2_onclick(obj: Button, e: ClickEventInfo) {
    dsf_makeValue(ds_main_dsrnbaseinfo, "usernm", 'string', sysf_getUserName());

    // DOM 객체 설정
    var objDOM = rptf_createDOM();

    rptf_setNodeListToDOM(objDOM, "root/main/dsrnlist", ds_main_dsrnlist);
    rptf_setNodeListToDOM(objDOM, "root/main/dsrnbaseinfo", ds_main_dsrnbaseinfo);

    var option      = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0";
    rptf_exeReportPreview30(["RPPMI04001"],[{ xml_data_XML1: objDOM.documentElement.source }], option);
}

/**
 * 엑셀저장 버튼 클릭 이벤트
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function button1_onclick(obj: Button, e: ClickEventInfo) {
    grdf_exportExcel(grd_pmihdsrn, "excel", "SheetName", true, "", "user", false);
}

/**
 * [btn_msg_add_onclick description]
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function btn_msg_add_onclick(obj: Button, e: ClickEventInfo) {
    // 제어코드 내용을 복사하여 추가 
    var idx = ds_main_dsrnlist.addRow();

    ds_main_dsrnlist.setColumn(idx, "pid", ds_main.getColumn(0, "pid"));
    ds_main_dsrnlist.setColumn(idx, "hngnm", ds_main.getColumn(0, "hngnm"));
    ds_main_dsrnlist.setColumn(idx, "indd", ds_main.getColumn(0, "indd"));
    ds_main_dsrnlist.setColumn(idx, "cretno", ds_main.getColumn(0, "cretno"));
    ds_main_dsrnlist.setColumn(idx, "dschschdd", ds_main.getColumn(0, "dschschdd"));
    ds_main_dsrnlist.setColumn(idx, "cnstnm", ds_main.getColumn(0, "hngnm"));
    ds_main_dsrnlist.setColumn(idx, "rgstdd", utlf_getCurrentDate());
}

/**
 * 행삭제 버튼 클릭 이벤트
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function btn_msg_del_onclick(obj: Button, e: ClickEventInfo) {
    ds_main_dsrnlist.deleteRow(ds_main_dsrnlist.rowposition);
}

/**
 * 저장 버튼 클릭 이벤트
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function btn_confirm_onclick(obj: Button, e: ClickEventInfo) {
    if (sysf_messageBox("", "Q002") == 6) {
        var update = grdf_getGridUpdateData(grd_pmihdsrn, "all");
        grdf_setStatusColumn(update, "m");

        ds_tmp.copyData(update, false);
        if (ds_tmp.rowcount < 1) {
            sysf_messageBox("업데이트 정보가 없습니다.", "I");
            return;
        }
        else {
            if (frmf_checkOpener()) {
                dsf_createDsRow('ds_TXPMI04002', [
                    { col: 'm', type: 'string', size: 256, val: '' },
                    { col: 'pid', type: 'string', size: 256, val: '' },
                    { col: 'indd', type: 'string', size: 256, val: '' },
                    { col: 'cretno', type: 'string', size: 256, val: '' },
                    { col: 'cnstnm', type: 'string', size: 256, val: '' },
                    { col: 'cnstrela', type: 'string', size: 256, val: '' },
                    { col: 'telnum', type: 'string', size: 256, val: '' },
                    { col: 'dschschdd', type: 'string', size: 256, val: '' },
                    { col: 'dschdelayresn', type: 'string', size: 256, val: '' },
                    { col: 'cnslttxt', type: 'string', size: 256, val: '' },
                    { col: 'rgstdt', type: 'string', size: 256, val: '' }
                ], false);

                ds_TXPMI04002.copyRow(0, ds_tmp, 0);

                var oParam = {};
                    oParam.id          = "TXPMI04002";
                    oParam.service     = "ipatmngtapp.InhospPat";
                    oParam.method      = "reqSetLongTimeInHosp";
                    oParam.inds        = "req=ds_TXPMI04002";
                    oParam.outds       = "";
                    oParam.async       = false;
                    oParam.callback    = "callback";

                tranf_submit(oParam);

                if (arErrorCode.pop("TXPMI04002") > -1) {
                    sysf_messageBox("저장 되었습니다", "I999", "");
                }
            }
            else {
                sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
            }
        }
    }

    // 리스트 재조회
    dsf_createDsRow('ds_TRPMI04002', [
        { col: 'pid', type: 'string', size: 256, val: '' },
        { col: 'indd', type: 'string', size: 256, val: '' },
        { col: 'cretno', type: 'string', size: 256, val: '' }
    ], false);

    ds_TRPMI04002.copyRow(0, ds_main, 0);

    var oParam = {};
        oParam.id          = "TRPMI04002";
        oParam.service     = "ipatmngtapp.InhospPat";
        oParam.method      = "reqGetLongTimeInHospResn";
        oParam.inds        = "req=ds_TRPMI04002";
        oParam.outds       = "ds_main_dsrnlist=dsrnlist";
        oParam.async       = false;

    tranf_submit(oParam);
}

/**
 * 닫기 버튼 클릭 이벤트
 * @param  {[type]} obj: Button         [description]
 * @param  {[type]} e:   ClickEventInfo [description]
 * @return {[type]}      [description]
 */
function btn_cancel_onclick(obj: Button, e: ClickEventInfo) {
    var vflag = opener.frmf_getParameter("vflag");

    if (vflag != "1") {
        if (frmf_checkOpener()) {
            opener.frmf_setParameter("SPPMI04001_DSCHSCHDD", ds_main_dsrnlist.getColumn(grd_pmihdsrn.rowcount - 1, "dschschdd"));
            opener.frmf_setParameter("SPPMI04001_DSCHDELAYRESN", ds_main_dsrnlist.getColumn(grd_pmihdsrn.rowcount - 1, "dschdelayresn"));
        }
        else {
            sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
        }
    }
    this.close();
}
]]></Script>
  </Form>
</FDL>