YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO25100_임플란트등록신청서.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO25100" position="absolute 0 0 457 331" titletext="임플란트등록신청서" onload="SPMMO25100_onload" oninit="SPMMO25100_oninit">
    <Layouts>
      <Layout>
        <Edit position="absolute 90 23 220 42" id="ipt_pid" enable="false"/>
        <Combo position="absolute 90 71 220 90" id="combo1" enable="false" innerdataset="@ds_init_orddept" datacolumn="depthngnm" codecolumn="deptcd"/>
        <Edit position="absolute 90 47 220 66" id="ipt_hngnm" enable="false"/>
        <Edit position="absolute 315 71 445 90" id="ipt_diaghngnm" enable="false"/>
        <Shape position="absolute 0 16 450 22" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #9ebed4ff;"/>
        <Static text="임플란트등록신청서" position="absolute 0 0 152 17" align="align:center middle;" id="caption14" class="tit_2"/>
        <Static text="등록번호" position="absolute 0 21 86 44" align="align:center middle;" id="caption26" class="cell_1"/>
        <Static text="진료과" position="absolute 0 69 86 92" align="align:center middle;" id="caption1" class="cell_1"/>
        <Static text="진단" position="absolute 226 69 311 92" align="align:center middle;" id="caption2" class="cell_1"/>
        <Static text="진단확인일" position="absolute 226 93 311 116" align="align:center middle;" id="caption3" class="cell_1"/>
        <Button position="absolute 333 302 389 324" id="btn_save" class="btn4" text="저장" onclick="btn_save_onclick"/>
        <Button position="absolute 393 302 449 324" id="btn_exit" class="btn4" text="종료" onclick="btn_exit_onclick"/>
        <Static text="환자명" position="absolute 0 45 86 68" align="align:center middle;" id="caption13" class="cell_1"/>
        <Static position="absolute 315 21 448 66" align="align:center middle;" id="cap_insukindnm" class="cell_1"/>
        <Calendar position="absolute 315 95 445 114" id="ipt_diagcnfmdate" class="input_s_essential" enable="false" mask="yyyy-mm-dd"/>
        <Combo position="absolute 90 95 220 114" id="combo2" enable="false" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">O</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
              <Row>
                <Col id="codecolumn">I</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static text="외래/입원구분" position="absolute 0 94 86 115" align="align:center middle;" id="caption16" class="cell_1" style="padding:0 0 0 2;"/>
        <Static text="치식번호" position="absolute 0 143 86 166" align="align:center middle;" id="caption4" class="cell_1"/>
        <Static text="등록구분" position="absolute 0 168 86 191" align="align:center middle;" id="caption5" class="cell_1"/>
        <Static text="의료급여&#13;&#10;기관구분" position="absolute 0 193 86 228" align="align:center middle;" id="caption6" class="cell_1"/>
        <Static text="재등록 사유" position="absolute 0 262 86 296" align="align:center middle;" id="caption7" class="cell_1"/>
        <Static text="재등록 시술&#13;&#10;시작 단계" position="absolute 0 230 86 260" align="align:center middle;" id="caption9" class="cell_1"/>
        <Div position="absolute 90 143 265 298" id="grp_implant1">
          <Layouts>
            <Layout>
              <Edit position="absolute 0 2 70 21" id="ipt_tootfact1"/>
              <Button position="absolute 75 3 91 19" id="btn_srchtootfact1" class="icon_search" text="" onclick="grp_implant1_btn_srchtootfact1_onclick" tooltiptext="치식검색"/>
              <Button position="absolute 95 0 118 23" id="btn_eraser1" class="icon_eraser" text="" onclick="grp_implant1_btn_eraser1_onclick" tooltiptext="치식삭제"/>
              <Radio position="absolute 0 27 145 43" id="sel_regkind1" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_implant1_sel_regkind1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">신규</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">R</Col>
                      <Col id="datacolumn">재등록</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 0 51 170 84" id="sel_reregkind1" columncount="1" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_implant1_sel_reregkind1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">동일 의료급여기관 재등록</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">타 의료급여기관 재등록</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 0 93 169 109" id="sel_reregstart1" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">1단계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">2단계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3</Col>
                      <Col id="datacolumn">3단계</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 0 120 175 155" id="sel_reregresn1" columncount="1" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" style="textpadding:0 0 0 0;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">2단계 시술 실패(골유착실패)</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">진행불가(의료급여기관 폐업)</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 267 143 445 298" id="grp_implant2">
          <Layouts>
            <Layout>
              <Edit position="absolute 3 2 73 21" id="ipt_tootfact2"/>
              <Button position="absolute 75 3 91 19" id="btn_srchtootfact2" class="icon_search" text="" onclick="grp_implant2_btn_srchtootfact2_onclick" tooltiptext="치식검색"/>
              <Button position="absolute 95 0 118 23" id="btn_eraser2" class="icon_eraser" text="" onclick="grp_implant2_btn_eraser2_onclick" tooltiptext="치식삭제"/>
              <Radio position="absolute 3 27 148 43" id="sel_regkind2" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_implant2_sel_regkind2_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">신규</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">R</Col>
                      <Col id="datacolumn">재등록</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 3 51 173 84" id="sel_reregkind2" columncount="1" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_implant2_sel_reregkind2_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">동일 의료급여기관 재등록</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">타 의료급여기관 재등록</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 3 93 172 109" id="sel_reregstart2" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">1단계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">2단계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3</Col>
                      <Col id="datacolumn">3단계</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio position="absolute 3 120 178 155" id="sel_reregresn2" columncount="1" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" style="textpadding:0 0 0 0;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">2단계 시술 실패(골유착실패)</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">진행불가(의료급여기관 폐업)</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
        <Static text="임플란트1" position="absolute 90 119 268 142" align="align:center middle;" id="caption8" class="cell_1"/>
        <Static text="임플란트2" position="absolute 270 119 448 142" align="align:center middle;" id="caption10" class="cell_1"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_implantinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagengnm" type="STRING" size="256"/>
          <Column id="diaghngnm" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="icd10cd" type="STRING" size="256"/>
          <Column id="diagcnfmdd" type="STRING" size="256"/>
          <Column id="insukindnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="tootfact1" type="STRING" size="256"/>
          <Column id="tootfact2" type="STRING" size="256"/>
          <Column id="regkind1" type="STRING" size="256"/>
          <Column id="regkind2" type="STRING" size="256"/>
          <Column id="reregkind1" type="STRING" size="256"/>
          <Column id="reregkind2" type="STRING" size="256"/>
          <Column id="reregstart1" type="STRING" size="256"/>
          <Column id="reregstart2" type="STRING" size="256"/>
          <Column id="reregresn1" type="STRING" size="256"/>
          <Column id="reregresn2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_main_implantinfo" columnid="pid"/>
      <BindItem id="item1" compid="ipt_hngnm" propid="value" datasetid="ds_main_implantinfo" columnid="hngnm"/>
      <BindItem id="item2" compid="combo1" propid="value" datasetid="ds_main_implantinfo" columnid="orddeptcd"/>
      <BindItem id="item3" compid="combo2" propid="value" datasetid="ds_main_implantinfo" columnid="ioflag"/>
      <BindItem id="item4" compid="ipt_diaghngnm" propid="value" datasetid="ds_main_implantinfo" columnid="icd10cd"/>
      <BindItem id="item5" compid="ipt_diagcnfmdate" propid="value" datasetid="ds_main_implantinfo" columnid="diagcnfmdd"/>
      <BindItem id="item6" compid="grp_implant1.ipt_tootfact1" propid="value" datasetid="ds_main_implantinfo" columnid="tootfact1"/>
      <BindItem id="item7" compid="grp_implant1.sel_regkind1" propid="value" datasetid="ds_main_implantinfo" columnid="regkind1"/>
      <BindItem id="item8" compid="grp_implant1.sel_reregkind1" propid="value" datasetid="ds_main_implantinfo" columnid="reregkind1"/>
      <BindItem id="item9" compid="grp_implant1.sel_reregstart1" propid="value" datasetid="ds_main_implantinfo" columnid="reregstart1"/>
      <BindItem id="item10" compid="grp_implant1.sel_reregresn1" propid="value" datasetid="ds_main_implantinfo" columnid="reregresn1"/>
      <BindItem id="item11" compid="grp_implant2.ipt_tootfact2" propid="value" datasetid="ds_main_implantinfo" columnid="tootfact2"/>
      <BindItem id="item12" compid="grp_implant2.sel_regkind2" propid="value" datasetid="ds_main_implantinfo" columnid="regkind2"/>
      <BindItem id="item13" compid="grp_implant2.sel_reregkind2" propid="value" datasetid="ds_main_implantinfo" columnid="reregkind2"/>
      <BindItem id="item14" compid="grp_implant2.sel_reregstart2" propid="value" datasetid="ds_main_implantinfo" columnid="reregstart2"/>
      <BindItem id="item15" compid="grp_implant2.sel_reregresn2" propid="value" datasetid="ds_main_implantinfo" columnid="reregresn2"/>
      <BindItem id="item16" compid="cap_insukindnm" propid="text" datasetid="ds_main_implantinfo" columnid="insukindnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-31
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-31      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs"
include "emr_prcpmngtxp::MMOCommon.xjs"
include "emr_prcpmngtxp::MMO001.xjs"

var arErrorCode = new HashArray();
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------

function SPMMO25100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 폼 초기화 
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPMMO25100
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면오픈시 폼load이후 실행
 ****************************************************************************************/
function SPMMO25100_onload(obj:Form, e:LoadEventInfo)
{
	var dd = utlf_getCurrentDate(); // 당일
	dsf_makeValue(ds_send_savedata,"genrdd","string",dd);
	lf_mmbfGetDeptCodeComboList(ds_init_orddept, "A");
	
	if( frmf_checkOpener() && !utlf_isNull(appf_getPatientInfo("pid")) ) {
		dsf_makeValue(ds_send_reqdata,"pid",       "string",appf_getPatientInfo("pid"));
		dsf_makeValue(ds_send_reqdata,"cretno",    "string",appf_getPatientInfoDetail("cretno"));
		dsf_makeValue(ds_send_reqdata,"diagcnfmdd","string",dd);
		dsf_makeValue(ds_send_reqdata,"insukind", 	"string",appf_getPatientInfoDetail("insukind"));
		dsf_makeValue(ds_send_reqdata,"ioflag", 	"string",appf_getPatientInfoDetail("ioflag"));
		
		if (appf_getPatientInfoDetail("ioflag") == "O" || appf_getPatientInfoDetail("ioflag") == "S" ){ //외래일때
			dsf_makeValue(ds_send_reqdata,"orddd","string",appf_getPatientInfoDetail("orddd"));
		} else {
			dsf_makeValue(ds_send_reqdata,"orddd","string",appf_getPatientInfoDetail("indd"));
		}
		
		dsf_makeValue(ds_send_reqdata,"orddeptcd","string",sysf_getUserInfo("dutplcecd"));
		dsf_makeValue(ds_send_reqdata,"orddrid",  "string",sysf_getUserId());
		dsf_makeValue(ds_send_reqdata,"instcd",   "string",sysf_getUserInfo("dutplceinstcd"));
		
		var oParam = {};
			oParam.id       = "TRMMO25101";
			oParam.service  = "prcpmngtapp.EtcPrcpMngt";
			oParam.method   = "reqGetImplantInfo";
			oParam.inds     = "req=ds_send_reqdata";
			oParam.outds    = "ds_main_implantinfo=implantinfo";
			oParam.async    = false;
			oParam.callback = "cf_TRMMO25101";

		tranf_submit(oParam);
		
		if(arErrorCode.pop("TRMMO25101") >= 0){
			ds_temp.setColumn(0,"flag","1");
		}

/*	원무 의료급여자격조횧 화면 개발이 필요.	*/
// 		fInsuInfoSearch(); //보험 정보조회	
// 		
// 		var oParam = {};
// 			oParam.id       = "TRMMO25101";
// 			oParam.service  = "prcpmngtapp.EtcPrcpMngt";
// 			oParam.method   = "reqGetImplantInfo";
// 			oParam.inds     = "req=ds_send_reqdata";
// 			oParam.outds    = "ds_main_implantinfo=implantinfo";
// 			oParam.async    = false;
// 			oParam.callback = "cf_TRMMO25101";
// 
// 		tranf_submit(oParam);
// 		
// 		if(arErrorCode.pop("TRMMO25101") >= 0){
// 			ds_temp.setColumn(0,"flag","1");
// 		}
		
		var sPid       = ds_main_implantinfo.getColumn(0,"pid");
		var sTootFact1 = ds_main_implantinfo.getColumn(0,"tootfact1");
		var sTootFact2 = ds_main_implantinfo.getColumn(0,"tootfact2");
		
		if(!utlf_isNull(sPid)){ // 메뉴에서 들어 올때 기존 임플란트 신청서가 있을경우만
			if(!utlf_isNull(sTootFact1)){
				grp_implant1.enable = false;
			} else {
				grp_implant1.enable = true;
				grp_implant1.ipt_tootfact1.enable = false;
				ds_main_implantinfo.setColumn(0,"regkind1", "N");
				fDisabledCheck("Implant1", false);
			}
			
			if(!utlf_isNull(sTootFact2)){
				grp_implant2.enable = false;
			} else {
				grp_implant2.enable = true;
				grp_implant2.ipt_tootfact2.enable = false;
				ds_main_implantinfo.setColumn(0,"regkind2", "N");
				fDisabledCheck("Implant2", false);
			}
		} else {
			grp_implant1.enable = false;
			grp_implant2.enable = false;
		}
	} else if( frmf_checkOpener() && utlf_isNull(appf_getPatientInfo("pid")) ){
		sysf_messageBox ("상단정보가 필요합니다.", "I" );
		this.close();
	}					
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_implant1.btn_srchtootfact1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트1 치식검색
 ****************************************************************************************/
function grp_implant1_btn_srchtootfact1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSrchTootFact("Implant1");
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_implant1.btn_eraser1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트1 치식삭제
 ****************************************************************************************/
function grp_implant1_btn_eraser1_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_implantinfo.setColumn(0,"tootfact1", "");  
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_implant2.btn_srchtootfact2
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트2 치식검색
 ****************************************************************************************/
function grp_implant2_btn_srchtootfact2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSrchTootFact("Implant2");
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_implant2.btn_eraser2
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트2 치식삭제
 ****************************************************************************************/
function grp_implant2_btn_eraser2_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_implantinfo.setColumn(0,"tootfact2", "");  
}

/****************************************************************************************
 * Components		: Radio
 * Components ID	: grp_implant1.sel_regkind1
 * Event			: onitemchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트1 등록구분 선택
 ****************************************************************************************/
function grp_implant1_sel_regkind1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var sRegKind1 = ds_main_implantinfo.getColumn(0,"regkind1");
	if(sRegKind1 == "N") { // 등록구분이 신규이면
		fDisabledCheck("Implant1", false);
	} else {
		fDisabledCheck("Implant1", true);
	}
}

/****************************************************************************************
 * Components		: Radio
 * Components ID	: grp_implant1.sel_reregkind1
 * Event			: onitemchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트1 의료급여 기관구분 선택
 ****************************************************************************************/
function grp_implant1_sel_reregkind1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var sReRegKind1 = ds_main_implantinfo.getColumn(0,"reregkind1");
	if(sReRegKind1 == "S") { // 동일 의료급여기관 재등록
		ds_main_implantinfo.setColumn(0,"reregstart1", "2");
		grp_implant1.sel_reregstart1.enable = false;
	} else {
		ds_main_implantinfo.setColumn(0,"reregstart1", "");
		grp_implant1.sel_reregstart1.enable = true;
	}
}

/****************************************************************************************
 * Components		: Radio
 * Components ID	: grp_implant2.sel_regkind2
 * Event			: onitemchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트2 등록구분 선택
 ****************************************************************************************/
function grp_implant2_sel_regkind2_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var sRegKind2 = ds_main_implantinfo.getColumn(0, "regkind2");	//model.getValue("root/main/implantinfo/regkind2");
	if(sRegKind2 == "N") { // 등록구분이 신규이면
		fDisabledCheck("Implant2", false);
	} else {
		fDisabledCheck("Implant2", true);
	}
}

/****************************************************************************************
 * Components		: Radio
 * Components ID	: grp_implant2.sel_reregkind2
 * Event			: onitemchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 임플란트2 의료급여 기관구분 선택
 ****************************************************************************************/
function grp_implant2_sel_reregkind2_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var sReRegKind2 = ds_main_implantinfo.getColumn(0,"reregkind2");
	if(sReRegKind2 == "S") { // 동일 의료급여기관 재등록
		ds_main_implantinfo.setColumn(0,"reregstart2", "2");
		grp_implant2.sel_reregstart2.enable = false;
	} else {
		ds_main_implantinfo.setColumn(0,"reregstart2", "");
		grp_implant2.sel_reregstart2.enable = true;
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_save
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 저장버튼 클릭
 ****************************************************************************************/
function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send_savedata.copyData(ds_main_implantinfo);
	if(utlf_isNull(frmf_getParameter("SPPMC03900_insukind"))) {
		dsf_makeValue(ds_send_savedata,"insukind","string",appf_getPatientInfoDetail("insukind"));
	} else if(!utlf_isNull(frmf_getParameter("SPPMC03900_insukind"))){
		dsf_makeValue(ds_send_savedata,"insukind","string",frmf_getParameter("SPPMC03900_insukind"));
	}

	if(utlf_isNull(ds_send_savedata.getColumn(0,"tootfact1")) && utlf_isNull(ds_send_savedata.getColumn(0,"tootfact2"))){
		sysf_messageBox ( "저장할 치식번호가 없습니다.", "C" ); 
		return;
	}
	
	if(ds_send_savedata.getColumn(0,"tootfact1") == ds_send_savedata.getColumn(0,"tootfact2")){
		sysf_messageBox ( "동일한 치식번호를 중복 등록 할 수 없습니다.", "C" ); 
		return;
	}
	
	if(ds_send_savedata.getColumn(0,"regkind1")=="R") {
		if(utlf_isNull(ds_send_savedata.getColumn(0,"reregkind1")) || utlf_isNull(ds_send_savedata.getColumn(0,"reregstart1")) || utlf_isNull(ds_send_savedata.getColumn(0,"reregresn1"))) {
			sysf_messageBox ( "임플란트1 등록구분이 재등록이면 의료급여기관 구분, 재등록 시술 시작단계, 재등록 사유를 입력 하셔야 합니다.", "C" ); 
			return;
		}
	}
	
	if(ds_send_savedata.getColumn(0,"regkind2")=="R"){
		if(utlf_isNull(ds_send_savedata.getColumn(0,"reregkind2")) || utlf_isNull(ds_send_savedata.getColumn(0,"reregstart2")) || utlf_isNull(ds_send_savedata.getColumn(0,"reregresn2")) ) {
			sysf_messageBox ( "임플란트2 등록구분이 재등록이면 의료급여기관 구분, 재등록 시술 시작단계, 재등록 사유를 입력 하셔야 합니다.", "C" ); 
			return;
		}
	}
				
//	submit("TXMMO25101");
	var oParam = {};
		oParam.id       = "TXMMO25101";
		oParam.service  = "prcpmngtapp.EtcPrcpMngt";
		oParam.method   = "reqSaveImplantInfo";
		oParam.inds     = "req=ds_send_savedata";
		oParam.outds    = null;
		oParam.async    = false;
		//oParam.callback = null;

	tranf_submit(oParam);
	
	this.close();			
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_exit
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 종료버튼 클릭
 ****************************************************************************************/
function btn_exit_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

//=======================================================================================
// Function
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Function			: cf_TRMMO25101
 * Description		: TRMMO25101 콜백 함수
 * Argument			: 
 *					: 
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function cf_TRMMO25101(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
}

/****************************************************************************************
 * Function			: fInsuInfoSearch
 * Description		: 보험자격조회 
 * Argument			: flag : 자격조회 화면 팝업 여부 ("P" : Yes)
 *					: 
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function fInsuInfoSearch(flag){
	//보험증번호 조회(보험자격조회)
	var param = ds_main_implantinfo.getColumn(0,"rrgstno1") 	+
				ds_main_implantinfo.getColumn(0,"rrgstno2") 	+ "▦" + //주민번호
				ds_main_implantinfo.getColumn(0,"hngnm") 		+ "▦" + //이름
				ds_main_implantinfo.getColumn(0,"orddd") 		+ "▦" + //외래진료일자
				ds_main_implantinfo.getColumn(0,"cretno") 		+ "▦" + //생성번호
				"O" 											+ "▦" + //진료형태
				"" 												+ "▦" + //퇴원일자
				"0" 											+ "▦" + //본인일부부담금
				""												+ "▦" + //기관부담금
				ds_main_implantinfo.getColumn(0,"pid") 			+ "▦" + //등록번호
				ds_main_implantinfo.getColumn(0,"orddeptcd")	+ "▦" + //진료과
				""									 			+ "▦" + //본인부담구분
				"0" 											+ "▦" + //비급여총금액
				"0" 											+ "▦" + //산전지원금
				"00"											+ "▦"; //보조유형
	frmf_setParameter("SPPMC03900_PARM",param);
	
	if( flag == "P" ){
//		modal("SPPMC03900", "1","50", "50", "SPPMC03900", "", "", "sysmenu:hidden;");
		frmf_modal("SPPMC03900","SPPMC03900",null,null,1,50,50,null,null,null,null,null,"M");
	} else {
		frmf_setParameter("SPPMC03900_MSGYN", "N");
		fApproveHeallifeAmt2();
	}
}

/****************************************************************************************
 * Function			: fDisabledCheck
 * Description		: 컴포넌트 활성화 설정
 * Argument			: sGubun : 임플란트 1/2 구분
 *					: bFlag  : 활성화 여부(true/false)
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function fDisabledCheck(sGubun, bFlag) {
	if(sGubun == "Implant1") { 
		ds_main_implantinfo.setColumn(0,"reregkind1", "");
		ds_main_implantinfo.setColumn(0,"reregstart1","");
		ds_main_implantinfo.setColumn(0,"reregresn1", "");
		
		grp_implant1.sel_reregkind1.enable = bFlag;
		grp_implant1.sel_reregstart1.enable= bFlag;
		grp_implant1.sel_reregresn1.enable = bFlag;
	} else if (sGubun == "Implant2"){
		ds_main_implantinfo.setColumn(0,"reregkind2", "");
		ds_main_implantinfo.setColumn(0,"reregstart2","");
		ds_main_implantinfo.setColumn(0,"reregresn2", "");
		
		grp_implant2.sel_reregkind2.enable = bFlag;
		grp_implant2.sel_reregstart2.enable= bFlag;
		grp_implant2.sel_reregresn2.enable = bFlag;
	}
}

/****************************************************************************************
 * Function			: fSrchTootFact
 * Description		: 치식검색
 * Argument			: sGubun : 임플란트 1/2 구분
 *					: 
 * return type		: 
 * Creator			: 
 ****************************************************************************************/
function fSrchTootFact(sGubun) {
	var sDiagStr  = "diagcd▦tootfact▦rtntootfact▦rowcnt▩"; 
	var sDiagNm   = ds_main_implantinfo.getColumn(0,"diagcd") + "▦▦";
	var sTootFact = "";
	if(sGubun == "Implant1") { 
		sTootFact = ds_main_implantinfo.getColumn(0,"tootfact1");
	} else if (sGubun == "Implant2"){
		sTootFact = ds_main_implantinfo.getColumn(0,"tootfact2");
	}
	
	var sDiagStr  = sDiagStr + sDiagNm + sTootFact + "▦" + 1 +"▩";
	frmf_setParameter("param_diaglist", sDiagStr);
	
//	modal("SPMMO10500"); 
	frmf_modal("SPMMO10500","SPMMO10500",null,null,null,null,null,null,null,null,null,null,"M");

	if ( frmf_getParameter("rtn_useyn") == "Y" ) {
		var diaglen = frmf_getParameter("rtn_diagtootfact").split("▩").length;
		for ( var i=1; i < diaglen-1; i++ ) {
			var sSelTootFact = lf_getArrayData(frmf_getParameter("rtn_diagtootfact"), i, 2, "▩", "▦" );
			if(sSelTootFact.length == 3) {
				if(sGubun == "Implant1") {
					ds_main_implantinfo.setColumn(0,"tootfact1", sSelTootFact.substr(1,2));  
				} else if (sGubun == "Implant2"){
					ds_main_implantinfo.setColumn(0,"tootfact2", sSelTootFact.substr(1,2));  
				}
			} else {
				sysf_messageBox("치식은 반듯이 하나를 선택하셔야 합니다.", "I999");  
				return;	
			}
		}
	}
	
	frmf_clearParameter("rtn_useyn");
	frmf_clearParameter("param_diaglist");
	frmf_clearParameter("rtn_diagtootfact");
}

]]></Script>
  </Form>
</FDL>