YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADT63400_외래투약관리승인.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADT63400" position="absolute 0 0 298 207" titletext="외래투약관리승인" oninit="SPADT63400_oninit" onload="SPADT63400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 297 174" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="외래투약관리승인" position="absolute 2 6 160 27" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 2 22 296 28" linetype="horizontal" id="line1" class="line_1" anchor="default"/>
              <Static text="사번" position="absolute 2 27 82 50" align="align:center middle;" id="caption21" class="cell_1" anchor="default"/>
              <Edit position="absolute 86 29 161 48" id="ipt_writeid" class="input_essential" anchor="default" onkeydown="grp_biz_ipt_writeid_onkeydown"/>
              <Edit position="absolute 165 29 240 48" id="ipt_writenm" anchor="default"/>
              <Static text="사유" position="absolute 2 52 82 170" align="align:center middle;" id="caption3" class="cell_1" anchor="default"/>
              <TextArea position="absolute 86 54 296 170" id="tar_memo" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 177 300 203" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 240 0 296 22" id="btn_cls" class="btn4" text="닫기" anchor="default" onclick="grp_btn_btn_cls_onclick"/>
              <Button position="absolute 180 0 236 22" id="btn_del" class="btn4" visible="true" text="저장" anchor="default" onclick="grp_btn_btn_del_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cnfrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugdd" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
          <Column id="memo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="drugdd"/>
            <Col id="drugno"/>
            <Col id="ioflag"/>
            <Col id="instcd"/>
            <Col id="pid"/>
            <Col id="userid"/>
            <Col id="usernm"/>
            <Col id="memo"/>
          </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="drugdd" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="drugstat" type="STRING" size="256"/>
          <Column id="dispflag" type="STRING" size="256"/>
          <Column id="dispcnts" type="STRING" size="256"/>
          <Column id="inputtm" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="stocdeptcd" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="srchrcvflag" type="STRING" size="256"/>
          <Column id="srchdrugmngtyn" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="drugdd"/>
            <Col id="drugno"/>
            <Col id="ioflag"/>
            <Col id="drugstat"/>
            <Col id="dispflag"/>
            <Col id="dispcnts"/>
            <Col id="inputtm"/>
            <Col id="userid"/>
            <Col id="stocdeptcd"/>
            <Col id="instcd"/>
            <Col id="srchrcvflag"/>
            <Col id="srchdrugmngtyn"/>
            <Col id="pid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_usersrchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchuserid" type="STRING" size="256"/>
          <Column id="srchinstcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchuserid"/>
            <Col id="srchinstcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_userinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="userid"/>
            <Col id="usernm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.ipt_writeid" propid="value" datasetid="ds_main_cnfrinfo" columnid="userid"/>
      <BindItem id="item1" compid="grp_biz.ipt_writenm" propid="value" datasetid="ds_main_cnfrinfo" columnid="usernm"/>
      <BindItem id="item2" compid="grp_biz.tar_memo" propid="value" datasetid="ds_main_cnfrinfo" columnid="memo"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
include "ast_commonxp::AST.xjs"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 
 ****************************************************************************************/
function trim(data){
	return data.replace(/(^\s*)|(\s*$)/g, "");
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 
 ****************************************************************************************/
function fSubmitConfirm() {
	// 필수사항 확인
	if (trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"userid"))) == "" || trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"usernm"))) == "" 
		|| trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"instcd"))) == "") {
		sysf_messageBox("승인자 사번을", "C001");
		return;
	}
	
	if (trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"drugdd"))) == "" || trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"drugno"))) == "" 
		|| trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"ioflag"))) == "") {
		sysf_messageBox("환자를 선택하시고", "C001");
		return;
	}
	
	if (trim(ds_send_srchinfo.getColumn(0,"srchrcvflag")) == "Y" && trim(ds_send_srchinfo.getColumn(0,"srchdrugmngtyn")) != "Y" 
		&& trim(utlf_transNullToEmpty(ds_main_cnfrinfo.getColumn(0,"memo"))) == "") {
		sysf_messageBox("사유를", "C001");
		grp_biz.tar_memo.setFocus();
		return;					
	} 
	
	var oParam = {};
		oParam.id          = "TXADT63401";
		oParam.service     = "pharmacyprescriptionapp.Medication";
		oParam.method      = "reqExeOutDrugStatMemo";
		oParam.inds        = "req=ds_main_cnfrinfo";
		oParam.outds       = "ds_hidden=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXADT63401";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TXADT63401") > -1) {
		opener.ds_hidden.setColumn(0,"cnfrresult", "Y");
		this.close();
	} else {
		opener.ds_hidden.setColumn(0,"cnfrresult", "N");
		sysf_messageBox("사유 저장이", "E009");
		return;
	}					
}

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

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADT63400
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADT63400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}

function grp_btn_btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	if (sysf_messageBox("승인 사유를","Q002") == 6) {
		fSubmitConfirm();				
	}
}

function grp_btn_btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function grp_biz_ipt_writeid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		var writid = trim(ds_main_cnfrinfo.getColumn(0,"userid"));
		if(!utlf_isNull(writid)) {
			ds_send_usersrchinfo.setColumn(0,"srchuserid",writid);
			
			var oParam = {};
				oParam.id          = "TRADT63401";
				oParam.service     = "pharmacyprescriptionapp.MpsCheck";
				oParam.method      = "reqGetUserInfo";
				oParam.inds        = "req=ds_send_usersrchinfo";
				oParam.outds       = "ds_hidden_userinfo=item";
				oParam.async       = false;
				oParam.callback    = "cf_TRADT63401";

			tranf_submit(oParam);
			
			if (arErrorCode.pop("TRADT63401") > -1) {
				if(trim(utlf_transNullToEmpty(ds_hidden_userinfo_item.getColumn(0,"usernm"))) != "") {
					ds_main_cnfrinfo.setColumn(0,"userid", ds_hidden_userinfo_item.getColumn(0,"userid"));
					ds_main_cnfrinfo.setColumn(0,"usernm", ds_hidden_userinfo_item.getColumn(0,"usernm"));
					ds_main_cnfrinfo.setColumn(0,"drugdd", ds_send_srchinfo.getColumn(0,"drugdd"));
					ds_main_cnfrinfo.setColumn(0,"drugno", ds_send_srchinfo.getColumn(0,"drugno"));
					ds_main_cnfrinfo.setColumn(0,"ioflag", ds_send_srchinfo.getColumn(0,"ioflag"));
					ds_main_cnfrinfo.setColumn(0,"pid"	 , ds_send_srchinfo.getColumn(0,"pid"));
					ds_main_cnfrinfo.setColumn(0,"instcd", ds_send_srchinfo.getColumn(0,"userid"));
					
					// 미수령약 + 투약관리약 조회결과, 투약완료 처리 시
					if(ds_send_srchinfo.getColumn(0,"srchrcvflag") == "Y" && ds_send_srchinfo.getColumn(0,"srchdrugmngtyn") == "Y") {
						fSubmitConfirm();
					} else if(ds_send_srchinfo.getColumn(0,"srchrcvflag") == "Y") {
						sysf_messageBox("조제취소 사유를", "C001");
						grp_biz.tar_memo.setFocus();
						return;
					} else {
						// 강제로 창닫기
						this.close();
					}
				} else {
					sysf_messageBox("입력한 사번으로 이름 확인을", "E009");
					return;
				}
			}
		} else {
			sysf_messageBox("외래투약관리 승인을 위해 사번은", "I003");
			return;
		}
	}		
}

function cf_TRADT63401(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
]]></Script>
  </Form>
</FDL>