YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SPPMC04700_VIP환자신청.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMC04700" position="absolute 0 0 515 450" titletext="VIP환자신청관리" onload="SPPMC04700_onload">
    <Layouts>
      <Layout>
        <Div id="group3" scrollbars="autoboth" position="absolute 0 0 496 176" style="">
          <Layouts>
            <Layout>
              <Static id="caption1" class="tit_2" position="absolute 5 3 117 20" style="" text="VIP입력사항"/>
              <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 20 495 24" style="" anchor="default"/>
              <Edit id="ipt_pid" position="absolute 95 25 220 44" style="" anchor="default" onkeypress="group3_ipt_pid_onkeypress"/>
              <Static id="caption29" class="cell_1" position="absolute 0 24 90 47" style="align:left middle;" text="등록번호"/>
              <Edit id="ipt_hngnm" class="input_essential" position="absolute 348 25 488 44" style="" anchor="default" onkeypress="group3_ipt_hngnm_onkeypress"/>
              <Static id="caption2" class="cell_1" position="absolute 250 24 342 47" style="align:left middle;" text="이름"/>
              <Static id="caption4" class="cell_1" position="absolute 250 49 342 72" style="align:left middle;" text="전화번호[집]"/>
              <Edit id="input3" position="absolute 348 50 488 69" style="" anchor="default"/>
              <MaskEdit id="ipt_rrgstno1" class="input_essential" taborder="1" mask="999999" position="absolute 95 51 168 70" style="" anchor="default" onkeypress="group3_ipt_rrgstno1_onkeypress"/>
              <MaskEdit id="ipt_rrgstno2" class="input_essential" taborder="2" mask="9999999" position="absolute 172 51 245 70" style="" anchor="default" onkeypress="group3_ipt_rrgstno2_onkeypress"/>
              <Static id="caption35" class="cell_1" position="absolute 0 49 90 72" style="" text="주민번호"/>
              <Static id="caption3" class="cell_1" position="absolute 0 74 90 97" style="" text="휴대폰"/>
              <Edit id="input2" position="absolute 95 76 245 95" style="" anchor="default"/>
              <Static id="caption5" class="cell_1" position="absolute 250 74 342 97" style="align:left middle;" text="기타전화번호"/>
              <Edit id="input4" position="absolute 348 76 488 95" style="" anchor="default"/>
              <Static id="caption6" class="cell_1" position="absolute 0 149 90 172" style="" text="특이사항"/>
              <Edit id="input5" position="absolute 96 151 491 170" style="" anchor="default"/>
              <Static id="caption8" class="cell_1" position="absolute 250 99 342 122" style="align:left middle;" text="VIP구분"/>
              <Combo innerdataset="ds_init_P0444list_P0444" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="combo1" position="absolute 348 100 488 119" style=""/>
              <Static id="caption9" class="cell_1" position="absolute 0 99 90 122" style="" text="VIP분류"/>
              <Combo innerdataset="ds_init_P0443list_P0443" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="combo2" position="absolute 95 102 245 121" style=""/>
              <Static id="caption10" class="cell_1" position="absolute 0 124 90 147" style="" text="근무처"/>
              <Edit id="input6" position="absolute 95 126 245 145" style="" anchor="default"/>
              <Static id="caption11" class="cell_1" position="absolute 250 124 342 147" style="align:left middle;" text="직책"/>
              <Edit id="input7" position="absolute 348 125 488 144" style="" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group1" scrollbars="autoboth" position="absolute 0 171 496 203" style="">
          <Layouts>
            <Layout>
              <Button id="btn_vipapp" class="btn4" taborder="9" position="absolute 437 6 493 28" style="" text="신청" onclick="group1_btn_vipapp_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="datagrid1" binddataset="ds_main_appcnfm_appcnfmlist" position="absolute 0 247 496 407" style="">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="60"/>
                <Column size="65"/>
                <Column size="65"/>
                <Column size="70"/>
                <Column size="65"/>
                <Column size="65"/>
                <Column size="65"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="28" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="승인상태"/>
                <Cell col="1" text="VIP구분"/>
                <Cell col="2" text="VIP분류"/>
                <Cell col="3" text="등록번호"/>
                <Cell col="4" text="환자이름"/>
                <Cell col="5" colspan="2" text="주민번호" taborder="undefined"/>
                <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="최종수정자"/>
                <Cell col="17" text="최종수정일시"/>
              </Band>
              <Band id="body">
                <Cell displaytype="combo" style="align:left middle;" text="bind:aprstat" combodataset="ds_init_aprstat" combocodecol="value" combodatacol="label"/>
                <Cell col="1" displaytype="combo" style="align:left middle;" text="bind:vipcls" combodataset="ds_init_P0443list_P0443" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="2" displaytype="combo" style="align:left middle;" text="bind:vipflag" combodataset="ds_init_P0444list_P0444" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="3" style="align:left middle;" text="bind:pid"/>
                <Cell col="4" style="align:left middle;" text="bind:hngnm"/>
                <Cell col="5" style="align:left middle;" text="bind:rrgstno1"/>
                <Cell col="6" style="align:left middle;" text="bind:rrgstno2"/>
                <Cell col="7" style="align:left middle;" text="bind:hometel"/>
                <Cell col="8" style="align:left middle;" text="bind:mpphontel"/>
                <Cell col="9" style="align:left middle;" text="bind:etctel"/>
                <Cell col="10" style="align:left middle;" text="bind:dutplce"/>
                <Cell col="11" style="align:left middle;" text="bind:jobpos"/>
                <Cell col="12" displaytype="date" style="align:left middle;" text="bind:appdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="13" displaytype="date" style="align:left middle;" text="bind:aprdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="14" text="bind:fstrgstrid"/>
                <Cell col="15" text="bind:fstrgstdt"/>
                <Cell col="16" text="bind:lastupdtrid"/>
                <Cell col="17" text="bind:lastupdtdt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button2" class="btn4" position="absolute 438 411 494 433" style="" text="닫기" onclick="button2_onclick"/>
        <Button id="btn_patSearch" class="btn1" taborder="6" position="absolute 437 217 493 239" style="" text="조회" onclick="btn_patSearch_onclick"/>
        <Static id="caption7" class="search_name" position="absolute 0 217 86 234" style="" text="검색조건 :"/>
        <Static id="caption21" position="absolute 93 217 128 236" style="align: middle;" text="일자 :"/>
        <Static id="caption24" position="absolute 221 217 232 236" style="align:center ;" text="~"/>
        <Calendar id="ipt_todd" class="input_default" taborder="5" position="absolute 235 217 320 236" style="" anchor="default" dateformat="yyyy-MM-dd" autoselect="true" autoskip="true"/>
        <Calendar id="ipt_fromdd" class="input_default" taborder="4" position="absolute 133 217 218 236" style="" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
        <Button id="btn_search" class="icon_search" position="absolute 228 28 244 44" style="" text="" onclick="btn_search_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_P0444list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_patinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_P0444list_P0444" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"/>
            <Col id="cdid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_vippatbaseinfo_vippatbaseinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="hometel" type="STRING" size="256"/>
          <Column id="mpphontel" type="STRING" size="256"/>
          <Column id="etctel" type="STRING" size="256"/>
          <Column id="vipcls" type="STRING" size="256"/>
          <Column id="vipflag" type="STRING" size="256"/>
          <Column id="dutplce" type="STRING" size="256"/>
          <Column id="jobpos" type="STRING" size="256"/>
          <Column id="remfact" type="STRING" size="256"/>
          <Column id="vipcheck" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="brthdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="hometel"/>
            <Col id="mpphontel"/>
            <Col id="etctel"/>
            <Col id="vipcls"/>
            <Col id="vipflag"/>
            <Col id="dutplce"/>
            <Col id="jobpos"/>
            <Col id="remfact"/>
            <Col id="vipcheck"/>
            <Col id="age"/>
            <Col id="brthdd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0443list_P0443" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"/>
            <Col id="cdid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="popupendflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0443list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_result_vippatbaseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="vippatbaseinfolist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="vippatbaseinfolist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="autoflag" type="STRING" size="256"/>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="updatedata" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="updatedata"/>
            <Col id="pid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_appcnfm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="appcnfmlist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="appcnfmlist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_result" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_vippatbaseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_aprstat" 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>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">취소</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">신청</Col>
            <Col id="value">N</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.ipt_pid" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="pid"/>
      <BindItem id="item1" compid="group3.ipt_hngnm" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="hngnm"/>
      <BindItem id="item2" compid="group3.input3" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="hometel"/>
      <BindItem id="item3" compid="group3.ipt_rrgstno1" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="rrgstno1"/>
      <BindItem id="item4" compid="group3.ipt_rrgstno2" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="rrgstno2"/>
      <BindItem id="item5" compid="group3.input2" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="mpphontel"/>
      <BindItem id="item6" compid="group3.input4" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="etctel"/>
      <BindItem id="item7" compid="group3.input5" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="remfact"/>
      <BindItem id="item8" compid="group3.combo1" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="vipflag"/>
      <BindItem id="item9" compid="group3.combo2" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="vipcls"/>
      <BindItem id="item10" compid="group3.input6" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="dutplce"/>
      <BindItem id="item11" compid="group3.input7" propid="value" datasetid="ds_main_vippatbaseinfo_vippatbaseinfolist" columnid="jobpos"/>
      <BindItem id="item12" compid="ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item13" compid="ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs"
include "com_basiccodexp::ZBC001.xjs"

var arErrorCode = new HashArray();

function SPPMC04700_onload(obj: Form, e: LoadEventInfo) {
    frmf_initForm(obj);
    grdf_initGrid(datagrid1);

    var arrParam = [ 
         {dsNm: "ds_init_P0443list_P0443", cdGrpId: "P0443" }
        ,{dsNm: "ds_init_P0444list_P0444", cdGrpId: "P0444" }
    ];
    appf_getCodeList(arrParam);

    //초기화
    fInitialize();

    //model.refresh();

    //팝업화면으로 사용될 때
    if (frmf_checkOpener()) {
        var pid = utlf_transNullToEmpty(opener.frmf_getParameter("SPPMC04700_pid"));
        var hngnm = utlf_transNullToEmpty(opener.frmf_getParameter("SPPMC04700_hngnm"));
        var rrgstno1 = utlf_transNullToEmpty(opener.frmf_getParameter("SPPMC04700_rrgstno1"));
        var rrgstno2 = utlf_transNullToEmpty(opener.frmf_getParameter("SPPMC04700_rrgstno2"));

        if (pid != '') {
            //진료과 세팅
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "pid", pid);
        } else if (hngnm != '') {
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "hngnm", hngnm);
        } else if (rrgstno1 != '') {
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "rrgstno1", rrgstno1);
        } else if (rrgstno2 != '') {
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "rrgstno2", rrgstno2);
        }
    }

}

function fInitialize() {
    ds_send.clearData(); ds_send.addRow();
    ds_main_vippatbaseinfo_vippatbaseinfolist.clearData(); ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();

    // 날짜 입력 항목에 오늘 날짜 세팅
    var curDate = utlf_getCurrentDate();
    ds_send.setColumn( 0, "fromdd", curDate);
    ds_send.setColumn( 0, "todd", curDate);
}

function fdataCheck() {
    //환자이름 체크
    if (ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "hngnm").getTrim().length < 2) {
        sysf_messageBox("환자 이름을 정확히 입력하지 않았습니다. 다시 시도해 주십시오.", "E999", "");
        group3.ipt_hngnm.setFocus();
        return false;
    }

    //환자 주민번호 체크

    var rrgstno1 = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "rrgstno1")).getTrim();
    var rrgstno2 = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "rrgstno2")).getTrim();
    var rrgstno = rrgstno1.concat(rrgstno2);
    var vipcls = utlf_transNullToEmpty(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "vipcls"));
    var vipflag = utlf_transNullToEmpty(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "vipflag"));
    var pid = utlf_transNullToEmpty(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "pid"));

    if (rrgstno1.length != 6 || rrgstno2.length != 7) {
        sysf_messageBox("주민등록번호를 정확히 입력하지 않았습니다. 다시 시도해 주십시오.", "E999", "");
        return false;
    } else if (isResidentNo(rrgstno) == false) {
        if (sysf_messageBox("유효하지 않은 주민등록번호입니다. 무시하고 계속 진행하시겠습니까?", "Q999", "") != 6) {
            group3.ipt_rrgstno1.setFocus();
            return false;
        }
    }

    //미입력사항 체크 
    if (pid == '' || pid == '-' || pid == ' ') {
        ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "pid", "-");
    }

    if (vipcls == '' || vipcls == '-' || vipcls == ' ') {
        sysf_messageBox("VIP분류가 선택되지 않았습니다. 다시 시도해 주십시오", "E999");
        return false;
    }

    if (vipflag == '' || vipflag == '-' || vipflag == ' ') {
        sysf_messageBox("VIP구분이 선택되지 않았습니다. 다시 시도해 주십시오", "E999");
        return false;
    }
    return true;
}

function f_vipinfosrch() {
    var oParam = {};
    oParam.id = "TRPMC04701";
    oParam.service = "patinfomngtapp.VipPatMngt";
    oParam.method = "reqGetAppRef";
    oParam.inds = "req=ds_send";
    oParam.outds = "ds_main_appcnfm_appcnfmlist=appcnfmlist";
    oParam.async = false;

    tranf_submit(oParam);
}

function group3_ipt_pid_onkeydown(obj: Edit, e: KeyEventInfo) {
    //무조건 재조회 할수 있도록 clear 후에 조회 호출 필요
    if (e.keycode == 13) {
        obj.updateToDataset();
        ds_hidden_source.setColumn(0, "srchcond", "1");
        var pid = utlf_transNullToEmpty(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'pid'));

        if (pid == '' || pid == ' ') {
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "pid", '');
            group3.ipt_hngnm.setFocus();

        } else if (pid.length < 2 || isNaN(pid)) {
            ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "pid", '');
        } else {
            ds_hidden_source.setColumn(0, "pid", pid);

            ds_main_vippatbaseinfo_vippatbaseinfolist.clearData();
            ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();

            var oParam = {};
            oParam.id = "TRPMC02501";
            oParam.service = "patinfomngtapp.VipPatMngt";
            oParam.method = "reqGetVipPatInfo";
            oParam.inds = "req=ds_hidden_source";
            oParam.outds = "ds_main_result_vippatbaseinfo_vippatbaseinfolist=vippatbaseinfolist ds_main_result_vippatbaseinfo_cardinfolist=cardinfolist";
            oParam.async = false;
            oParam.callback = "cf_TRPMC02501";

            tranf_submit(oParam);

            if (arErrorCode.pop("TRPMC02501") > -1)
                ds_main_vippatbaseinfo_vippatbaseinfolist.copyData(ds_main_result_vippatbaseinfo_vippatbaseinfolist);
        }

        var vipcheck = ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "vipcheck");
        if (vipcheck == 'N') {
            sysf_messageBox("이미 신청된 VIP환자입니다.", "E999", "");
            ds_main_vippatbaseinfo_vippatbaseinfolist.clearData();
            ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();
            ds_hidden_source.clearData();
            ds_hidden_source.addRow();
            return;
        } else if (vipcheck == 'Y') {
            sysf_messageBox("이미 승인된 VIP환자입니다. ", "E999", "");
            ds_main_vippatbaseinfo_vippatbaseinfolist.clearData();
            ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();
            ds_hidden_source.clearData();
            ds_hidden_source.addRow();
            return;
        }
    }
}

function cf_TRPMC02501(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}


function group3_ipt_hngnm_onkeydown(obj: Edit, e: KeyEventInfo) {
    if(e.keycode != 13){
        return;
    }
    obj.updateToDataset();
    ds_hidden_source.setColumn(0, "srchcond", "2");
    ds_hidden_source.setColumn(0, "hngnm", ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'hngnm'));
    btn_search.click();
    

}

function group3_ipt_rrgstno1_onkeydown(obj: MaskEdit, e: KeyEventInfo) {
    if(e.keycode != 13){
        return;
    }
    obj.updateToDataset();
    var hngnm = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'hngnm'));
    var rrgstno1 = ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'rrgstno1');
    var rrgstno2 = ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'rrgstno2');

    if (hngnm.length > 1) {
        ds_hidden_source.setColumn(0, "srchcond", "4");
        ds_hidden_source.setColumn(0, "hngnm", hngnm);
        ds_hidden_source.setColumn(0, "rrgstno1", rrgstno1);
        ds_hidden_source.setColumn(0, "rrgstno2", rrgstno2);

    } else {
        ds_hidden_source.setColumn(0, "srchcond", "3");
        ds_hidden_source.setColumn(0, "rrgstno1", rrgstno1);
        ds_hidden_source.setColumn(0, "rrgstno2", rrgstno2)
    }
    btn_search.click();
}

function group3_ipt_rrgstno2_onkeydown(obj: MaskEdit, e: KeyEventInfo) {
    if (e.keycode == 13) {
        obj.updateToDataset();
        var hngnm = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'hngnm'));
        var rrgstno1 = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'rrgstno1'));
        var rrgstno2 = String(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, 'rrgstno2'));

        if (hngnm.length > 1) {
            ds_hidden_source.setColumn(0, "srchcond", "4");
            ds_hidden_source.setColumn(0, "hngnm", hngnm);
            ds_hidden_source.setColumn(0, "rrgstno1", rrgstno1);
            ds_hidden_source.setColumn(0, "rrgstno2", rrgstno2);

        } else {
            ds_hidden_source.setColumn(0, "srchcond", "3");
            ds_hidden_source.setColumn(0, "rrgstno1", rrgstno1);
            ds_hidden_source.setColumn(0, "rrgstno2", rrgstno2);
        }

        //주민번호 뒷자리의 노드가 사라짐 해결
        ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "rrgstno2", rrgstno2);
        if (rrgstno1.length == 6 && rrgstno2.length == 7) {
            ds_hidden_source.setColumn(0, "rrgstno1", rrgstno1);
            ds_hidden_source.setColumn(0, "rrgstno2", rrgstno2);

            var oParam = {};
            oParam.id = "TRPMC02501";
            oParam.service = "patinfomngtapp.VipPatMngt";
            oParam.method = "reqGetVipPatInfo";
            oParam.inds = "req=ds_hidden_source";
            oParam.outds = "ds_main_result_vippatbaseinfo_vippatbaseinfolist=vippatbaseinfolist ds_main_result_vippatbaseinfo_cardinfolist=cardinfolist";
            oParam.async = false;
            oParam.callback = "cf_TRPMC02501";

            tranf_submit(oParam);

            if (arErrorCode.pop("TRPMC02501") > -1) {
                if (ds_main_result_vippatbaseinfo_vippatbaseinfolist.rowcount == 1) {
                    ds_main_vippatbaseinfo_vippatbaseinfolist.copyData(ds_main_result_vippatbaseinfo_vippatbaseinfolist);
                    ds_main.setColumn(0, "popupendflag", "ok");

                    var vipcheck = ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "vipcheck");
                    if (vipcheck == 'N') {
                        sysf_messageBox("이미 신청된 VIP환자입니다.", "E999", "");
                        ds_main_vippatbaseinfo_vippatbaseinfolist.clearData();
                        ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();
                        ds_hidden_source.clearData();
                        ds_hidden_source.addRow();

                        return;

                    } else if (vipcheck == 'Y') {
                        sysf_messageBox("이미 승인된 VIP환자입니다. ", "E999", "");
                        ds_main_vippatbaseinfo_vippatbaseinfolist.clearData();
                        ds_main_vippatbaseinfo_vippatbaseinfolist.addRow();
                        ds_hidden_source.clearData();
                        ds_hidden_source.addRow();

                        return;
                    }

                    //주민번호체크
                    ds_main_vippatbaseinfo_vippatbaseinfolist.setColumn(0, "age", getFullAge(ds_main_vippatbaseinfo_vippatbaseinfolist.getColumn(0, "brthdd")));
                } else if (ds_main_result_vippatbaseinfo_vippatbaseinfolist.rowcount > 1) {
                    btn_search.click();

                } else {
                    sysf_messageBox("일치하는 환자가 없습니다.", "E999", "");
                }
            }
        } else {
            btn_search.click();
        }
    }
}

function group1_btn_vipapp_onclick(obj: Button, e: ClickEventInfo) {
    //입력사항 체크
    if (fdataCheck()) {
        var oParam = {};
        oParam.id = "TXPMC04702";
        oParam.service = "patinfomngtapp.VipPatMngt";
        oParam.method = "reqInsVipApp";
        oParam.inds = "req=ds_main_vippatbaseinfo_vippatbaseinfolist";
        oParam.outds = "";
        oParam.async = false;
        oParam.callback = "cf_TXPMC04702";

        tranf_submit(oParam);

        if (arErrorCode.pop("TXPMC04702") > -1) {
            sysf_messageBox("신청이 ", "I001");
            f_vipinfosrch();
            ds_hidden_source.clearData();
            ds_hidden_source.addRow();
            fInitialize();
        }
    }
}

function cf_TXPMC04702(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

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

function btn_patSearch_onclick(obj: Button, e: ClickEventInfo) {
    f_vipinfosrch();
}

function btn_search_onclick(obj: Button, e: ClickEventInfo) {
    ds_hidden_source.setColumn(0, "autoflag", "Y");
    var objArg = new Object();
    objArg.arg_ds_send = ds_hidden_source;

    frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "1", "150", "150", "", "", "", "", "", "M");

    //빠진노드 생성
    dsf_makeValue(ds_patinfolist, "etctel", "string", "");
    dsf_makeValue(ds_patinfolist, "vipcls", "string", "");
    dsf_makeValue(ds_patinfolist, "vipflag", "string", "");
    dsf_makeValue(ds_patinfolist, "vipcls", "string", "");
    dsf_makeValue(ds_patinfolist, "dutplce", "string", "");
    dsf_makeValue(ds_patinfolist, "jobpos", "string", "");
    dsf_makeValue(ds_patinfolist, "remfact", "string", "");
    ds_patinfolist.setColumn(0, "etctel", ds_patinfolist.getColumn(0, "etctel1"));

    var popupendflag = ds_main.getColumn(0, "popupendflag");
    if (popupendflag == "ok") {
        ds_main_vippatbaseinfo_vippatbaseinfolist.copyRow(0, ds_patinfolist, 0);
    }
}]]></Script>
  </Form>
</FDL>