YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SPMNW09400_메모등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNW09400" position="absolute 0 0 396 221" titletext="메모등록" oninit="SPMNW09400_oninit" onload="SPMNW09400_onload" scrollbars="none">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 396 223" id="group1" scrollbars="none">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 51 380 54" linetype="horizontal" id="line8" class="line_2" anchor="default" style="border:0 none #808080ff ;"/>
              <TextArea position="absolute 82 52 380 219" id="textarea1" anchor="default" imemode="hangul" maxlength="666"/>
              <Static text="작성일자" position="absolute 0 27 79 50" align="align:center middle;" id="caption5" class="cell_1" anchor="default"/>
              <Static text="메모내용" position="absolute 0 52 79 219" align="align:center middle;" id="caption18" class="cell_1" anchor="default"/>
              <Shape position="absolute 0 217 380 223" linetype="horizontal" id="line7" class="line_3" anchor="default"/>
              <Static text="작성시간" position="absolute 210 27 289 50" align="align:center middle;" id="caption11" class="cell_1" anchor="default"/>
              <MaskEdit readonly="true" position="absolute 82 28 207 47" id="output4" mask="####-##-##" anchor="default" type="string" style="align:left middle;"/>
              <MaskEdit readonly="true" position="absolute 292 28 380 47" id="output1" mask="##:##" anchor="default" type="string" style="align:left middle;"/>
              <Button position="absolute 291 2 333 21" id="btn_save" class="btn5" text="저장" anchor="default" onclick="group1_btn_save_onclick"/>
              <Static text="메모등록" position="absolute 5 6 217 22" id="caption3" class="tit_2" anchor="default"/>
              <Button position="absolute 335 2 377 21" id="button1" class="btn5" text="종료" anchor="default" onclick="group1_button1_onclick"/>
              <Shape id="line2" class="line_10" position="absolute 0 23 380 27" anchor="none" style="border:0 solid #057777ff ;"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_memo_memoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="recdd" type="STRING" size="256"/>
          <Column id="rectm" type="STRING" size="256"/>
          <Column id="memocnts" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="memoitemflag" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="recdd_b" type="STRING" size="256"/>
          <Column id="rectm_b" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="recdd"/>
            <Col id="rectm"/>
            <Col id="memocnts"/>
            <Col id="seqno"/>
            <Col id="pid"/>
            <Col id="memoitemflag"/>
            <Col id="seqno"/>
            <Col id="recdd_b"/>
            <Col id="rectm_b"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="instcd"/>
            <Col id="status"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <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>
    <Bind>
      <BindItem id="item0" compid="group1.textarea1" propid="value" datasetid="ds_main_memo_memoinfo" columnid="memocnts"/>
      <BindItem id="item1" compid="group1.output4" propid="value" datasetid="ds_main_memo_memoinfo" columnid="recdd"/>
      <BindItem id="item2" compid="group1.output1" propid="value" datasetid="ds_main_memo_memoinfo" columnid="rectm"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var arErrorCode = new HashArray();

function cf_TRMNW09401(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
	if(nErrorCode < 0) return;
	utlf_addLog("***** cf_TRMNW09401 *****");
}

/*SPMNW09400_oninit*/
function SPMNW09400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
}




/*SPMNW09400_onload*/
function SPMNW09400_onload(obj:Form, e:LoadEventInfo)
{
	fInit();
}





//화면 오픈시
function fInit() {
	if (frmf_checkOpener()) {
		var recdd 	= opener.frmf_getParameter("recdd");
		var wardcd 	= opener.frmf_getParameter("wardcd");
		var rectm 	= opener.frmf_getParameter("rectm");
		var pid 	= opener.frmf_getParameter("pid");
		var indd 	= opener.frmf_getParameter("indd");
		var cretno 	= opener.frmf_getParameter("cretno");
		var status 	= opener.frmf_getParameter("status");						
	}
	
	ds_send.clearData();
	dsf_makeValue(ds_send,"recdd"		,"string",recdd);
	dsf_makeValue(ds_send,"recdd_b"		,"string",recdd);
	dsf_makeValue(ds_send,"rectm"		,"string",rectm);
	dsf_makeValue(ds_send,"rectm_b"		,"string",rectm);
	dsf_makeValue(ds_send,"memoitemflag","string","04");
	dsf_makeValue(ds_send,"pid"			,"string",pid);
	dsf_makeValue(ds_send,"indd"		,"string",indd);
	dsf_makeValue(ds_send,"cretno"		,"string",cretno);
	dsf_makeValue(ds_send,"wardcd"		,"string",wardcd);
	dsf_makeValue(ds_send,"status"		,"string","02");
	
	//dsf_setTypeFormat(oDataset, "seqno:INT^cretno:INT");
	var oParam = {};
    oParam.id          = "TRMNW09401";
    oParam.service     = "wardcareapp.WardCareMngt";
    oParam.method      = "reqGetTodoPatList";
    oParam.inds        = "reqcond=ds_send";
    oParam.outds       = "ds_main_memo_memoinfo=memoinfo";
    oParam.async       = false;
    oParam.callback    = "cf_TRMNW09401";

	tranf_submit(oParam);
	//dsf_setTypeFormat(oDataset, "seqno:INT^cretno:INT");
	
	for(var i = 0; i < ds_main_memo_memoinfo.getRowCount(); i++){
		dsf_makeValue(ds_main_memo_memoinfo,"recdd_b","string", ds_main_memo_memoinfo.getColumn(i, "recdd"), i);
		dsf_makeValue(ds_main_memo_memoinfo,"rectm_b","string", ds_main_memo_memoinfo.getColumn(i, "rectm"), i);
	}
	
	if(arErrorCode.pop("TRMNW09401") > -1){
		if( utlf_isNull(ds_main_memo_memoinfo.getColumn(0, "recdd")) ){
			dsf_makeValue(ds_main_memo_memoinfo,"recdd"			,"string",recdd);
			dsf_makeValue(ds_main_memo_memoinfo,"rectm"			,"string",rectm);
			dsf_makeValue(ds_main_memo_memoinfo,"recdd_b"		,"string",recdd);
			dsf_makeValue(ds_main_memo_memoinfo,"rectm_b"		,"string",rectm);
			dsf_makeValue(ds_main_memo_memoinfo,"memoitemflag"	,"string","04");
			dsf_makeValue(ds_main_memo_memoinfo,"pid"			,"string",pid);
			dsf_makeValue(ds_main_memo_memoinfo,"indd"			,"string",indd);
			dsf_makeValue(ds_main_memo_memoinfo,"cretno"		,"string",cretno);
			dsf_makeValue(ds_main_memo_memoinfo,"wardcd"		,"string",wardcd);
			dsf_makeValue(ds_main_memo_memoinfo,"status"		,"string","i");
			dsf_makeValue(ds_main_memo_memoinfo,"memocnts"		,"string","");

		}else{
			ds_main_memo_memoinfo.setColumn(0, "status", "u");
		}
	}
}	




//저장버튼 클릭시
function fSaveMemo() {
	ds_send.clearData();sysf_trace(ds_main_memo_memoinfo.saveXML());
	dsf_makeValue(ds_send,"recdd"		,"string",ds_main_memo_memoinfo.getColumn(0, "recdd"));
	dsf_makeValue(ds_send,"recdd_b"		,"string",ds_main_memo_memoinfo.getColumn(0, "recdd_b"));
	dsf_makeValue(ds_send,"rectm"		,"string",ds_main_memo_memoinfo.getColumn(0, "rectm"));
	dsf_makeValue(ds_send,"rectm_b"		,"string",ds_main_memo_memoinfo.getColumn(0, "rectm_b"));
	dsf_makeValue(ds_send,"memoitemflag","string",ds_main_memo_memoinfo.getColumn(0, "memoitemflag"));
	dsf_makeValue(ds_send,"pid"			,"string",ds_main_memo_memoinfo.getColumn(0, "pid"));
	dsf_makeValue(ds_send,"indd"		,"string",ds_main_memo_memoinfo.getColumn(0, "indd"));
	dsf_makeValue(ds_send,"cretno"		,"string",ds_main_memo_memoinfo.getColumn(0, "cretno"));
	dsf_makeValue(ds_send,"memocnts"	,"string",ds_main_memo_memoinfo.getColumn(0, "memocnts"));
	dsf_makeValue(ds_send,"status"		,"string",ds_main_memo_memoinfo.getColumn(0, "status"));
	
	//dsf_setTypeFormat(oDataset, "seqno:INT^cretno:INT");
	var oParam = {};
    oParam.id          = "TXMNW09401";
    oParam.service     = "wardcareapp.WardCareMngt";
    oParam.method      = "reqExeTodoMemoList";
    oParam.inds        = "reqdata=ds_send";
    oParam.outds       = "";
    oParam.async       = false;

	tranf_submit(oParam);
	this.close();
}
				
				
				
				
				
/*group1_btn_save_onclick*/
function group1_btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveMemo();		
}




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