YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADB60600_약사메모이력외래.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADB60600" position="absolute 0 0 633 396" titletext="약사메모이력" oninit="SPADB60600_oninit" onload="SPADB60600_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 630 364" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="약사메모이력" position="absolute 0 12 111 29" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 28 630 34" linetype="horizontal" id="line1" class="line_1"/>
              <Grid position="absolute 0 33 630 359" id="grd_memolist" binddataset="ds_main_memoinfo_item" oncellclick="grp_biz_grd_memolist_oncellclick" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="348"/>
                      <Column size="55"/>
                      <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="작성일시"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="text" text="bind:memo"/>
                      <Cell col="1" text="bind:writnm"/>
                      <Cell col="2" text="bind:orddeptnm"/>
                      <Cell col="3" displaytype="date" text="bind:writdt" mask="yyyy-MM-dd HH:mm:ss"/>
                    </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 29 630 35"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 361 630 388" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 564 5 620 27" id="btn_cls" class="btn4" text="닫기" onclick="grp_btn_btn_cls_onclick"/>
              <Button position="absolute 504 5 560 27" id="btn_del" class="btn4" visible="false" text="삭제" onclick="grp_btn_btn_del_onclick"/>
            </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" 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"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-05
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-05      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
//include "com_basiccodexp::ZBC001.xjs";
include "ast_commonxp::AST.xjs";

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
function SPADB60600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 초기화
	
	try{
		ds_send_srchinfo.copyData(arg_ds_send_memosrchinfo);	//외래처방전 감사 화면에서 넘어온 argument 셋팅(2015.11.11_by.Shaun)
	}catch(e){}
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADB60600
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면오픈시 폼load이후 실행
 ****************************************************************************************/

function SPADB60600_onload(obj:Form, e:LoadEventInfo)
{
	ds_send_srchinfo.setColumn(0, "srchioflag", "O");
	//submit("TRADB60601");
	var oParam = {};
		oParam.id          = "TRADB60601";
		oParam.service     = "pharmacyprescriptionapp.MpsCheck";
		oParam.method      = "reqGetMemoList";
		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_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if (ds_main_memoinfo_item.getColumn(ds_main_memoinfo_item.rowposition, "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 )
	{
		var sRow = ds_main_memoinfo_item.rowposition;
		ds_send_delinfo.setColumn(0, "pid", ds_main_memoinfo_item.getColumn(sRow, "pid"));
		ds_send_delinfo.setColumn(0, "seqno", ds_main_memoinfo_item.getColumn(sRow, "seqno"));
		ds_send_delinfo.setColumn(0, "hosinhosoutflag", ds_main_memoinfo_item.getColumn(sRow, "hosinhosoutflag"));
		ds_send_delinfo.setColumn(0, "m", "d");
		ds_send_delinfo.setColumn(0, "ioflag", "O");
		
		//submit("TXADB60601");
		var oParam = {};
			oParam.id          = "TXADB60601";
			oParam.service     = "pharmacyprescriptionapp.MpsCheck";
			oParam.method      = "reqExeMemoData";
			oParam.inds        = "req=ds_send_delinfo";
			oParam.outds       = "ds_hidden_item=item";
			oParam.async       = false;
			oParam.callback    = "cf_TXADB60601";

		tranf_submit(oParam);
		
		//submit("TRADB60601");
		var oParam = {};
			oParam.id          = "TRADB60601";
			oParam.service     = "pharmacyprescriptionapp.MpsCheck";
			oParam.method      = "reqGetMemoList";
			oParam.inds        = "req=ds_send_srchinfo";
			oParam.outds       = "ds_main_memoinfo_item=item";
			oParam.async       = false;
			oParam.callback    = "cf_TRADB60601";

		tranf_submit(oParam);
	}
}

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

function cf_TRADB60601(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function grp_btn_btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

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