YNU_JEUS/app_home/himed/xpapps/ast/pharmacybasexp/xp/SMADB02200_약품이력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADB02200" position="absolute 0 0 1195 653" titletext="약품이력조회" oninit="SMADB02200_oninit" onload="SMADB02200_onload">
    <Layouts>
      <Layout>
        <Static id="caption19" text="약품이력조회" class="tit_1" position="absolute 0 0 120 25"/>
        <Div id="group2" taborder="3" style="align:center top;" class="div_SA" position="absolute 0 25 1193 65" anchor="left top right">
          <Layouts>
            <Layout/>
          </Layouts>
        </Div>
        <Static id="caption1" text="조회기간 :" class="search_name" position="absolute 14 39 93 56"/>
        <Calendar id="ipt_srchdrugfromdd" taborder="4" class="input_search" position="absolute 92 37 192 56"/>
        <Static id="caption2" text="~" position="absolute 200 37 220 57"/>
        <Calendar id="ipt_srchdrugtodd" taborder="5" class="input_search" position="absolute 217 37 317 56"/>
        <Static id="caption4" text="구분 :" class="search_name" position="absolute 352 39 422 56"/>
        <CheckBox id="chk_srchallflag" taborder="6" class="checkbox_search" position="absolute 406 40 456 55" text="전체" value="true" onclick="chk_srchallflag_onclick" truevalue="Y"/>
        <CheckBox id="chk_srchnewdrugflag" taborder="7" class="checkbox_search" position="absolute 459 40 509 55" text="신약" value="true" truevalue="Y"/>
        <CheckBox id="chk_srchabsndrugflag" taborder="8" class="checkbox_search" position="absolute 509 40 559 55" text="품절" value="true" truevalue="Y"/>
        <CheckBox id="chk_srchdeldrugflag" taborder="9" class="checkbox_search" position="absolute 559 40 609 55" text="삭제" value="true" truevalue="Y"/>
        <CheckBox id="chk_srchaltdrugflag" taborder="10" class="checkbox_search" position="absolute 609 40 659 55" text="대체" value="true" truevalue="Y"/>
        <Static id="caption3" text="약품 :" class="search_name" position="absolute 667 39 737 56"/>
        <Edit id="ipt_srchdrugcd" taborder="11" class="input_search" position="absolute 737 37 827 56"/>
        <Button id="button61" taborder="12" class="icon_search" position="absolute 832 39 848 55" onclick="button61_onclick"/>
        <Edit id="opt_drugnm" taborder="13" readonly="true" class="output_search" position="absolute 852 37 952 56" useinputpanel="false"/>
        <CheckBox id="chk_ctdrug" taborder="14" class="checkbox_search" position="absolute 992 40 1072 55" text="임상약제외"/>
        <Shape id="line13" linetype="vertical" position="absolute 1111 37 1117 59" anchor="top right"/>
        <Button id="btn_sea" taborder="15" text="조회" class="btn1" position="absolute 1126 36 1182 58" onclick="btn_sea_onclick" anchor="top right"/>
        <Grid id="grd_druglist" taborder="16" binddataset="ds_grd_druglist" useinputpanel="false" position="absolute 0 97 1193 652" anchor="all" cellsizingtype="both" extendsizetype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20" band="left"/>
                <Column size="94"/>
                <Column size="270"/>
                <Column size="85"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="100"/>
                <Column size="200"/>
                <Column size="85"/>
                <Column size="279"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell rowspan="2" taborder="undefined">
                  <Cell/>
                  <Cell row="1"/>
                </Cell>
                <Cell col="1" rowspan="2" style="align:center middle;" text="약품코드" taborder="undefined"/>
                <Cell col="2" rowspan="2" style="align:center middle;" text="약품명" taborder="undefined"/>
                <Cell col="3" rowspan="2" style="align:center middle;" text="등록일자" taborder="undefined"/>
                <Cell col="4" colspan="4" text="구분" taborder="undefined"/>
                <Cell col="8" colspan="2" text="품절" taborder="undefined"/>
                <Cell col="10" rowspan="2" style="align:center middle;" text="대체약품코드" taborder="undefined"/>
                <Cell col="11" rowspan="2" style="align:center middle;" text="대체약품명" taborder="undefined"/>
                <Cell row="1" col="4" text="신약"/>
                <Cell row="1" col="5" text="품절"/>
                <Cell row="1" col="6" text="삭제"/>
                <Cell row="1" col="7" text="대체"/>
                <Cell row="1" col="8" text="품절사유"/>
                <Cell row="1" col="9" text="기타"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow == ds_grd_druglist.rowposition  ? &quot;▶&quot; : &quot;&quot;"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 5;" text="bind:drugcd" suppress="1"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 5;" text="bind:drugnm" suppress="1"/>
                <Cell col="3" displaytype="date" edittype="none" text="bind:drugfromdd"/>
                <Cell col="4" displaytype="checkbox" edittype="checkbox" text="bind:newyn" expr="expr:(newyn==&quot;Y&quot;||newyn==1)?1:0"/>
                <Cell col="5" displaytype="checkbox" edittype="checkbox" text="bind:absnyn" expr="expr:(absnyn==&quot;Y&quot;||absnyn==1)?1:0"/>
                <Cell col="6" displaytype="checkbox" edittype="checkbox" text="bind:delyn" expr="expr:(delyn==&quot;Y&quot;||delyn==1)?1:0"/>
                <Cell col="7" displaytype="checkbox" edittype="checkbox" text="bind:chgyn" expr="expr:(chgyn==&quot;Y&quot;||chgyn==1)?1:0"/>
                <Cell col="8" style="align:left middle;padding:0 0 0 5;" text="bind:absnresn"/>
                <Cell col="9" style="align:left middle;padding:0 0 0 5;" text="bind:absnresnetc"/>
                <Cell col="10" style="align:left middle;padding:0 0 0 5;" text="bind:altdrugcd"/>
                <Cell col="11" style="align:left middle;padding:0 0 0 5;" text="bind:altdrugnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_prt" taborder="17" text="출력" class="btn6" visible="false" position="absolute 1054 70 1110 92" anchor="top right"/>
        <Button id="button50" taborder="18" text="엑셀저장" onclick="button50_onclick" class="btn7" position="absolute 1113 70 1193 92" anchor="top right"/>
        <Shape id="line00" class="line_1" position="absolute 0 92 1194 98" anchor="left top right"/>
        <Shape id="line01" class="line_1" position="absolute 0 91 1194 97" anchor="left top right"/>
        <Shape id="line02" class="line_1" position="absolute 0 93 1194 99" anchor="left top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_druglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugcd" type="STRING"/>
          <Column id="drugnm" type="STRING"/>
          <Column id="drugfromdd" type="STRING"/>
          <Column id="newyn" type="STRING"/>
          <Column id="absnyn" type="STRING"/>
          <Column id="delyn" type="STRING"/>
          <Column id="chgyn" type="STRING"/>
          <Column id="absnresn" type="STRING"/>
          <Column id="absnresnetc" type="STRING"/>
          <Column id="altdrugcd" type="STRING"/>
          <Column id="altdrugnm" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_searchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchdrugfromdd" type="STRING" size="256"/>
          <Column id="srchdrugtodd" type="STRING" size="256"/>
          <Column id="srchnewdrugflag" type="STRING" size="256"/>
          <Column id="srchabsndrugflag" type="STRING" size="256"/>
          <Column id="srchabsndrugcount" type="STRING" size="256"/>
          <Column id="srchdeldrugflag" type="STRING" size="256"/>
          <Column id="srchdeldrugcount" type="STRING" size="256"/>
          <Column id="srchaltdrugflag" type="STRING" size="256"/>
          <Column id="srchaltdrugcount" type="STRING" size="256"/>
          <Column id="srchdrugcd" type="STRING" size="256"/>
          <Column id="srchallflag" type="STRING" size="256"/>
          <Column id="srchdrugnm" type="STRING" size="256"/>
          <Column id="srchprevabsn" type="STRING" size="256"/>
          <Column id="srchprevdel" type="STRING" size="256"/>
          <Column id="srchprevalt" type="STRING" size="256"/>
          <Column id="srchchkyn" type="STRING" size="256"/>
          <Column id="notctdrugyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="notctdrugyn">Y</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_receivedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_receivedrugcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_srchdrugfromdd" propid="value" datasetid="ds_send_searchdata" columnid="srchdrugfromdd"/>
      <BindItem id="item1" compid="ipt_srchdrugtodd" propid="value" datasetid="ds_send_searchdata" columnid="srchdrugtodd"/>
      <BindItem id="item2" compid="chk_srchnewdrugflag" propid="value" datasetid="ds_send_searchdata" columnid="srchnewdrugflag"/>
      <BindItem id="item3" compid="chk_srchabsndrugflag" propid="value" datasetid="ds_send_searchdata" columnid="srchabsndrugflag"/>
      <BindItem id="item4" compid="chk_srchdeldrugflag" propid="value" datasetid="ds_send_searchdata" columnid="srchdeldrugflag"/>
      <BindItem id="item5" compid="chk_srchaltdrugflag" propid="value" datasetid="ds_send_searchdata" columnid="srchaltdrugflag"/>
      <BindItem id="item6" compid="chk_srchallflag" propid="value" datasetid="ds_send_searchdata" columnid="srchallflag"/>
      <BindItem id="item7" compid="chk_ctdrug" propid="value" datasetid="ds_send_searchdata" columnid="notctdrugyn"/>
      <BindItem id="item8" compid="ipt_srchdrugcd" propid="value" datasetid="ds_send_searchdata" columnid="srchdrugcd"/>
      <BindItem id="item9" compid="opt_drugnm" propid="value" datasetid="ds_send_searchdata" columnid="srchdrugnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-10-29
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-10-29      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

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

function SMADB02200_onload(obj:Form, e:LoadEventInfo)
{
	ds_send_searchdata.setColumn(0, "srchdrugfromdd", utlf_getCurrentDate());
	ds_send_searchdata.setColumn(0, "srchdrugtodd", utlf_getCurrentDate());
	
	ds_send_searchdata.setColumn(0, "srchallflag", "Y");
	ds_send_searchdata.setColumn(0, "srchnewdrugflag", "Y");
	ds_send_searchdata.setColumn(0, "srchdeldrugflag", "Y");
	ds_send_searchdata.setColumn(0, "srchaltdrugflag", "Y");
	ds_send_searchdata.setColumn(0, "srchabsndrugflag", "Y");
	
	grdf_initGrid(grd_druglist);
}

/******************************************************************
 * Argument          : 
 * Description       : 약품검색(돋보기)
 ******************************************************************/
function button61_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_temp_receivedata",
				 [{col:"receiveref", type:"string", size:256, val:"ds_send_searchdata"}
				 ,{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:"srchdrugnm"}
				 ,{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, null, null, null, null, null, null, null, null, "M");
}

/******************************************************************
 * Argument          : 
 * Description       : 전체 checkbox control
 ******************************************************************/
function chk_srchallflag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	var allFlag = chk_srchallflag.value;
	if( allFlag == "Y" ){
		ds_send_searchdata.setColumn(0, "srchnewdrugflag", "Y");
		ds_send_searchdata.setColumn(0, "srchdeldrugflag", "Y");
		ds_send_searchdata.setColumn(0, "srchaltdrugflag", "Y");
		ds_send_searchdata.setColumn(0, "srchabsndrugflag", "Y");
	} else {
		ds_send_searchdata.setColumn(0, "srchallflag", "");
		ds_send_searchdata.setColumn(0, "srchnewdrugflag", "");
		ds_send_searchdata.setColumn(0, "srchdeldrugflag", "");
		ds_send_searchdata.setColumn(0, "srchaltdrugflag", "");
		ds_send_searchdata.setColumn(0, "srchabsndrugflag", "");
	}
}
/******************************************************************
 * Argument          : 
 * Description       : 조회
 ******************************************************************/
function btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	var intIndex = 0;
	var absnfromdd = "";
	var absntodd = "";
	var absnterm = "";
	var srchnewdrugflag = ds_send_searchdata.getColumn(0, "srchnewdrugflag");
	var srchabsndrugflag = ds_send_searchdata.getColumn(0, "srchabsndrugflag");
	var srchdeldrugflag = ds_send_searchdata.getColumn(0, "srchdeldrugflag");
	var srchaltdrugflag = ds_send_searchdata.getColumn(0, "srchaltdrugflag");
	
	if( srchnewdrugflag == "1" || srchnewdrugflag == "Y" ) srchnewdrugflag = "Y"; else srchnewdrugflag = "N";
	if( srchabsndrugflag == "1" || srchabsndrugflag == "Y" ) srchabsndrugflag = "Y"; else srchabsndrugflag = "N";
	if( srchdeldrugflag == "1" || srchdeldrugflag == "Y" ) srchdeldrugflag = "Y"; else srchdeldrugflag = "N";
	if( srchaltdrugflag == "1" || srchaltdrugflag == "Y" ) srchaltdrugflag = "Y"; else srchaltdrugflag = "N";
	
	//조회조건
	if( utlf_isNull(ds_send_searchdata.getColumn(0, "srchdrugfromdd")) || utlf_isNull(ds_send_searchdata.getColumn(0, "srchdrugtodd")) ){
		sysf_messageBox("조회기간은","I003");
		return;
	}
	
	if( utlf_isNull(srchnewdrugflag) && utlf_isNull(srchabsndrugflag) && utlf_isNull(srchdeldrugflag) && utlf_isNull(srchaltdrugflag) ){
		sysf_messageBox("구분은","I003");
		return;
	}
	
	// 초기화
	ds_send_searchdata.setColumn(0, "srchabsndrugcount", "");
	ds_send_searchdata.setColumn(0, "srchdeldrugcount", "");
	ds_send_searchdata.setColumn(0, "srchaltdrugcount", "");
	
	if( ds_send_searchdata.getColumn(0, "srchallflag") == "1" ){
		ds_send_searchdata.setColumn(0, "srchabsndrugcount", "2");
		ds_send_searchdata.setColumn(0, "srchdeldrugcount", "3");
		ds_send_searchdata.setColumn(0, "srchaltdrugcount", "4");
	}
	
	if( srchnewdrugflag ==  "Y" ){
		intIndex = intIndex + 1;
	}
	
	if( srchabsndrugflag == "Y" ){
		intIndex = intIndex + 1;
		if( srchnewdrugflag == "Y" ){	//품절 이전에 신약이 체크되어 있으면 조회조건에 or
			ds_send_searchdata.setColumn(0, "srchprevabsn", "Y");
		} else {
			ds_send_searchdata.setColumn(0, "srchprevabsn", "N");
		}
		ds_send_searchdata.setColumn(0, "srchabsndrugcount", intIndex);
	}
	
	if( srchdeldrugflag == "Y" ){
		intIndex = intIndex + 1;
		if( srchnewdrugflag == "Y" || srchabsndrugflag == "Y" ){	//삭제 이전에 신약 또는 품절이 체크되어 있으면 조회조건에 or
			ds_send_searchdata.setColumn(0, "srchprevdel", "Y");
		} else {
			ds_send_searchdata.setColumn(0, "srchprevdel", "N");
		}
		ds_send_searchdata.setColumn(0, "srchabsndrugcount", intIndex);
	}
	
	if( srchaltdrugflag == "Y" ){
		if( srchnewdrugflag == "Y" || srchabsndrugflag == "Y" || srchdeldrugflag == "Y" ){	//삭제 이전에 신약 이나 품절 또는 삭제가 체크되어 있으면 조회조건에 or
			ds_send_searchdata.setColumn(0, "srchprevalt", "Y");
		} else {
			ds_send_searchdata.setColumn(0, "srchprevalt", "N");
		}
		intIndex = intIndex + 1;
		ds_send_searchdata.setColumn(0, "srchabsndrugcount", intIndex);
	}
	
	var chkYn = "N";
	
	if( !utlf_isNull(chk_srchnewdrugflag.value) || !utlf_isNull(chk_srchabsndrugflag.value) || !utlf_isNull(chk_srchdeldrugflag.value) || !utlf_isNull(chk_srchaltdrugflag.value) ){
		ds_send_searchdata.setColumn(0, "srchchkyn", "Y");
	} else {
		ds_send_searchdata.setColumn(0, "srchchkyn", "N");
	}
	
	var oParam = {};
		oParam.id          = "TRADB02201";
		oParam.service     = "pharmacybaseapp.DrugCode";
		oParam.method      = "reqGetDrugHist";
		oParam.inds        = "req=ds_send_searchdata";
		oParam.outds       = "ds_grd_druglist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB02201";

	tranf_submit(oParam);
}


/******************************************************************
 * Argument          : 
 * Description       : Excel
 ******************************************************************/
function button50_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_grd_druglist.rowcount > 0 ){
		grdf_exportExcel(grd_druglist, "용법코드관리", "용법코드관리", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}
]]></Script>
  </Form>
</FDL>