YNU_JEUS/app_home/himed/xpapps/lis/acptmngtxp/xp/SPLLJ90300_검체취소사유관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLLJ90300" position="absolute 0 0 405 100" titletext="검체취소사유" oninit="SPLLJ90300_oninit" onload="SPLLJ90300_onload">
    <Layouts>
      <Layout>
        <Static id="caption31" text="검체취소사유" class="tit_2" position="absolute 0 0 121 22"/>
        <Edit id="output4" taborder="1" readonly="true" position="absolute 65 46 400 65"/>
        <Shape id="line12" class="line_10" position="absolute 0 16 400 22"/>
        <Static id="caption32" text="사유" class="cell_1" position="absolute 0 21 60 44"/>
        <Static id="caption33" text="취소항목" class="cell_1" position="absolute 0 45 60 68"/>
        <Combo id="cmb_resn" taborder="2" innerdataset="@ds_hidden_cancelcombo" codecolumn="resncd" datacolumn="resndesc" class="combo_default" position="absolute 65 21 400 40" onitemchanged="cmb_resn_onitemchanged"/>
        <Button id="button3" taborder="3" text="YES" class="btn4" position="absolute 199 72 255 94" onclick="button3_onclick"/>
        <Button id="button4" taborder="4" text="NO" class="btn4" position="absolute 264 72 320 94" onclick="button4_onclick"/>
        <Static id="caption1" text="검체취소를 실행하시겠습니까?" position="absolute 9 72 184 92"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cancellist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cancel" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="resndesc" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cancelcombo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resndesc" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="resncdkind" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cancelresn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="cmb_resn" propid="value" datasetid="ds_hidden_cancel" columnid="resncd"/>
      <BindItem id="item1" compid="output4" propid="value" datasetid="ds_main" columnid="cancellist"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-09
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SPLLJ90300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPLLJ90300_onload(obj:Form, e:LoadEventInfo)
{
	fInit();
}

function fInit()
{
	ds_hidden_ref.copyData(arg_ds_hidden_ref);
	ds_main.setColumn(0, "cancellist", ds_hidden_ref.getColumn(0, "canceltclsnmlist"));
	
	ds_hidden_cancelcombo.clearData();
	
	var oParam = {};
		oParam.id          = "TRLLJ00301";
		oParam.service     = "acptmngtapp.AcptMngt";
		oParam.method      = "reqGetCancelResn";
		oParam.outds       = "ds_init_cancelresn=getCancelResn";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLJ00301";

	tranf_submit(oParam);

	var cntCR = ds_init_cancelresn.rowcount;
	
	for(var i = 0; i < cntCR; i++)
	{
		if(ds_init_cancelresn.getColumn(i, "resncdkind") == "04")
		{
			var NodeCnt = ds_hidden_cancelcombo.addRow();
			
			ds_hidden_cancelcombo.setColumn(NodeCnt, "resncd", ds_init_cancelresn.getColumn(i, "resncd"));
			ds_hidden_cancelcombo.setColumn(NodeCnt, "resndesc", ds_init_cancelresn.getColumn(i, "resndesc"));
			ds_hidden_cancelcombo.setColumn(NodeCnt, "resncdkind", ds_init_cancelresn.getColumn(i, "resncdkind"));
		}							
	}
}

function cmb_resn_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetResnCombo();
}

function fSetResnCombo()
{
	var cntCR = ds_init_cancelresn.rowcount;
	   
	for(var i = 0; i < cntCR; i++)
	{
		if(cmb_resn.value == ds_init_cancelresn.getColumn(i, "resncd"))
		{
			ds_hidden_cancel.setColumn(0, "resncd", ds_init_cancelresn.getColumn(i, "resncd"));
			ds_hidden_cancel.setColumn(0, "resndesc", ds_init_cancelresn.getColumn(i, "resndesc"));
			break;
	   }
	}
}

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

function fSelect_Click()
{
	if(utlf_isNull(ds_hidden_cancel.getColumn(0, "resncd"))|| utlf_isNull(ds_hidden_cancel.getColumn(0, "resndesc")))
	{
		sysf_messageBox("사유를 " , "C001" ,"");
		return;
	}
	var retval = sysf_messageBox( "검체취소시 최종보고 데이터가 삭제될 수 있습니다.","Q007");
	
	if (retval != "6") 
	{
		return; // yes = 6, no = 7
	}
	
	opener.ds_send_cancelgrd.setColumn(0, "resncd", ds_hidden_cancel.getColumn(0, "resncd"));
	opener.ds_send_cancelgrd.setColumn(0, "resndesc", ds_hidden_cancel.getColumn(0, "resndesc"));
	opener.fcancelClick();
	this.close();
}

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