YNU_JEUS/app_home/himed/xpapps/ast/pharmacybasexp/xp/SMADB04300_고위험의약품관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADB04200" position="absolute 0 0 948 699" titletext="고위험 의약품 관리" onload="SMADB04200_onload">
    <Layouts>
      <Layout>
        <Static id="caption19" text="고위험의약품 관리" class="tit_1" position="absolute 0 0 225 25"/>
        <Button id="btn_save" taborder="1" text="저장" onclick="group4_btn_save_onclick" class="btn4" position="absolute 890 2 946 24" anchor="top right"/>
        <Button id="button50" taborder="2" text="약품코드추가" onclick="group3_button50_onclick" class="btn2" position="absolute 719 77 805 99" anchor="top right"/>
        <Button id="btn_grddel" taborder="3" text="행삭제" onclick="group3_btn_grddel_onclick" class="btn2" position="absolute 808 77 861 99" anchor="top right"/>
        <Static id="caption9" text="고위험의약품 리스트" class="tit_2" position="absolute 0 84 168 101"/>
        <Shape id="line4" class="line_10" position="absolute 0 100 947 106" anchor="left top right"/>
        <Button id="btn_grdnew" taborder="4" text="관리코드추가" onclick="group3_btn_grdnew_onclick" class="btn2" position="absolute 630 77 716 99" anchor="top right"/>
        <Div id="group2" anchor="left top right" taborder="5" class="div_SA" position="absolute 0 25 947 70">
          <Layouts>
            <Layout>
              <Button id="button3" taborder="3" text="조회" onclick="group3_group2_button3_onclick" class="btn1" position="absolute 879 13 935 35" anchor="top right"/>
              <Static id="caption1" text="약품명 :" class="search_name" position="absolute 272 13 358 30"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 852 10 858 38" anchor="top right"/>
              <Static id="caption3" text="약품코드 :" class="search_name" position="absolute 5 13 91 30"/>
              <Edit id="ipt_srchdrugnm" taborder="4" onkeydown="group3_group2_ipt_srchdrugnm_onkeydown" class="input_search" position="absolute 334 11 737 30"/>
              <Edit id="ipt_srchdrugcd" taborder="5" onkeydown="group3_group2_ipt_srchdrugcd_onkeydown" class="input_search" position="absolute 82 11 212 30"/>
              <Button id="btn_srchdrugnm" taborder="6" onclick="group3_group2_btn_srchdrugnm_onclick" class="icon_search" position="absolute 740 13 758 28"/>
              <Button id="btn_srchdrugcd" taborder="7" onclick="group3_group2_btn_srchdrugcd_onclick" class="icon_search" position="absolute 213 13 231 28"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_dngrdrugist" taborder="6" binddataset="ds_grd_dngrdrugist" useinputpanel="false" autofittype="col" onkeydown="group3_grd_warndrugist_onkeydown" oncellclick="group3_grd_warndrugist_oncellclick" ontextchanged="group3_grd_warndrugist_ontextchanged" position="absolute 0 105 947 698" anchor="all" autoenter="select">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="145"/>
                <Column size="121"/>
                <Column size="129"/>
                <Column size="26"/>
                <Column size="515"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="21"/>
              </Rows>
              <Band id="head">
                <Cell text="고위험의약품 항목"/>
                <Cell col="1" text="관리코드"/>
                <Cell col="2" colspan="2" text="약품코드" taborder="undefined"/>
                <Cell col="4" text="처방명"/>
                <Cell col="5" text="newyn"/>
              </Band>
              <Band id="body">
                <Cell displaytype="combo" edittype="combo" style="align:center;" text="bind:dngritemcd" suppress="1" suppressalign="middle" combodataset="ds_init_warnitemlist" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="10" combodisplay="edit"/>
                <Cell col="1" edittype="text" text="bind:mngtcd" suppress="2" suppressalign="middle"/>
                <Cell col="2" displaytype="text" edittype="text" text="bind:drugcd" editautoselect="true"/>
                <Cell col="3" displaytype="button" edittype="button"/>
                <Cell col="4" style="align:left middle;" text="bind:drugnm"/>
                <Cell col="5" text="bind:newyn"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excsave" taborder="7" text="엑셀저장" onclick="group3_btn_excsave_onclick" class="btn7" position="absolute 864 77 944 99" anchor="top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_dngrdrugist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dngritemcd" type="STRING"/>
          <Column id="mngtcd" type="STRING"/>
          <Column id="drugcd" type="STRING"/>
          <Column id="drugnm" type="STRING"/>
          <Column id="newyn" type="STRING"/>
          <Column id="flag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_warnitemlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_chkpid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_receivedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="drugnm" type="STRING" size="256"/>
          <Column id="comcd" type="STRING" size="256"/>
          <Column id="receiveref" type="STRING" size="256"/>
          <Column id="receivedrugcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="receiveref">ds_temp_receivedata</Col>
            <Col id="drugcd"/>
            <Col id="drugnm"/>
            <Col id="comcd"/>
            <Col id="receivedrugcd">drugcd</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_drugitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchdrugcd" type="STRING" size="256"/>
          <Column id="srchdrugnm" type="STRING" size="256"/>
          <Column id="flag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="flag">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <FilteredDataset id="fds_dngr" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_grd_dngrdrugist"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_srchdrugcd" propid="value" datasetid="ds_send_reqdata" columnid="srchdrugcd"/>
      <BindItem id="item1" compid="group2.ipt_srchdrugnm" propid="value" datasetid="ds_send_reqdata" columnid="srchdrugnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_pharmacybasexp::pharmacycombolist.xjs";

var arErrorCode = new HashArray();


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

function lf_fGetWarnDruglist() {
	                            
	var oParam = {};
		oParam.id          = "TRADB04301";
		oParam.service     = "pharmacybaseapp.DrugInfo";
		oParam.method      = "reqGetDngrDrugList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_grd_dngrdrugist=dngrdruglist";
		oParam.async       = false;
		oParam.callback    = "cf_TRADB04301";

	tranf_submit(oParam);
	ds_grd_dngrdrugist.addColumn("newyn","string");
	//dsf_deleteDs("ds_send_reqdata");
}
function SMADB04200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	
	//ds_grd_dngrdrugist.updatecontrol 
	
	pharmacyGetCodeList([{dsNm: "ds_init_warnitemlist"	, cdGrpId: "DNGR", sorField: ""}],
					  false , false, "");	
	// 20120614_약사군 이외에는 조회만 가능하게 수정

	dsf_createDsRow("ds_send_useriddata",	  
							[{col:"chkpid"		, type:"string", size:256, val:sysf_getUserInfo("userid")}					
                            ]);
                            
	var oParam = {};
		oParam.id          = "TRADC00104";
		oParam.service     = "pharmacyconsultapp.ReqMngt";
		oParam.method      = "reqGetCheckPid";
		oParam.inds        = "req=ds_send_useriddata";
		oParam.outds       = "ds_hidden_chkpid=pharm";
		oParam.async       = false;

	tranf_submit(oParam);

	if ( ds_hidden_chkpid.getColumn(0,"pharmflag")!= "Y" ) {	//약사가 아닌경우는 버튼 Hidden 처리
		btn_save.visible = false;     	//저장
		btn_grdnew.visible = false;     	//관리코드추가
		button50.visible = false;    	//약품코드추가
		btn_grddel.visible = false;      	//행삭제
	}	
	
	lf_fGetWarnDruglist() ;
	
	grdf_initGrid(grd_dngrdrugist);
}

function group3_group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_fGetWarnDruglist();
}

function group3_group2_ipt_srchdrugnm_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		lf_fGetWarnDruglist();
	}
}


function group3_group2_btn_srchdrugnm_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	objArg.arg_ds_temp_receivedata   = ds_temp_receivedata;
	// 약품코드 검색                
	frmf_modal("SPADB60100", "SPADB60100", objArg, false, 1, 100, 150, null, null, null, null, null, "M");    //frmf_modal("SPADB60100","SPADB60100");	
										 		
	var drugcode = ds_temp_receivedata.getColumn(0,"drugcd");					
	// 약품명 검색
	if (!utlf_isNull(drugcode)) {
		dsf_createDsRow("ds_send_reqdata2",	  
					[{col:"srchdrugcd"	, type:"string", size:256, val:drugcode}
					]);
		
		var oParam = {};
			oParam.id          = "TRADB02604";
			oParam.service     = "pharmacybaseapp.VolDiv";
			oParam.method      = "reqGetDrugNm";
			oParam.inds        = "req=ds_send_reqdata2";
			oParam.outds       = "ds_init_drugitem=drugitem";
			oParam.async       = false;
			oParam.callback    = "cf_TRADB02604";

		tranf_submit(oParam);

		if(arErrorCode.pop("TRADB02604") > -1){
			group2.ipt_srchdrugnm.value = ds_init_drugitem.getColumn(0,"drugnm");

		}
		dsf_deleteDs("ds_send_reqdata2");
	}
}

function cf_TRADB02604(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function group3_group2_ipt_srchdrugcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		lf_fGetWarnDruglist();
	}
}

function group3_group2_btn_srchdrugcd_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	objArg.arg_ds_temp_receivedata   = ds_temp_receivedata;
	// 약품코드 검색                
	frmf_modal("SPADB60100", "SPADB60100", objArg, false, 1, 100, 150, null, null, null, null, null, "M");    //frmf_modal("SPADB60100","SPADB60100");
			
	var drugcode = ds_temp_receivedata.getColumn(0,"drugcd");					
	// 약품명 검색
	if (!utlf_isNull(drugcode)) {
		group2.ipt_srchdrugcd.value = drugcode;
	}
}

function group3_button50_onclick(obj:Button,  e:ClickEventInfo)
{
	var iBfRowNo = ds_grd_dngrdrugist.rowposition;
	var iAfRowNo = 0;
	
	if(iBfRowNo < 0) {
		sysf_messageBox("약품코드를 추가할 관리코드를 선택하여 주십시오.", "I999");
		return;
	}
	
	if(utlf_isNull(ds_grd_dngrdrugist.getColumn(iBfRowNo,"mngtcd"))) {
		sysf_messageBox("관리코드를 먼저 입력하여(고위험주의 항목 선택) 주십시오.", "I999");
		return;
	}
	
	iAfRowNo = ds_grd_dngrdrugist.insertRow(iBfRowNo+1);	
	
	ds_grd_dngrdrugist.setColumn(iAfRowNo, "dngritemcd", ds_grd_dngrdrugist.getColumn(iBfRowNo, "dngritemcd"));
	ds_grd_dngrdrugist.setColumn(iAfRowNo, "mngtcd", ds_grd_dngrdrugist.getColumn(iBfRowNo, "mngtcd"));
	ds_grd_dngrdrugist.setColumn(iAfRowNo, "newyn", "N");
	ds_grd_dngrdrugist.setColumn(iAfRowNo, "flag", "1");
	
	
	 ds_grd_dngrdrugist.rowposition = iAfRowNo;
     ds_grd_dngrdrugist.setCellPos(ds_grd_dngrdrugist.getBindCellIndex("body", "drugcd"));
     ds_grd_dngrdrugist.showEditor(true);
						
}

function group3_grd_warndrugist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(obj.currentcol == 3)
	{
		var iRowNo = ds_grd_dngrdrugist.rowposition;
		var sDrugCode = "";
				
		if(ds_grd_dngrdrugist.getRowType(iRowNo) != "2" ) {
			sysf_messageBox("약품코드는 추가 및 삭제만 가능 합니다.", "I999");
			return;
		}
		
		var objArg = new Object();
		objArg.arg_ds_temp_receivedata   = ds_temp_receivedata;
		// 약품코드 검색                
		frmf_modal("SPADB60100", "SPADB60100", objArg, false, 1, 100, 150, null, null, null, null, null, "M");    //frmf_modal("SPADB60100","SPADB60100");
	
	    sDrugCode = ds_temp_receivedata.getColumn(0,"drugcd");		
		
		if(!utlf_isNull(sDrugCode)) {
			dsf_createDsRow("ds_send_reqdata2",	  
					[{col:"srchdrugcd"	, type:"string", size:256, val:sDrugCode}
					]);
			var oParam = {};
				oParam.id          = "TRADB02604";
				oParam.service     = "pharmacybaseapp.VolDiv";
				oParam.method      = "reqGetDrugNm";
				oParam.inds        = "req=ds_send_reqdata2";
				oParam.outds       = "ds_init_drugitem=drugitem";
				oParam.async       = false;
				oParam.callback    = "cf_TRADB02604";

			tranf_submit(oParam);
		
			if(arErrorCode.pop("TRADB02604") > -1){
				ds_grd_dngrdrugist.setColumn(iRowNo, "drugnm", ds_init_drugitem.getColumn(0,"drugnm"));
				ds_grd_dngrdrugist.setColumn(iRowNo, "drugcd", ds_init_drugitem.getColumn(0,"drugcd"));

			}
		}
		ds_temp_receivedata.setColumn(0,"drugcd", "");
		dsf_deleteDs("ds_send_reqdata2");
	}
}

function group3_grd_warndrugist_onkeydown(obj:Grid, e:KeyEventInfo)
{
	var iRowNo = ds_grd_dngrdrugist.rowposition;
	var sDrugCode = "";
	
	if(e.keycode == "13") {
		if(ds_grd_dngrdrugist.currentCol == ds_grd_dngrdrugist.getBindCellIndex("body","drugcd")){
			sDrugCode = ds_grd_dngrdrugist.getColumn(iRowNo, "drugcd");
			if (utlf_isNull(sDrugCode)) {
				sysf_messageBox("약품코드를", "C001");
			} 
			dsf_createDsRow("ds_send_reqdata2",	  
					[{col:"srchdrugcd"	, type:"string", size:256, val:sDrugCode.toUpperCase()}
					]);
					

			var oParam = {};
				oParam.id          = "TRADB02604";
				oParam.service     = "pharmacybaseapp.VolDiv";
				oParam.method      = "reqGetDrugNm";
				oParam.inds        = "req=ds_send_reqdata2";
				oParam.outds       = "ds_init_drugitem=drugitem";
				oParam.async       = false;
				oParam.callback    = "cf_TRADB02604";

			tranf_submit(oParam);
		
			if(arErrorCode.pop("TRADB02604") > -1) {
				if(utlf_isNull(ds_init_drugitem.getColumn(0,"drugcd"))) {
					sysf_messageBox("존재하지 않는 약품코드 입니다.", "I999");
					ds_grd_dngrdrugist.setColumn(iRowNo, "drugcd", "");
					ds_grd_dngrdrugist.setColumn(iRowNo, "drugnm", "");
					return;
				}
				
				ds_grd_dngrdrugist.setColumn(iRowNo, "drugnm", ds_init_drugitem.getColumn(0,"drugnm"));
				ds_grd_dngrdrugist.setColumn(iRowNo, "drugcd", ds_init_drugitem.getColumn(0,"drugcd"));

				
			}
			ds_temp_receivedata.setColumn(0,"drugcd", "");
			dsf_deleteDs("ds_send_reqdata2");
		}

	}
}

function group3_grd_warndrugist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
{
	var iRow   = ds_grd_warndrugist.rowposition;
	var sMngtCd = "";
	
	var iCurNo       = 1;
	var sUsedYN   = "Y";
	var iMaxNo      = 1;
	var iLastNo      = 1;
	
	if (ds_grd_dngrdrugist.currentCol == ds_grd_dngrdrugist.getBindCellIndex("body","warnitemcd")) {
		
		for(var iRowNo = 0 ; iRowNo < ds_grd_dngrdrugist.rowcount ; iRowNo++) {
			
			if((ds_grd_dngrdrugist.getColumn(iRow, "warnitemcd") 
			   != ds_grd_dngrdrugist.getColumn(iRowNo, "warnitemcd"))
		   || utlf_isNull(ds_grd_dngrdrugist.getColumn(iRowNo, "warnitemcd"))
		   || iRowNo == iRow) {  
				continue;
			}
			
			sMngtCd = ds_grd_dngrdrugist.getColumn(iRowNo, "mngtcd");
			iCurNo    = Number(sMngtCd.substr(2, 5));
			iCurNo    = iCurNo + 1;
			iLastNo   = iCurNo;
			//현재값 +1 을 이미 사용하고 있는지 확인한다.
			for(var iNo2 = 0 ; iNo2 < ds_grd_dngrdrugist.rowcount ; iNo2++) {
				
				if((ds_grd_dngrdrugist.getColumn(iRow, "warnitemcd") 
				   != ds_grd_dngrdrugist.getColumn(iNo2, "warnitemcd")) 
			   || utlf_isNull(ds_grd_dngrdrugist.getColumn(iNo2, "warnitemcd"))
			   || iNo2 == iRow) {  
					continue;
				}
				
				if(iCurNo == Number(  (ds_grd_dngrdrugist.getColumn(iNo2, "mngtcd").substr(2, 5))   )   ) {
					sUsedYN = "Y";
					break;
				}
				
				if(iNo2 == (ds_grd_dngrdrugist.rowcount-1)) {
					sUsedYN = "N";
					iLastNo = iCurNo;
				}
				
			}
			
			if(sUsedYN == "N") {
				break;
			}
			
		}
		
		ds_grd_dngrdrugist.setColumn(iRow, "mngtcd", ds_grd_dngrdrugist.getColumn(iRow, "warnitemcd") + String(iLastNo).getLeftPad(4, "0"));

	}
}

function group3_btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	var iRow = ds_grd_dngrdrugist.rowposition;
						
	if(iRow < 0) {
		sysf_messageBox("삭제할 행을 선택하여 주십시오.", "I999");
		return;
	}
	
	if(ds_grd_dngrdrugist.getRowType(iRow) == "2" ) {
		ds_grd_dngrdrugist.deleteRow(iRow);
	} else {
	var bSucc;
		bSucc = ds_grd_dngrdrugist.setRowType(iRow, "d");		
	}
						
}

function group3_btn_grdnew_onclick(obj:Button,  e:ClickEventInfo)
{
	
	ds_grd_dngrdrugist.setColumn(ds_grd_dngrdrugist.rowposition,"newyn", "Y");

}

function group4_btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDs("ds_send_savedata");
	dsf_createDs("ds_hidden_item");
	grdf_setStatusColumn(ds_grd_dngrdrugist,"m");
	ds_send_savedata.copyData(grdf_getGridUpdateData(grd_dngrdrugist),true);			
	
	var oParam = {};
		oParam.id          = "TXADB04301";
		oParam.service     = "pharmacybaseapp.DrugInfo";
		oParam.method      = "reqExeDngrDrugList";
		oParam.inds        = "req=ds_send_savedata";
		oParam.outds       = "ds_hidden_item=item";
		oParam.async       = false;
		oParam.alert       = true;
		oParam.callback    = "cf_TXADB04301";

	tranf_submit(oParam);
	if(arErrorCode.pop("cf_TXADB04301") > -1){
		lf_fGetWarnDruglist();
	}
}
function cf_TXADB04301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}


function group3_btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_grd_dngrdrugist.rowcount > 0 ){
		grdf_exportExcel(grd_dngrdrugist, "고위험의약품리스트", "고위험의약품리스트", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}

}
]]></Script>
  </Form>
</FDL>