YNU_JEUS/app_home/himed/xpapps/mis/purcbasexp/xp/SMRSD04410_신규재료수가위원회내역(팝업).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRSD04410" position="absolute 0 0 1044 644" titletext="신규재료수가위원회내역(팝업)" oninit="SMRSD04410_oninit" onload="SMRSD04410_onload">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="0" class="div_SA2" position="absolute 0 0 1040 40">
          <Layouts>
            <Layout>
              <Edit id="ipt_newmatrseq" taborder="1" autoselect="true" autoskip="true" class="input_essential" position="absolute 495 9 730 28" anchor="default"/>
              <Button id="btn_search" taborder="2" text="조회" class="btn1" position="absolute 975 9 1031 31" anchor="default" onclick="group2_btn_search_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 957 9 963 27" anchor="default"/>
              <Static id="cap_newmatrseq" text="수가위원회차수 :" class="search_name" position="absolute 370 10 495 27" anchor="default"/>
              <Static id="cap_instcd" text="기관코드 :" class="search_name" position="absolute 34 9 120 26" anchor="default"/>
              <Combo id="cmb_instcd" taborder="3" class="combo_essential" position="absolute 131 9 256 28" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption4" text="물품 리스트" class="tit_2" position="absolute 0 52 113 73"/>
        <Static id="caption6" text="보유부서" class="tit_2" position="absolute 650 52 815 73"/>
        <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 68 600 74"/>
        <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 650 67 1040 76"/>
        <Grid id="grd_rscmnwiclist" taborder="1" binddataset="ds_main_rscmnwiclist" useinputpanel="false" position="absolute 650 73 1040 611" autoenter="select" autofittype="col" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="40"/>
                <Column size="55"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="55"/>
                <Column size="90"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="순번"/>
                <Cell col="2" text="차수"/>
                <Cell col="3" text="청구일자"/>
                <Cell col="4" text="청구순번"/>
                <Cell col="5" text="구매단위"/>
                <Cell col="6" text="단가"/>
                <Cell col="7" text="기관코드"/>
                <Cell col="8" text="물품구분"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="number" edittype="text" style="align:center middle;" text="bind:newmatrordseq"/>
                <Cell col="2" text="bind:newmatrseq"/>
                <Cell col="3" text="bind:reqdd"/>
                <Cell col="4" text="bind:reqseqno"/>
                <Cell col="5" text="bind:purcunit"/>
                <Cell col="6" displaytype="number" text="bind:goodunitcost"/>
                <Cell col="7" text="bind:instcd"/>
                <Cell col="8" text="bind:goodflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_move" taborder="2" text="적용" class="btn2" position="absolute 605 332 647 351" onclick="btn_move_onclick"/>
        <Grid id="grd_rscmnwgdlist" taborder="3" binddataset="ds_main_rscmnwgdlist" useinputpanel="false" position="absolute 0 73 600 611" autoenter="select" autofittype="col" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="27"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="90"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="기관코드"/>
                <Cell col="3" text="청구일자"/>
                <Cell col="4" text="청구순번"/>
                <Cell col="5" text="물품구분"/>
                <Cell col="6" text="물품명(한)"/>
                <Cell col="7" text="물품명(영)"/>
                <Cell col="8" text="물품규격"/>
                <Cell col="9" text="물품모델"/>
                <Cell col="10" text="제조국"/>
                <Cell col="11" text="제조회사코드"/>
                <Cell col="12" text="최종공급처"/>
                <Cell col="13" text="담당자ID"/>
                <Cell col="14" text="담당자HP"/>
                <Cell col="15" text="담당자전화번호"/>
                <Cell col="16" text="입고단위"/>
                <Cell col="17" text="사용단위"/>
                <Cell col="18" text="청구수량"/>
                <Cell col="19" text="단가"/>
                <Cell col="20" text="월평균사용량"/>
                <Cell col="21" text="사용예정일"/>
                <Cell col="22" text="EDI코드"/>
                <Cell col="23" text="청구사유및용도"/>
                <Cell col="24" text="유사재료사용현황"/>
                <Cell col="25" text="타병원사용현황"/>
                <Cell col="26" text="신규재료사용시개선점"/>
                <Cell col="27" text="비고"/>
                <Cell col="28" text="청구부서"/>
                <Cell col="29" text="청구부서"/>
                <Cell col="30" text="청구자"/>
                <Cell col="31" text="청구자원내전화"/>
                <Cell col="32" text="부서책임자"/>
                <Cell col="33" text="보험여부"/>
                <Cell col="34" text="의료적비급여사유"/>
                <Cell col="35" text="해당고시"/>
                <Cell col="36" text="미결정치료재료"/>
                <Cell col="37" text="미결정치료재료신청일"/>
                <Cell col="38" text="행위료포함"/>
                <Cell col="39" text="심사소견"/>
                <Cell col="40" text="진행상태"/>
                <Cell col="41" text="대분류코드"/>
                <Cell col="42" text="중분류코드"/>
                <Cell col="43" text="소분류코드"/>
                <Cell col="44" text="물품코드"/>
                <Cell col="45" text="동재료 한글명"/>
                <Cell col="46" text="동재료 영문명"/>
                <Cell col="47" text="동재료 수가코드"/>
                <Cell col="48" text="동재료 금액"/>
                <Cell col="49" text="수가위원회여부"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:select" expr="expr:select == 'Y' ? 1 : 0"/>
                <Cell col="2" text="bind:instcd"/>
                <Cell col="3" style="align:left middle;" text="bind:reqdd"/>
                <Cell col="4" text="bind:reqseqno"/>
                <Cell col="5" text="bind:goodflag"/>
                <Cell col="6" style="align:left middle;" text="bind:goodhngnm"/>
                <Cell col="7" style="align:left middle;" text="bind:goodengnm"/>
                <Cell col="8" text="bind:goodspec"/>
                <Cell col="9" text="bind:goodmodel"/>
                <Cell col="10" text="bind:prodplce"/>
                <Cell col="11" text="bind:prodcmpycd"/>
                <Cell col="12" text="bind:maincustlastsuplplce"/>
                <Cell col="13" text="bind:chrgid"/>
                <Cell col="14" text="bind:chrgmpphon"/>
                <Cell col="15" text="bind:chrgtel"/>
                <Cell col="16" text="bind:purcunit"/>
                <Cell col="17" text="bind:deliveunit"/>
                <Cell col="18" text="bind:reqqty"/>
                <Cell col="19" text="bind:goodunitcost"/>
                <Cell col="20" text="bind:mmavguseqty"/>
                <Cell col="21" text="bind:useschedd"/>
                <Cell col="22" text="bind:edicd"/>
                <Cell col="23" text="bind:reqresnusge"/>
                <Cell col="24" text="bind:smlartymatruseprestcond"/>
                <Cell col="25" text="bind:anohospusestat"/>
                <Cell col="26" text="bind:newmatrusgeimprvpnt"/>
                <Cell col="27" text="bind:reqcmt"/>
                <Cell col="28" text="bind:reqdeptcd"/>
                <Cell col="29" text="bind:depthngnm"/>
                <Cell col="30" text="bind:reqpsnid"/>
                <Cell col="31" text="bind:reqdepttel"/>
                <Cell col="32" text="bind:reqchrgid"/>
                <Cell col="33" text="bind:insuyn"/>
                <Cell col="34" text="bind:insuresn"/>
                <Cell col="35" text="bind:insucomd"/>
                <Cell col="36" text="bind:undecicurematr"/>
                <Cell col="37" text="bind:undecicurematrreqdt"/>
                <Cell col="38" text="bind:actamtincl"/>
                <Cell col="39" text="bind:judgcmt"/>
                <Cell col="40" text="bind:newmatrprcsstat"/>
                <Cell col="41" text="bind:lrgcd"/>
                <Cell col="42" text="bind:mdlcd"/>
                <Cell col="43" text="bind:smlcd"/>
                <Cell col="44" text="bind:goodcd"/>
                <Cell col="45" text="bind:smlartygoodhngnm"/>
                <Cell col="46" text="bind:smlartygoodengnm"/>
                <Cell col="47" text="bind:calcscorcd"/>
                <Cell col="48" text="bind:smlartyamt"/>
                <Cell col="49" style="align:left middle;" text="bind:insucommityn"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_save" taborder="4" text="저장" class="btn2" position="absolute 953 49 995 68" onclick="btn_save_onclick"/>
        <Button id="btn_del" taborder="5" text="삭제" class="btn2" position="absolute 997 49 1039 68" onclick="btn_del_onclick"/>
        <Shape id="line3" linetype="horizontal" class="line_6" position="absolute 0 612 1040 618"/>
        <Button id="btn_cancel" taborder="6" text="닫기" class="btn4" position="absolute 984 616 1040 638" onclick="btn_cancel_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="newmatrseq" type="STRING" size="256"/>
          <Column id="rscmnwiclist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="newmatrseq"/>
            <Col id="rscmnwiclist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_rscmnwgdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_rscmnwgdlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="reqdd" type="STRING" size="256" sumtext="청구일자"/>
          <Column id="reqseqno" type="STRING" size="256" sumtext="청구순번"/>
          <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="goodhngnm" type="STRING" size="256" sumtext="물품명(한)"/>
          <Column id="goodengnm" type="STRING" size="256" sumtext="물품명(영)"/>
          <Column id="goodspec" type="STRING" size="256" sumtext="물품규격"/>
          <Column id="goodmodel" type="STRING" size="256" sumtext="물품모델"/>
          <Column id="prodplce" type="STRING" size="256" sumtext="제조국"/>
          <Column id="prodcmpycd" type="STRING" size="256" sumtext="제조회사코드"/>
          <Column id="maincustlastsuplplce" type="STRING" size="256" sumtext="최종공급처"/>
          <Column id="chrgid" type="STRING" size="256" sumtext="담당자ID"/>
          <Column id="chrgmpphon" type="STRING" size="256" sumtext="담당자HP"/>
          <Column id="chrgtel" type="STRING" size="256" sumtext="담당자전화번호"/>
          <Column id="purcunit" type="STRING" size="256" sumtext="입고단위"/>
          <Column id="deliveunit" type="STRING" size="256" sumtext="사용단위"/>
          <Column id="reqqty" type="BIGDECIMAL" size="256" sumtext="청구수량"/>
          <Column id="goodunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
          <Column id="mmavguseqty" type="BIGDECIMAL" size="256" sumtext="월평균사용량"/>
          <Column id="useschedd" type="STRING" size="256" sumtext="사용예정일"/>
          <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
          <Column id="reqresnusge" type="STRING" size="256" sumtext="청구사유및용도"/>
          <Column id="smlartymatruseprestcond" type="STRING" size="256" sumtext="유사재료사용현황"/>
          <Column id="anohospusestat" type="STRING" size="256" sumtext="타병원사용현황"/>
          <Column id="newmatrusgeimprvpnt" type="STRING" size="256" sumtext="신규재료사용시개선점"/>
          <Column id="reqcmt" type="STRING" size="256" sumtext="비고"/>
          <Column id="reqdeptcd" type="STRING" size="256" sumtext="청구부서"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="청구부서"/>
          <Column id="reqpsnid" type="STRING" size="256" sumtext="청구자"/>
          <Column id="reqdepttel" type="STRING" size="256" sumtext="청구자원내전화"/>
          <Column id="reqchrgid" type="STRING" size="256" sumtext="부서책임자"/>
          <Column id="insuyn" type="STRING" size="256" sumtext="보험여부"/>
          <Column id="insuresn" type="STRING" size="256" sumtext="의료적비급여사유"/>
          <Column id="insucomd" type="STRING" size="256" sumtext="해당고시"/>
          <Column id="undecicurematr" type="STRING" size="256" sumtext="미결정치료재료"/>
          <Column id="undecicurematrreqdt" type="STRING" size="256" sumtext="미결정치료재료신청일"/>
          <Column id="actamtincl" type="STRING" size="256" sumtext="행위료포함"/>
          <Column id="judgcmt" type="STRING" size="256" sumtext="심사소견"/>
          <Column id="newmatrprcsstat" type="STRING" size="256" sumtext="신규재료진행상태"/>
          <Column id="lrgcd" type="STRING" size="256" sumtext="대분류코드"/>
          <Column id="mdlcd" type="STRING" size="256" sumtext="중분류코드"/>
          <Column id="smlcd" type="STRING" size="256" sumtext="소분류코드"/>
          <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
          <Column id="smlartygoodhngnm" type="STRING" size="256" sumtext="동재료 한글명"/>
          <Column id="smlartygoodengnm" type="STRING" size="256" sumtext="동재료 영문명"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="동재료 수가코드"/>
          <Column id="smlartyamt" type="BIGDECIMAL" size="256" sumtext="동재료 금액"/>
          <Column id="insucommityn" type="STRING" size="256" sumtext="수가위원회여부"/>
          <Column id="select" type="STRING" size="256" sumtext="체크박스"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_rscmnwiclist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="newmatrseq" type="STRING" size="256" sumtext="수가위원회차수"/>
          <Column id="reqdd" type="STRING" size="256" sumtext="청구일자"/>
          <Column id="reqseqno" type="STRING" size="256" sumtext="청구순번"/>
          <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="purcteamcmt" type="STRING" size="256" sumtext="구매팀소견"/>
          <Column id="newmatrordseq" type="BIGDECIMAL" size="256" sumtext="수가위원회출력순번"/>
          <Column id="newmatremflag" type="STRING" size="256" sumtext="응급처리여부"/>
          <Column id="goodunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
          <Column id="purcunit" type="STRING" size="256" sumtext="구매단윈"/>
          <Column id="rsltpurc" type="STRING" size="256" sumtext="수가위원회구입여부결과"/>
          <Column id="rsltinsu" type="STRING" size="256" sumtext="수가위원회수가결과"/>
          <Column id="select" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.cmb_instcd" propid="value" datasetid="ds_send" columnid="instcd"/>
      <BindItem id="item1" compid="group2.ipt_newmatrseq" propid="value" datasetid="ds_send" columnid="newmatrseq"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-06-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "mis_miscommonxp::MIS.xjs";
function SMRSD04410_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMRSD04410_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_rscmnwgdlist);
	grdf_initGrid(grd_rscmnwiclist);
	grdf_setRowTypeIcon(grd_rscmnwiclist, 0);
	
	try
	{
		ds_temp.copyData(arg_ds_temp);
	}
	catch(e)
	{
	}

	fInitialize();	
					
	fGetdata();
}

function fInitialize()
{
	ds_send.clearData();
	ds_send.addRow();
	
	misfGridInit(grd_rscmnwgdlist);
	misfGridInit(grd_rscmnwiclist);
	
	misfComboComCdListMulti("Z0007", "group2.cmb_instcd");
	
	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
		
	misfMsterDetailSet(grd_rscmnwgdlist, null, "TRRSD04411", "N");  
	misfMsterDetailSet(grd_rscmnwiclist, null, "TRRSD04412", "Y");  
}

function fGetdata()
{
	var sInstcd = ds_temp.getColumn(0, "instcd");
	var sNewmatrseq = ds_temp.getColumn(0, "newmatrseq");
											
	if(!utlf_isNull(sInstcd))
	{
		group2.cmb_instcd.value = ds_temp.getColumn(0, "instcd");
		group2.cmb_instcd.enable = false;
	}
	if(!utlf_isNull(sNewmatrseq))
	{
		group2.ipt_newmatrseq.value = ds_temp.getColumn(0, "newmatrseq");
		group2.ipt_newmatrseq.enable = false;
	}
	if(!utlf_isNull(sInstcd) && !utlf_isNull(sNewmatrseq))
	{
		group2.btn_search.click();
	}
}
function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	arrCompId = new Array("group2.cmb_instcd","group2.ipt_newmatrseq");
	frmf_isRequiredControls(arrCompId);
	
	misfMsterDetailRetrieve();
	
	fCheckValue();
}

function fCheckValue()
{
	var sNwicLine = ds_main_rscmnwiclist.rowcount;
	var sNwgdLine = ds_main_rscmnwgdlist.rowcount;
	
	for(var i = 0; i < sNwicLine ; i++)
	{
		var sInstcd = ds_main_rscmnwiclist.getColumn(i, "instcd");
		var sReqdd = ds_main_rscmnwiclist.getColumn(i, "reqdd");
		var sReqseqno = ds_main_rscmnwiclist.getColumn(i, "reqseqno");
		var sGoodflag = ds_main_rscmnwiclist.getColumn(i, "goodflag");
		
		for(var j = 0; j < sNwgdLine ; j++)
		{
			var s_Instcd = ds_main_rscmnwgdlist.getColumn(j, "instcd");
			var s_Reqdd = ds_main_rscmnwgdlist.getColumn(j, "reqdd");
			var s_Reqseqno = ds_main_rscmnwgdlist.getColumn(j, "reqseqno");
			var s_Goodflag = ds_main_rscmnwgdlist.getColumn(j, "goodflag");
			
			if(sInstcd == s_Instcd && sReqdd == s_Reqdd && sReqseqno == s_Reqseqno && sGoodflag == s_Goodflag)
			{
				ds_main_rscmnwgdlist.deleteRow(j);
			}
		}
	}
}

function ds_main_rscmnwgdlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "select")
	{
		obj.setColumn(e.row, "select", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function btn_move_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_rscmnwgdlist.rowcount == 0)
	{
		sysf_messageBox("적용할 내역이","I004");
		return;
	}

	for(var row = 0; row < ds_main_rscmnwgdlist.rowcount; row++)
	{
		if(ds_main_rscmnwgdlist.getColumn(row, "select") == "Y")
		{
			var sReqdd = ds_main_rscmnwgdlist.getColumn(row, "reqdd");
			var sReqseqno = ds_main_rscmnwgdlist.getColumn(row, "reqseqno");
			var sGoodflag = ds_main_rscmnwgdlist.getColumn(row, "goodflag");
			var sPurcunit = ds_main_rscmnwgdlist.getColumn(row, "purcunit");
			var sGoodunitcost = ds_main_rscmnwgdlist.getColumn(row, "goodunitcost");

			var addRow = ds_main_rscmnwiclist.addRow();

			ds_main_rscmnwiclist.setColumn(addRow, "instcd", "");
			ds_main_rscmnwiclist.setColumn(addRow, "newmatrseq", "");
			ds_main_rscmnwiclist.setColumn(addRow, "reqdd", sReqdd);
			ds_main_rscmnwiclist.setColumn(addRow, "reqseqno", sReqseqno);
			ds_main_rscmnwiclist.setColumn(addRow, "goodflag", sGoodflag);
			ds_main_rscmnwiclist.setColumn(addRow, "purcunit", sPurcunit);
			ds_main_rscmnwiclist.setColumn(addRow, "goodunitcost", sGoodunitcost);
			ds_main_rscmnwiclist.setColumn(addRow, "instcd", group2.cmb_instcd.value);
			ds_main_rscmnwiclist.setColumn(addRow, "newmatrseq", group2.ipt_newmatrseq.value);
			ds_main_rscmnwiclist.setColumn(addRow, "select", "N");
		}
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_setTypeFormat(ds_main_rscmnwiclist, "goodunitcost:FLOAT");
	
	var oParam = {};
		oParam.id          = "TXRSD04411";
		oParam.service     = "purcbaseapp.PurcBaseMngt";
		oParam.method      = "reqSetNewMatrIc";
		oParam.inds        = "wic=ds_main_rscmnwiclist:u";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXRSD04411";

	tranf_submit(oParam);
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	misfGridIUD(grd_rscmnwiclist, "D");
}

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