YNU_JEUS/app_home/himed/xpapps/ast/pharmacyconsultxp/xp/SMADC03300_ADR과거력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADC03300" position="absolute 0 0 1195 768" titletext="ADR과거력조회" oninit="SMADC03300_oninit" onload="SMADC03300_onload">
    <Layouts>
      <Layout>
        <Static id="caption19" text="ADR과거력조회" class="tit_1" position="absolute 0 0 145 25"/>
        <Div id="grp_sea" anchor="left top right" taborder="1" style="align:center top;" class="div_SA" position="absolute 0 25 1193 65">
          <Layouts>
            <Layout>
              <Static id="caption3" text="입력일자 :" class="search_name" position="absolute 13 13 84 30" anchor="default"/>
              <Calendar id="ipt_prcpddstart" taborder="1" class="input_search" position="absolute 87 10 190 31" anchor="default" autoselect="true"/>
              <Static id="caption6" text="~" position="absolute 198 13 218 28" anchor="default"/>
              <Calendar id="ipt_prcpddend" taborder="2" class="input_search" position="absolute 214 10 317 31" anchor="default" autoselect="true"/>
              <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 331 12 402 29" anchor="default"/>
              <Edit id="ipt_pid" taborder="3" class="input_search" position="absolute 405 9 490 30" anchor="default" onkeydown="grp_sea_ipt_pid_onkeydown"/>
              <Static id="caption4" text="진료과 :" class="search_name" position="absolute 513 11 571 28" anchor="default"/>
              <Edit id="ipt_wardnm" taborder="4" class="input_search" enable="false" position="absolute 572 9 757 30" anchor="default"/>
              <Button id="button4" taborder="6" class="icon_search" position="absolute 760 13 776 29" anchor="default" onclick="grp_sea_button4_onclick"/>
              <Static id="caption2" text="의뢰약물 :" class="search_name" position="absolute 810 11 881 28" anchor="default"/>
              <Edit id="ipt_srchdrugcd" taborder="7" class="input_search" position="absolute 883 9 984 30" anchor="default" onkeydown="grp_sea_ipt_srchdrugcd_onkeydown"/>
              <Static id="caption5" text="병동 :" class="search_name" visible="false" position="absolute 930 7 975 24" anchor="default"/>
              <Combo id="cbo_orddeptcd" taborder="8" innerdataset="ds_init_cbo_orddeptcd" codecolumn="deptcd" datacolumn="deptnm" class="combo_search" visible="false" position="absolute 960 18 1100 39" anchor="default"/>
              <Combo id="cmb_ward" taborder="9" innerdataset="ds_init_cmb_ward" codecolumn="deptcd" datacolumn="deptnm" class="combo_search" visible="false" position="absolute 1010 13 1100 34" anchor="default"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1102 10 1108 35" anchor="top right"/>
              <Button id="btn_seamthd" taborder="10" text="조회" class="btn1" position="absolute 1120 12 1176 34" anchor="top right" onclick="grp_sea_btn_seamthd_onclick"/>
              <CheckBox id="chk_ward" taborder="11" class="checkbox_search" visible="false" position="absolute 590 36 775 51" anchor="default"/>
              <Button id="button00" taborder="12" class="icon_search" position="absolute 988 13 1004 29" onclick="grp_sea_button00_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption10" text="과거력 리스트" class="tit_2" position="absolute 0 86 120 110"/>
        <Shape id="line4" linetype="vertical" class="line_1" position="absolute 0 151 1194 157"/>
        <Grid id="grd_adrpasthistlist" taborder="3" binddataset="ds_grd_adrpasthistlist" useinputpanel="false" position="absolute 0 104 1193 766" anchor="all" style="focusborder:0 none #808080ff ;border:1 solid #33bbbbff,0 solid #bac5ccff,1 solid #bac5ccff,0 solid #bac5ccff;" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="70"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="216"/>
                <Column size="150"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="65"/>
                <Column size="75"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="등록번호"/>
                <Cell col="1" text="환자명"/>
                <Cell col="2" text="입력일자"/>
                <Cell col="3" text="원인약물"/>
                <Cell col="4" text="증상"/>
                <Cell col="5" text="인과관계"/>
                <Cell col="6" text="등록자"/>
                <Cell col="7" text="직군"/>
                <Cell col="8" text="발생일"/>
                <Cell col="9" text="진료과"/>
                <Cell col="10" text="분류"/>
                <Cell col="11" text="비고"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:pathngnm"/>
                <Cell col="2" displaytype="date" text="bind:inptdd"/>
                <Cell col="3" text="bind:resndrugcd"/>
                <Cell col="4" text="bind:symp"/>
                <Cell col="5" displaytype="combo" edittype="combo" text="bind:casrslt" combodataset="ds_casrslt" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="6" text="bind:rgstrnm"/>
                <Cell col="7" text="bind:grupjoblncd"/>
                <Cell col="8" displaytype="date" text="bind:sympmnftdd"/>
                <Cell col="9" text="bind:orddeptnm"/>
                <Cell col="10" displaytype="combo" edittype="combo" text="bind:clsflag" combodataset="ds_clsflag" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="11" text="bind:cmt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel" taborder="4" text="EXCEL" onclick="group3_btn_excel_onclick" class="btn7" position="absolute 1120 76 1193 100" anchor="top right"/>
        <cp_checkboxList id="chk_ward" titletext="CheckBox List" taborder="2" text="cp_checkboxList00" scrollbars="none" position="absolute 572 54 757 82" style="background:white;border:1 solid #808080ff ;" col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" class="checkbox_search" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_reqdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_adrpasthistlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="pathngnm" type="STRING"/>
          <Column id="inptdd" type="STRING"/>
          <Column id="resndrugcd" type="STRING"/>
          <Column id="symp" type="STRING"/>
          <Column id="casrslt" type="STRING"/>
          <Column id="rgstrnm" type="STRING"/>
          <Column id="grupjoblncd" type="STRING"/>
          <Column id="sympmnftdd" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="clsflag" type="STRING"/>
          <Column id="cmt" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="srchorddept" type="STRING" size="256"/>
          <Column id="srchdrugcd" type="STRING" size="256"/>
          <Column id="srchpid" type="STRING" size="256"/>
          <Column id="srchwardcd" type="STRING" size="256"/>
          <Column id="srchreqdeptlist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="deptnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_casrslt" 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>
        <Rows>
          <Row>
            <Col id="cdid">CT</Col>
            <Col id="cdnm">Certain(90%)</Col>
          </Row>
          <Row>
            <Col id="cdnm">Probable(70%)</Col>
            <Col id="cdid">PB</Col>
          </Row>
          <Row>
            <Col id="cdnm">Possible(50%)</Col>
            <Col id="cdid">PL</Col>
          </Row>
          <Row>
            <Col id="cdnm">Conditional(평가곤란)</Col>
            <Col id="cdid">CD</Col>
          </Row>
          <Row>
            <Col id="cdnm">Unassessible(평가불가)</Col>
            <Col id="cdid">UA</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_clsflag" 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>
        <Rows>
          <Row>
            <Col id="cdnm">과거력</Col>
            <Col id="cdid">A</Col>
          </Row>
          <Row>
            <Col id="cdnm">평가중</Col>
            <Col id="cdid">B</Col>
          </Row>
          <Row>
            <Col id="cdnm">평가완료</Col>
            <Col id="cdid">C</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_prcpddstart" propid="value" datasetid="ds_send_srchinfo" columnid="srchfromdd"/>
      <BindItem id="item1" compid="grp_sea.ipt_prcpddend" propid="value" datasetid="ds_send_srchinfo" columnid="srchtodd"/>
      <BindItem id="item2" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send_srchinfo" columnid="srchpid"/>
      <BindItem id="item3" compid="grp_sea.ipt_wardnm" propid="value" datasetid="ds_temp_deptlist" columnid="deptnm"/>
      <BindItem id="item4" compid="grp_sea.ipt_srchdrugcd" propid="value" datasetid="ds_send_srchinfo" columnid="srchdrugcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMADC03300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMADC03300_onload(obj:Form, e:LoadEventInfo)
{
	//입력일자설정
	ds_send_srchinfo.setColumn(0, "srchfromdd", utlf_getCurrentDate());
	ds_send_srchinfo.setColumn(0, "srchtodd", utlf_getCurrentDate());
	
	//진료과조회
	var oParam = {};
		oParam.id          = "TRADC03302";
		oParam.service     = "pharmacyconsultapp.ADRMngt";
		oParam.method      = "reqGetADRPastHistDeptList";
		oParam.inds        = "req=ds_send_srchinfo";
		oParam.outds       = "ds_init_reqdeptlist=reqdeptinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADC03302";

	tranf_submit(oParam);
	
	//진료과조회
	var sProp1="col=4,row=19,cellspacing=5,vcellspacing=0,itemWidth=-1,itemHeight=20,overflow=''";
	chk_ward.setInitComp(sProp1, ds_init_reqdeptlist, "deptcd", "deptnm", "fn_setDeptcd");
	
	/*
	//진료과조회
	model.setValue("/root/send/deptflag", "D");     
	submit("TRADC02103"); 
	astfAddCombo("/root/init/orddept", "dept", "deptcd,deptnm", ",");

	//병동
	model.setValue("/root/send/deptflag", "W");     
	submit("TRADC02102"); 
	astfAddCombo("/root/init/deptlist", "ward", "deptcd,deptnm", "T,전체");
	*/
}

/******************************************************************
 * Argument          : 
 * Description       : 진료과 bind set
 ******************************************************************/
function fn_setDeptcd(){
	var getDeptcd = String(chk_ward.getData()).replace(",", "|");
	var getLabel = String(chk_ward.getLableData()).replace(",", "|");
	
	ds_temp_deptlist.setColumn(0, "deptcd", getDeptcd);
	ds_temp_deptlist.setColumn(0, "deptnm", getLabel);
	ds_send_srchinfo.setColumn(0, "srchreqdeptlist", ds_temp_deptlist.getColumn(0, "deptcd"));
	
	if(ds_temp_deptlist.getColumn(0, "deptcd").substr(0,1) == "T") {
		ds_send_srchinfo.setColumn(0, "srchreqdeptlist", "T");
		ds_temp_deptlist.setColumn(0, "deptnm", "전체");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 Event
 ******************************************************************/
//조회 Button Event
function grp_sea_btn_seamthd_onclick(obj:Button,  e:ClickEventInfo)
{
	//조회 Function
	fGetAdrPastHistList();
}

function fGetAdrPastHistList(){
	var sDeptlist = ds_send_srchinfo.getColumn(0, "srchreqdeptlist");
	if( utlf_isNull(sDeptlist) ){
		ds_send_srchinfo.setColumn(0, "srchreqdeptlist", "T");
	}
	
	var oParam = {};
		oParam.id          = "TRADC03301";
		oParam.service     = "pharmacyconsultapp.ADRMngt";
		oParam.method      = "reqGetADRPastHist";
		oParam.inds        = "req=ds_send_srchinfo";
		oParam.outds       = "ds_grd_adrpasthistlist=adrpasthistinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADC03301";

	tranf_submit(oParam);
	
	if( utlf_isNull(sDeptlist) ){
		ds_send_srchinfo.setColumn(0, "srchreqdeptlist", "");
	}
}

// 등록번호 Enter
function grp_sea_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		fGetAdrPastHistList();
	}
}

//의뢰약물 Event
function grp_sea_ipt_srchdrugcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		fGetAdrPastHistList();
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 진료과 선택(돋보기) Event
 ******************************************************************/
function grp_sea_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	if( chk_ward.visible ){
		chk_ward.visible = false;
	} else {
		chk_ward.visible = true;
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 엑셀다운로드
 ******************************************************************/
function group3_btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_grd_adrpasthistlist.rowcount > 0 ){
		grdf_exportExcel(grd_adrpasthistlist, "ADR과거력리스트", "ADR과거력리스트", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

function grp_sea_button00_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_temp_receivedata",
				 [{col:"receiveref", type:"string", size:256, val:"ds_send_srchinfo"}
				 ,{col:"srchflag", type:"string", size:256, val:""}
				 ,{col:"srchcnts", type:"string", size:256, val:""}
				 ,{col:"receivedrugcd", type:"string", size:256, val:"srchdrugcd"}
				 ,{col:"receivedrugnm", type:"string", size:256, val:""}
				 ,{col:"drugkind", type:"string", size:256, val:""}],true);
	
	var objArg = new Object();
	objArg.arg_ds_temp_receivedata = ds_temp_receivedata;
	frmf_modal("SPADB60100", "SPADB60100", objArg, null, 0, 100, 150, null, null, null, null, null, "M");
}
]]></Script>
  </Form>
</FDL>