YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SMMMO16300_업무협조문관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMO16300" position="absolute 0 0 970 730" titletext="코드별 환자조회" oninit="SMMMO16300_oninit" onload="SMMMO16300_onload">
    <Layouts>
      <Layout>
        <Static text="코드별 환자 조회" position="absolute 0 0 130 25" id="caption6" class="tit_1"/>
        <Grid position="absolute 0 89 970 730" id="grd_prcplist" binddataset="ds_patprcplist" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="50"/>
                <Column size="90"/>
                <Column size="80"/>
                <Column size="83"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="50"/>
                <Column size="0"/>
                <Column size="50"/>
                <Column size="39"/>
                <Column size="39"/>
                <Column size="95"/>
                <Column size="90"/>
                <Column size="150"/>
                <Column size="60"/>
                <Column size="90"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="210"/>
                <Column size="110"/>
                <Column size="86"/>
                <Column size="70"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="환자번호"/>
                <Cell col="2" text="환자명"/>
                <Cell col="3" text="S/A"/>
                <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="1일수량"/>
                <Cell col="12" text="1회수량"/>
                <Cell col="13" text="1일용량"/>
                <Cell col="14" text="1회용량"/>
                <Cell col="15" text="횟수"/>
                <Cell col="16" text="일수"/>
                <Cell col="17" text="용법/검체"/>
                <Cell col="18" text="처방코드"/>
                <Cell col="19" text="처방명"/>
                <Cell col="20" text="ICD10"/>
                <Cell col="21" text="진단코드"/>
                <Cell col="22" text="R/O"/>
                <Cell col="23" text="주/부"/>
                <Cell col="24" text="진단명"/>
                <Cell col="25" text="진료과"/>
                <Cell col="26" text="전화번호"/>
                <Cell col="27" text="우편번호"/>
                <Cell col="28" text="주소"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow+1"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" text="bind:sa"/>
                <Cell col="4" text="bind:rgstno"/>
                <Cell col="5" text="bind:prcpdd" mask="####-##-##"/>
                <Cell col="6" text="bind:rgsttm" mask="##:##:##"/>
                <Cell col="7" text="bind:wardnm"/>
                <Cell col="8" text="bind:usernm"/>
                <Cell col="9" text="bind:prcpdrnm"/>
                <Cell col="10" style="align:left middle;" text="bind:rsrvflag"/>
                <Cell col="11" text="bind:prcpqty"/>
                <Cell col="12" text="bind:drprcpetc8"/>
                <Cell col="13" text="bind:prcpvol"/>
                <Cell col="14" text="bind:drprcpetc7"/>
                <Cell col="15" text="bind:prcptims"/>
                <Cell col="16" text="bind:prcpdayno"/>
                <Cell col="17" style="align:left middle;" text="bind:drugmthdspccdnm"/>
                <Cell col="18" style="align:left middle;" text="bind:prcpcd"/>
                <Cell col="19" style="align:left middle;" text="bind:prcpnm"/>
                <Cell col="20" style="align:left middle;" text="bind:icd10cd"/>
                <Cell col="21" style="align:left middle;" text="bind:diagcd"/>
                <Cell col="22" style="align:left middle;" text="bind:kindcd"/>
                <Cell col="23" style="align:left middle;" text="bind:kindcdflag"/>
                <Cell col="24" style="align:left middle;" text="bind:diagengnm"/>
                <Cell col="25" style="align:left middle;" text="bind:depthngnm"/>
                <Cell col="26" text="bind:mpphontel"/>
                <Cell col="27" style="align:left middle;" text="bind:zipcd"/>
                <Cell col="28" style="align:left middle;" text="bind:addr"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <CheckBox position="absolute 290 0 366 20" id="bool1" visible="false" text="중복허용" falsevalue="N" truevalue="Y"/>
        <CheckBox position="absolute 143 0 273 20" id="bol_exec2" visible="false" text="실시된 처방만 조회" falsevalue="N" truevalue="Y"/>
        <Div id="Div00" taborder="1" position="absolute 0 25 970 86" class="div_SA" anchor="left top right" scrollbars="none">
          <Layouts>
            <Layout>
              <Static id="caption1" text="~" position="absolute 191 33 200 53" anchor="default"/>
              <Static id="caption7" text="조회기간 :" class="search_name" position="absolute 10 33 84 53" anchor="default"/>
              <Calendar id="ipt_fromdd" taborder="1" class="input" position="absolute 92 33 190 53" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Calendar id="ipt_todd" taborder="2" class="input" position="absolute 202 33 300 53" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Static id="caption2" text="제     목 :" class="search_name" position="absolute 10 8 84 28" anchor="default"/>
              <Edit id="ipt_title" taborder="4" class="input_essential" position="absolute 92 8 450 28" anchor="default" autoselect="true"/>
              <Radio id="rdo_code" taborder="5" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 310 33 455 53" anchor="default" onitemchanged="Div00_rdo_code_onitemchanged">
                <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>
              <Button id="btn_patsrch" taborder="6" class="icon_search" position="absolute 662 33 682 53" anchor="default" onclick="Div00_btn_patsrch_onclick"/>
              <Static id="caption5" text="검색코드 :" class="search_name" position="absolute 465 33 539 53" anchor="default"/>
              <Static id="caption8" text="구분 :" class="search_name" position="absolute 688 8 740 28" anchor="default"/>
              <Radio id="rdo_ioflag" taborder="7" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 742 8 877 28" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Combo id="cmb_prcpcd" taborder="8" innerdataset="@ds_init_prcpcd" codecolumn="codenm" datacolumn="codecd" position="absolute 548 33 658 53" anchor="default"/>
              <Div id="div_case1" taborder="10" position="absolute 466 8 667 28">
                <Layouts>
                  <Layout>
                    <Static id="caption4" text="진 료 과 :" class="search_name" position="absolute 0 0 74 20" anchor="default"/>
                    <Combo id="cmb_orddept" taborder="1" innerdataset="@ds_orddept" codecolumn="deptcd" datacolumn="depthngnm" position="absolute 82 0 192 20" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="div_case2" taborder="11" text="Div02" position="absolute 465 8 666 30" visible="false">
                <Layouts>
                  <Layout>
                    <Static id="caption9" text="병     동 :" class="search_name" position="absolute 0 0 74 20" anchor="default"/>
                    <Combo id="combo1" taborder="1" innerdataset="ds_wardcdgruplist" codecolumn="wardcd" datacolumn="wardnm" position="absolute 83 0 193 20" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="div_case3" taborder="12" text="Div03" position="absolute 688 33 870 53">
                <Layouts>
                  <Layout>
                    <CheckBox id="bol_exec" taborder="0" text="실시된 처방만 조회" value="N" truevalue="Y" falsevalue="N" position="absolute 0 0 126 20" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="div_case4" taborder="13" text="Div04" position="absolute 688 32 870 54" visible="false">
                <Layouts>
                  <Layout>
                    <CheckBox id="bol_kindcd" taborder="2" text="R/O 포함" value="N" truevalue="Y" falsevalue="N" position="absolute 0 1 76 21" anchor="default"/>
                    <CheckBox id="bol_kindcdflag" taborder="3" text="부진단포함" value="N" truevalue="Y" falsevalue="N" position="absolute 98 1 182 21" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape id="line3" linetype="vertical" position="absolute 888 5 894 58" anchor="top right"/>
              <Button id="btn_req" taborder="3" text="조회" class="btn1" position="absolute 905 8 961 28" anchor="top right" onclick="Div00_btn_req_onclick"/>
              <Button id="button1" taborder="9" text="엑셀" class="btn7" position="absolute 911 33 961 53" anchor="top right" onclick="Div00_button1_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_excel" taborder="2" binddataset="ds_patprcplist" useinputpanel="false" cellsizingtype="col" position="absolute 971 0 1152 112" visible="false">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="50"/>
                <Column size="90"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="66"/>
                <Column size="66"/>
                <Column size="75"/>
                <Column size="42"/>
                <Column size="42"/>
                <Column size="39"/>
                <Column size="42"/>
                <Column size="39"/>
                <Column size="39"/>
                <Column size="95"/>
                <Column size="90"/>
                <Column size="150"/>
                <Column size="60"/>
                <Column size="90"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="210"/>
                <Column size="110"/>
                <Column size="70"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell style="background:lightgrey;" text="환자번호"/>
                <Cell col="1" style="background:lightgrey;" text="환자명"/>
                <Cell col="2" style="background:lightgrey;" text="S/A"/>
                <Cell col="3" style="background:lightgrey;" text="주민번호"/>
                <Cell col="4" style="background:lightgrey;" text="진료(처방)일"/>
                <Cell col="5" style="background:lightgrey;" text="병동명"/>
                <Cell col="6" style="background:lightgrey;" text="진료의"/>
                <Cell col="7" style="background:lightgrey;" text="처방의"/>
                <Cell col="8" style="background:lightgrey;" text="예약구분"/>
                <Cell col="9" style="background:lightgrey;" text="1일수량"/>
                <Cell col="10" style="background:lightgrey;" text="1회수량"/>
                <Cell col="11" style="background:lightgrey;" text="1일용량"/>
                <Cell col="12" style="background:lightgrey;" text="1회용량"/>
                <Cell col="13" style="background:lightgrey;" text="횟수"/>
                <Cell col="14" style="background:lightgrey;" text="일수"/>
                <Cell col="15" style="background:lightgrey;" text="용법/검체"/>
                <Cell col="16" style="background:lightgrey;" text="처방코드"/>
                <Cell col="17" style="background:lightgrey;" text="처방명"/>
                <Cell col="18" style="background:lightgrey;" text="ICD10"/>
                <Cell col="19" style="background:lightgrey;" text="진단코드"/>
                <Cell col="20" style="background:lightgrey;" text="R/O"/>
                <Cell col="21" style="background:lightgrey;" text="주/부"/>
                <Cell col="22" style="background:lightgrey;" text="진단명"/>
                <Cell col="23" style="background:lightgrey;" text="진료과"/>
                <Cell col="24" style="background:lightgrey;" text="우편번호"/>
                <Cell col="25" style="background:lightgrey;" text="주소"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:hngnm"/>
                <Cell col="2" text="bind:sa"/>
                <Cell col="3" text="bind:rgstno"/>
                <Cell col="4" text="bind:prcpdd" mask="####-##-##"/>
                <Cell col="5" text="bind:wardnm"/>
                <Cell col="6" text="bind:usernm"/>
                <Cell col="7" text="bind:prcpdrnm"/>
                <Cell col="8" style="align:left middle;" text="bind:rsrvflag"/>
                <Cell col="9" text="bind:prcpqty"/>
                <Cell col="10" text="bind:drprcpetc8"/>
                <Cell col="11" text="bind:prcpvol"/>
                <Cell col="12" text="bind:drprcpetc7"/>
                <Cell col="13" text="bind:prcptims"/>
                <Cell col="14" text="bind:prcpdayno"/>
                <Cell col="15" style="align:left middle;" text="bind:drugmthdspccdnm"/>
                <Cell col="16" style="align:left middle;" text="bind:prcpcd"/>
                <Cell col="17" style="align:left middle;" text="bind:prcpnm"/>
                <Cell col="18" style="align:left middle;" text="bind:icd10cd"/>
                <Cell col="19" style="align:left middle;" text="bind:diagcd"/>
                <Cell col="20" style="align:left middle;" text="bind:kindcd"/>
                <Cell col="21" style="align:left middle;" text="bind:kindcdflag"/>
                <Cell col="22" style="align:left middle;" text="bind:diagengnm"/>
                <Cell col="23" style="align:left middle;" text="bind:depthngnm"/>
                <Cell col="24" style="align:left middle;" text="bind:zipcd"/>
                <Cell col="25" style="align:left middle;" text="bind:addr"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="title" type="STRING" size="256"/>
          <Column id="code" type="STRING" size="256"/>
          <Column id="alowtwo" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="prcpcd2" type="STRING" size="256"/>
          <Column id="exec" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="kindcd" type="STRING" size="256"/>
          <Column id="kindcdflag" type="STRING" size="256"/>
          <Column id="prcpcd3" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="orddeptcd">-</Col>
            <Col id="code">P</Col>
            <Col id="ioflag">T</Col>
          </Row>
        </Rows>
      </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_patprcplist" 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="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="sa" type="STRING" size="256" sumtext="성별/나이"/>
          <Column id="rgstno" type="STRING" size="256" sumtext="주민등록번호"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방/진단일"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동명"/>
          <Column id="usernm" type="STRING" size="256" sumtext="처방의"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="수량"/>
          <Column id="prcpvol" type="STRING" size="256" sumtext="용량"/>
          <Column id="drprcpetc8" type="STRING" size="256" sumtext="수량"/>
          <Column id="drprcpetc7" type="STRING" size="256" sumtext="용량"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="일수"/>
          <Column id="drugmthdspccdnm" type="STRING" size="256" sumtext="용법/검체"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="icd10cd" type="STRING" size="256" sumtext="icd10"/>
          <Column id="diagcd" type="STRING" size="256" sumtext="진단코드"/>
          <Column id="diagengnm" type="STRING" size="256" sumtext="진단명"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="부서"/>
          <Column id="zipcd" type="STRING" size="256" sumtext="우편번호"/>
          <Column id="addr" type="STRING" size="256" sumtext="주소"/>
          <Column id="kindcd" type="STRING" size="256" sumtext="Ruleout 여부"/>
          <Column id="kindcdflag" type="STRING" size="256" sumtext="주진단 여부"/>
          <Column id="rgstdd" type="STRING" size="256" sumtext="진단등록일"/>
          <Column id="rsrvflag" type="STRING" size="256" sumtext="예약구분"/>
          <Column id="prcpdrid" type="STRING" size="256" sumtext="처방의"/>
          <Column id="prcpdrnm" type="STRING" size="256" sumtext="처방의명"/>
          <Column id="rgsttm" type="STRING" size="256" sumtext="진료(처방)시간"/>
          <Column id="mmohdiag" type="STRING" size="256" sumtext="전화번호"/>
        </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="wardcd" type="STRING" size="256" sumtext="병동코드"/>
          <Column id="ioparam" type="STRING" size="256" sumtext="외래병동구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_wardcdgruplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동명"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_prcpcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="codecd" type="STRING" size="256"/>
          <Column id="codenm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_time" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.ipt_title" propid="value" datasetid="ds_cond" columnid="title"/>
      <BindItem id="item1" compid="Div00.ipt_fromdd" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item2" compid="Div00.ipt_todd" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item3" compid="Div00.rdo_code" propid="value" datasetid="ds_cond" columnid="code"/>
      <BindItem id="item4" compid="Div00.div_case1.cmb_orddept" propid="value" datasetid="ds_cond" columnid="orddeptcd"/>
      <BindItem id="item5" compid="Div00.div_case2.combo1" propid="value" datasetid="ds_cond" columnid="wardcd"/>
      <BindItem id="item6" compid="Div00.rdo_ioflag" propid="value" datasetid="ds_cond" columnid="ioflag"/>
      <BindItem id="item7" compid="Div00.cmb_prcpcd" propid="value" datasetid="ds_cond" columnid="prcpcd3"/>
      <BindItem id="item8" compid="Div00.div_case3.bol_exec" propid="value" datasetid="ds_cond" columnid="exec"/>
      <BindItem id="item9" compid="Div00.div_case4.bol_kindcd" propid="value" datasetid="ds_cond" columnid="kindcd"/>
      <BindItem id="item10" compid="Div00.div_case4.bol_kindcdflag" propid="value" datasetid="ds_cond" columnid="kindcdflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

var arErrorCode = new HashArray();


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

function SMMMO16300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setToolTipBind(grd_prcplist);
	grdf_setGridSort(grd_prcplist)
	
	fSetBaseInit();
	fGrdInit();
}

function Div00_rdo_code_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fGrdInit();
	
	if(obj.value == "P"){
		Div00.div_case3.visible = true;
		Div00.div_case4.visible = false;
	} else{
		Div00.div_case3.visible = false;
		Div00.div_case4.visible = true;
	}
}

function Div00_btn_patsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPMMO16600", "SPMMO16600", null, null, null, null, null, null, null, null, null, null, "M");
	
	fSetComboCodeCD();
	Div00.cmb_prcpcd.index = 0;
}

function Div00_btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_patprcplist.clearData();
	
	var title  = ds_cond.getColumn(0, "title");
	var prcpcd = ds_cond.getColumn(0, "prcpcd3");
	var ioflag = ds_cond.getColumn(0, "ioflag");
	var code   = ds_cond.getColumn(0, "code");
	if (utlf_isNull(title)) {
		sysf_messageBox("제목은","I003");	
		Div00.ipt_title.setFocus();
		return;
	}
	if (utlf_isNull(prcpcd)) {
		sysf_messageBox("처방코드는","I003");
		Div00.cmb_prcpcd.setFocus();
		return;
	}					
	if (utlf_isNull(ioflag)) {
		sysf_messageBox("외래/입원 구분은","I003");
		Div00.rdo_ioflag.setFocus();
		return;
	}
	if (utlf_isNull(code)) {
		sysf_messageBox("처방코드/상병코드 구분은","I003");
		Div00.rdo_code.setFocus();
		return;
	}		

	var prcpcd  = "'"; 
	var prcpcd2=  "";
	for(var i = 0; i < ds_init_prcpcd.rowcount; i++){ 
		prcpcd  = prcpcd + ds_init_prcpcd.getColumn(i, "codecd") +"', '";
		prcpcd2 = prcpcd2 + "_" + ds_init_prcpcd.getColumn(i, "codecd");
	}
		
	prcpcd = prcpcd + " ' ";
	ds_cond.setColumn(0, "prcpcd",  prcpcd);
	ds_cond.setColumn(0, "prcpcd2", prcpcd2);

	lf_getHardCDList("N", 5568, null, ds_hidden_time);

	var jobkind = sysf_getUserInfo("jobkindcd");
	//					if (  jobkind == "0330" || jobkind == "1411"  )
	//					{
	//						model.setValue("/root/main/cond/wardcd"           , ".");
	//					}
	//					else
	//					{
	//						model.setValue("/root/main/cond/orddeptcd"       , ".");
	//					}

	var sUserDeptcd = sysf_getUserInfo("dutplcecd");
	var cTime = utlf_getCurrentTime().substr(0, 4);	
	var time = ds_hidden_time.lookup("hardcd", sUserDeptcd, "hardcdnm");
	
	var bTransaction = false;

	if ( !utlf_isNull(time) ) {
		var ftime = time.substr(0,4);
		var ttime = time.substr(4,4);
		if(cTime > ttime || cTime < ftime) {
			bTransaction = true;
		} else {
			var ddInterval = utlf_getDateInterval(Div00.ipt_fromdd.value, Div00.ipt_todd.value);
			if(ddInterval > 30){
				sysf_messageBox("30일까지만 조회", "I006");
				return;
			} else {
				bTransaction = true;
			}		
		}
	} else {
		if(cTime > "1700" || cTime < 0830) {						
			bTransaction = true;
		} else {
			var ddInterval = utlf_getDateInterval(Div00.ipt_fromdd.value, Div00.ipt_todd.value);
			if(ddInterval > 30){
				sysf_messageBox("업무시간[08:30 ~ 17:00]에는 30일까지만 조회", "I006");
				return;
			} else {
				bTransaction = true;
			}			
		}
	}
	
	if(bTransaction) {
		
		ds_patprcplist.clearData();
		
		var oParam = {};
			oParam.id       = "TRMMO16302";
			oParam.service  = "prcpmngtapp.PrcpMngt";
			oParam.method   = "reqGetDeptPrcpList";
			oParam.inds     = "req=ds_cond";
			oParam.outds    = "ds_patprcplist=patprcplist";
			oParam.async    = false;
			oParam.callback = "cf_TRMMO16302";

		tranf_submit(oParam);
		
		if(arErrorCode.pop("TRMMO16302") >= 0){
			var oParam = {};
				oParam.id       = "TXMMO16302";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqExePrcpSrchHist";
				oParam.inds     = "savedata=ds_cond";
				oParam.async    = false;

			tranf_submit(oParam);
		}
	}
}

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

function Div00_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var title = lf_getDsValue(ds_cond, 0, "title");
	//20200303 이돈희 : grd_excel과 grd_prplist의 컬럼이 동일하므로 grd_excel에서 grd_prcplist로 변경
	//fsaveGridToExcel(grd_excel, title);	
	fsaveGridToExcel(grd_prcplist, title);
}

/*
 * @desc   : 업무협조문 기본조건 초기화
 * @
 * @param  :
 * @return :
 * @author : 김영학
 * @---------------------------------------------------
 */
 function fSetBaseInit() {	
	ds_cond.setColumn(0, "orddeptcd", "-");
	ds_cond.setColumn(0, "wardcd"   , "-");
	
	var jobkind = sysf_getUserInfo("jobkindcd");
	if ( jobkind == "0330" || jobkind == "1411" )
	{
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "wardnm"), "size", 0);
		
		Div00.div_case1.visible = true;
		Div00.div_case3.visible = true;
		Div00.div_case2.visible = false;
		Div00.div_case4.visible = false;
	
		lf_mmbfGetDeptCodeComboList(ds_orddept, "A");
		
		frmf_addComboItem("Div00.div_case1.cmb_orddept");      //부서콤보 Item '전체'추가
		ds_cond.setColumn(0, "orddeptcd", "-");
	}
	else
	{
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "wardnm"), "size", 80);
		
		Div00.div_case2.visible = true;
		Div00.div_case4.visible = true;
		Div00.div_case1.visible = false;
		Div00.div_case3.visible = false;
		
		var oParam = {};
			oParam.id       = "TRMNR01002";
			oParam.service  = "carerecapp.TnsCareRec";
			oParam.method   = "reqGetWardList";
			oParam.inds     = "refCond=ds_send";
			oParam.outds    = "ds_wardcdgruplist=wardcdgruplist";
			oParam.async    = false;

		tranf_submit(oParam);

		frmf_addComboItem("Div00.div_case2.combo1");      //부서콤보 Item '전체'추가
		ds_cond.setColumn(0, "wardcd", "-");
	}

    ds_cond.setColumn(0, "fromdd", utlf_getCurrentDate());
	ds_cond.setColumn(0, "todd"  , utlf_getCurrentDate());	
 }
 
 /*
 * @desc   : 업무협조문 처방코드나 상병코드 선택시 그리드 초기화
 * @
 * @param  :
 * @return :
 * @author : 김영학
 * @---------------------------------------------------
 */
 function fGrdInit() {
	grd_prcplist.enableevent = false;
	
	ds_patprcplist.clearData();
	
	var code = ds_cond.getColumn(0, "code");
	if (code == "P" ) {    // 처방 코드 조회
		//grd_prcplist.caption="환자번호^환자명^S/A^주민번호^처방일^처방의^수량^용량^횟수^일수^용법/검체^처방코드^진단코드^진료과^우편번호^주소" 		
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpqty"),         "size", 0);//42
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpvol"),         "size", 0);//39
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcptims"),        "size", 39);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpdayno"),       "size", 39);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "drugmthdspccdnm"), "size", 95);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpcd"),          "size", 90);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "icd10cd"),         "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "diagcd"),          "size", 90);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "diagengnm"),       "size", 210);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpnm"),          "size", 150);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "kindcd"),          "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "kindcdflag"),      "size", 0);
	} else {    // 진단코드로 조회
		//grd_prcplist.caption="환자번호^환자명^S/A^주민번호^진료일^처방의^수량^용량^횟수^일수^용법/검체^처방코드^진단코드^진료과^우편번호^주소" 
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpqty"),         "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpvol"),         "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcptims"),        "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpdayno"),       "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "drugmthdspccdnm"), "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpcd"),          "size", 0);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "icd10cd"),         "size", 60);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "diagcd"),          "size", 90);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "diagengnm"),       "size", 210);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "prcpnm"),          "size", 150);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "kindcd"),          "size", 40);
		grd_prcplist.setFormatColProperty(grd_prcplist.getBindCellIndex("body", "kindcdflag"),      "size", 40);
	}
	
	grd_prcplist.enableevent = true;
 }
 
/**
  * @desc   : 코드를 콤보 인스턴스에 매핑
  * @
  * @param  :
  * @return :
  * @author : 김영학 (2008.12.10)
  * @---------------------------------------------------
  */
 function fSetComboCodeCD(){  
	ds_init_prcpcd.clearData();
	
    var rtnparam = frmf_getParameter("SPMMO16300");
    
    if(utlf_isNull(rtnparam)) return;
    
    rtnparam = rtnparam.split("▩");
    
    for(var i = 1; i < rtnparam.length - 1; i++){ 
		var tmpstr = rtnparam[i];
		tmpstr = tmpstr.split("▦");

		var row = ds_init_prcpcd.addRow();
		ds_init_prcpcd.setColumn(row, "codecd", tmpstr[0]);
		ds_init_prcpcd.setColumn(row, "codenm", tmpstr[0]);
    }
 }
 
 /**
  * @desc   : 엑셀저장
  * @
  * @param  :
  * @return :
  * @author : 김영학 (2008.12.18)
  * @---------------------------------------------------
  */ 
function fsaveGridToExcel(grdObj, title){
    var sTitle = "코드별 환자조회 " + title;
    
	grdf_exportExcel(grdObj, sTitle, "코드별 환자조회", true, null, null, null, "wordwrap");
}]]></Script>
  </Form>
</FDL>