YNU_JEUS/app_home/himed/xpapps/emr/carerecxp/xp/SMMNR04600_수혈현황조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNR04600" position="absolute 0 0 1195 789" titletext="수혈기록 현황조회" oninit="SMMNR04600_oninit" onload="SMMNR04600_onload" ontimer="SMMNR04600_ontimer">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="1" class="div_SA" position="absolute 0 25 1192 105">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 1034 30 1090 52" anchor="default" onclick="grp_sea_btn_search_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1017 11 1023 70" anchor="default"/>
              <Static id="caption2" text="병동      :" class="search_name" position="absolute 505 10 575 27" anchor="default"/>
              <Combo id="cmb_dateflag" taborder="2" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 96 7 179 28" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">prcpddselect</Col>
                      <Col id="datacolumn">처방일</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">deliveselect</Col>
                      <Col id="datacolumn">불출일</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption1" text="~" position="absolute 273 8 288 28" anchor="default"/>
              <Radio id="rdo_wardpatientflag" taborder="3" columncount="0" rowcount="3" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 409 6 488 75" anchor="default" onitemchanged="grp_sea_rdo_wardpatientflag_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">ward</Col>
                      <Col id="datacolumn">병동별</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">patient</Col>
                      <Col id="datacolumn">환자별</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">dept</Col>
                      <Col id="datacolumn">기록부서별</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption4" text="병실 :" class="search_name" position="absolute 715 11 760 28" anchor="default"/>
              <Static id="caption3" text="성명 :" class="search_name" position="absolute 715 33 760 50" anchor="default"/>
              <Static id="caption5" text="S/A :" class="search_name" position="absolute 901 32 945 49" anchor="default"/>
              <Static id="caption7" text="등록번호 :" class="search_name" position="absolute 504 33 575 50" anchor="default"/>
              <Calendar id="ipt_prcpddfrom" taborder="4" class="input_default" position="absolute 183 7 270 28" anchor="default" autoselect="true" autoskip="true"/>
              <Calendar id="ipt_prcdddto" taborder="5" class="input_default" position="absolute 289 7 376 28" anchor="default" autoselect="true"/>
              <Combo id="cmb_wardcd" taborder="6" innerdataset="@ds_main_cond_wardcdgrup" codecolumn="wardcd" datacolumn="wardnm" class="combo_s_essential" position="absolute 578 7 668 28" anchor="default" onitemchanged="grp_sea_cmb_wardcd_onitemchanged"/>
              <Combo id="cmb_roomcd" taborder="7" innerdataset="@ds_main_cond_roomcdgrup" codecolumn="roomcd" datacolumn="roomnm" class="combo_search" position="absolute 764 8 849 29" anchor="default" onitemchanged="grp_sea_cmb_roomcd_onitemchanged"/>
              <Edit id="opt_sexage" taborder="8" readonly="true" class="output" position="absolute 948 29 1005 50" anchor="default"/>
              <Edit id="ipt_pid" taborder="9" class="input_search" position="absolute 578 30 668 51" anchor="default" onkeyup="grp_sea_ipt_pid_onkeyup" autoselect="true"/>
              <Static id="caption9" text="조회기준 :" class="search_name" position="absolute 22 10 93 27" anchor="default"/>
              <Button id="btn_excel" taborder="10" text="엑셀저장" class="btn7" position="absolute 1098 30 1178 52" anchor="default" onclick="grp_sea_btn_excel_onclick"/>
              <Static id="caption8" text="(                                      )" position="absolute 507 53 679 73" anchor="default"/>
              <Radio id="rdo_recdeptflag" taborder="11" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 519 54 659 71" anchor="default" onitemchanged="grp_sea_rdo_recdeptflag_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">시작부서</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">E</Col>
                      <Col id="datacolumn">종료부서</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption10" text="부서 :" class="search_name" position="absolute 715 56 760 73" anchor="default"/>
              <Combo id="cmb_recdeptcd" taborder="12" innerdataset="@ds_main_cond_wardcdgrup" codecolumn="wardcd" datacolumn="wardnm" class="combo_s_essential" position="absolute 764 54 929 75" anchor="default"/>
              <Combo id="cmb_pid" taborder="13" innerdataset="@ds_main_cond_patientgrup" codecolumn="pid" datacolumn="patientnm" class="combo_search" position="absolute 764 31 849 52" anchor="default" onitemchanged="grp_sea_cmb_pid_onitemchanged"/>
              <Edit id="opt_patientnm" taborder="14" readonly="true" class="output" visible="false" position="absolute 764 31 849 52" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" class="line_10" position="absolute 0 140 1192 146"/>
        <Static id="caption26" text="수혈기록내역" class="tit_2" position="absolute 0 122 126 139"/>
        <Grid id="grd_execdetlgruplist" class="datagrid2" taborder="2" binddataset="ds_main_cond_execdetlgrup" useinputpanel="false" position="absolute 0 143 1192 758" cellsizingtype="col" oncelldblclick="grd_execdetlgruplist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="28" band="left"/>
                <Column size="53" band="left"/>
                <Column size="80" band="left"/>
                <Column size="60" band="left"/>
                <Column size="45" band="left"/>
                <Column size="61" band="left"/>
                <Column size="60" band="left"/>
                <Column size="60" band="left"/>
                <Column size="90" band="left"/>
                <Column size="180" band="left"/>
                <Column size="85"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="115"/>
                <Column size="95"/>
                <Column size="100"/>
                <Column size="115"/>
                <Column size="95"/>
                <Column size="100"/>
                <Column size="95"/>
              </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="성명"/>
                <Cell col="4" text="S/A"/>
                <Cell col="5" text="ABO RH"/>
                <Cell col="6" text="상태"/>
                <Cell col="7" text="처방구분"/>
                <Cell col="8" text="처방코드"/>
                <Cell col="9" text="처방명"/>
                <Cell col="10" text="혈액번호"/>
                <Cell col="11" text="처방일시"/>
                <Cell col="12" text="불출일시"/>
                <Cell col="13" text="수혈시작일시"/>
                <Cell col="14" text="수혈시작간호사"/>
                <Cell col="15" text="수혈시작부서"/>
                <Cell col="16" text="수혈종료일시"/>
                <Cell col="17" text="수혈종료간호사"/>
                <Cell col="18" text="수혈종료부서"/>
                <Cell col="19" text="검사자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" text="bind:roomcd"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:patnm"/>
                <Cell col="4" style="align:left;" text="bind:grdrage"/>
                <Cell col="5" text="bind:aborh"/>
                <Cell col="6" text="bind:prcpstat"/>
                <Cell col="7" text="bind:prcppreptfflag"/>
                <Cell col="8" text="bind:prcpcd"/>
                <Cell col="9" style="align:left middle;" text="bind:prcpnm"/>
                <Cell col="10" text="bind:blodno"/>
                <Cell col="11" displaytype="normal" text="bind:rgstdt" mask="expr:utlf_isNull(rgstdt) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="12" displaytype="normal" text="bind:deliveexecdt" mask="expr:utlf_isNull(deliveexecdt) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="13" displaytype="normal" text="bind:tnsstrddtm" mask="expr:utlf_isNull(tnsstrddtm) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="14" text="bind:tnsstrnursenm"/>
                <Cell col="15" text="bind:tnsstrnursedeptnm"/>
                <Cell col="16" text="bind:tnsendddtm" mask="expr:utlf_isNull(tnsendddtm) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="17" text="bind:tnsendnursenm"/>
                <Cell col="18" text="bind:tnsendnursedeptnm"/>
                <Cell col="19" text="bind:testexecnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="수혈기록 현황조회" class="tit_1" position="absolute 0 0 143 25"/>
        <Static id="caption11" text="[표]" position="absolute 1163 763 1188 783"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond_execdetlgrup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="roomcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="grdrage" type="STRING"/>
          <Column id="aborh" type="STRING"/>
          <Column id="prcpstat" type="STRING"/>
          <Column id="prcppreptfflag" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="blodno" type="STRING"/>
          <Column id="rgstdt" type="STRING"/>
          <Column id="deliveexecdt" type="STRING"/>
          <Column id="tnsstrddtm" type="STRING"/>
          <Column id="tnsstrnursenm" type="STRING"/>
          <Column id="tnsstrnursedeptnm" type="STRING"/>
          <Column id="tnsendddtm" type="STRING"/>
          <Column id="tnsendnursenm" type="STRING"/>
          <Column id="tnsendnursedeptnm" type="STRING"/>
          <Column id="testexecnm" 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="dateflag" type="STRING" size="256"/>
          <Column id="prcpddfrom" type="STRING" size="256"/>
          <Column id="prcdddto" type="STRING" size="256"/>
          <Column id="wardpatientflag" type="STRING" size="256"/>
          <Column id="recdeptflag" type="STRING" size="256"/>
          <Column id="recdeptcd" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="deliveflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="dateflag">deliveselect</Col>
            <Col id="wardpatientflag">patient</Col>
            <Col id="deliveflag">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cond_patientgrupInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="patientnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="sexage" type="STRING" size="256"/>
          <Column id="abo" type="STRING" size="256"/>
          <Column id="rhname" type="STRING" size="256"/>
          <Column id="rh" type="STRING" size="256"/>
          <Column id="btype" type="STRING" size="256"/>
          <Column id="reptrslt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="patientnm"/>
            <Col id="pid"/>
            <Col id="sexage"/>
            <Col id="abo"/>
            <Col id="rhname"/>
            <Col id="rh"/>
            <Col id="btype"/>
            <Col id="reptrslt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cond_wardcdgrup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="wardnm" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cond_roomcdgrup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cond_patientgrup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="patientnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cond_deptcdgruplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_dateflag" propid="value" datasetid="ds_main_cond" columnid="dateflag"/>
      <BindItem id="item1" compid="grp_sea.ipt_prcpddfrom" propid="value" datasetid="ds_main_cond" columnid="prcpddfrom"/>
      <BindItem id="item2" compid="grp_sea.ipt_prcdddto" propid="value" datasetid="ds_main_cond" columnid="prcdddto"/>
      <BindItem id="item3" compid="grp_sea.rdo_wardpatientflag" propid="value" datasetid="ds_main_cond" columnid="wardpatientflag"/>
      <BindItem id="item4" compid="grp_sea.rdo_recdeptflag" propid="value" datasetid="ds_main_cond" columnid="recdeptflag"/>
      <BindItem id="item5" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_main_cond_patientgrupInfo" columnid="pid"/>
      <BindItem id="item6" compid="grp_sea.opt_patientnm" propid="value" datasetid="ds_main_cond_patientgrupInfo" columnid="patientnm"/>
      <BindItem id="item7" compid="grp_sea.cmb_recdeptcd" propid="value" datasetid="ds_main_cond" columnid="recdeptcd"/>
      <BindItem id="item8" compid="grp_sea.opt_sexage" propid="value" datasetid="ds_main_cond_patientgrupInfo" columnid="sexage"/>
      <BindItem id="item9" compid="grp_sea.cmb_wardcd" propid="value" datasetid="ds_main_cond" columnid="wardcd"/>
      <BindItem id="item10" compid="grp_sea.cmb_roomcd" propid="value" datasetid="ds_main_cond" columnid="roomcd"/>
    </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";

var arErrorCode = new HashArray();
/******************************************************************
 * Argument          : 
 * Description       : Ready
 ******************************************************************/
function SMMNR04600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNR04600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_setGridSort(grd_execdetlgruplist);
	
	ds_main_cond_execdetlgrup.clearData();
	
	// 기준일에 현재날짜(디폴트)
	ds_main_cond.setColumn(0, "prcpddfrom", utlf_getCurrentDate());
	
	var addDy = ds_main_cond.getColumn(0, "prcpddfrom");
	addDy = addDy.toDate().getAddDate(-3,"D");
	addDy = addDy.getDateFormat();

	// 기준일에 현재날짜(디폴트)
	ds_main_cond.setColumn(0, "prcpddfrom", addDy);
	ds_main_cond.setColumn(0, "prcdddto", utlf_getCurrentDate());

	fGetWardList();// 병동코드 리스트
	
	//frmf_inputEnterKey("grp_sea.rdo_wardpatientflag", "onitemchanged", new ItemChangeEventInfo);
	this.setTimer(0, 100);
}

/**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  병동 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWardList(){
	ds_send.clear();
	ds_send.addColumn("wardcd", "string", 256);
	ds_send.addColumn("deptsearchyn", "string", 256);
	var iRow = ds_send.addRow();
	
	ds_send.setColumn(iRow, "wardcd", ds_main_cond_wardcdgrup.getColumn(0, "wardcd"));
	ds_send.setColumn(iRow, "deptsearchyn", "Y");

	var oParam = {};
		oParam.id          = "TRMNR07602";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetWardList";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_cond_wardcdgrup=wardcdgruplist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMNR07602";

	tranf_submit(oParam);

	if( arErrorCode.pop("TRMNR07602") > -1 ){
		if( ds_main_cond.getColumn(0, "wardpatientflag") == "ward" ){
			grp_sea.cmb_wardcd.setFocus();
		}else{
			grp_sea.ipt_pid.setFocus();
		}
	}	  
}

function cf_TRMNR07602(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    ds_main_cond_wardcdgrup.updateColID("depthngnm", "wardnm");
    ds_main_cond_wardcdgrup.updateColID("deptcd", "wardcd");
}

/******************************************************************
 * Argument          : 
 * Description       : 병동별/환자별/기록부서별 radio event
 ******************************************************************/
function grp_sea_rdo_wardpatientflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var wardpatientflag = ds_main_cond.getColumn(0, "wardpatientflag");
	if( wardpatientflag == 'ward') {
		grp_sea.cmb_wardcd.enable = true ;
		grp_sea.cmb_roomcd.enable = false ;
		grp_sea.cmb_pid.enable = false ;
		grp_sea.ipt_pid.enable = false ;
		grp_sea.rdo_recdeptflag.enable = false;
		grp_sea.cmb_recdeptcd.enable = false;
		grp_sea.opt_patientnm.visible = false;

		grp_sea.cmb_roomcd.value = "" ;
		grp_sea.cmb_pid.value = "" ;
		grp_sea.ipt_pid.value = "" ;
		grp_sea.opt_sexage.value = "" ;
		grp_sea.opt_patientnm.value = "" ;								
		grp_sea.rdo_recdeptflag.value="";
		grp_sea.cmb_recdeptcd.value="";
		grp_sea.cmb_wardcd.setFocus();
	} else if ( wardpatientflag == 'patient' ){
		grp_sea.cmb_wardcd.enable = true ;
		grp_sea.cmb_roomcd.enable = true ;
		grp_sea.cmb_pid.enable = true ;
		grp_sea.ipt_pid.enable = true ;
		grp_sea.rdo_recdeptflag.enable = false;
		grp_sea.cmb_recdeptcd.enable = false;
		grp_sea.opt_patientnm.visible = true;
		
		grp_sea.cmb_roomcd.value = "" ;
		grp_sea.cmb_pid.value = "" ;
		grp_sea.ipt_pid.value = "" ;
		grp_sea.opt_sexage.value = "" ;
		grp_sea.opt_patientnm.value = "" ;		
		grp_sea.cmb_wardcd.value = "";
		grp_sea.rdo_recdeptflag.value="";
		grp_sea.cmb_recdeptcd.value="";
		grp_sea.ipt_pid.setFocus();
	} else {
		grp_sea.cmb_wardcd.enable = false ;
		grp_sea.cmb_roomcd.enable = false ;
		grp_sea.cmb_pid.enable = false ;
		grp_sea.ipt_pid.enable = false ;
		grp_sea.rdo_recdeptflag.enable = true;
		grp_sea.cmb_recdeptcd.enable = true;
		grp_sea.opt_patientnm.visible = false;
		
		grp_sea.cmb_roomcd.value = "" ;
		grp_sea.cmb_pid.value = "" ;
		grp_sea.ipt_pid.value = "" ;
		grp_sea.opt_sexage.value = "" ;
		grp_sea.opt_patientnm.value = "" ;		
		grp_sea.cmb_wardcd.value = "";

		grp_sea.rdo_recdeptflag.value = "S";
		grp_sea.cmb_recdeptcd.value = sysf_getUserInfo("dutplcecd");

		grp_sea.cmb_recdeptcd.setFocus();
	}

	ds_main_cond_execdetlgrup.clearData();
}

/******************************************************************
 * Argument          : 
 * Description       : 병동 combo event
 ******************************************************************/
function grp_sea_cmb_wardcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var wardpatientflag = ds_main_cond.getColumn(0, "wardpatientflag");
	if( wardpatientflag == 'ward' ) {
		fGetTnsPresCondRef();//혈액미불출 리스트 조회버튼
	} else {						
		grp_sea.ipt_pid.value = "" ;	
		grp_sea.opt_patientnm.value = "" ;
		grp_sea.opt_sexage.value = "" ;	
		grp_sea.opt_patientnm.visible = false;
		grp_sea.cmb_pid.value = "";
		fGetRoomList();// 병실정보를 가져온다.
	}
}

/**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈현황조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetTnsPresCondRef(){
	var wardpatientflag = ds_main_cond.getColumn(0, "wardpatientflag");
	if( wardpatientflag == "patient" ) {
		var sPid = ds_main_cond_patientgrupInfo.getColumn(0, "pid");
		if( utlf_isNull(sPid) ){
			sysf_messageBox("등록번호를 ","C001");
			grp_sea.ipt_pid.setFocus();
			return;	
		}
	} else if( wardpatientflag == "dept" ) {
		if( utlf_isNull(ds_main_cond.getColumn(0, "recdeptflag")) || utlf_isNull(ds_main_cond.getColumn(0, "recdeptcd")) ){
			sysf_messageBox("기록부서 구분 및 부서명은 ","I003");
			grp_sea.cmb_recdeptcd.setFocus();
			return;	
		}
	}

	ds_send.clear();
	ds_send.addColumn("prcpddfrom", "string", 256);
	ds_send.addColumn("prcpddto", "string", 256);
	ds_send.addColumn("wardcd", "string", 256);
	ds_send.addColumn("roomcd", "string", 256);
	ds_send.addColumn("hngnm", "string", 256);
	ds_send.addColumn("pid", "string", 256);
	ds_send.addColumn("dateflag", "string", 256);
	ds_send.addColumn("wardpatientflag", "string", 256);
	ds_send.addColumn("recdeptflag", "string", 256);
	ds_send.addColumn("recdeptcd", "string", 256);
	
	var nRow = ds_send.addRow();

	ds_send.setColumn(0, "prcpddfrom", grp_sea.ipt_prcpddfrom.value);
	ds_send.setColumn(0, "prcpddto", grp_sea.ipt_prcdddto.value);
	ds_send.setColumn(0, "wardcd", grp_sea.cmb_wardcd.value);	
	ds_send.setColumn(0, "roomcd", grp_sea.cmb_roomcd.value);	
	ds_send.setColumn(0, "hngnm", grp_sea.cmb_pid.value);
	ds_send.setColumn(0, "pid", grp_sea.ipt_pid.value);

	ds_send.setColumn(0, "dateflag", grp_sea.cmb_dateflag.value);
	ds_send.setColumn(0, "wardpatientflag", grp_sea.rdo_wardpatientflag.value);
	ds_send.setColumn(0, "recdeptflag", grp_sea.rdo_recdeptflag.value);
	ds_send.setColumn(0, "recdeptcd", grp_sea.cmb_recdeptcd.value);
	
	var oParam = {};
		oParam.id          = "TRMNR04601";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetTnsPresCondRef";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_cond_execdetlgrup=execdetlgruplist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR04601";

	tranf_submit(oParam);
}

/**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  병실 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetRoomList(){
	ds_send.clear();
	ds_send.addColumn("wardcd", "string", 256);
	
	ds_send.setColumn(ds_send.addRow(), "wardcd", grp_sea.cmb_wardcd.value);

	var oParam = {};
		oParam.id          = "TRMNR07603";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetRoomList";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_cond_roomcdgrup=roomcdgruplist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR07603";

	tranf_submit(oParam);

	grp_sea.cmb_roomcd.setFocus();
}

/******************************************************************
 * Argument          : 
 * Description       : 등록번호 input event
 ******************************************************************/
function grp_sea_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		fGetPatientInfo("entr");
		grp_sea.opt_patientnm.visible = true;
		ds_main_cond_roomcdgrup.clearData();
		
		frmf_inputEnterKey("grp_sea.btn_search", "onclick", new ClickEventInfo);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 시작부서/종료부서 radio event
 ******************************************************************/
function grp_sea_rdo_recdeptflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	grp_sea.cmb_recdeptcd.setFocus();
}

/******************************************************************
 * Argument          : 
 * Description       : 시작부서/종료부서 radio event
 ******************************************************************/
function grp_sea_cmb_roomcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	grp_sea.ipt_pid.value = "";
	grp_sea.opt_patientnm.value = "";
	grp_sea.opt_sexage.value = "";
	fGetPatientList();// 환자리스트 정보를 가져온다.
}

/**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  환자 상세정보 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientInfo(pFlag){

	ds_send.clear();

	if( pFlag == "entr" ){
    	grp_sea.cmb_wardcd.value = "";
    	grp_sea.cmb_roomcd.value = "";
    	grp_sea.cmb_pid.value = "";
    	ds_send.addColumn("pid", "string", 256);
    	ds_send.setColumn(ds_send.addRow(), "pid", grp_sea.ipt_pid.value);	
    }else{
			ds_send.addColumn("wardcd", "string", 256);
			ds_send.addColumn("roomcd", "string", 256);
			var iRow = ds_send.addRow();
			
			ds_send.setColumn(iRow, "wardcd", grp_sea.cmb_wardcd.value);
			ds_send.setColumn(iRow, "roomcd", grp_sea.cmb_roomcd.value);
			if( !utlf_isNull(grp_sea.ipt_pid.value) ){
				  ds_send.addColumn("pid", "string", 256);
				  ds_send.setColumn(iRow, "pid", grp_sea.ipt_pid.value);	
			}
	}

	var oParam = {};
		oParam.id          = "TRMNR07605";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetPatientInto";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_cond_patientgrupInfo=patientgrupInfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRMNR07605";

	tranf_submit(oParam);

	if( arErrorCode.pop("TRMNR07605") > -1 ){
		if( pFlag == "entr" ){
          ds_main_cond_patientgrup.copyData(ds_main_cond_patientgrupInfo);
		}
	}	  

	frmf_inputEnterKey("grp_sea.btn_search", "onclick", new ClickEventInfo);
}

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

/**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  환자 정보 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientList(){
	ds_send.clear();

	ds_send.addColumn("wardcd", "string", 256);
	ds_send.addColumn("roomcd", "string", 256);
	var iRow = ds_send.addRow();
	
	ds_send.setColumn(iRow, "wardcd", grp_sea.cmb_wardcd.value);
	ds_send.setColumn(iRow, "roomcd", grp_sea.cmb_roomcd.value);

	var oParam = {};
		oParam.id          = "TRMNR07604";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetPatientList";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_cond_patientgrup=patientgruplist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR07604";

	tranf_submit(oParam);

	grp_sea.cmb_pid.setFocus();
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetTnsPresCondRef();//혈액미불출 리스트 조회버튼
}

/******************************************************************
 * Argument          : 
 * Description       : Excel button event
 ******************************************************************/
function grp_sea_btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_cond_execdetlgrup.rowcount > 1 ){
		grdf_exportExcel(grd_execdetlgruplist, "수혈현황조회", "수혈현황조회", false, "", "", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 성명 combo event
 ******************************************************************/
function grp_sea_cmb_pid_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var cRow = ds_main_cond_patientgrup.rowposition;
	grp_sea.ipt_pid.value = ds_main_cond_patientgrup.getColumn(cRow, "pid");
	grp_sea.opt_patientnm.value = "";
	grp_sea.opt_sexage.value = "";
	fGetPatientInfo();// 환자 개인정보를 가져온다.
	fGetTnsPresCondRef();//혈액미불출 리스트 조회버튼
}

function SMMNR04600_ontimer(obj:Form, e:TimerEventInfo)
{
	if( e.timerid == 0 ){
		this.killTimer(0);
		frmf_inputEnterKey("grp_sea.rdo_wardpatientflag", "onitemchanged", new ItemChangeEventInfo);
	}
}

function grd_execdetlgruplist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if(ds_main_cond_execdetlgrup.rowcount >= 0) {
		var rgstdd = ds_main_cond_execdetlgrup.getColumn(ds_main_cond_execdetlgrup.rowposition, "rgstdt").substring(0,8);
		var param = "I▦" + ds_main_cond_execdetlgrup.getColumn(ds_main_cond_execdetlgrup.rowposition, "pid") 
								 + "▦" + ds_main_cond_execdetlgrup.getColumn(ds_main_cond_execdetlgrup.rowposition, "indd") 
								 + "▦" + ds_main_cond_execdetlgrup.getColumn(ds_main_cond_execdetlgrup.rowposition, "cretno") 
								 + "▦" + ds_main_cond_execdetlgrup.getColumn(ds_main_cond_execdetlgrup.rowposition, "instcd")
								 + "▦" + rgstdd;												
		
		appf_initPatientInfo(param);
				
		frmf_setParameter("SMMNR010_Param", "IPRC2"); 
		frmf_setParameter("SMMNR010_RgstddDATA",rgstdd);		
		frmf_open("SMMNR01000", "SMMNR01000", "", null, "1", "15", "128", null, null, null, null, null, "M");
	}
}
]]></Script>
  </Form>
</FDL>