YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO02700_연속검사.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO02700" position="absolute 0 0 150 345" titletext="간격내역" oninit="SPMMO02700_oninit" onload="SPMMO02700_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 8 27 143 317" id="datagrid1" binddataset="ds_main_tootfactlist" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="32"/>
                <Column size="62"/>
                <Column size="39"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell displaytype="normal" text="삭제"/>
                <Cell col="1" colspan="2" displaytype="normal" text="연속검사" taborder="undefined"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:status" expr="expr:(status == &quot;Y&quot; || status == 1) ? 1 : 0"/>
                <Cell col="1" displaytype="number" edittype="masknumber" style="align:center middle;" text="bind:clinccmtcnts" mask="expr:utlf_isNull(clinccmtcnts) ? &quot;&quot; : &quot;####0&quot;" editautoselect="true"/>
                <Cell col="2" displaytype="normal" text="bind:unit"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape position="absolute 8 19 143 25" linetype="vertical" id="line7" class="line_1"/>
        <Button position="absolute 56 0 98 19" id="button37" class="btn2_letter2" text="추가" onclick="button37_onclick"/>
        <Button position="absolute 101 0 143 19" id="button1" class="btn2_letter2" text="삭제" onclick="button1_onclick"/>
        <Button position="absolute 28 320 84 342" id="button2" class="btn4" text="확인" onclick="button2_onclick"/>
        <Button position="absolute 87 320 143 342" id="button3" class="btn4" text="취소" onclick="button3_onclick"/>
        <MaskEdit position="absolute 8 0 53 19" id="input1" mask="#,###" onkeydown="input1_onkeydown"/>
        <Button position="absolute 10 320 25 340" id="button4" visible="false" text="" onclick="button4_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_tootfactlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_tootfactlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="status" type="STRING"/>
          <Column id="clinccmtcnts" type="STRING"/>
          <Column id="unit" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reset_tootfactlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256"/>
          <Column id="clinccmtcnts" type="STRING" size="256"/>
          <Column id="unit" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_root" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="intvl" type="STRING" size="256"/>
          <Column id="unit" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_root" columnid="intvl"/>
    </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";
include "emr_prcpmngtxp::MMO001.xjs";
include "emr_prcpmngtxp::SMMMO00100.xjs";


function SPMMO02700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMMO02700_onload(obj:Form, e:LoadEventInfo)
{
	ds_main_tootfactlist.clearData();	//model.removeNodeset ( "/root/tootfact/tootfactlist" );

	var clinccmtcnts = opener.ds_main_prcplist.getColumn(0, "drugrateqty");	//opener.model.getValue ( "/root/main/prcp/prcplist/drugrateqty" ) + "^" ;				
	var len = clinccmtcnts.split(",").length;
	var intvl1 = "";
	var unit = "";        				
	var diagtestconttestintvlflag = opener.ds_main_prcplist.getColumn(0, "diagtestconttestintvlflag");	//opener.model.getValue ( "/root/main/prcp/prcplist/diagtestconttestintvlflag" );

	if ( diagtestconttestintvlflag == "1" ) {
		unit = "분";
	} else if ( diagtestconttestintvlflag == "2" ) {
		unit = "시간";        				
	} else if ( diagtestconttestintvlflag == "3" ) {
		unit = "횟수";        				
	} else if ( diagtestconttestintvlflag == "4" ) {
		unit = "일수";        				
	}

	ds_reset_tootfactlist.addRow();
	ds_reset_tootfactlist.setColumn(0, "unit", unit);		//model.setValue ( "/root/reset/tootfactlist/unit", unit  );
	ds_root.setColumn(0, "unit", unit);	//model.setValue ( "/root/unit", unit  );
							
	for ( var i = 0; i < len; i++ ) {
		intvl1 = lf_getArrayData (clinccmtcnts, 0, i, "^", "," );
		
		if ( intvl1 == "-" ) {
			intvl1 = "";
		}
	
		ds_reset_tootfactlist.setColumn(0, "clinccmtcnts", intvl1);	//model.setValue ( "/root/reset/tootfactlist/clinccmtcnts", intvl1  );										
		lf_appendChildPrcp ( "ds_reset_tootfactlist", "ds_main_tootfactlist", "main" ); //검색라인추가	//appendChildPrcp ( "/root/reset/tootfactlist", "/root/tootfact", "main" );					
	}
	//model.refresh();
}

function button37_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_reset_tootfactlist.setColumn(0, "clinccmtcnts", "");	//model.setValue ( "/root/reset/tootfactlist/clinccmtcnts", "" );
	lf_appendChildPrcp("ds_reset_tootfactlist", "ds_main_tootfactlist", "main");		//appendChildPrcp ( "/root/reset/tootfactlist", "/root/tootfact", "main" );
	//model.refresh();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	srcLen = ds_main_tootfactlist.rowcount;	//model.instances(0).selectNodes( "/root/tootfact/tootfactlist" ).length;
	for ( var i = srcLen; i >= 0; i-- ) {
		if ( ds_main_tootfactlist.getColumn(i, "status") == "Y") {	// model.getValue ( "/root/tootfact/tootfactlist[" + i + "]/status" ) 
			ds_main_tootfactlist.deleteRow(i);	//model.removenode ( "/root/tootfact/tootfactlist[" + i + "]" );
		}
	}
	//model.refresh();	
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var tootfact = "";
	var clinccmtcnts = "";				
	var vclinccmtcnts = "";
	srcLen = ds_main_tootfactlist.rowcount;	//model.instances(0).selectNodes( "/root/tootfact/tootfactlist" ).length;
	if ( srcLen == 0 ) {
			alert ( "입력된 연속검사값이 없습니다." );
			return;					
	}
	for ( var i = 0; i < srcLen; i++ ) {               
		vclinccmtcnts = ds_main_tootfactlist.getColumn(0, "clinccmtcnts");	//model.getValue ( "/root/tootfact/tootfactlist[" + i+ "]/clinccmtcnts" ) ;
		if ( vclinccmtcnts == "" || vclinccmtcnts =="-"  ) {
			alert ( "입력된 연속검사값이 없습니다." );
			return;
		}
			
		tootfact = tootfact + ds_main_tootfactlist.getColumn(i, "clinccmtcnts") + ds_root.getColumn(0, "unit") + ",";	//model.getValue ( "/root/tootfact/tootfactlist[" + i + "]/clinccmtcnts" ) + model.getValue ( "/root/unit" )+ ",";
		clinccmtcnts = clinccmtcnts + ds_main_tootfactlist.getColumn(i, "clinccmtcnts") + ",";	//model.getValue ( "/root/tootfact/tootfactlist[" + i+ "]/clinccmtcnts" ) + ",";									    
	}		
	tootfact = tootfact.substring(0, tootfact.length-1);    					                                          
	clinccmtcnts = clinccmtcnts.substring(0, clinccmtcnts.length-1);    					                                          
												
	opener.ds_main_prcplist.setColumn(0, "diagtestconttestcdspec", tootfact);		// opener.model.setValue ( "/root/main/prcp/prcplist/diagtestconttestcdspec", tootfact );					    						
	opener.ds_main_prcplist.setColumn(0, "drugrateqty", clinccmtcnts);		// opener.model.setValue ( "/root/main/prcp/prcplist/drugrateqty", clinccmtcnts );					
	opener.ds_main_prcplist.setColumn(0, "prcptims", srcLen);		// opener.model.setValue ( "/root/main/prcp/prcplist/prcptims", srcLen );					
	// opener.model.refresh();		                           
	close();
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}

function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	var prcptims = 	opener.ds_main_prcplist.getColumn(0, "prcptims");	//opener.model.getValue ( "/root/main/prcp/prcplist/prcptims" );
	var intvl = input1.value;	//model.getValue ( "/root/intvl" );				
	ds_main_tootfactlist.clearData();	//model.removeNodeset ( "/root/tootfact/tootfactlist" );
	
	for ( var i = 0; i < prcptims; i++ ) {					
		ds_reset_tootfactlist.setColumn(0, "clinccmtcnts", intvl * i);	//model.setValue ( "/root/reset/tootfactlist/clinccmtcnts", intvl * i );
		lf_appendChildPrcp("ds_reset_tootfactlist", "ds_main_tootfactlist", "main");	//appendChildPrcp ( "/root/reset/tootfactlist", "/root/tootfact", "main" );
	}
	//model.refresh();	
}

function ds_main_tootfactlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	var currow = obj.rowposition;
	if(e.columnid == "status")
		obj.setColumn(currow, e.columnid, (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
}

function input1_onkeydown(obj:MaskEdit, e:KeyEventInfo)
{
	if( e.keycode == 13 ) { 
		var ev = new ClickEventInfo;
		frmf_inputEnterKey("button4", "onclick", ev );
	}
}
]]></Script>
  </Form>
</FDL>