YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADB60603_특수조제실약사메모이력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADB60603" position="absolute 0 0 632 393" titletext="특수조제실 약사메모이력" onload="SPADB60603_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 630 364" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="특수조제실 약사메모이력" position="absolute 0 11 183 28" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 26 630 32" linetype="horizontal" id="line1" class="line_1"/>
              <Grid position="absolute 0 32 630 356" id="grd_memolist" binddataset="ds_main_memoinfo_item" cellsizingtype="col" extendsizetype="row" autosizingtype="row" onlbuttondown="grp_biz_grd_memolist_onlbuttondown">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="300"/>
                      <Column size="55"/>
                      <Column size="45"/>
                      <Column size="95"/>
                      <Column size="120"/>
                    </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="작성일시"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="text" text="bind:memo" wordwrap="char" autosizerow="limitmin"/>
                      <Cell col="1" text="bind:writnm"/>
                      <Cell col="2" displaytype="combo" edittype="combo" text="bind:hosinhosoutflag" combodataset="ds_cmb_hosinhosoutflag" combocodecol="value" combodatacol="label" enable="false"/>
                      <Cell col="3" text="bind:orddeptnm"/>
                      <Cell col="4" text="bind:writdt" mask="####-##-## ##:##:##"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Shape id="line00" class="line_1" position="absolute 0 27 630 33"/>
              <Shape id="line02" class="line_1" position="absolute 0 28 630 34"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 357 630 384" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 574 5 630 27" id="btn_cls" class="btn4" text="닫기" anchor="default" onclick="grp_btn_btn_cls_onclick"/>
              <Button position="absolute 514 5 570 27" id="btn_del" class="btn4" visible="false" text="삭제" onclick="grp_btn_btn_del_onclick" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_memoinfo_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="memo" type="STRING" size="256"/>
          <Column id="writnm" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="writdt" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="hosinhosoutflag" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
          <Column id="drugdd" type="STRING" size="256"/>
          <Column id="writid" type="STRING" size="256"/>
          <Column id="useyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="memo"/>
            <Col id="writnm"/>
            <Col id="orddeptnm"/>
            <Col id="writdt"/>
            <Col id="pid"/>
            <Col id="seqno"/>
            <Col id="hosinhosoutflag"/>
            <Col id="instcd"/>
            <Col id="orddeptcd"/>
            <Col id="drugno"/>
            <Col id="drugdd"/>
            <Col id="writid"/>
            <Col id="useyn"/>
          </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="srchpid" type="STRING" size="256"/>
          <Column id="srchinstcd" type="STRING" size="256"/>
          <Column id="srchioflag" type="STRING" size="256"/>
          <Column id="srchhosinhosoutflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchpid"/>
            <Col id="srchinstcd"/>
            <Col id="srchioflag"/>
            <Col id="srchhosinhosoutflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_delinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="hosinhosoutflag" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="m" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="seqno"/>
            <Col id="hosinhosoutflag"/>
            <Col id="instcd"/>
            <Col id="m"/>
            <Col id="ioflag"/>
          </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" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cmb_hosinhosoutflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">B</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <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 "com_basiccodexp::ZBC001.xjs";
// include "ast_commonxp::AST.xjs"
//=======================================================================================
var arErrorCode = new HashArray();

function SPADB60603_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 	

	try{
		ds_send_srchinfo.copyData(arg_ds_send_srchinfo);
	}catch(e){}

	ds_main_memoinfo_item.clearData();
	if (ds_send_srchinfo.getColumn(0,"srchioflag") == "I") {
		dsf_makeValue(ds_send_srchinfo,"srchhosinhosoutflag","string","A");	
	} else if (ds_send_srchinfo.getColumn(0,"srchioflag") == "O") {
		dsf_makeValue(ds_send_srchinfo,"srchhosinhosoutflag","string","B");	  
	} else {
		sysf_messageBox("구분정보는","I003");	
		return;
	}

	call_TRADB60604();
}

function call_TRADB60604() {
	var oParam = {};
		oParam.id          = "TRADB60604";
		oParam.service     = "pharmacyprescriptionapp.MpsCheck";
		oParam.method      = "reqGetSpecMemoList";
		oParam.inds        = "req=ds_send_srchinfo";
		oParam.outds       = "ds_main_memoinfo_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB60601";

	tranf_submit(oParam);	
}

function grp_biz_grd_memolist_onlbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if (ds_main_memoinfo_item.getColumn(e.row,"writid") == sysf_getUserId()) {	
		grp_btn.btn_del.visible = true;
	} else {
		grp_btn.btn_del.visible = false;
	}	
}

function grp_btn_btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	if (sysf_messageBox("약사메모를","Q001")==6)
	{
		ds_send_delinfo.setColumn(0,"pid"				, ds_main_memoinfo_item.getColumn(ds_main_memoinfo_item.rowposition,"pid"));
		ds_send_delinfo.setColumn(0,"seqno"				, ds_main_memoinfo_item.getColumn(ds_main_memoinfo_item.rowposition,"seqno"));
		ds_send_delinfo.setColumn(0,"hosinhosoutflag"	, ds_main_memoinfo_item.getColumn(ds_main_memoinfo_item.rowposition,"hosinhosoutflag"));
		ds_send_delinfo.setColumn(0,"m"					, "d");
		ds_send_delinfo.setColumn(0,"ioflag"			, "O");
		
		var oParam = {};
			oParam.id          = "TXADB60601";
			oParam.service     = "pharmacyprescriptionapp.MpsCheck";
			oParam.method      = "reqExeMemoData";
			oParam.inds        = "req=ds_send_delinfo";
			oParam.outds       = "ds_hidden=item";
			oParam.async       = false;
			oParam.callback    = "cf_TXADB60601";

		tranf_submit(oParam);
	}
}

function cf_TXADB60601(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    call_TRADB60604();
}

function grp_btn_btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>