YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMO02900_처방진료대상자.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMO02900" position="absolute 0 0 382 635" titletext="처방진료대상자" oninit="SMMMO02900_oninit" onload="SMMMO02900_onload">
    <Layouts>
      <Layout>
        <Div id="Div00" taborder="1" text="Div00" position="absolute 0 0 382 80" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="caption1" text="진료일 :" class="search_name" position="absolute 10 7 70 27" anchor="default"/>
              <Static id="caption2" text="진료과 :" class="search_name" position="absolute 10 33 70 50" anchor="default"/>
              <Static id="caption4" text="환자구분 :" position="absolute 10 58 85 75" anchor="default" class="search_name"/>
              <Calendar id="ipt_orddd" taborder="0" position="absolute 84 7 176 27" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Radio id="cmb_ordtype" taborder="4" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 340 56 382 76" anchor="default" onitemchanged="Div00_cmb_ordtype_onitemchanged" visible="false">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio id="rdo_patflagstat" taborder="1" columncount="5" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 90 56 358 76" anchor="default" onitemchanged="Div00_rdo_patflagstat_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">-</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">D</Col>
                      <Col id="datacolumn">퇴원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">P</Col>
                      <Col id="datacolumn">입원예정</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">F</Col>
                      <Col id="datacolumn">입실완료</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Radio id="rdo_patflag" taborder="3" columncount="5" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 90 56 358 76" anchor="default" onitemchanged="Div00_rdo_patflag_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">-</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">9</Col>
                      <Col id="datacolumn">미접수</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">접수</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">대기</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">완료</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Button id="btn_search" taborder="2" text="조회" class="btn1" position="absolute 316 7 372 27" anchor="default" onclick="Div00_btn_search_onclick"/>
              <Combo id="cmb_orddept" taborder="5" innerdataset="@ds_orddept" codecolumn="deptcd" datacolumn="depthngnm" position="absolute 84 33 209 53" anchor="default" onitemchanged="Div00_cmb_orddept_onitemchanged"/>
              <Static id="caption5" text="진료의 :" class="search_name" position="absolute 223 33 283 53" anchor="default"/>
              <Combo id="cmb_orddrid" taborder="6" innerdataset="@ds_userlist" codecolumn="userid" datacolumn="usernm" position="absolute 286 33 372 53" anchor="default" onitemchanged="Div00_cmb_orddrid_onitemchanged"/>
              <CheckBox id="chk_delay" taborder="7" text="분 지연표시" value="N" truevalue="Y" falsevalue="N" onclick="Div00_chk_delay_onclick" visible="false" position="absolute 193 7 304 27" style="textpadding:0 0 0 29;"/>
              <Edit id="edt_delaytime" taborder="8" inputfilter="dot,comma,sign,symbol,alpha,space" inputtype="number,digit" maxlength="2" autoselect="true" visible="false" position="absolute 213 7 238 27"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_inpatlist" taborder="3" binddataset="ds_main_inpatlist" position="absolute 0 83 382 635" visible="false" oncelldblclick="grd_inpatlist_oncelldblclick" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="76"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="77"/>
                <Column size="0"/>
                <Column size="49"/>
                <Column size="57"/>
                <Column size="57"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="등록번호"/>
                <Cell col="1" text="cretno"/>
                <Cell col="2" text="indd"/>
                <Cell col="3" text="instcd"/>
                <Cell col="4" text="이름"/>
                <Cell col="5" text="color"/>
                <Cell col="6" text="SA"/>
                <Cell col="7" text="병실"/>
                <Cell col="8" text="익일정규"/>
                <Cell col="9" text="ioflag"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:cretno"/>
                <Cell col="2" text="bind:indd"/>
                <Cell col="3" text="bind:instcd"/>
                <Cell col="4" text="bind:hngnm"/>
                <Cell col="5" text="bind:color"/>
                <Cell col="6" text="bind:sa"/>
                <Cell col="7" text="bind:roomcd"/>
                <Cell col="8" text="bind:dayregular"/>
                <Cell col="9" text="bind:ioflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_outpatlist" taborder="2" binddataset="ds_main_outpatlist" position="absolute 0 83 382 635" visible="false" oncelldblclick="grd_outpatlist_oncelldblclick" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="38"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="40"/>
                <Column size="51"/>
                <Column size="62"/>
                <Column size="40"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="instcd"/>
                <Cell col="2" text="orddd"/>
                <Cell col="3" text="cretno"/>
                <Cell col="4" text="시간"/>
                <Cell col="5" text="등록번호"/>
                <Cell col="6" text="이름"/>
                <Cell col="7" text="SA"/>
                <Cell col="8" text="초재진"/>
                <Cell col="9" text="보험유형"/>
                <Cell col="10" text="심사"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" text="bind:instcd"/>
                <Cell col="2" text="bind:orddd"/>
                <Cell col="3" text="bind:cretno"/>
                <Cell col="4" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:ordtm" mask="##:##"/>
                <Cell col="5" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:pid"/>
                <Cell col="6" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:hngnm"/>
                <Cell col="7" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:sa"/>
                <Cell col="8" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:fsexamflagnm"/>
                <Cell col="9" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:insukindnm"/>
                <Cell col="10" style="background:EXPR(fChngGrdCellColor(color));background2:EXPR(fChngGrdCellColor(color));" text="bind:bfjudgvalue"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_outpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="instcd"/>
          <Column id="orddd" type="STRING" size="256" sumtext="내원일"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="ioflag"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="이름"/>
          <Column id="sa" type="STRING" size="256" sumtext="성별/나이"/>
          <Column id="ordtm" type="STRING" size="256" sumtext="예약시간"/>
          <Column id="insukindnm" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="fsexamflagnm" type="STRING" size="256" sumtext="초재진"/>
          <Column id="color" type="STRING" size="256" sumtext="내환자 적용 환자 컬러"/>
          <Column id="bfjudgvalue" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_inpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="ioflag"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="이름"/>
          <Column id="sa" type="STRING" size="256" sumtext="성별/나이"/>
          <Column id="instcd" type="STRING" size="256" sumtext="instcd"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일"/>
          <Column id="color" type="STRING" size="256" sumtext="내환자 적용 환자 컬러"/>
          <Column id="repltype" type="STRING" size="256" sumtext="회신유형"/>
          <Column id="dayregular" type="STRING" size="256" sumtext="익일정규"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_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_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="elbulbodstat" type="STRING" size="256"/>
          <Column id="patflagstat" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="delayflag" type="STRING" size="256"/>
          <Column id="delaytime" type="STRING" size="256"/>
          <Column id="delayexpt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ordtype">O</Col>
            <Col id="elbulbodstat">1</Col>
            <Col id="patflagstat">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_root" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_reqdata2" 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="cretno" type="STRING" size="256" sumtext="원무생성번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="입원/진료일"/>
          <Column id="stnddd" type="STRING" size="256" sumtext="기준일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_opprcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="opprcpflag" type="STRING" size="256" sumtext="수술처방구분"/>
          <Column id="opcnfmdd" type="STRING" size="256" sumtext="수술확정일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_TRMMO04303" 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="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="I/O/E flag"/>
          <Column id="srchtabflag" type="STRING" size="256" sumtext="조회하는 대상자리스트 탭(I/O/D/E)"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_rsltgetdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpgno" type="STRING" size="256" sumtext="cpg번호"/>
          <Column id="cpghistseq" type="STRING" size="256" sumtext="cpg이력번호"/>
          <Column id="cpgappno" type="STRING" size="256" sumtext="적용번호"/>
          <Column id="histseq" type="STRING" size="256" sumtext="적용이력번호"/>
          <Column id="appdd" type="STRING" size="256" sumtext="적용일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="I/O/E flag"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="getformyn" type="STRING" size="256" sumtext="서식존재여부"/>
          <Column id="appyn" type="STRING" size="256" sumtext="적용여부"/>
          <Column id="appstat" type="STRING" size="256" sumtext="적용상태"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="cpg명"/>
          <Column id="prtlflagcd" type="STRING" size="256" sumtext="cp/cpg구분(01:CP/02:CPG)"/>
          <Column id="msgcnts" type="STRING" size="256" sumtext="출력Msg내용"/>
          <Column id="msgflag" type="STRING" size="256" sumtext="출력Msg구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqdata3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patuncoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="outuncoamt" type="INT" size="256" sumtext="외래미수"/>
          <Column id="unconm" type="STRING" size="256" sumtext="미수코드명"/>
          <Column id="dschuncoamt" type="INT" size="256" sumtext="퇴원미수"/>
          <Column id="aiduncoamt" type="INT" size="256" sumtext="후원회미수"/>
          <Column id="bogjamt" type="INT" size="256" sumtext="선수금"/>
          <Column id="bogjvipamt" type="INT" size="256" sumtext="외래수납VIP선수금"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_complaininfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="체크"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.ipt_orddd" propid="value" datasetid="ds_main_cond" columnid="orddd"/>
      <BindItem id="item1" compid="Div00.cmb_ordtype" propid="value" datasetid="ds_main_cond" columnid="ordtype"/>
      <BindItem id="item2" compid="Div00.cmb_orddept" propid="value" datasetid="ds_main_cond" columnid="orddeptcd"/>
      <BindItem id="item3" compid="Div00.cmb_orddrid" propid="value" datasetid="ds_main_cond" columnid="orddrid"/>
      <BindItem id="item4" compid="Div00.rdo_patflag" propid="value" datasetid="ds_main_cond" columnid="elbulbodstat"/>
      <BindItem id="item5" compid="Div00.rdo_patflagstat" propid="value" datasetid="ds_main_cond" columnid="patflagstat"/>
      <BindItem id="item9" compid="Div00.chk_delay" propid="value" datasetid="ds_cond" columnid="delayflag"/>
      <BindItem id="item10" compid="Div00.edt_delaytime" propid="value" datasetid="ds_cond" columnid="delaytime"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-08-29
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-08-29      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
include "emr_prcpmngtxp::SMMMO04100.xjs";

var oOpener = this.getOwnerFrame().form;

function SMMMO02900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	grdf_initGrid(grd_outpatlist);
	grdf_initGrid(grd_inpatlist);
}

function SMMMO02900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setToolTipBind(grd_outpatlist);
	grdf_setToolTipBind(grd_inpatlist);
	
	// cp 추가
	if(oOpener.name == "SMMMP00800") {	// TF는 CP에 해당노드가 없으면 처방의 노드를 참조함 / XP는 CP에 해당 DS가 없으면 에러남
		oOpener = grp_biz.grp_prcp.imp_prcp; 
	}
		
	fInitialize_SMMMO02900();
}

function refreshReqInterface() {
	fInitialize_SMMMO02900();
}

function Div00_cmb_ordtype_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fGrdInit();
	fChkGetData() ;
}

function Div00_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fChkGetData();
}

function Div00_cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sOrdDd = ds_main_cond.getColumn(0, "orddd");
	lf_mmbfGetUserComboList(ds_userlist, obj.value, "0330", "", "", sOrdDd);
	
	frmf_addComboItem("Div00.cmb_orddrid");	//의사콤보 전체항목 추가
	
	Div00.cmb_orddrid.index = 1;

	fChkGetData() ;
}

function Div00_cmb_orddrid_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fChkGetData() ;
}

function Div00_rdo_patflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fChkGetData() ;
}

function Div00_rdo_patflagstat_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fChkGetData() ;
}

function grd_outpatlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if (e.row < 0 || e.col < 0) return;
	
	fMiniOutPat();
}

function grd_inpatlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if (e.row < 0 || e.col < 0) return;
	
	fMiniInPat();
}

function Div00_chk_delay_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	fChkGetData();
}

//===================================================================
// 공통으로 사용하는 함수
//===================================================================

/**
 * @desc   : 화면 초기화
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fInitialize_SMMMO02900(){
    var cur_day  = utlf_getCurrentDate();
	var idate    = new Date();
	var peveDate = idate.getAddDate(-1, "D");
	
	ds_main_cond.setColumn(0, "orddd",  cur_day); 
	ds_main_cond.setColumn(0, "userid", sysf_getUserId());
	
	fGrdInit() ;
	
	var mainObj    = frmf_getMainViewer();
	var curCpObj   = mainObj.frmf_findPopup("SMMMP00800"); //활성화된 CP Main 화면 object loading
	var curPrcpObj = mainObj.frmf_findPopup("SMMMO00100"); //활성화된 처방Main 화면 object loading
	
	lf_mmbfGetDeptCodeComboList(ds_orddept, "D");
	lf_mmbfGetUserComboList(ds_userlist, sysf_getUserInfo("dutplcecd"), "0330");
	
	frmf_addComboItem("Div00.cmb_orddrid");	//의사콤보 전체항목 추가
	
	if(oOpener.ds_prcppatlist.rowcount > 0) { // 최초 오픈이 아니면
	    ds_main_cond.copyData(oOpener.ds_prcppatlist); 
	} else { // 최초 오픈일때
		ds_main_cond.setColumn(0, "orddeptcd", sysf_getUserInfo("dutplcecd"));
    	ds_main_cond.setColumn(0, "orddrid"  , sysf_getUserInfo("userid"));
    	
    	var sUserEnv057 = lf_mmbfGetUserEnvQuestValue("057"); // 진료대상자 외래탭 지연환자 표시여부
		if(sUserEnv057 == "001") { // 지연환자 표시일경우
			var sUserEnv058 = lf_mmbfGetUserEnvQuestValue("058"); // 진료대상자 외래탭 지연환자 지연시간
			var sUserEnv059 = lf_mmbfGetUserEnvQuestValue("059"); // 진료대상자 외래탭 지연환자 지연 제외시간
			
			if(sUserEnv058 == "001")        {   ds_main_cond.setColumn(0, "delaytime", "10");
			} else if(sUserEnv058 == "002") {   ds_main_cond.setColumn(0, "delaytime", "20");
			} else if(sUserEnv058 == "003") {   ds_main_cond.setColumn(0, "delaytime", "30");
			} else if(sUserEnv058 == "004") {   ds_main_cond.setColumn(0, "delaytime", "40");
			} else if(sUserEnv058 == "005") {   ds_main_cond.setColumn(0, "delaytime", "50");
			} else if(sUserEnv058 == "006") {   ds_main_cond.setColumn(0, "delaytime", "60");
			} else                          {   ds_main_cond.setColumn(0, "delaytime", "30");
			}
			
			if(sUserEnv059 == "001")        {   ds_main_cond.setColumn(0, "delayexpt", "0");
			} else if(sUserEnv059 == "002") {   ds_main_cond.setColumn(0, "delayexpt", "10");
			} else if(sUserEnv059 == "003") {   ds_main_cond.setColumn(0, "delayexpt", "20");
			} else if(sUserEnv059 == "004") {   ds_main_cond.setColumn(0, "delayexpt", "30");
			} else                          {   ds_main_cond.setColumn(0, "delayexpt", "10");
			}
		
			ds_main_cond.setColumn(0, "delayflag"  , "Y");
		} else {
			ds_main_cond.setColumn(0, "delayflag"  , "N");
		}
    }
	
	fChkGetData() ;	
}

/**
 * @desc   : 처방화면, CP화면에 modal로 뜬 화면이 있는지 여부를 검사한다.
 * @         수정 : 미니진료대상자에 맞게끔 내용 수정 
 * @ 
 * @param  :
 * @return : 
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fChkScrnModal(){  
    var cpflag = ds_root.getColumn(0, "cpflag"); //cpflag여부
    if(cpflag == "N"){
        var wndobj = frmf_findPopup("SMMMO00100");    
    }else if(cpflag == "Y"){
        var wndobj = frmf_findPopup("SMMMP00800");
    }    
    if(!utlf_isNull(wndobj)){
        var status = wndobj.frmf_getScreenDisabled();
        if(status == true){
            return false;
        }
    }
}

/**
 * @desc   : 처방Main 화면 Open, CP환자인 경우 CP Main 화면 Open 또는 CP검색화면 Open (CP업무 추가 2007.09.27)
 * @         
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fOpenPrcpMainWnd(){
    var cpflag  = ds_root.getColumn(0, "cpflag"); 
    var iRow = "";
    var pid  = "";
    var ordtype = ds_main_cond.getColumn(0, "ordtype");
    if(ordtype == "O") {
       iRow = ds_main_outpatlist.rowposition;
       pid  = ds_main_outpatlist.getColumn(iRow, "pid");
    } else {
       iRow = ds_main_inpatlist.rowposition;
       pid  = ds_main_outpatlist.getColumn(iRow, "pid");
    }
    
    var mainObj         = frmf_getMainViewer();    
	
    //alert(monitorNumber);
    curEmrRecObj        = frmf_findPopup("SMMRI00400"); //활성화된 진료기록 화면 object loading
    curExamRsltObj      = frmf_findPopup("SMAER00800"); //활성화된 검사결과 화면 object loading
    curNurTprObj        = frmf_findPopup("SMMNR00900"); //활성화된 간호 TPR 화면 object loading
    curNurBSEMRObj      = frmf_findPopup("SMMNR02500"); //활성화된 간호 TPR 화면 object loading
    curGrphObj          = frmf_findPopup("SPMRF05200"); //활성화된 그래프 서식 화면 object loading
    curCunsultObj       = frmf_findPopup("SMMMR05000"); //활성화된 Consult 화면 object loading
    curExamRsltNewObj   = frmf_findPopup("SMMMI00100"); //활성화된 검사결과 화면 object loading   
    var wndobj          = frmf_findPopup("SMMRI00400");
	if(!utlf_isNull(wndobj)){
	    wndobj.fClose();   //진료기록 화면 close
		//wndobj.javascript.fInitalize(); // 초기화함수 호출
		//activateChild("SMMRI00400");
	}    
    
    if(!utlf_isNull(curExamRsltObj)){ //검사결과 화면 refresh;
        curExamRsltObj.ds_singdata.setColumn(0, "srchpid", pid);
        curExamRsltObj.group3.grp_sea.btn_srch.click();
    } //검사결과 화면 refresh;

    if(!utlf_isNull(curNurTprObj)){      //간호 TPR 화면 refresh   : 2008-11-28 : 김영학 ;  
        curNurTprObj.fInitialize("init");
        curNurTprObj.fInitViewer();
        curNurTprObj.lf_emrSetTimer();
    } //간호 TPR 화면 refresh;    
    
    if(!utlf_isNull(curNurBSEMRObj)){      //혈당간호기록 refresh   : 2008-12-24 : 김영학 ;  
        curNurBSEMRObj.fInitialize("init");
    } //혈당간호기록  refresh;        

    if(!utlf_isNull(curGrphObj)){      //그래프 서식 refresh   : 2009-01-02 : 박민규 SW 요청 : 김영학 ;  
        curGrphObj.fInitialize();
    } //그래프 서식 refresh; 
    
    // [요청번호:20180905021] 성장곡선(2017) 관련 요청드립니다. 
    var curGrphNewObj = frmf_findPopup("SPMRF06100"); 
    if(!utlf_isNull(curGrphNewObj)){
        curGrphNewObj.fInitialize();
    }
    
    //if(!utlf_isNull(curCunsultObj) && consulyn !="T"){ // Consult refresh   :   2009-02-17 : 이상현 D/L 요청 : 김영학 ; 
	if(!utlf_isNull(curCunsultObj)) {
        curCunsultObj.fInitalize();
    } // Consult refresh
    
    if(!utlf_isNull(curExamRsltNewObj)){ //검사결과 화면 NEW refresh;    
        curExamRsltNewObj.ds_singdata.setColumn(0, "srchpid", pid );
		curExamRsltNewObj.group3.grp_sea.btn_srch.click();
    } 
    
    curCpObj     = mainObj.frmf_findPopup("SMMMP00800"); //활성화된 CP Main 화면 object loading     
    curPrcpObj   = mainObj.frmf_findPopup("SMMMO00100"); //활성화된 처방Main 화면 object loading
    curCpSrchObj = mainObj.frmf_findPopup("SPMMP01200"); //활성화된 CP 검색 화면 object loading

    if(cpflag == "N"){ //처방 Main Open    
		if(!utlf_isNull(curCpObj)){curCpObj.fCloseGPS();}               //활성화된 CP Main화면이 있는 경우 close
		if(!utlf_isNull(curCpSrchObj)){curCpSrchObj.fCpSrchWndClose();} //활성화된 CP검색화면이 있는 경우 close
   
		if(utlf_isNull(curPrcpObj)){ //활성화된 처방화면이 없는 경우, 신규화면을 오픈			
			mainObj.frmf_setParameter("SMMMO00100_ordrecflag", ds_main_cond.getColumn(0, "ordrecflag"));
			
			fChngMainEMRScrn();
			
			mainObj.frmf_open("SMMMO00100", "SMMMO00100", null, false, 2, null, null, 1195, 784, null, null, null, "M");
						
        }else{      
			if(curPrcpObj.fPrcpSavePatList()){} 
                   
			// 2015.03.25 기록과 처방창을 동시에 열기 위해 순서변경함, 여기서부터 (기존의 전처방에서 기록 띄우던 로직 제거)
			curPrcpObj.ds_init.setColumn(0, "fstopenflag", "Y"); //처방최초 open여부를 재설정, 진료기록을 열기위해
			//curPrcpObj.javascript.fChngMainScrn();
			fChngMainEMRScrn();
			
			curPrcpObj.ds_init.setColumn(0, "bfprcpload" , "N"); //전처방을 초기화한다.

			//curPrcpObj.javascript.fInitializeConDone();
			//curPrcpObj.javascript.fInitializeReady();
			curPrcpObj.fXReReady();

// 			curPrcpObj.ds_init.setColumn(0, "fstopenflag", "Y"); //처방최초 open여부를 재설정, 진료기록을 열기위해
// 			//curPrcpObj.javascript.fChngMainScrn();
// 			fChngMainEMRScrn();
			
			// 2015.03.25 기록과 처방창을 동시에 열기 위해 순서변경함, 여기까지 (기존의 전처방에서 기록 띄우던 로직 제거)
			mainObj.frmf_setFocus();
		}
    } else if(cpflag =="Y"){ //CP Main Open    
        if(!utlf_isNull(curPrcpObj)){curPrcpObj.fPrcpWndClose();}       //활성화된 처방Main화면이 있는 경우 close
        if(!utlf_isNull(curCpSrchObj)){curCpSrchObj.fCpSrchWndClose();} //활성화된 CP검색화면이 있는 경우 close
        
        if(utlf_isNull(curCpObj)){ //활성화된 CP화면이 없는 경우, 신규화면을 오픈
            mainObj.frmf_setParameter("SMMMO00100_ordrecflag", ds_main_cond.getColumn(0, "ordrecflag"));
            mainObj.frmf_open("SMMMP00800", "SMMMP00800", null, false, 2, null, null, 1228, 942, null, null, null, "M");
            //JJE- 삭제
            //fChngMainEMRScrn();
        
        } else{
            curCpObj.fReconstruct();
        }
    }else if(cpflag =="X"){ //CP 검색 Open
        if(!utlf_isNull(curCpObj)){curCpObj.fCloseGPS();}         //활성화된 CP Main화면이 있는 경우 close
        if(!utlf_isNull(curPrcpObj)){curPrcpObj.fPrcpWndClose();} //활성화된 처방Main화면이 있는 경우 close
        
        if(utlf_isNull(curCpSrchObj)){
		var monitorNumber   = sysf_getCurrentMonitorNumber();
		mainObj.frmf_open("SPMMP01200", "SPMMP01200", null, false, monitorNumber, null, null, 1195, 775, null, null, null, "M");
        }
    }
}

function fChngMainEMRScrn() {
	var mainobj = frmf_getMainViewer();
	var mainscrnid  = mainobj.frmf_getScreenID(); //메인화면의 기록지 ID
	var cpflag  = ds_root.getColumn(0, "cpflag");

	if (cpflag == "Y"){
	    var curPrcpObj = frmf_findPopup("SMMMP00800");
	} else {
	    var curPrcpObj = frmf_findPopup("SMMMO00100");	
	}

	var fstopenflag;
	var bfprcpload;
	var cpflag;
	
	if (!utlf_isNull(curPrcpObj)) {
		fstopenflag = curPrcpObj.ds_init.getColumn(0, "fstopenflag"); //처방화면이 최초 생성 여부
		bfprcpload  = curPrcpObj.ds_init.getColumn(0, "bfprcpload");  //전처방화면 최초 생성 여부
		cpflag      = curPrcpObj.ds_root.getColumn(0, "cp");          //CP화면여부
	}
	
	var ordrecflag = ds_main_cond.getColumn(0, "ordrecflag"); //OCS 체크여부
	var chngflag   = ds_main_cond.getColumn(0, "chngflag"); //OCS 체크여부
	
	if(!utlf_isNull(mainobj)){
    	var dutplcecd   = sysf_getUserInfo("dutplcecd");       //사용자부서
    	var operation   = sysf_getGlobalVariable("operation"); //수술정보
    	
    	var wndid       = "SMMMR00100";                   //진료기록화면이 default
    	    
	    if(fstopenflag != "N" || chngflag == "Y"){    //처방화면이 최초로 열린 경우, 진료대상자의 ocs체크값이 변경된 경우에는 메인화면 변경	        
	        if(bfprcpload != "Y"){ //전처방화면이 로딩된 여부,(단순히 tab변경인 경우에는 메인화면 변경 로직을 처리하지 않음	                                                  
                /*
                if(cpflag == "Y"){ //CP화면인 경우, CP초기화 후, 메인화면 변경 수행
                    var cpendflag = curPrcpObj.javascript.fReconstruct();
                    if(cpendflag == "True"){
                    }
                }
                */
	            
	            //if(cpendflag == "True"){ //CPMain의 fReconstruct()가 완료된 이후 진료기록 변경로직을 수행
	            	            
    	            if(dutplcecd == "2090000000" || dutplcecd == "2090300000"){ //사용자부서가 마취통증의학과, 통증클리닉인 경우    	                
    	                if(operation.length > 0){ //수술환자리스트에서 환자 선택된 경우, 메인화면은 '마취환자기록' loading
    	                    wndid = "SMMMR03700";    
    	                }else{
    	                    if(ordrecflag == "Y"){
    	                        wndid = "SMMMR00100";
    	                    }
    	                }    	                
    	            }else{
    	                if(ordrecflag == "Y"){
    	                    wndid = "SMMMR00100";    
    	                }  
    	            }
    	            
    	            if (!utlf_isNull(curPrcpObj)) {
						curPrcpObj.ds_init.setColumn(0, "bfprcpload" , "Y");
						curPrcpObj.ds_init.setColumn(0, "fstopenflag", "N");
					}
    
                    if(mainscrnid == wndid){
                        if(wndid == "SMMMR03700"){
                        	mainobj.fFormInit();                            
                        }else{
                            mainobj.fInitRecPamInfo();                            
                        }
                    }else{
                        //if(cpflag != "Y"){             
                            mainobj.frmf_openForm(wndid);
                        //}
                    }                    
                //}	            
	        }else{ //전처방화면이 최초 생성된 경우, bfprcpload를 Y로 변경, 추후 tab변경시 메인화면 변경이 되지 않게함
	            curPrcpObj.ds_init.setColumn(0, "bfprcpload", "Y");
	        }
    	}
    }
}

/**
 * @desc   : 환자 선택 후, 환자 정보 조회 및 기록지 화면 연동
 * @         수정 : 미니진료대상자에 맞게끔 내용 수정
 * @
 * @param  :
 * @return :
 * @author : 김영학
 * @---------------------------------------------------
 */
function fMiniInPat(){
	var ordrecflag = "Y";   
	var currow = ds_main_inpatlist.rowposition;
	if(currow < 0){
		return;
	}
   
	//처방, CP화면에 modal 또는 modaless가 뜬 경우, 환자 선택 불가
	if(fChkScrnModal()==false){
		return;
	}
   
	var pid      = ds_main_inpatlist.getColumn(currow, "pid");
	var hngnm    = ds_main_inpatlist.getColumn(currow, "hngnm");
	var reqptype = ds_main_inpatlist.getColumn(currow, "reqptype");
	var stnddd   = ds_main_cond.getColumn(0, "orddd");

	frmf_setParameter("SPMMO04200_openflag", "SPMMO04200");

	//환자수술 여부 및 수술처방 확인, 수술처방이 없는 경우 처방화면을 blocking
	if(fChkMiniPatOpPrcp(pid, stnddd)==false){
		var opcnfmdd = ds_opprcpinfo.getColumn(0, "opcnfmdd");
		opcnfmdd = opcnfmdd.substring(0, 4) + "-" + opcnfmdd.substring(4, 6) + "-" + opcnfmdd.substring(6, 8);
		sysf_messageBox("[" + hngnm + "]환자의 [" + opcnfmdd + "]일자 수술 처방을", "C001");
	}

	//CP환자 여부 확인
	if(fChkCPMiniPatValid(currow)==false){
		return;
	}

    //상단정보 설정 및 진료기록 처방화면 연동

    var mainObj = frmf_getMainViewer();  
/*      
    if(fReqInPatPamInfo()==true){
        opener.javascript.setParameter("SMMMO04100_reqptype", reqptype);        
        var cpflag = opener.model.getValue("/root/cpflag");
        var ordrecflag = opener.model.getValue("/root/main/cond/ordrecflag");
        var mainObj = getMainViewer();      
        if(cpflag == "Y"){
            mainObj.window.javascript.openEmrScrn("SMMMP00800"); //CP처방 화면
            
        }else if(cpflag == "X"){
            mainObj.window.javascript.openEmrScrn("SPMMP01200"); //CP검색 화면
            
        }else{
			opener.javascript.setParameter("SMMMO04100_reqptype", reqptype);   
			opener.javascript.fOpenPrcpMainWnd();
        }        
        
        if(cpflag == "Y" || cpflag == "X"){
	        if(ordrecflag == "Y"){
	            mainObj.window.javascript.openEmrScrn("SMMMB08100"); //empty
	            
	        }else{
	            mainObj.window.javascript.openEmrScrn("SMMMR00100"); //진료기록
	            
	        }
        }

    }  
*/   

	//상단정보 설정    
	if(fReqMiniInPatPamInfo()==true){
		frmf_setParameter("SMMMO04100_reqptype", reqptype);
		fOpenPrcpMainWnd();
	}
}

/**
 * @desc   : 입원환자 환자 기본정보설정
 * @         수정 : 미니진료대상자에 맞게끔 내용 수정  
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fReqMiniInPatPamInfo(){
    var iRow   = ds_main_inpatlist.rowposition;
    var pid    = ds_main_inpatlist.getColumn(iRow, "pid");
    var indd   = ds_main_inpatlist.getColumn(iRow, "indd");
    var cretno = ds_main_inpatlist.getColumn(iRow, "cretno");
    var instcd = ds_main_inpatlist.getColumn(iRow, "instcd");
    var srchdd = ds_main_cond.getColumn(0, "indd"); //조회일자
    var param = "I" + "▦" + pid + "▦" + indd + "▦" + cretno + "▦" + instcd + "▦" + srchdd;
    
    return appf_initPatientInfo(param);
}

/**
 * @desc   : CP환자 여부 검사
 * @
 * @param  :
 * @return : 
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fChkCPMiniPatValid(currow){
    var pid    = ds_main_inpatlist.getColumn(currow, "pid");
    var orddd  = ds_main_inpatlist.getColumn(currow, "indd");
    var cretno = ds_main_inpatlist.getColumn(currow, "cretno");
    var cpyn   = ds_main_inpatlist.getColumn(currow, "cpyn");
    var hngnm  = ds_main_inpatlist.getColumn(currow, "hngnm");

    //입원환자이나 외래CP가 진행중인 경우, 경고 메시지를 띄운다. (박유미요청)
    //2008. 07. 25 오지훈
    ds_TRMMO04303.clearData();
    ds_TRMMO04303.addRow();
    
    ds_TRMMO04303.setColumn(0, "pid"         , pid);
    ds_TRMMO04303.setColumn(0, "orddd"       , orddd);
    
    var oParam = {};
		oParam.id       = "TRMMO04303";
		oParam.service  = "prcpbaseapp.CpMngt";
		oParam.method   = "reqGePattValidity";
		oParam.inds     = "req=ds_TRMMO04303";
		oParam.outds    = "ds_rsltgetdata=getdata";
		oParam.async    = false;
		oParam.callback = "cf_TRMMO04303";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04303") >= 0){
		dsf_setDefaultVal(ds_rsltgetdata, "appyn:Y");
		
		if(ds_rsltgetdata.rowcount > 0){
            sysf_messageBox("외래 cp적용중인 환자입니다. 외래 CP Drop을", "C003");
            ds_root.setColumn(0, "cpflag", "N");
            return false;
        }
	}
	
	ds_TRMMO04303.clearData();
    ds_TRMMO04303.addRow();
    
    ds_TRMMO04303.setColumn(0, "pid"         , pid);
    ds_TRMMO04303.setColumn(0, "orddd"       , orddd);
    ds_TRMMO04303.setColumn(0, "cretno"      , cretno);
    ds_TRMMO04303.setColumn(0, "prcpgenrflag", "I");
    
    var oParam = {};
		oParam.id       = "TRMMO04303";
		oParam.service  = "prcpbaseapp.CpMngt";
		oParam.method   = "reqGePattValidity";
		oParam.inds     = "req=ds_TRMMO04303";
		oParam.outds    = "ds_rsltgetdata=getdata";
		oParam.async    = false;
		oParam.callback = "cf_TRMMO04303";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04303") >= 0){
		if(ds_rsltgetdata.rowcount < 1){ //cp적용환자 tbl에 유효한 데이터가 없는 경우      
			ds_root.setColumn(0, "cpflag", "N");
			return true;    
		}else{ //CP적용환자 tbl에 유효한 데이터가 있는 경우
			var appstat = ds_rsltgetdata.getColumn(0, "appstat");
			var cpgnm   = ds_rsltgetdata.getColumn(0, "cpgnm");
          
			if(appstat == 12){ //CP적용상태가 12인 경우, 무조건 CP(M-GPS)창을 띄운다
				ds_root.setColumn(0, "cpflag", "Y");
				return true;            
			}else if(appstat == 52){
				var rtnval = sysf_messageBox("[" + hngnm + "]환자에게 CP를", "Q003");
				if(rtnval == 6){ //예, CP Main open, CP적용환자 tbl에 appstat 10 진행중
					ds_root.setColumn(0, "cpflag", "X");
					return true;
				}else{
					ds_root.setColumn(0, "cpflag", "N");
					return fUpdtCPPatAppStatVal(41);			//41 : CP취소 
				}
			}else{ //CP적용상태가 12가 아닌 경우, CP Main창 open
				ds_root.setColumn(0, "cpflag", "Y");
				return true;
			}
		}
	}
}

//===================================================================
// 외래에서 사용하는 함수들
//===================================================================
/**
 * @desc   : 환자 선택 후, 환자 정보 조회 및 기록지 화면 연동
 * @
 * @param  :
 * @return :
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fMiniOutPat(){
	var ordrecflag = "Y";   
	var currow = ds_main_outpatlist.rowposition;
	if(currow < 0){
		return;
	}
   
    //처방, CP화면에 modal 또는 modaless가 뜬 경우, 환자 선택 불가
    if(fChkScrnModal()==false){
		return;
    }
    
    var pid      = ds_main_outpatlist.getColumn(currow, "pid");
    var stnddd   = ds_main_outpatlist.getColumn(currow, "orddd");
    var hngnm    = ds_main_outpatlist.getColumn(currow, "hngnm");
    var reqptype = lf_getDsValue(ds_main_outpatlist, currow, "reqptype");
    
    frmf_setParameter("SPMMO04200_openflag", "SPMMO04200");
    
    //환자수술 여부 및 수술처방 확인, 수술처방이 없는 경우 처방화면을 blocking
    if(fChkPatOpPrcp(pid, stnddd)==false){
        var opcnfmdd = ds_opprcpinfo.getColumn(0, "opcnfmdd");
        opcnfmdd = opcnfmdd.substring(0, 4) + "-" + opcnfmdd.substring(5, 6) + "-" + opcnfmdd.substring(7, 8);
        sysf_messageBox("[" + hngnm + "]환자의 [" + opcnfmdd + "]일자 수술 처방을", "C001");
    }
    
    //CP환자 여부 확인, update시 에러나면 변경 불가
    if(fChkCPMiniOutPatValid(currow)==false){
        return;
    }

    //2011.09.07 엄영만 환자 클릭시 환자정보 체크 SMMMO04100.js 파일 함수 호출 ioflag, pid 인자
	if(!fCheckSelectPatInfo("O", pid)){ return false; }
	
	// 진료기록에 수정된 사항이 있을 경우 저장할 것인지 묻는 함수 호출 : 2009. 07. 27 김영학    
    var mainobj    = frmf_getMainViewer();
    var mainscrnid = mainobj.frmf_getScreenID(); //메인화면의 기록지 ID    
    if(mainscrnid == "SMMMR00100"){
        var prvIntRecPamInfRtn = mainobj.fPrevInitRecPamInfo();
        if(!prvIntRecPamInfRtn){ return false; } // 기록지에 필수 입력사항을 입력하지 않았을 때 그냥 넘어가 버리는 오류 수정  20100305 LYJ
        //mainobj.frmf_setParameter("SSMMR01100_recsavechk", "Y");
    }
    

   //상단정보 설정    
   if(fReqMiniOutPatPamInfo()==true){
       frmf_setParameter("SMMMO04100_reqptype", reqptype);
       fOpenPrcpMainWnd();
   }   
}

/**
 * @desc   : CP환자 여부 검사
 * @
 * @param  :
 * @return : 
 * @author : 오지훈 
 * @---------------------------------------------------
 */
function fChkCPMiniOutPatValid(currow){
    var pid    = ds_main_outpatlist.getColumn(currow, "pid");
    var orddd  = ds_main_outpatlist.getColumn(currow, "orddd");
    var cretno = ds_main_outpatlist.getColumn(currow, "cretno");
    var cpyn   = lf_getDsValue(ds_main_outpatlist, currow, "cpyn");
    var hngnm  = ds_main_outpatlist.getColumn(currow, "hngnm");
    
    ds_TRMMO04303.clearData();
    ds_TRMMO04303.addRow();
    
    ds_TRMMO04303.setColumn(0, "pid"         , pid);
    ds_TRMMO04303.setColumn(0, "orddd"       , orddd);
    ds_TRMMO04303.setColumn(0, "cretno"      , cretno);
    ds_TRMMO04303.setColumn(0, "prcpgenrflag", "O");
    
    var oParam = {};
		oParam.id       = "TRMMO04303";
		oParam.service  = "prcpbaseapp.CpMngt";
		oParam.method   = "reqGePattValidity";
		oParam.inds     = "req=ds_TRMMO04303";
		oParam.outds    = "ds_rsltgetdata=getdata";
		oParam.async    = false;
		oParam.callback = "cf_TRMMO04303";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRMMO04303") >= 0){
		dsf_setDefaultVal(ds_rsltgetdata, "appyn:Y");
		        
        if(ds_rsltgetdata.rowcount < 1){ //cp적용환자 tbl에 유효한 데이터가 없는 경우
            ds_root.setColumn(0, "cpflag", "N"); //처방open
            return true;          
        }else{ //CP적용환자 tbl에 유효한 데이터가 있는 경우
            var appstat = ds_rsltgetdata.getColumn(0, "appstat");
            var cpgnm   = ds_rsltgetdata.getColumn(0, "cpgnm");
            
            if(appstat == 11){ //CP적용상태가 11인 경우
                var rtnval = sysf_messageBox("[" + hngnm + "]환자의 [" + cpgnm + "] CP를", "Q003");
                if(rtnval == 6){ //예 선택, CP Main open, CP적용환자 tbl에 appstat 10 진행중
                  ds_root.setColumn(0, "cpflag", "N");
                  return fUpdtCPPatAppStatVal(51);
                  
                }else{ //아니오 선택, 처방 Main open, CP적용환자 tbl에 appstat 51 drop out
                  ds_root.setColumn(0, "cpflag", "Y");
                  return fUpdtCPPatAppStatVal(10);
                }
            }else if(appstat == 53){
                ds_root.setColumn(0, "cpflag", "X");
                return true;
            
            }else{ //CP적용상태가 11가 아닌 경우, CP Main창 open
                ds_root.setColumn(0, "cpflag", "Y");
                return true;
            }
        }
    }
}

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

/**
 * @desc   : 외래환자 환자 기본정보설정
 * @         수정 : 미니진료대상자에 맞게끔 내용 수정  
 * @
 * @param  :
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */

function fReqMiniOutPatPamInfo(){
    var iRow      = ds_main_outpatlist.rowposition;
    var pid       = ds_main_outpatlist.getColumn(iRow, "pid");
    var orddd     = ds_main_outpatlist.getColumn(iRow, "orddd");
    var cretno    = ds_main_outpatlist.getColumn(iRow, "cretno");
    var instcd    = ds_main_outpatlist.getColumn(iRow, "instcd");
    
    var param = "O" + "▦" + pid + "▦" + orddd + "▦" + cretno + "▦" + instcd;
    
    return appf_initPatientInfo(param);;
}

/*===============================================================================
@desc	:  검색구분에 대한 항목 선택시 각 화면 선택
===============================================================================*/				
function fGrdInit() {
	var sOrdType = ds_main_cond.getColumn(0, "ordtype");

	if (sOrdType == 'O'){
	    Div00.rdo_patflag.visible     = true;
		Div00.rdo_patflagstat.visible = false;
		Div00.caption4.visible        = true;
		grd_outpatlist.visible  = true;
		grd_inpatlist.visible   = false;
	} else if (sOrdType =='I') {
		Div00.rdo_patflag.visible     = false;
		Div00.rdo_patflagstat.visible = true;
		Div00.caption4.visible        = false;
		grd_outpatlist.visible  = false;
		grd_inpatlist.visible   = true;
	}
}

/*===============================================================================
@desc	:  입원시 조회
===============================================================================*/					
function fInPatList() {
	ds_main_outpatlist.clearData();				// 입원일 때는 외래 데이터 삭제
	ds_send_reqdata.copyData(ds_main_cond);
	
	var oParam = {};
		oParam.id       = "TRMMO04205";
		oParam.service  = "prcpmngtapp.PrcpMngt";
		oParam.method   = "reqGetOutPatList";
		oParam.inds     = "req=ds_send_reqdata";
		oParam.outds    = "ds_main_inpatlist=inpatlist";
		oParam.async    = false;
		oParam.callback = "cf_TRMMO04205";

	tranf_submit(oParam);

//	window.modelesstopmost = true;
}

function cf_TRMMO04205(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    oOpener.ds_prcppatlist.copyData(ds_main_cond); // 현재 조회 조건을 처방화면에 인스턴스에 복사 한다. 대상자 화면 다시 열때 참조
}


/*===============================================================================
@desc	:  외래시 조회
===============================================================================*/					
function fOutPatList() {
	ds_main_inpatlist.clearData();				// 외래일 때는 입원 데이터 삭제
	ds_send_reqdata.copyData(ds_main_cond);
	
	var oParam = {};
		oParam.id       = "TRMMO02901";
		oParam.service  = "prcpmngtapp.PrcpMngt";
		oParam.method   = "reqGetPrcpPatList";
		oParam.inds     = "req=ds_send_reqdata";
		oParam.outds    = "ds_main_outpatlist=outpatlist";
		oParam.async    = false;
		oParam.callback = "cf_TRMMO02901";

	tranf_submit(oParam);
    
//	window.modelesstopmost = true;
}

function cf_TRMMO02901(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    oOpener.ds_prcppatlist.copyData(ds_main_cond); // 현재 조회 조건을 처방화면에 인스턴스에 복사 한다. 대상자 화면 다시 열때 참조
}

function fChkGetData() {
	var sOrdType = ds_main_cond.getColumn(0, "ordtype");
	if(sOrdType =="O") {
		fOutPatList();
	} else if (sOrdType == "I") {
		fInPatList() ;
	}
}

/**
 * @desc   : 대기환자 색상 설정
 *         : 내환자적용 환자는 color instance에 ffffff이외의 값이 들어옴
 * @param  :
 * @return : 
 * @author : 오지훈
 * @---------------------------------------------------
 */
function fChngGrdCellColor(color){
	return utlf_isNull(color) ? "#ffffff" : "#" + color;
}
]]></Script>
  </Form>
</FDL>