YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO08200_관심환자등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO08200" position="absolute 0 0 585 343" titletext="관심환자등록" oninit="SPMMO08200_oninit" onload="SPMMO08200_onload">
    <Layouts>
      <Layout>
        <Static text="환자명" position="absolute 241 20 342 43" align="align:center middle;" id="caption1" class="cell_1"/>
        <Static text="관심분류명" position="absolute 241 69 342 92" align="align:center middle;" id="caption2" class="cell_1"/>
        <Static text="참고사항" position="absolute 0 116 101 206" align="align:center middle;" id="caption4" class="cell_1"/>
        <Edit readonly="true" position="absolute 344 21 445 41" id="opt_unitcd"/>
        <Combo position="absolute 344 70 445 90" id="cmb_unitflag" class="combo_search" enable="true" innerdataset="@ds_ccclist" datacolumn="conctypenm" codecolumn="conctypecd" onitemchanged="cmb_unitflag_onitemchanged"/>
        <TextArea position="absolute 103 118 585 204" id="textarea1" enable="true" ontextchanged="textarea1_ontextchanged"/>
        <Static text="적용시작일자" position="absolute 0 92 101 115" align="align:center middle;" id="caption5" class="cell_1"/>
        <Calendar position="absolute 103 94 204 114" id="ipt_fromdd" class="input_default" enable="true" dateformat="yyyy-MM-dd" value="null" onchanged="ipt_fromdd_onchanged" autoselect="true"/>
        <Static text="적용종료일자" position="absolute 241 93 342 116" align="align:center middle;" id="caption6" class="cell_1"/>
        <Calendar position="absolute 344 95 444 115" id="input1" class="input_default" enable="true" dateformat="yyyy-MM-dd" value="null" onchanged="input1_onchanged" autoselect="true"/>
        <Static text="분류구분" position="absolute 0 68 101 91" align="align:center middle;" id="caption7" class="cell_1"/>
        <Static text="등록번호" position="absolute 0 20 101 43" align="align:center middle;" id="caption3" class="cell_1"/>
        <Edit position="absolute 103 22 204 42" id="ipt_pid" autoselect="true" onkeydown="ipt_pid_onkeydown"/>
        <Static text="진료일자" position="absolute 0 44 101 67" align="align:center middle;" id="caption8" class="cell_1"/>
        <MaskEdit readonly="true" position="absolute 103 46 204 66" id="output2" maskchar="_" type="string" style="align:left middle;" mask="####-##-##" displaynulltext=" "/>
        <Static text="관심환자등록" position="absolute 0 0 134 20" id="caption24" class="tit_2"/>
        <Static text="관심환자 기존내역" position="absolute 0 220 134 240" id="caption9" class="tit_2"/>
        <Button position="absolute 521 206 577 226" id="button1" class="btn4" text="저장" onclick="button1_onclick"/>
        <Button position="absolute 464 206 520 226" id="button2" class="btn4" text="삭제" onclick="button2_onclick"/>
        <Button position="absolute 395 206 463 226" id="button3" class="btn4" text="초기화" onclick="button3_onclick"/>
        <Grid position="absolute 0 240 585 343" id="grd_concpatinfohist" binddataset="ds_grd_concpatinfohist" anchor="all" oncelldblclick="grd_concpatinfohist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="87"/>
                <Column size="208"/>
                <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 text="처리구분"/>
                <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="환자번호"/>
                <Cell col="13" text="진료일자"/>
                <Cell col="14" text="생성번호"/>
                <Cell col="15" text="발생구분코드"/>
              </Band>
              <Band id="body">
                <Cell text="bind:status"/>
                <Cell col="1" text="bind:genrdd"/>
                <Cell col="2" text="bind:genrno"/>
                <Cell col="3" text="bind:instcd"/>
                <Cell col="4" text="bind:conckindcd"/>
                <Cell col="5" text="bind:conctrgtcd"/>
                <Cell col="6" text="bind:conctypecd"/>
                <Cell col="7" style="align:left middle;" text="bind:conctypenm"/>
                <Cell col="8" style="align:left middle;" text="bind:hngnm"/>
                <Cell col="9" text="bind:valifromdd" mask="expr:utlf_isNull(valifromdd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                <Cell col="10" text="bind:valitodd" mask="expr:utlf_isNull(valitodd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                <Cell col="11" style="align:left middle;" text="bind:concremfact"/>
                <Cell col="12" text="bind:kornm"/>
                <Cell col="13" text="bind:orddd"/>
                <Cell col="14" text="bind:cretno"/>
                <Cell col="15" text="bind:genrflagcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 447 69 527 89" id="button4" class="btn3" text="분류등록" onclick="button4_onclick"/>
        <Radio position="absolute 104 72 204 92" id="radio1" columncount="2" rowcount="1" codecolumn="cdid" datacolumn="cdnm" onitemchanged="radio1_onitemchanged" innerdataset="ds_M0001">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">P</Col>
                <Col id="datacolumn">개인</Col>
              </Row>
              <Row>
                <Col id="codecolumn">D</Col>
                <Col id="datacolumn">과</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static position="absolute 345 46 441 66" align="align:center middle;" id="caption11" visible="false"/>
        <Button position="absolute 338 206 394 226" id="button5" class="btn1" text="조회" onclick="button5_onclick"/>
        <Button position="absolute 130 218 224 238" id="button6" class="btn2" text="관심환자조회" onclick="button6_onclick"/>
        <Button position="absolute 206 22 226 42" id="btn_search" class="icon_search" text="" onclick="btn_search_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_ccclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="conctypenm" type="STRING" size="256"/>
          <Column id="conctypecd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_concpatinfohist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256"/>
          <Column id="genrdd" type="STRING" size="256"/>
          <Column id="genrno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="conckindcd" type="STRING" size="256"/>
          <Column id="conctrgtcd" type="STRING" size="256"/>
          <Column id="conctypecd" type="STRING" size="256"/>
          <Column id="conctypenm" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="valifromdd" type="STRING" size="256"/>
          <Column id="valitodd" type="STRING" size="256"/>
          <Column id="concremfact" type="STRING" size="256"/>
          <Column id="kornm" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="genrflagcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="today" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_concpatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256"/>
          <Column id="genrdd" type="STRING" size="256"/>
          <Column id="genrno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="conckindcd" type="STRING" size="256"/>
          <Column id="conctrgtcd" type="STRING" size="256"/>
          <Column id="conctypecd" type="STRING" size="256"/>
          <Column id="conctypenm" type="STRING" size="256"/>
          <Column id="valifromdd" type="STRING" size="256"/>
          <Column id="valitodd" type="STRING" size="256"/>
          <Column id="concremfact" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="dd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="conckindcd">P</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256"/>
          <Column id="statusnm" type="STRING" size="256"/>
          <Column id="dd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_ccclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" sumtext="구분"/>
          <Column id="conckindcd" type="STRING" size="256" sumtext="관심종류코드"/>
          <Column id="conctrgtcd" type="STRING" size="256" sumtext="관심대상코드"/>
          <Column id="conctypecd" type="INT" size="256" sumtext="관심분류코드"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="conctypenm" type="STRING" size="256" sumtext="관심분류명"/>
          <Column id="valifromdd" type="STRING" size="256" sumtext="유효시작일자"/>
          <Column id="valitodd" type="STRING" size="256" sumtext="유효종료일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" sumtext="처리구분"/>
          <Column id="genrdd" type="STRING" size="256" sumtext="발생일자"/>
          <Column id="genrno" type="STRING" size="256" sumtext="발생번호"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="conckindcd" type="STRING" size="256" sumtext="관심종류코드"/>
          <Column id="conctrgtcd" type="STRING" size="256" sumtext="관심대상코드"/>
          <Column id="conctypecd" type="INT" size="256" sumtext="관심분류코드"/>
          <Column id="valifromdd" type="STRING" size="256" sumtext="유효시작일자"/>
          <Column id="valitodd" type="STRING" size="256" sumtext="유효종료일자"/>
          <Column id="concremfact" type="STRING" size="256" sumtext="참고사항"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
          <Column id="genrflagcd" type="STRING" size="256" sumtext="발생구분코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_M0001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" 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="false">
        <ColumnInfo>
          <Column id="cond1" type="STRING" size="256" sumtext="검색조건(1:등록번호,2:이름)"/>
          <Column id="cond2" type="STRING" size="256" sumtext="등록번호또는이름"/>
          <Column id="cond3" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="cond4" type="STRING" size="256" sumtext="원무키기준조회여부(Y/N):N(이름)"/>
          <Column id="cond5" type="STRING" size="256" sumtext="당일기준조회여부(Y/N)"/>
          <Column id="cond6" type="STRING" size="256" sumtext="외래/입원테이블구분(O:외래/I:입원/-:전체)"/>
          <Column id="cond7" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cond8" type="STRING" size="256" sumtext="진료일자(입원일자)"/>
          <Column id="cond9" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="cond10" type="STRING" size="256" sumtext="fromdd"/>
          <Column id="cond11" type="STRING" size="256" sumtext="todd"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patordinfolist" 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="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="이름"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="brthdd" type="STRING" size="256" sumtext="생일"/>
          <Column id="hometel" type="STRING" size="256" sumtext="집전화"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="핸드폰"/>
          <Column id="etctel1" type="STRING" size="256" sumtext="기타연락처"/>
          <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호1"/>
          <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호2"/>
          <Column id="zipcdseq" type="STRING" size="256" sumtext="우편번호seq"/>
          <Column id="addr" type="STRING" size="256" sumtext="주소"/>
          <Column id="detladdr" type="STRING" size="256" sumtext="상세주소"/>
          <Column id="email" type="STRING" size="256" sumtext="이메일"/>
          <Column id="recmyn" type="STRING" size="256" sumtext="관계여부"/>
          <Column id="recmernm" type="STRING" size="256" sumtext="관계"/>
          <Column id="recmerrela" type="STRING" size="256" sumtext="종교"/>
          <Column id="vipyn" type="STRING" size="256" sumtext="VIP여부"/>
          <Column id="viprem" type="STRING" size="256" sumtext="VIP"/>
          <Column id="religncd" type="STRING" size="256" sumtext="종교"/>
          <Column id="remfact" type="STRING" size="256" sumtext="참고"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자(입원일경우입원일자)"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="acptseqno" type="STRING" size="256" sumtext="접수일련번호(입원일경우seqno)"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="외래입원구분"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료부서코드"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료부서명"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="진료의명"/>
          <Column id="drvalidyn" type="STRING" size="256" sumtext="진료의퇴직유무"/>
          <Column id="specordyn" type="STRING" size="256" sumtext="진료의특진유무"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
          <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="suppkind" type="STRING" size="256" sumtext="보조유형"/>
          <Column id="indschacptstat" type="STRING" size="256" sumtext="입퇴원접수상태"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
          <Column id="insukindcd" type="STRING" size="256" sumtext="보험유형코드"/>
          <Column id="rsrvflag" type="STRING" size="256" sumtext="예약구분"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_concpatinfo" columnid="pid"/>
      <BindItem id="item1" compid="opt_unitcd" propid="value" datasetid="ds_concpatinfo" columnid="hngnm"/>
      <BindItem id="item2" compid="output2" propid="value" datasetid="ds_cond" columnid="dd"/>
      <BindItem id="item3" compid="caption11" propid="text" datasetid="ds_cond" columnid="status"/>
      <BindItem id="item4" compid="radio1" propid="value" datasetid="ds_concpatinfo" columnid="conckindcd"/>
      <BindItem id="item5" compid="cmb_unitflag" propid="value" datasetid="ds_concpatinfo" columnid="conctypecd"/>
      <BindItem id="item6" compid="ipt_fromdd" propid="value" datasetid="ds_concpatinfo" columnid="valifromdd"/>
      <BindItem id="item7" compid="input1" propid="value" datasetid="ds_concpatinfo" columnid="valitodd"/>
      <BindItem id="item8" compid="textarea1" propid="value" datasetid="ds_concpatinfo" columnid="concremfact"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/*
  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩

    관심환자등록 (SPMMO08200_관심환자등록. xfdl - JScript )

  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
*/

include "com_commonxp::comm_main.xjs"

var sPATINFO_PARAM; // 환자의 등록번호, 입원(외래)일자 및 한글명을 받는 Parameter


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

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

function ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		frmf_inputEnterKey("btn_search", "onclick", new ClickEventInfo);
	}
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fAfSignPatSrch();
}

function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_setParameter("conckindcd", ds_concpatinfo.getColumn(0, "conckindcd"));	
	frmf_modal("SPMMO08300", "SPMMO08300", null, null, null, null, null, null, null, null, null, null, "M");
	var conctypecd = frmf_getParameter("conctypecd");
	var conckindcd = frmf_getParameter("conckindcd");

	ds_concpatinfo.setColumn(0, "conckindcd", conckindcd);
	fReqConcTypeCd();
	ds_concpatinfo.setColumn(0, "conctypecd", conctypecd);
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMMMO08100", "SMMMO08100", null, null, null, null, null, null, null, null, null, null, "M");
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqConcPatInfo();
}

function radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fReqConcTypeCd();
	fReqConcPatInfo();
}

function cmb_unitflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetUpdtStatus();
}

function ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fSetUpdtStatus();
}

function input1_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fSetUpdtStatus();
}

function textarea1_ontextchanged(obj:TextArea,  e:TextChangedEventInfo)
{
	fSetUpdtStatus();
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fRgstNewConcPatInfo();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var status = ds_concpatinfo.getColumn(0, "status");
	if(status == "i"){
		ds_concpatinfo.clearData();
		ds_concpatinfo.addRow();				
	}else{
		ds_concpatinfo.setColumn(0, "status", "d");
		
		ds_savedata.copyData(ds_concpatinfo);
		
		var oParam = {};
		oParam.id      = "TXMMO08203";
		oParam.service = "prcpmngtapp.ConcPatMngt";
		oParam.method  = "reqExeSaveConcPatInfo";
		oParam.inds    = "req=" + "ds_savedata";
		oParam.outds   = "ds_grd_concpatinfohist=concpatinfohist";
		oParam.async   = false;

		tranf_submit(oParam);
	}
	
	var totRow = ds_grd_concpatinfohist.rowcount;
    if(totRow < 1){		
		ds_cond.setColumn(0, "status", "i");
		ds_cond.setColumn(0, "statusnm", "신규등록");
    }else{		
		ds_concpatinfo.copyRow(0, ds_grd_concpatinfohist, ds_grd_concpatinfohist.rowposition);
    }
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveConcPatInfo();
}

function grd_concpatinfohist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fSelectConcPatInfo();
}

/**
 * @desc   : 화면 초기화
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitialize(){  
	ds_init.setColumn(0, "today", utlf_getCurrentDate());
	ds_concpatinfo.setColumn(0, "valifromdd", utlf_getCurrentDate());
	ds_concpatinfo.setColumn(0, "valitodd", "99991231");
	
	appf_getCodeList([{dsNm: "ds_M0001", cdGrpId: "M0001"}], true);	
	ds_M0001.keystring.current = "S:-cdid";		// 과, 개인 순으로 데이터가 넘어오기때문에 개인, 과 순서로 재정렬해서 사용함

	if(frmf_checkOpener()){
		sPATINFO_PARAM = opener.frmf_getParameter("param");
	    fSetPatInfo(sPATINFO_PARAM);
	    fReqConcPatInfo();			//관심환자 정보 조회
	    fReqConcTypeCd();           //관심분류코드 조회
	}
}

/**
 * @desc   : 관심환자 정보 설정
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetPatInfo(param){	
    //param구조 genrflagcd + "▩" + pid + "▩" + hngnm + "▩" + indd + "▩" + cretno + "▩" + seqno + "▩" + instcd;
	if(!utlf_isNull(param)){
		var paramArray = param.split("▩");
		
		ds_concpatinfo.setColumn(0, "pid"       , paramArray[1]);
		ds_cond.setColumn(0, "dd"        		, paramArray[3]);
		ds_concpatinfo.setColumn(0, "hngnm"     , paramArray[2]);
		ds_concpatinfo.setColumn(0, "instcd"    , paramArray[6]);
		ds_concpatinfo.setColumn(0, "valifromdd", ds_init.getColumn(0, "today"));		
	} else{		
		var paminfo = sysf_getGlobalVariable("paminfo");
		dsf_setCSVToDataset("ds_paminfo", paminfo);
		
		ds_concpatinfo.setColumn(0, "pid"       , appf_getPatientInfo("pid"));			
		ds_concpatinfo.setColumn(0, "hngnm"     , appf_getPatientInfo("pname"));
		ds_concpatinfo.setColumn(0, "instcd"    , sysf_getUserInfo("posinstcd"));
		ds_concpatinfo.setColumn(0, "valifromdd", ds_init.getColumn(0, "today"));
		
		var patflag = sysf_getGlobalVariable("patflag");
		if(!utlf_isNull(patflag)) {
			var ioflag = patflag.split("▩")[1];			
			var dd = ds_paminfo.getColumn(0, (ioflag == "O" || ioflag == "S") ? "orddd" : "indd");			
			ds_cond.setColumn(0, "dd", dd);
		}
	}
}

/**
 * @desc   : 관심환자 조회
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReqConcPatInfo(){
	ds_reqdata.copyData(ds_concpatinfo);
	
	var oParam = {};
		oParam.id      = "TRMMO08203";
		oParam.service = "prcpmngtapp.ConcPatMngt";
		oParam.method  = "reqGetConcPatInfo";
		oParam.inds    = "req=" + "ds_reqdata";
		oParam.outds   = "ds_grd_concpatinfohist=concpatinfohist";
		oParam.async   = false;
		oParam.callback = "cf_TRMMO08203";

	tranf_submit(oParam);
}

function cf_TRMMO08203(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0) return;
	
	var totRow = ds_grd_concpatinfohist.rowcount;
    if(totRow < 1){		
		ds_cond.setColumn(0, "status", "i");
		ds_cond.setColumn(0, "statusnm", "신규등록");
    }else{		
		ds_concpatinfo.copyRow(0, ds_grd_concpatinfohist, ds_grd_concpatinfohist.rowposition);
    }
}

/**
 * @desc   : 관심환자 정보 수정 상태로 변경
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetUpdtStatus(){
    var status = ds_cond.getColumn(0, "status");
    if(status == "i"){
        return;
    }else{
        ds_cond.setColumn(0, "status", "u");
        ds_cond.setColumn(0, "statusnm", "수정 중");
    }
}

/**
 * @desc   : 신규 관심환자 등록
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fRgstNewConcPatInfo(){
	ds_concpatinfo.clearData();
	ds_concpatinfo.addRow();
    
    fSetPatInfo(sPATINFO_PARAM);
    
    ds_concpatinfo.setColumn(0, "conckindcd", "P");
    ds_cond.setColumn(0, "status"    , "i");
    ds_cond.setColumn(0, "statusnm"  , "신규등록");
    //model.setValue(sCONDITION_PATH   + "/valitodd"  , "99991231");
    //091103 박유진 초기화시 초기 todd 지정되지 않아 수정함.
    ds_concpatinfo.setColumn(0, "valitodd"  , "99991231");
}

/**
 * @desc   : 관심분류명 및 코드 조회
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReqConcTypeCd(){
	ds_reqdata.clear();
	ds_reqdata.addColumn("conckindcd", "string");	
	ds_reqdata.addRow();
    ds_reqdata.setColumn(0, "conckindcd", ds_concpatinfo.getColumn(0, "conckindcd"));
        
    var oParam = {};
		oParam.id      = "TRMMO08301";
		oParam.service = "prcpmngtapp.ConcPatMngt";
		oParam.method  = "reqGetConcTypeCdList";
		oParam.inds    = "req=" + "ds_reqdata";
		oParam.outds   = "ds_ccclist=ccclist";
		oParam.async   = false;

	tranf_submit(oParam);
}

/**
 * @desc   : 관심환자정보 저장
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSaveConcPatInfo(){
	if(utlf_isNull(ipt_pid.value)){
		sysf_messageBox("등록번호를", "C001");
        return;
	}

	if(utlf_isNull(opt_unitcd.value)){
		sysf_messageBox("환자명을", "C001");
        return;
	}


    var conctypecd = ds_concpatinfo.getColumn(0, "conctypecd");
    if(conctypecd == ""){ //관심분류명을 선택하지 않은 경우 error!!
        sysf_messageBox("분류명을", "C001");
        return;
    }
    
    ds_savedata.copyData(ds_concpatinfo);
    ds_savedata.setColumn(0, "status", ds_cond.getColumn(0, "status"));
		
	var oParam = {};
	oParam.id      = "TXMMO08203";
	oParam.service = "prcpmngtapp.ConcPatMngt";
	oParam.method  = "reqExeSaveConcPatInfo";
	oParam.inds    = "req=" + "ds_savedata";
	oParam.outds   = "ds_grd_concpatinfohist=concpatinfohist";
	oParam.async   = false;

	tranf_submit(oParam);
	
	if(ds_grd_concpatinfohist.rowcount > 0) {
		ds_grd_concpatinfohist.rowposition = 0;
		fSelectConcPatInfo();
	}
}

/**
 * @desc   : 관심환자정보 선택 - 상세 정보를 보여줌, 수정할 수 있도록 처리함
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSelectConcPatInfo(){
    ds_concpatinfo.copyRow(0, ds_grd_concpatinfohist, ds_grd_concpatinfohist.rowposition);
    ds_cond.setColumn(0, "status", "u");
}

/**
 * @desc   : 등록번호로 환자검색 
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAfSignPatSrch(){ 	
	
	var fPid = ds_concpatinfo.getColumn(0, "pid");

	if(utlf_isNull(fPid)){
		fPid = getPatientInfo("pid");
	}

	if(utlf_isNull(fPid)){
		sysf_messageBox("등록번호를", "C001");
		return;
	}
	
	ds_send.setColumn(0, "cond1",  "1");
	ds_send.setColumn(0, "cond2",  fPid);	
	ds_send.setColumn(0, "cond3", sysf_getUserInfo("dutplceinstcd")); 
	ds_send.setColumn(0, "cond4", "N"); 
	ds_send.setColumn(0, "cond5", "N"); 
	ds_send.setColumn(0, "cond6", "-"); 
	ds_send.setColumn(0, "cond10", ((utlf_getCurrentDate().toDate()).getAddDate(-3,"M")).getDateFormat());
	ds_send.setColumn(0, "cond11", utlf_getCurrentDate());
	
	var oParam = {};
	oParam.id      = "TRMMO00200";
	oParam.service = "prcpmngtapp.PrcpMngt";
	oParam.method  = "reqGetComnPatOrdInfo";
	oParam.inds    = "req=" + "ds_send";
	oParam.outds   = "ds_patordinfolist=patordinfolist";
	oParam.async   = false;
	oParam.callback = "cf_TRMMO00200";

	tranf_submit(oParam);
}

function cf_TRMMO00200(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0) {	//검색 시작 값이 없으면 clear 한다.
		fClearAddPrcp();
		return;
	}
	
	var currentDate = utlf_getCurrentDate(); 
	
	frmf_setParameter ( "SPMMO09100_paminfoyn", "N");
	//model.setValue("/root/formerkey/pseuacptflag", "N");

	
	if ( ds_patordinfolist.rowcount >= 1 ) { //값이 한개이상이면 팝업을 띄운다. 		
		var mon = sysf_getCurrentMonitorNumber();
		var xpt = this.getOwnerFrame().position.x + 57;
		var ypt = this.getOwnerFrame().position.y + 106;
		
		var objArg = new Object();
			objArg.ds_patordinfolist = ds_patordinfolist;

		frmf_modal("SPMMO09100", "SPMMO09100", objArg, false, mon, xpt, ypt, null, null, null, null, null, "M");

		// 팝업에서 취소 시 이벤트 처리 
		var cancelKey = frmf_getParameter("SPMMO09100_rtnyn"); 
		if (cancelKey != "Y") { 
			fClearAddPrcp(); 
			frmf_clearParameter("SPMMO09100_rtnyn"); 
			frmf_clearParameter("SPMMO09100_paminfoyn");
			return ; 
		}
		
		ds_patordinfolist.clear();
		var rtnparam = frmf_getParameter( "SPMMO09100_rtn_param");		
		dsf_setCSVToDataset("ds_patordinfolist", rtnparam);

		var pid =  frmf_getParameter ( "SPMMO09100_pid" );
		var orddd = frmf_getParameter ( "SPMMO09100_orddd");
		var cretno = frmf_getParameter ( "SPMMO09100_cretno");
		var instcd = frmf_getParameter ( "SPMMO09100_instcd");
		var ioflag = frmf_getParameter ( "SPMMO09100_ioflag");	
		var orddeptcd = frmf_getParameter ( "SPMMO09100_orddeptcd");	
		var orddrid = frmf_getParameter ( "SPMMO09100_orddrid");	
		var indschacptstat = frmf_getParameter ( "SPMMO09100_indschacptstat");	
		var dschdd = frmf_getParameter ( "SPMMO09100_dschdd");	
		var insukind = frmf_getParameter ( "SPMMO09100_insukind");	
		var suppkind = frmf_getParameter ( "SPMMO09100_suppkind");	
		
		ds_concpatinfo.setColumn(0, "hngnm",  ds_patordinfolist.getColumn(0, "hngnm"));		
		ds_concpatinfo.setColumn(0, "instcd", ds_patordinfolist.getColumn(0, "instcd"));
		ds_cond.setColumn(0, "dd", ds_patordinfolist.getColumn(0, "orddd"));
		
/*
		if ( getParameter ( "SPMMO09100_dc") != "DC" ) { 
			// 진료일과 현재일이 다른 경우 가접수 후 데이타 셋팅. 20090604 퇴원후 바로 가접수처리건때문에 외래에만 적용. 
			//if ( currentDate != orddd ) { 									
				if ( currentDate != orddd && (ioflag == "O" || ioflag == "S")) {
					// 진단명 조회를 위한 구 키 셋팅 
					model.setValue("/root/formerkey/pid", pid);
					model.setValue("/root/formerkey/orddd_old", orddd);
					model.setValue("/root/formerkey/cretno_old", cretno);
					model.setValue("/root/formerkey/instcd", instcd);
					model.setValue("/root/formerkey/genrflagcd_old", ioflag);
					model.setValue("/root/formerkey/pseuacptflag", "Y");											
					
					var returnkey = fSetAssumAccept(pid, orddd, cretno, "O"); 
					if (returnkey == false)  return ; 
					
					pid =  model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_pid" ); 
					orddd = model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_orddd" ); 
					cretno = model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_cretno" ); 
	
					model.setValue("/root/formerkey/orddd", orddd);
					model.setValue("/root/formerkey/cretno", cretno);
					model.setValue("/root/formerkey/genrflagcd", ioflag);  								
				} else if ( (ioflag == "I" || ioflag == "D" || ioflag == "E") && indschacptstat == "D" ) {
					// 진단명 조회를 위한 구 키 셋팅 
					model.setValue("/root/formerkey/pid", pid);
					model.setValue("/root/formerkey/orddd_old", orddd);
					model.setValue("/root/formerkey/cretno_old", cretno);
					model.setValue("/root/formerkey/instcd", instcd);
					model.setValue("/root/formerkey/genrflagcd_old", ioflag);
					model.setValue("/root/formerkey/pseuacptflag", "Y");	
					
					var returnkey = fSetAssumAccept(pid, orddd, cretno, "I", orddeptcd, orddrid, insukind, suppkind ); 
					if (returnkey == false)  return ; 
					
					pid =  model.getValue ( "/root/followup/followup/otpt_pid" ); 
					orddd = model.getValue ( "/root/followup/followup/otpt_orddd" ); 
					cretno = model.getValue ( "/root/followup/followup/otpt_cretno" );	
					ioflag = "O" ; 	//   강제로 외래 셋팅 
					model.setValue( "/root/patordinfo/patordinfolist/ioflag", ioflag); 
					
					model.setValue("/root/formerkey/orddd", orddd);
					model.setValue("/root/formerkey/cretno", cretno);
					model.setValue("/root/formerkey/genrflagcd", ioflag);  								
				}
			//}
		}	
*/
		frmf_clearParameter("SPMMO09100_pid" );
		frmf_clearParameter("SPMMO09100_orddd");
		frmf_clearParameter("SPMMO09100_cretno");
		frmf_clearParameter("SPMMO09100_instcd");
		frmf_clearParameter("SPMMO09100_ioflag");	
		frmf_clearParameter("SPMMO09100_orddeptcd");	
		frmf_clearParameter("SPMMO09100_orddrid");		
		frmf_clearParameter("SPMMO09100_indschacptstat");		
		frmf_clearParameter("SPMMO09100_dschdd");		
		frmf_clearParameter("SPMMO09100_dc");		
		frmf_clearParameter("SPMMO09100_insukind");		
		frmf_clearParameter("SPMMO09100_suppkind");		
/*
		if ( isNull(pid )) {
			fClearAddPrcp();
		} else {
			fAddPrcpInitConDone( pid, orddd, cretno, instcd, ioflag , "N",  dschdd );	
			fPatDethInfo(); //사망환자 alert(2009.12.21 JJE)
		}
*/
	}
}

function fClearAddPrcp() {
//cmb_prcpdd.visible = false;
//cmb_issdept.visible = false;
//cmb_hosinprcpresn.visible = false;
//caption14.visible = false;
//cmb_prcpkind.visible = false;			
//			btn_prcpsave.disabled = true;

//model.setValue ( "/root/init/srchcond2","" );					
//model.setValue ( "/root/init/srchcond3","" );		
//model.setValue ( "/root/init/rrgstno2","" );		
//model.setValue ( "/root/init/orddeptnm","" );															
//model.removeNodeSet ( "/root/main/diaginfo/diagcdlist");
//model.removeNodeSet ( "/root/main/prcp/prcplist");
//model.removeNodeSet ( "/root/paminfo/list");					
//model.removeNodeSet ( "/root/patflag/list");	
//output2.value = "";
//output3.value = "";
//output4.value = "";										
//output6.value = "";										
//output7.value = "";																		
//appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" )				       				       				       				       				       
//btn_prmsprcp.selected = true;
//ivw_prcp.src = "SMMMO02300_약속처방.xrw";						
//btn_issdept.visible = false;
//model.refresh();														
return;			
}
]]></Script>
  </Form>
</FDL>