YNU_JEUS/app_home/himed/xpapps/emr/cpcdssxp/xp/SPMMD09000_위수탁처방관리.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMD09000" position="absolute 0 0 1202 756" titletext="위수탁처방관리" onload="SPMMD09000_onload" oninit="SPMMD09000_oninit">
    <Layouts>
      <Layout>
        <Grid id="grd_entrustlist" binddataset="ds_main_prcpinfo_prcplist" position="absolute 0 120 1195 750" style="" onaftersort="grd_entrustlist_onaftersort" oncellclick="grd_entrustlist_oncellclick" xforms-deselect="grd_entrustlist_xforms-deselect" ontextchanged="grd_entrustlist_ontextchanged" autoenter="select" cellsizingtype="col" anchor="all" cellclickbound="cell">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="30"/>
                <Column size="0"/>
                <Column size="65"/>
                <Column size="60"/>
                <Column size="55"/>
                <Column size="75"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="55"/>
                <Column size="100"/>
                <Column size="170"/>
                <Column size="0"/>
                <Column size="30"/>
                <Column size="0"/>
                <Column size="65"/>
                <Column size="35"/>
                <Column size="110"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="50"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="65"/>
                <Column size="70"/>
                <Column size="110"/>
                <Column size="200"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="2" text="instcd"/>
                <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="subcretno"/>
                <Cell col="12" text="입원/외래"/>
                <Cell col="13" text="진료과"/>
                <Cell col="14" text="진료의"/>
                <Cell col="15" colspan="2" text="처방분류" taborder="undefined"/>
                <Cell col="17" text="처방코드"/>
                <Cell col="18" text="처방명"/>
                <Cell col="19" colspan="2" text="DC" taborder="undefined"/>
                <Cell col="21" colspan="2" text="진행상태" taborder="undefined"/>
                <Cell col="23" text="수납"/>
                <Cell col="24" text="처방저장일시"/>
                <Cell col="25" text="수탁기관코드"/>
                <Cell col="26" text="수탁처방일자"/>
                <Cell col="27" text="수탁처방번호"/>
                <Cell col="28" colspan="2" text="수탁DC" taborder="undefined"/>
                <Cell col="30" text="수탁진행"/>
                <Cell col="31" text="수탁수납"/>
                <Cell col="32" text="수탁진료과"/>
                <Cell col="33" text="수탁진료의"/>
                <Cell col="34" text="수탁PID"/>
                <Cell col="35" text="수탁환자명"/>
                <Cell col="36" text="수탁처방저장일시"/>
                <Cell col="37" text="참고사항"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chkflag" expr="expr:chkflag == 'Y' ? 1 : 0"/>
                <Cell col="2" text="bind:instcd"/>
                <Cell col="3" text="bind:pid"/>
                <Cell col="4" text="bind:hngnm"/>
                <Cell col="5" displaytype="combo" style="align:center middle;" text="bind:status" combodataset="ds_cmb_status" combocodecol="value" combodatacol="label"/>
                <Cell col="6" displaytype="date" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
                <Cell col="7" text="bind:prcpno"/>
                <Cell col="8" text="bind:execprcpuniqno"/>
                <Cell col="9" text="bind:orddd"/>
                <Cell col="10" text="bind:cretno"/>
                <Cell col="11" text="bind:subcretno"/>
                <Cell col="12" displaytype="combo" style="align:center middle;" text="bind:ioflag" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label"/>
                <Cell col="13" style="align:left middle;padding:0 0 0 2;" text="bind:orddeptnm"/>
                <Cell col="14" text="bind:orddrnm"/>
                <Cell col="15" text="bind:prcpclscd"/>
                <Cell col="16" text="bind:prcpclsnm"/>
                <Cell col="17" style="align:left middle;padding:0 0 0 2;" text="bind:prcpcd"/>
                <Cell col="18" style="align:left middle;padding:0 0 0 2;" text="bind:prcpnm"/>
                <Cell col="19" text="bind:prcphistcd"/>
                <Cell col="20" text="bind:prcphistnm"/>
                <Cell col="21" text="bind:prcpstatcd"/>
                <Cell col="22" text="bind:prcpstatnm"/>
                <Cell col="23" text="bind:rcptyn"/>
                <Cell col="24" displaytype="date" text="bind:fstrgstdt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="25" text="bind:replinstcd"/>
                <Cell col="26" displaytype="date" text="bind:replprcpdd" calendardisplaynulltype="nulltext"/>
                <Cell col="27" text="bind:replprcpno"/>
                <Cell col="28" text="bind:replprcphistcd"/>
                <Cell col="29" text="bind:replprcphistnm"/>
                <Cell col="30" text="bind:replprcpstatnm"/>
                <Cell col="31" text="bind:replrcptyn"/>
                <Cell col="32" style="align:left middle;padding:0 0 0 2;" text="bind:replorddeptnm"/>
                <Cell col="33" text="bind:replorddrnm"/>
                <Cell col="34" text="bind:replpid"/>
                <Cell col="35" text="bind:replhngnm"/>
                <Cell col="36" text="bind:replfstrgstdt"/>
                <Cell col="37" style="align:left middle;padding:0 0 0 2;" text="bind:bigo"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div id="group1" taborder="1" class="div_SA" position="absolute 0 22 1195 82" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption2" text="처방일자 :" class="search_name" position="absolute 6 10 85 27"/>
              <Calendar id="input4" taborder="1" class="input" position="absolute 83 9 184 28" autoselect="true" autoskip="true"/>
              <Static id="caption3" text="~" position="absolute 188 9 203 29"/>
              <Calendar id="input3" taborder="2" class="input" position="absolute 201 9 302 28" autoselect="true"/>
              <Combo id="cmb_prid" taborder="3" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="cmb_prid_onitemchanged" position="absolute 304 9 359 28" columncount="-1" rowcount="-1">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1M</Col>
                      <Col id="datacolumn">1개월</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3M</Col>
                      <Col id="datacolumn">3개월</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">6M</Col>
                      <Col id="datacolumn">6개월</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption10" text="등록번호:" class="search_name" position="absolute 809 10 886 27"/>
              <Edit id="input1" taborder="4" position="absolute 886 9 966 28" onkeypress="input1_onkeypress" autoselect="true" onkeyup="group1_input1_onkeyup"/>
              <Button id="btn_patsrch" taborder="5" class="icon_search" position="absolute 1050 10 1066 26" onclick="group1_btn_patsrch_onclick"/>
              <Edit id="input2" taborder="6" position="absolute 971 9 1046 28" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
              <Static id="caption1" text="진 료 과 :" class="search_name" position="absolute 365 9 436 26"/>
              <Combo id="cmb_orddept" taborder="7" innerdataset="@ds_init_orddept_dept" codecolumn="deptcd" datacolumn="depthngnm" class="combo_default" position="absolute 446 8 596 27" columncount="-1" rowcount="-1" onitemchanged="group1_cmb_orddept_onitemchanged" type="filterlike" autoselect="true"/>
              <Button id="btn_req" taborder="8" text="조회" class="btn1" position="absolute 1117 18 1173 40" anchor="top right" onclick="group1_btn_req_onclick"/>
              <Static id="caption5" text="진 료 의 :" class="search_name" position="absolute 609 9 680 26"/>
              <Combo id="cmb_orddrid" taborder="9" innerdataset="@ds_init_orddrlist_usercombo" codecolumn="userid" datacolumn="usernm" class="combo_default" position="absolute 686 9 796 28" columncount="-1" rowcount="-1"/>
              <Combo id="com_prcpclscd" taborder="10" innerdataset="ds_init_prcpclscd_M0005" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 83 34 216 53" columncount="-1" rowcount="-1" type="filterlike" autoselect="true"/>
              <Static id="caption8" text="처방분류:" class="search_name" position="absolute 6 35 85 52"/>
              <Combo id="com_prcpstatcd" taborder="11" innerdataset="@ds_init_prcpstatcd_M0011" codecolumn="cdid" datacolumn="cdnm" class="combo_default" position="absolute 686 34 796 53" columncount="-1" rowcount="-1" type="filterlike" autoselect="true"/>
              <Static id="caption11" text="진행상태:" class="search_name" position="absolute 609 35 680 52"/>
              <Static id="caption12" text="처방코드:" class="search_name" position="absolute 365 35 436 52"/>
              <Edit id="input5" taborder="12" position="absolute 446 34 596 53" onkeypress="input5_onkeypress" onkeyup="group1_input5_onkeyup"/>
              <Static id="caption4" text="수탁상태:" class="search_name" position="absolute 809 35 880 52"/>
              <Combo id="combo1" taborder="13" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_default" position="absolute 886 34 966 53" columncount="-1" rowcount="-1" type="filterlike" autoselect="true">
                <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">P</Col>
                      <Col id="datacolumn">처방발행</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">수탁의뢰</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">수탁결과</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <CheckBox id="chk_prcphistcd" taborder="14" value="N" truevalue="Y" falsevalue="N" position="absolute 974 33 1091 54" anchor="left bottom" text="D/C 처방 포함"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption9" class="tit_1" position="absolute 0 0 144 24" text="위수탁 처방관리"/>
        <Shape id="line3" linetype="vertical" position="absolute 1100 30 1103 75" anchor="top right"/>
        <Button id="button3" class="btn3" position="absolute 485 93 589 115" style="" text="통합기록조회" onclick="button3_onclick" anchor="top right"/>
        <Button id="button5" class="btn3" position="absolute 594 93 698 115" style="" text="통합결과조회" onclick="button5_onclick" anchor="top right"/>
        <Button id="btn_entrustprcp" class="btn4" position="absolute 945 93 1025 115" style="" text="수탁의뢰" onclick="btn_entrustprcp_onclick" anchor="top right" tooltiptext="수탁기관에 외래 가접수 생성 및 처방 발행" tooltiptype="inplace,mouseleave"/>
        <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 116 1195 121" style="" anchor="left top right"/>
        <Button id="btn_entrustexec" class="btn4" position="absolute 1115 93 1195 115" style="" text="실시처리" onclick="btn_entrustexec_onclick" anchor="top right" tooltiptext="처방을 DC 할수 있는 상태로 변경" tooltiptype="inplace,mouseleave"/>
        <Button id="btn_entrustdc" class="btn4" position="absolute 869 93 941 115" style="" text="수탁DC" onclick="btn_entrustdc_onclick" anchor="top right" tooltiptext="처방을 DC 할수 있는 상태로 변경" tooltiptype="inplace,mouseleave"/>
        <Button id="button1" class="btn4" position="absolute 1030 93 1110 115" style="" text="수탁수납" onclick="button1_onclick" anchor="top right" tooltiptext="수탁기관에 수납 처리" tooltiptype="inplace,mouseleave"/>
        <Button id="button2" class="btn6" position="absolute 704 93 820 115" style="" text="수탁안내문출력" onclick="button2_onclick" anchor="top right"/>
        <Div id="grp_report" position="absolute 0 0 0 0" style=""/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond" 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="hngnm" type="STRING" size="256"/>
          <Column id="prid" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="prcpclscd" type="STRING" size="256"/>
          <Column id="prcpstatcd" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
          <Column id="includedc" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="prid"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="orddeptcd"/>
            <Col id="orddrid"/>
            <Col id="prcpclscd"/>
            <Col id="prcpstatcd"/>
            <Col id="prcpcd"/>
            <Col id="status">-</Col>
            <Col id="includedc"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddept_dept" 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_init_orddrlist_usercombo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_prcpstatcd_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cmb_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_status" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">처방발행</Col>
            <Col id="value">P</Col>
          </Row>
          <Row>
            <Col id="label">수탁의뢰</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">수탁결과</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">수탁DC</Col>
            <Col id="value">D</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_prcpinfo_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_prcpinfo_prcplist_oncolumnchanged"/>
      <Dataset id="ds_init_prcpclscd_M0005" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_source" 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_printinfo_patinfo" 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="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민등록번호"/>
          <Column id="usernm" type="STRING" size="256" sumtext="의사명"/>
          <Column id="telno1" type="STRING" size="256" sumtext="대표번호"/>
          <Column id="telno2" type="STRING" size="256" sumtext="대표번호"/>
          <Column id="age" type="STRING" size="256" sumtext="전화예약번호"/>
          <Column id="prcptm" type="STRING" size="256" sumtext="처방시간"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="medamtpostyn" type="STRING" size="256" sumtext="open card 관련  VIP"/>
          <Column id="errortelno" type="STRING" size="256" sumtext="전화번호 오류 여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_printinfo_togolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptnm" type="STRING" size="256" sumtext="안내할곳"/>
          <Column id="prcplist" type="STRING" size="256" sumtext="처방리스트"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input4" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="group1.input3" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item2" compid="group1.cmb_prid" propid="value" datasetid="ds_main_cond" columnid="prid"/>
      <BindItem id="item3" compid="group1.input1" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item4" compid="group1.input2" propid="value" datasetid="ds_main_cond" columnid="hngnm"/>
      <BindItem id="item5" compid="group1.cmb_orddept" propid="value" datasetid="ds_main_cond" columnid="orddeptcd"/>
      <BindItem id="item6" compid="group1.cmb_orddrid" propid="value" datasetid="ds_main_cond" columnid="orddrid"/>
      <BindItem id="item7" compid="group1.com_prcpclscd" propid="value" datasetid="ds_main_cond" columnid="prcpclscd"/>
      <BindItem id="item8" compid="group1.com_prcpstatcd" propid="value" datasetid="ds_main_cond" columnid="prcpstatcd"/>
      <BindItem id="item9" compid="group1.input5" propid="value" datasetid="ds_main_cond" columnid="prcpcd"/>
      <BindItem id="item10" compid="group1.combo1" propid="value" datasetid="ds_main_cond" columnid="status"/>
      <BindItem id="item11" compid="group1.chk_prcphistcd" propid="value" datasetid="ds_main_cond" columnid="includedc"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
function SPMMD09000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMMD09000_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_entrustlist);
	
	ds_main_cond.setColumn(0, "fromdd", utlf_getCurrentDate()); //시작일자는 현재일자
	ds_main_cond.setColumn(0, "todd",   utlf_getCurrentDate()); //종료일자는 현재일자
		
	lf_mmbfGetDeptCodeComboList(ds_init_orddept_dept  , "A"); //부서코드 콤보
	
	var arrParam = [{dsNm: "ds_init_prcpstatcd_M0011", cdGrpId: "M0003"}
				   ,{dsNm: "ds_init_prcpclscd_M0005", cdGrpId: "M0005"}
				   ,{dsNm: "ds_init_prcpstatcd_M0011", cdGrpId: "M0011"}]
	appf_getCodeList(arrParam);
	
	frmf_addComboItem("group1.cmb_orddept","전체","-","above");
	group1.cmb_orddept.index = 0;

	frmf_addComboItem("group1.cmb_orddrid","전체","-","above"); 
	group1.cmb_orddrid.index = 0;
	
	frmf_addComboItem("group1.com_prcpstatcd","전체","-","above");
	group1.com_prcpstatcd.index = 0;
	
	frmf_addComboItem("group1.com_prcpclscd","전체","-","above");
	group1.com_prcpclscd.index = 0;
		
	var nFrozenCols = grd_entrustlist.getBindCellIndex("Body", "hngnm");
	if(nFrozenCols > 0) 
	{
		for(var i = 0; i <= nFrozenCols; i++)
		{
			grd_entrustlist.setFormatColProperty(i, "band", "left");
		}
	} 
	else 
	{
		grd_entrustlist.setFormatColProperty(0, "band", "left");
	}


	var sPid = appf_getPatientInfo("pid");
	if(!utlf_isNull(sPid) ) 
	{
		ds_main_cond.setColumn(0, "pid", sPid);
		ds_main_cond.setColumn(0, "hngnm", appf_getPatientInfo("pname"));
		group1.btn_req.click();
	}
}

function group1_cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	if(obj.value != "-") 
	{
		ds_init_orddrlist_usercombo.clearData();
		
		lf_mmbfGetUserComboList(ds_init_orddrlist_usercombo, obj.value, "0330");
		frmf_addComboItem("group1.cmb_orddrid","전체","-","above"); 
		group1.cmb_orddrid.index = 0;
	}
}

function group1_input1_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group1.btn_req.click();
	}
}

function group1_btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", "", "", "", "", "", "", "", "", "", "", "M");
	
	var sPid = ds_patinfolist.getColumn(0, "pid");
	var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
	ds_main_cond.setColumn(0, "pid", sPid);
	ds_main_cond.setColumn(0, "hngnm", sHngnm);
}

function group1_input5_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group1.btn_req.click();
	}
}

function group1_btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqGetPrcpList();
}

function fReqGetPrcpList()
{
	ds_main_prcpinfo_prcplist.clearData();
	var oParam = {};
		oParam.id          = "TRMMD09001";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqGetEntrustPrcpList";
		oParam.inds        = "req=ds_main_cond";
		oParam.outds       = "ds_main_prcpinfo_prcplist=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMD09001";

	tranf_submit(oParam);
}

function cf_TRMMD09001(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    ds_main_prcpinfo_prcplist.addColumn("chkflag", "string");
}

function ds_main_prcpinfo_prcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "chkflag")
	{
		obj.setColumn(e.row, "chkflag", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}

	if( e.columnid == "bigo")
	{
		var sStatus = obj.getColumn(e.row, "status");
		
		if(sStatus == "P") 
		{
			var sBigo = e.newvalue;
			if(!utlf_isNull(sBigo))
			{
				sysf_messageBox("수탁 의뢰 되지 않은 처방은 참고사항을 저장 할 수 없습니다.","E999","");
			}
			return;
		}
		else 
		{
			var oParam = {};
				oParam.id          = "TXMMD09004";
				oParam.service     = "cdssmngtapp.EntrustMngt";
				oParam.method      = "reqExeEntrustBigo";
				oParam.inds        = "savedata=ds_main_prcpinfo_prcplist:u";
				oParam.outds       = "ds_=prcplist";
				oParam.async       = false;
				oParam.callback    = "cf_TXMMD09004";

			tranf_submit(oParam);
		}
	}
}

function cf_TXMMD09004(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    group1.btn_req.click();
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_prcpinfo_prcplist.rowposition;
	var pid = ds_main_prcpinfo_prcplist.getColumn(row, "pid");
	if(utlf_isNull(pid))
	{
		sysf_messageBox("통합기록조회를 검색할 환자를", "C002");
		return;
	}
	var wndobj = frmf_findPopup("SMMRI00400");
	if(!utlf_isNull(wndobj))
	{
		frmf_setParameter("SMMRI00400_param_pid", pid);
		wndobj.fInitalize();
	}
	else
	{
		frmf_setParameter("SMMRI00400_param_pid", pid);
		frmf_open("SMMRI00400", "SMMRI00400", "", "", "", "", "", "", "", "", "", "", "M");
	}
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_prcpinfo_prcplist.rowposition;
	var pid = ds_main_prcpinfo_prcplist.getColumn(row, "pid");
	dsf_makeValue(ds_source, "pid", "string", pid);
	if(utlf_isNull(pid))
	{
		sysf_messageBox("통합결과조회를 검색할 환자를", "C002");
		return;
	}

	curExamRsltObj = frmf_findPopup("SMAER00800"); //활성화된 검사결과 화면 object loading
	if(!utlf_isNull(curExamRsltObj))
	{
		 curExamRsltObj.ds_singdata.setColumn(0, "srchpid", pid );
		 curExamRsltObj.frmf_getComponents("btn_srch").click();
	}
	else 
	{
		var objArg = new Object();
			objArg.arg_ds_send_singdata = ds_source;
		frmf_open("SMAER00800", "SMAER00800", objArg, "", "", "", "", "", "", "", "", "", "M");
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_prcpinfo_prcplist.rowposition;
	var pid = ds_main_prcpinfo_prcplist.getColumn(row, "pid");
	if(utlf_isNull(pid))
	{
		sysf_messageBox("출력할 환자를", "C002");
		return;
	}
	
	dsf_makeValue(ds_send_reqdata, "instcd", "String", ds_main_prcpinfo_prcplist.getColumn(row, "instcd")); 
	dsf_makeValue(ds_send_reqdata, "pid", "String", ds_main_prcpinfo_prcplist.getColumn(row, "pid")); 
	dsf_makeValue(ds_send_reqdata, "fromdd", "String", ds_main_cond.getColumn(0, "fromdd")); 
	dsf_makeValue(ds_send_reqdata, "todd", "String", ds_main_cond.getColumn(0, "todd")); 
	
	var oParam = {};
		oParam.id          = "TRMMD09002";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqGetEntrustPrintList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_printinfo_patinfo=patinfo ds_main_printinfo_togolist=togolist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMMD09002";

	tranf_submit(oParam);
	
	if(utlf_isNull(ds_main_printinfo_patinfo.getColumnInfo("telno1")))
	{
		ds_main_printinfo_patinfo.addColumn("telno1", "string");
	}
	if(utlf_isNull(ds_main_printinfo_patinfo.getColumnInfo("telno2")))
	{
		ds_main_printinfo_patinfo.addColumn("telno2", "string");
	}
	if(ds_main_printinfo_patinfo.getColumnInfo("otpt.orddd||otpt.ordtm"))
	{
		ds_main_printinfo_patinfo.updatecontrol = false;
		ds_main_printinfo_patinfo.deleteColumn("otpt.orddd||otpt.ordtm");
		ds_main_printinfo_patinfo.updatecontrol = true;
	}
	
	if (utlf_isNull(ds_main_printinfo_patinfo.getColumn(0, "pid")))
	{
		sysf_messageBox("출력 시 환자정보 획득에 문제가 발생했습니다!", "E000");
		this.close();
		return;
	}
	
	
	for(var i = 0; i < ds_main_printinfo_togolist.rowcount; i++)
	{
		ds_main_printinfo_togolist.updatecontrol = false;
		ds_main_printinfo_togolist.setColumn(i, "prcplist", String(ds_main_printinfo_togolist.getColumn(i, "prcplist")).replace("&#32;", ""));
		ds_main_printinfo_togolist.updatecontrol = true;
	}
	//makeReportPreview(0, 0, 10, 10, "grp_report");
	// 보고서 object를 grp_report 그룹안에 생성
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/main/printinfo/patinfo", ds_main_printinfo_patinfo);
		rptf_setNodeListToDOM(objDOM, "/root/main/printinfo/togolist", ds_main_printinfo_togolist);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = "open=0;save=1;directprint=1;print=1;";
	rptf_exeReportPreview30(["RPMMD09001"],[objParam], option);
}

function btn_entrustdc_onclick(obj:Button,  e:ClickEventInfo)
{
	var nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y'");
	if(nCheckCnt < 1) 
	{
		sysf_messageBox("선택된 처방이 없습니다.", "I999");
		return;
	}
   
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && status == 'D'");
	if(nCheckCnt > 0)
	{
		sysf_messageBox("이미 수탁DC 되어 다시 할 수 없습니다.", "I999");
		return;
	}   
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && status == 'DC'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("DC 된 처방을 수탁DC 할 수 없습니다.", "I999");
		return;
	}
	
	var oParam = {};
		oParam.id          = "TXMMD09002";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqExeEntrustDc";
		oParam.inds        = "savedata=ds_main_prcpinfo_prcplist:u";
		oParam.outds       = "ds_=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TXMMD09002";

	tranf_submit(oParam);
}

function cf_TXMMD09002(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    group1.btn_req.click();
}

function btn_entrustprcp_onclick(obj:Button,  e:ClickEventInfo)
{
	var nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y'");
	if(nCheckCnt < 1) 
	{
		sysf_messageBox("선택된 처방이 없습니다.", "I999");
		return;
	}
	
	var sCurrentDt = utlf_getCurrentDate();
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && prcpdd < '20160601'" );
	if(sCurrentDt >= "20160601" && nCheckCnt >0) 
	{
		sysf_messageBox("2016년 06월 01일 이전 처방은 수탁의뢰 할 수 없습니다.", "I999");
		return;
	}
   
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && status != 'P'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("이미 수탁의뢰 되어 다시 할 수 없습니다.", "I999");
		return;
	}
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && prcphistnm == 'DC'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("DC 된 처방을 수탁의뢰 할 수 없습니다.", "I999");
		return;
	}
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && ioflag == 'O' && rcptyn == 'N'" );
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("미수납 처방을 수탁의뢰 할 수 없습니다.", "I999");
		return;
	}
	
	var oParam = {};
		oParam.id          = "TXMMD09001";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqExeEntrustPrcp";
		oParam.inds        = "savedata=ds_main_prcpinfo_prcplist:u";
		oParam.outds       = "ds_=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TXMMD09001";

	tranf_submit(oParam);
}

function cf_TXMMD09001(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) return;
     group1.btn_req.click();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y'");
	if(nCheckCnt < 1) 
	{
		sysf_messageBox("선택된 처방이 없습니다.", "I999");
		return;
	}
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag =='Y' && status != 'A'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("수탁의뢰 된 처방만 수탁 수납이 가능 합니다.", "I999");
		return;
	}   
   
	var oParam = {};
		oParam.id          = "TXMMD09002";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqExeEntrustRcpt";
		oParam.inds        = "savedata=ds_main_prcpinfo_prcplist:u";
		oParam.outds       = "ds_=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TXMMD09002";

	tranf_submit(oParam);
}

function btn_entrustexec_onclick(obj:Button,  e:ClickEventInfo)
{
	var nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y'" );
	if(nCheckCnt < 1) 
	{
		sysf_messageBox("선택된 처방이 없습니다.", "I999");
		return;
	}
   
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && status == 'P'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("수탁의뢰 후 실시 처리가 가능합니다.", "I999");
		return;
	}   
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && status == 'D'");
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("수탁DC 되어 실시처리 할 수 없습니다.", "I999");
		return;
	}   
	
	nCheckCnt = ds_main_prcpinfo_prcplist.getCaseCount("chkflag == 'Y' && prcphistnm == 'DC'" );
	if(nCheckCnt > 0) 
	{
		sysf_messageBox("DC 된 처방을 실시처리 할 수 없습니다.", "I999");
		return;
	}
	
	var oParam = {};
		oParam.id          = "TXMMD09005";
		oParam.service     = "cdssmngtapp.EntrustMngt";
		oParam.method      = "reqExeEntrustExec";
		oParam.inds        = "savedata=ds_main_prcpinfo_prcplist:u";
		oParam.outds       = "ds_=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TXMMD09005";

	tranf_submit(oParam);
}

function cf_TXMMD09005(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
	group1.btn_req.click();
}
]]></Script>
  </Form>
</FDL>