YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SPMNW12800_이력정보.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNW12800" position="absolute 0 0 638 246" titletext="이력정보" onload="SPMNW12800_onload" oninit="SPMNW12800_oninit">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 633 244" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static position="absolute 5 3 152 19" id="cap_title" class="tit_2" anchor="default"/>
              <Button position="absolute 589 0 631 19" id="button1" class="btn2" text="등록" onclick="grp_biz_button1_onclick" anchor="default"/>
              <Shape position="absolute 0 20 632 26" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
              <Grid position="absolute 0 25 632 233" id="grd_inhist" visible="false" scrollbars="autoboth" binddataset="ds_grd_inhist" autofittype="col" anchor="default" autoenter="select">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="30"/>
                      <Column size="75"/>
                      <Column size="75"/>
                      <Column size="240"/>
                      <Column size="192"/>
                      <Column size="0"/>
                    </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="진료기관"/>
                      <Cell col="5" text="inhistpk"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                      <Cell col="1" displaytype="date" text="bind:indd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="2" displaytype="date" text="bind:dschdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="3" style="align:left;" text="bind:illnm"/>
                      <Cell col="4" text="bind:orddept"/>
                      <Cell col="5" text="bind:inhistpk"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 0 26 632 238" id="grd_ophist" visible="false" scrollbars="autoboth" binddataset="ds_grd_ophist" autofittype="col" anchor="default" autoenter="select">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="30"/>
                      <Column size="75"/>
                      <Column size="321"/>
                      <Column size="187"/>
                      <Column size="0"/>
                    </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="ophistpk"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                      <Cell col="1" displaytype="date" text="bind:opdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="2" style="align:left;" text="bind:opnm"/>
                      <Cell col="3" text="bind:orddept"/>
                      <Cell col="4" text="bind:ophistpk"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_inhist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256" sumtext="체크"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
          <Column id="illnm" type="STRING" size="256" sumtext="병명"/>
          <Column id="orddept" type="STRING" size="256" sumtext="진료기관"/>
          <Column id="inhistpk" type="STRING" size="256" sumtext="입원이력PK정보"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_ophist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="opdd" type="STRING"/>
          <Column id="opnm" type="STRING"/>
          <Column id="orddept" type="STRING"/>
          <Column id="ophistpk" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" 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-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
var parentFormId = "";

function SPMNW12800_onload(obj:Form, e:LoadEventInfo)
{
	
	//histflag : inhist (입원이력), ophist(수술이력)
	var histflag = opener.frmf_getParameter("histflag");
	var pid = opener.frmf_getParameter("pid");
	var indd = opener.frmf_getParameter("indd");
	var instcd = opener.frmf_getParameter("instcd");
	parentFormId = opener.frmf_getParameter("parentFormId");
	parentFormId = frmf_findPopup(parentFormId);
	
	if(histflag == "inhist"){
		grp_biz.cap_title.text = "입원이력정보";
		//grp_biz.grd_inhist.position.top = "25px";
		//grp_biz.grd_inhist.position.height = "278px";
		grp_biz.grd_inhist.visible = true;
		grp_biz.grd_ophist.visible = false;
	
	}else{
		grp_biz.cap_title.text = "수술이력정보";
		//grp_biz.grd_ophist.position.top = "25px";
		//grp_biz.grd_ophist.position.height = "278px";
		grp_biz.grd_ophist.visible = true;
		grp_biz.grd_inhist.visible = false;
	}

	ds_send.clearData();
	dsf_createDsRow("ds_send", [
				{col:"pid", type:"STRING", size:256, val: pid }
			  , {col:"indd", type:"STRING", size:256, val: indd}
			  , {col:"instcd", type:"STRING", size:256, val: instcd}
			  , {col:"histflag", type:"STRING", size:256, val: histflag}
				]);	
	//submit("TRMNW12801");
	
	var oParam = {};
		oParam.id          = "TRMNW12801";
		oParam.service     = "wardcareapp.WardCareRec";
		oParam.method      = "reqGetHistInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_inhist=inhistinfo ds_grd_ophist=ophistinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNW12801";

	tranf_submit(oParam);
	if(ds_grd_inhist.rowcount > 0)
	{
		if(utlf_isNull(ds_grd_inhist.getColumnInfo("chk")))
		{
			dsf_makeValue(ds_grd_inhist, "chk", "string", "");
		}		
	}
	if(ds_grd_ophist.rowcount > 0)
	{
		if(utlf_isNull(ds_grd_ophist.getColumnInfo("chk")))
		{
			dsf_makeValue(ds_grd_ophist, "chk", "string", "");
		}
	}
}

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var histflag = opener.frmf_getParameter("histflag");
						
	//입원이력
	if(histflag == "inhist"){
		if (utlf_isNull(ds_grd_inhist.lookup("chk", "1", "chk")) ) {
			sysf_messageBox("선택된 항목이 ", "I004");	
			return;
		} 
		
		//동일이력 존재여부 체크
		for (i = 0; i < this.ds_grd_inhist.rowcount; i++) {
			if (ds_grd_inhist.getColumn( i, "chk") == "1") {
				var inhistpk = ds_grd_inhist.getColumn( i , "inhistpk");
				if(parentFormId.ds_data_inhist2.getCaseCount("inhistpk == '"+ inhistpk +"'") > 0) 
				{
					sysf_messageBox("동일한 이력정보가 있습니다.",  "I");
					return;
				}
			}
		}			
		
		for (i = 0; i < ds_grd_inhist.rowcount; i++) {
			if (ds_grd_inhist.getColumn( i , "chk") == "1") {
				var bfinhistlist = parentFormId.ds_data_inhist2;
				if (bfinhistlist.rowcount == 0 || !utlf_isNull(parentFormId.ds_data_inhist2.getColumn( bfinhistlist.rowcount -1 , "indd"))){		
					parentFormId.ds_data_inhist2.addRow();
				}
				var inhistlist = parentFormId.ds_data_inhist2;
				parentFormId.ds_data_inhist2.setColumn(inhistlist.rowcount - 1, "indd", ds_grd_inhist.getColumn( i , "indd"));
				parentFormId.ds_data_inhist2.setColumn(inhistlist.rowcount - 1, "dschdd", ds_grd_inhist.getColumn( i , "dschdd"));
				parentFormId.ds_data_inhist2.setColumn(inhistlist.rowcount - 1, "illnm", ds_grd_inhist.getColumn( i , "illnm"));
				parentFormId.ds_data_inhist2.setColumn(inhistlist.rowcount - 1, "orddept", ds_grd_inhist.getColumn( i , "orddept"));
				parentFormId.ds_data_inhist2.setColumn(inhistlist.rowcount - 1, "inhistpk", ds_grd_inhist.getColumn( i , "inhistpk"));
				
			}
		}
		
	//수술이력
	}else{
		if (utlf_isNull(ds_grd_ophist.lookup("chk", "1", "chk")) ) {
			sysf_messageBox("선택된 항목이 ", "I004");	
			return;
		} 
		
		//동일이력 존재여부 체크
		for (i = 0; i < ds_grd_ophist.rowcount; i++) {
			if (ds_grd_ophist.getColumn(i , "chk") == "1") {
				var ophistpk = ds_grd_ophist.getColumn(i , "ophistpk");	
sysf_trace(parentFormId)							
sysf_trace(parentFormId.name)							
				if(parentFormId.ds_data_ophist2.getCaseCount("ophistpk == '"+ ophistpk +"'") > 0) 
				{
					sysf_messageBox("동일한 이력정보가 있습니다.",  "I");
					return;
				}
			}
		}
	
		for (i = 0; i < ds_grd_ophist.rowcount; i++) {
			if (ds_grd_ophist.getColumn(i , "chk") == "1") {
				var bfophistlist = parentFormId.ds_data_ophist2;
				if (bfophistlist.rowcount == 0 || !utlf_isNull(parentFormId.ds_data_ophist2.getColumn( bfophistlist.rowcount - 1, "opdd"))){		
					parentFormId.ds_data_ophist2.addRow();
				}
				var ophistlist = parentFormId.ds_data_ophist2;
				parentFormId.ds_data_ophist2.setColumn( ophistlist.rowcount - 1, "opdd", ds_grd_ophist.getColumn(  i , "opdd"));
				parentFormId.ds_data_ophist2.setColumn( ophistlist.rowcount - 1, "opnm", ds_grd_ophist.getColumn(  i , "opnm"));
				parentFormId.ds_data_ophist2.setColumn( ophistlist.rowcount - 1, "orddept", ds_grd_ophist.getColumn(  i , "orddept"));
				parentFormId.ds_data_ophist2.setColumn( ophistlist.rowcount - 1, "ophistpk", ds_grd_ophist.getColumn(  i , "ophistpk"));
			}
		}
		//opener.grd_ophist.refresh();
	}
	//model.close();
	this.close();	
}

function SPMNW12800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
}
]]></Script>
  </Form>
</FDL>