YNU_JEUS/app_home/himed/xpapps/pam/insucomxp/xp/SPPIZ00500_특정내역상세관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIZ00500" position="absolute 0 0 599 591" titletext="특정내역 상세 관리" oninit="SPPIZ00500_oninit" onload="SPPIZ00500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 595 564" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="특정내역 상세" position="absolute 0 9 108 30" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 25 594 31" linetype="horizontal" id="line1" class="line_10" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="수가코드" position="absolute 0 30 59 53" id="caption2" class="cell_1"/>
              <Edit readonly="true" position="absolute 62 32 162 51" id="opt_snglcalcscorcd" visible="true" enable="false"/>
              <Static text="줄번호" position="absolute 163 30 230 53" id="caption3" class="cell_1"/>
              <Edit readonly="true" position="absolute 231 32 260 51" id="opt_edilnno" enable="false"/>
              <Static text="특정코드" position="absolute 261 30 320 53" id="caption4" class="cell_1"/>
              <Shape position="absolute 0 51 594 57" linetype="horizontal" id="line2" class="line_2"/>
              <Static text="특정내역" position="absolute 0 194 59 340" id="caption5" class="cell_1"/>
              <TextArea position="absolute 62 195 594 337" id="tar_spclspec" taborder="2" scrollbars="autovert" wordwrap="word"/>
              <Shape position="absolute 0 336 594 342" linetype="horizontal" id="line3" class="line_2"/>
              <Static text="기재형식" position="absolute 0 341 59 364" id="caption6" class="cell_1"/>
              <Edit readonly="true" position="absolute 62 342 594 361" id="opt_spclformat"/>
              <Shape position="absolute 0 361 594 367" linetype="horizontal" id="line4" class="line_3"/>
              <Static text="특정내역 목록" position="absolute 0 370 108 391" id="caption7" class="tit_2"/>
              <Shape position="absolute 0 386 594 392" linetype="horizontal" id="line6" class="line_10" style="strokepen:3 solid #33bbbbff;"/>
              <Grid position="absolute 0 391 594 564" id="grd_clsplist" binddataset="ds_main_item1_clsp_list" autofittype="col" oncellclick="grp_biz_grd_clsplist_oncellclick" selecttype="multirow" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="27"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="56"/>
                      <Column size="300"/>
                      <Column size="100"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="flag"/>
                      <Cell col="1" text="row"/>
                      <Cell col="2"/>
                      <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="기존특정내역"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:flag"/>
                      <Cell col="1" text="bind:rownum"/>
                      <Cell col="2" celltype="head"/>
                      <Cell col="3" style="align:left middle;" text="bind:snglcalcscorcd"/>
                      <Cell col="4" style="align:left middle;" text="bind:edilnno"/>
                      <Cell col="5" style="align:left middle;" text="bind:spclcd"/>
                      <Cell col="6" style="align:left middle;" text="bind:spclspec"/>
                      <Cell col="7" style="align:left middle;" text="bind:spclformat"/>
                      <Cell col="8" text="bind:cdnm"/>
                      <Cell col="9" text="bind:detldesc"/>
                      <Cell col="10" text="bind:clodseqno"/>
                      <Cell col="11" text="bind:oldspclcd"/>
                      <Cell col="12" text="bind:oldspclspec"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 552 367 594 386" id="btn_add" class="btn2" text="추가" onclick="grp_biz_btn_add_onclick"/>
              <Button position="absolute 462 367 504 386" id="btn_alter" class="btn5" enable="true" visible="false" text="수정" onclick="grp_biz_btn_alter_onclick"/>
              <Button position="absolute 507 367 549 386" id="btn_delete" class="btn2" text="삭제" onclick="grp_biz_btn_delete_onclick"/>
              <Shape position="absolute 0 190 594 196" linetype="horizontal" id="line7" class="line_2"/>
              <Static text="상세설명" position="absolute 0 54 59 192" id="caption8" class="cell_1"/>
              <TextArea position="absolute 62 55 594 191" id="tar_detldesc" enable="false" scrollbars="autovert" wordwrap="word"/>
              <Button position="absolute 294 6 369 25" id="btn_memohistory" class="btn2" text="줄단위메모" onclick="grp_biz_btn_memohistory_onclick"/>
              <Button position="absolute 372 6 414 25" id="btn_memohistory_drug" class="btn2" text="약" onclick="grp_biz_btn_memohistory_drug_onclick"/>
              <Button position="absolute 417 6 459 25" id="btn_memohistory_injection" class="btn2" text="주사" onclick="grp_biz_btn_memohistory_injection_onclick"/>
              <Button position="absolute 462 6 504 25" id="btn_memohistory_treat" class="btn2" text="처치" onclick="grp_biz_btn_memohistory_treat_onclick"/>
              <Button position="absolute 507 6 549 25" id="btn_memohistory_exam" class="btn2" text="검사" onclick="grp_biz_btn_memohistory_exam_onclick"/>
              <Button position="absolute 552 6 594 25" id="btn_memohistory_etc" class="btn2" text="기타" onclick="grp_biz_btn_memohistory_etc_onclick"/>
              <Combo position="absolute 321 32 594 51" id="cmb_spclcd" class="combo_default" taborder="1" innerdataset="@ds_init_P0117list" datacolumn="cdengabbrnm" codecolumn="cdid" onitemchanged="grp_biz_cmb_spclcd_onitemchanged"/>
              <Static text="seqno" position="absolute 3 60 56 83" id="caption9" class="cell_1" visible="false"/>
              <Edit readonly="true" position="absolute 15 84 44 103" id="output1" visible="false" enable="false"/>
              <Button position="absolute 227 6 291 25" id="btn_rsltsrch" class="btn2" text="결과조회" onclick="grp_biz_btn_rsltsrch_onclick"/>
              <Button position="absolute 344 367 460 386" id="button1" class="btn2" text="일괄특정내역입력" onclick="grp_biz_button1_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 563 595 590" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 0 594 6" linetype="horizontal" id="line5" class="line_6" anchor="default"/>
              <Button position="absolute 538 5 594 27" id="btn_cancel" class="btn4" text="취소" anchor="default" onclick="grp_btn_btn_cancel_onclick"/>
              <Button position="absolute 479 5 535 27" id="btn_confirm" class="btn4" text="확인" anchor="default" onclick="grp_btn_btn_confirm_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_item1_clsp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_item1_clsp_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0117list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdengabbrnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="unitflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0117sublist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_sppiz00700_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_sppiz00700_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="memoflag" type="STRING" size="256"/>
          <Column id="memocls" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_clsp_rslt_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_memolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.opt_snglcalcscorcd" propid="value" datasetid="ds_main_item1_clsp" columnid="snglcalcscorcd"/>
      <BindItem id="item1" compid="grp_biz.opt_edilnno" propid="value" datasetid="ds_main_item1_clsp" columnid="edilnno"/>
      <BindItem id="item2" compid="grp_biz.cmb_spclcd" propid="value" datasetid="ds_main_item1_clsp" columnid="spclcd"/>
      <BindItem id="item3" compid="grp_biz.output1" propid="value" datasetid="ds_main_item1_clsp" columnid="clodseqno"/>
      <BindItem id="item4" compid="grp_biz.tar_detldesc" propid="value" datasetid="ds_main_item1_clsp" columnid="detldesc"/>
      <BindItem id="item5" compid="grp_biz.tar_spclspec" propid="value" datasetid="ds_main_item1_clsp" columnid="spclspec"/>
      <BindItem id="item6" compid="grp_biz.opt_spclformat" propid="value" datasetid="ds_main_item1_clsp" columnid="spclformat"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
include "pam_pamcomnxp::PAM.xjs";

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

function SPPIZ00500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_clsplist);
	grdf_setRowTypeIcon(grp_biz.grd_clsplist, 2);
	
	fInitialize();
}

function fInitialize()
{
	if (frmf_checkOpener()) 
	{
		ds_main_item1_clsp.copyData(arg_ds_hidden_clsp);
		ds_main_item1_clsp_list.copyData(arg_ds_hidden_clsp_list);
		
		dsf_makeValue(ds_main_item1_clsp, "selectedrow", "string", "", 0);
		
		var unitflag = ds_main_item1_clsp.getColumn(0, "unitflag");
		var snglcalcscorcd = ds_main_item1_clsp.getColumn(0, "snglcalcscorcd");
		var edilnno = ds_main_item1_clsp.getColumn(0, "edilnno");
		var spclcd = ds_main_item1_clsp.getColumn(0, "spclcd");
		var seqno = ds_main_item1_clsp.getColumn(0, "seqno");
		ds_send.setColumn(0, "unitflag", unitflag);
		
		var oParam = {};
			oParam.id          = "TRPIZ00501";
			oParam.service     = "insucomapp.SpclSpecDetl";
			oParam.method      = "reqGetSpclCdList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_init_P0117list=P0117";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIZ00501";

		tranf_submit(oParam);
		
		var arrParam = new Array();
		 arrParam = [{dsNm: "ds_init_P0117sublist", cdGrpId: "P0117", showValue: false}];
		 pamfGetCodeList(arrParam, true, ""); 
	
		if (unitflag == "M") 
		{
			grp_biz.btn_memohistory.visible = false;
			
			grp_biz.grd_clsplist.setFormatColProperty(3, "size", 0);
		} 
		
		if (!utlf_isNull(seqno)){
			var frow = ds_main_item1_clsp_list.findRowExpr("snglcalcscorcd=='"+snglcalcscorcd+ "' && edilnno=='" + edilnno + "' && spclcd=='"+spclcd+"' && seqno=='"+seqno+"'");
		} else {
			var frow = ds_main_item1_clsp_list.findRowExpr("snglcalcscorcd=='"+snglcalcscorcd+ "' && edilnno=='" + edilnno + "' && spclcd=='"+spclcd+"'");
		}
		
		ds_main_item1_clsp_list.clearSelect();
		ds_main_item1_clsp_list.selectRow(frow);
		ds_main_item1_clsp_list.rowposition = frow;
		ds_main_item1_clsp.setColumn(0, "selectedrow", frow);
		
	} 
	else 
	{
		var oParam = {};
			oParam.id          = "TRPIZ00501";
			oParam.service     = "insucomapp.SpclSpecDetl";
			oParam.method      = "reqGetSpclCdList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_init_P0117list=P0117";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIZ00501";

		tranf_submit(oParam);
	}				
	
	grp_biz.tar_spclspec.setFocus();
}

function fCheckAuth()
{
	var xAuth = frmf_checkAuth("X");

	grp_biz.cmb_spclcd.enable = xAuth;
	grp_biz.tar_spclspec.enable = xAuth;
	grp_biz.grd_clsplist.enable = xAuth;
	grp_btn.btn_cancel.enable = xAuth;
	grp_biz.btn_delete.enable = xAuth;
	grp_biz.btn_alter.enable = xAuth;
	grp_biz.btn_add.enable = xAuth;
	grp_biz.btn_memohistory.enable = xAuth;
	grp_biz.btn_memohistory_drug.enable = xAuth;
	grp_biz.btn_memohistory_injection.enable = xAuth;
	grp_biz.btn_memohistory_treat.enable = xAuth;
	grp_biz.btn_memohistory_exam.enable = xAuth;
	grp_biz.btn_memohistory_etc.enable = xAuth;
}

function grp_biz_btn_rsltsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	if (frmf_checkOpener()) 
	{
		opener.lf_fOrderRsltSrch();
	} 
	else 
	{
		sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수", "I004");
	}
}

function grp_biz_btn_memohistory_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("");
}

function grp_biz_btn_memohistory_drug_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("01");
}

function grp_biz_btn_memohistory_injection_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("02");
}

function grp_biz_btn_memohistory_treat_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("03");
}

function grp_biz_btn_memohistory_exam_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("04");
}

function grp_biz_btn_memohistory_etc_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetJudgComment("99");
}

function fGetJudgComment(memocls)
{
var ordfildcd = "-";
	var insukind = "-";
	var ioflag = "-";
	var unitflag = ds_main_item1_clsp.getColumn(0, "unitflag");
	var memoflag = "";
	
	if (unitflag == "M") 
	{
		memoflag = "2";
	}
	else 
	{
		memoflag = "3";
	}	
	
	var objArg = new Object();
	objArg.sMemocls		= memocls;
	objArg.sInsukind	= "";
	objArg.sIoflag		= "";
	objArg.sOrdfildcd	= "";
	objArg.sJudgrid		= "";
	objArg.sMemoflag	= memoflag;
	objArg.sEdiitem1	= "";
	
	var rtn = frmf_modal("SPPIZ00700", "SPPIZ00700", objArg,  "", "", "", "", "", "", "", "", "", "M");
	var oldTxt = grp_biz.tar_spclspec.value;
	
	if( !utlf_isNull(rtn) ) {
		ds_temp_memolist.copyData(rtn);
		var rowCnt = ds_temp_memolist.rowcount;
		for ( i = 0 ; i < rowCnt ; i++) {
			if( utlf_isNull( oldTxt ) ) {
				oldTxt = ds_temp_memolist.getColumn(i, "memo");
			}
			else {
				oldTxt = oldTxt + "\n" + ds_temp_memolist.getColumn(i, "memo");
			}
		}
	}
	
	grp_biz.tar_spclspec.value = oldTxt;
}

function grp_biz_cmb_spclcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var spclcd = ds_main_item1_clsp.getColumn(0, "spclcd");
	
	if (spclcd) 
	{
		var index = ds_main_item1_clsp.getColumn(0, "spclcd");
		var format = ds_init_P0117list.lookup("cdid", index, "cdval");
		var detldesc = ds_init_P0117list.lookup("cdid", index, "detldesc");
		var cdnm = ds_init_P0117list.lookup("cdid", index, "cdnm");
		
		ds_main_item1_clsp.setColumn(0, "detldesc", detldesc);
		ds_main_item1_clsp.setColumn(0, "spclformat", format);
		ds_main_item1_clsp.setColumn(0, "cdnm", cdnm);
		ds_main_item1_clsp.setColumn(0, "spclspec", ds_init_P0117sublist.lookup("cdid", index, "detldesc"));
		
// 		ds_main_item1_clsp_list.updatecontrol = false;
// 		for (var i = 0; i < ds_main_item1_clsp_list.rowcount; i++) {	
// 			ds_main_item1_clsp_list.setColumn(i, "spclcd", obj.value);
// 			ds_main_item1_clsp_list.setColumn(i, "spclformat", format);
// 			ds_main_item1_clsp_list.setColumn(i, "detldesc", detldesc);
// 			ds_main_item1_clsp_list.setColumn(i, "cdnm", cdnm);
// 			ds_main_item1_clsp_list.setColumn(i, "spclspec", ds_main_item1_clsp.getColumn(0, "spclspec"));
// 		}
// 		ds_main_item1_clsp_list.updatecontrol = true;

		ds_main_item1_clsp_list.rowposition = ds_main_item1_clsp_list.findRowExpr("spclcd=='"+spclcd+"'");
		
	} else {
		ds_main_item1_clsp.setColumn(0, "detldesc", "");
		ds_main_item1_clsp.setColumn(0, "spclformat", "");
		ds_main_item1_clsp.setColumn(0, "cdnm", "");
		ds_main_item1_clsp.setColumn(0, "spclspec", "");
	}
}

function grp_biz_grd_clsplist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var row = e.row;
	
	if(row > -1)
	{
		ds_main_item1_clsp.setColumn(0, "selectedrow", row);
		
		if (row != ds_main_item1_clsp.getColumn(0, "selectedrow"))
		{
			grp_biz_btn_alter_onclick();
		}
		
		ds_main_item1_clsp.setColumn(0, "flag", ds_main_item1_clsp_list.getColumn(row, "flag"));
		ds_main_item1_clsp.setColumn(0, "snglcalcscorcd", ds_main_item1_clsp_list.getColumn(row, "snglcalcscorcd"));
		ds_main_item1_clsp.setColumn(0, "edilnno", ds_main_item1_clsp_list.getColumn(row, "edilnno"));
		ds_main_item1_clsp.setColumn(0, "spclcd", ds_main_item1_clsp_list.getColumn(row, "spclcd"));
		ds_main_item1_clsp.setColumn(0, "detldesc", ds_main_item1_clsp_list.getColumn(row, "detldesc"));
		ds_main_item1_clsp.setColumn(0, "spclspec", ds_main_item1_clsp_list.getColumn(row, "spclspec"));
		ds_main_item1_clsp.setColumn(0, "spclformat", ds_main_item1_clsp_list.getColumn(row, "spclformat"));
		ds_main_item1_clsp.setColumn(0, "rownum", ds_main_item1_clsp_list.getColumn(row, "rownum"));
		ds_main_item1_clsp.setColumn(0, "cdnm", ds_main_item1_clsp_list.getColumn(row, "cdnm"));
	}
}

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_item1_clsp_list.updatecontrol = false;
	
	for (var i = 0; i < ds_main_item1_clsp_list.rowcount; i++)
	{
		ds_main_item1_clsp_list.setColumn(i, "spclspec", ds_main_item1_clsp.getColumn(0, "spclspec"));
	}
	
	ds_main_item1_clsp_list.updatecontrol = true;
}

function grp_biz_btn_alter_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_item1_clsp.getColumn(0, "selectedrow");
	
	if (row > -1) 
	{
		var spclcd = ds_main_item1_clsp.getColumn(0, "spclcd");
		var spclspec = ds_main_item1_clsp.getColumn(0, "spclspec");
		var snglcalcscorcd = ds_main_item1_clsp.getColumn(0, "snglcalcscorcd");
		var edilnno = ds_main_item1_clsp.getColumn(0, "edilnno");
		
		if (utlf_isNull(spclcd) || utlf_isNull(spclspec))
		{
			return;
		}
		
		var prespclcd = ds_main_item1_clsp_list.getColumn(row, "spclcd");
		var prespclspec = ds_main_item1_clsp_list.getColumn(row, "spclspec");
		
		if (spclcd == prespclcd && spclspec == prespclspec) 
		{
			return;
		}

		for(var i = 0; i < ds_main_item1_clsp_list.rowcount; i++)
		{
			var grdspclcd = ds_main_item1_clsp_list.getColumn(row, "spclcd");
			var grdedilnno = ds_main_item1_clsp_list.getColumn(row, "edilnno");
					

			var frow = ds_main_item1_clsp_list.findRowExpr("flag != 'D' && "+edilnno+"=="+grdedilnno+"&&"+ spclcd +"=="+grdspclcd+" &&"+grdspclcd+"== 'JX999'", 0);
			
			if(frow != -1)
			{
				sysf_messageBox("특정코드 'JX999'가 존재하므로 'JX999'로 변경할 수", "I004");	
				return;
			}
			
			var frow = ds_main_item1_clsp_list.findRowExpr("flag != 'D' && "+edilnno+"=="+grdedilnno+"&&"+ spclcd +"=="+grdspclcd+" &&"+grdspclcd+"== 'MT015'", 0);
			
			if(frow != -1)
			{
				sysf_messageBox("특정코드 'MT015'가 존재하므로 'MT015'로 변경할 수", "I004");	
				return;
			}
			
			var frow = ds_main_item1_clsp_list.findRowExpr("flag != 'D' && "+edilnno+"=="+grdedilnno+"&&"+ spclcd +"=="+grdspclcd+" &&"+grdspclcd+"== 'MT016'", 0);
			
			if(frow != -1)
			{
				sysf_messageBox("특정코드 'MT016'가 존재하므로 'MT016'로 변경할 수", "I004");	
				return;
			}
		}
		
		var flag = ds_main_item1_clsp.getColumn(0, "flag");
		var snglcalcscorcd = ds_main_item1_clsp.getColumn(0, "snglcalcscorcd");
		var clodseqno = ds_main_item1_clsp.getColumn(0, "clodseqno");
		var edilnno = ds_main_item1_clsp.getColumn(0, "edilnno");
		var detldesc = ds_main_item1_clsp.getColumn(0, "detldesc");
		var spclformat = ds_main_item1_clsp.getColumn(0, "spclformat");
		var cdnm = ds_main_item1_clsp.getColumn(0, "cdnm");
		
		if (utlf_isNull(snglcalcscorcd))
		{
			snglcalcscorcd = "-";
		}
		if (utlf_isNull(edilnno))
		{
			edilnno = "0";
		}
		
		var flagstat = ds_main_item1_clsp_list.getColumn(row, "flag");
		
		var rowstatus = ds_main_item1_clsp_list.getRowType(row);
		
		if (flagstat == "I" ) 
		{
			ds_main_item1_clsp_list.setColumn(row, "flag", flag);
			
			var arrRow = new Array();
			arrRow[0] = row; 
			grdf_setStatus(grp_biz.grd_clsplist, "I", arrRow);	
		} 
		else if( rowstatus == 2) 
		{
		}
		else
		{
			var arrRow = new Array();
			arrRow[0] = row; 
			grdf_setStatus(grp_biz.grd_clsplist, "U", arrRow);	
			
			ds_main_item1_clsp_list.setColumn(row, "flag", "U");
		}
		
		ds_main_item1_clsp_list.setColumn(row, "spclspec", spclspec);
		
	}
}

function grp_biz_btn_delete_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = grdf_getSelectedRows(grp_biz.grd_clsplist);
	
	if (ds_main_item1_clsp_list.rowposition > -1 ) 
	{
		for (var i = 0; i < rows.length; i++) 
		{
			var row = rows[i];
			
			ds_main_item1_clsp_list.setColumn(row, "flag", "D");
		}
		
		ds_main_item1_clsp.setColumn(0, "selectedrow", "");
		ds_main_item1_clsp.setColumn(0, "spclcd", "");
		
		grp_biz_cmb_spclcd_onitemchanged();
		
		ds_main_item1_clsp_list.rowposition = -1;
	} 
	else 
	{
		sysf_messageBox("삭제할 특정내역 코드를 목록에서", "C002");
	}
}

function grp_biz_btn_add_onclick(obj:Button,  e:ClickEventInfo)
{
	var spclcd = ds_main_item1_clsp.getColumn(0, "spclcd");
	var snglcalcscorcd = ds_main_item1_clsp.getColumn(0, "snglcalcscorcd");
	var edilnno = ds_main_item1_clsp.getColumn(0, "edilnno");
	
	if (utlf_isNull(spclcd))
	{
		sysf_messageBox("특정코드를", "C002");
		return;
	}
	
	var setrow = 0;
	var rownum = "";
	
	for (var i = 0; i < ds_main_item1_clsp_list.rowcount; i++) 
	{
		var grdspclcd = ds_main_item1_clsp_list.getColumn(i, "spclcd");
		var grdsnglcalcscorcd = ds_main_item1_clsp_list.getColumn(i, "snglcalcscorcd");
		var grdedilnno = ds_main_item1_clsp_list.getColumn(i, "edilnno");
		
		var frow = ds_main_item1_clsp_list.findRowExpr("'"+edilnno +"'=='"+grdedilnno+"'&&'"+spclcd+"'=='"+grdspclcd+"'&&'"+grdspclcd+"'== 'JX999'", 0);

		if(frow != -1)
		{
			sysf_messageBox("특정코드 'JX999'가 존재하므로 추가할 수", "I004");	
			return;
		}

		var frow = ds_main_item1_clsp_list.findRowExpr("'"+edilnno+"' == '"+grdedilnno+"' && '"+spclcd+"' == '"+grdspclcd+"' && '"+grdspclcd+"' == 'MT015'", 0);
		
		if(frow != -1)
		{
			sysf_messageBox("특정코드 'MT015'가 존재하므로 추가할 수", "I004");	
			return;
		}
		
		var frow = ds_main_item1_clsp_list.findRowExpr("'"+edilnno+"' == '"+grdedilnno+"' &&  '"+spclcd+"' == '"+grdspclcd+"' && '"+grdspclcd+"' == 'MT016'", 0);
		
		if(frow != -1)
		{
			sysf_messageBox("특정코드 'MT016'가 존재하므로 추가할 수", "I004");	
			return;
		}
	}
	
	var row = 0;
	if (setrow == 0) 
	{
		var row = ds_main_item1_clsp_list.addRow()
		
		ds_main_item1_clsp_list.setColumn(row, "flag", "I");
	} 
	else 
	{
		row = setrow;
		
		ds_main_item1_clsp_list.setColumn(row, "flag", "U");
	}
	
	var snglcalcscorcd = ds_main_item1_clsp.getColumn(0, "snglcalcscorcd");
	var clodseqno = ds_main_item1_clsp.getColumn(0, "clodseqno");
	var edilnno = ds_main_item1_clsp.getColumn(0, "edilnno");
	var detldesc = ds_main_item1_clsp.getColumn(0, "detldesc");
	var spclspec = ds_main_item1_clsp.getColumn(0, "spclspec");
	var spclformat = ds_main_item1_clsp.getColumn(0, "spclformat");
	
	spclformat = spclformat.substring(0,50);
	
	var cdnm = ds_main_item1_clsp.getColumn(0, "cdnm");
	
	if (utlf_isNull(snglcalcscorcd))
	{
		snglcalcscorcd = "-";
	}
	if (utlf_isNull(edilnno))
	{
		edilnno = "0";
	}
	
	ds_main_item1_clsp_list.setColumn(row, "snglcalcscorcd", snglcalcscorcd);
	
	if(!utlf_isNull(clodseqno))
	{
		ds_main_item1_clsp_list.setColumn(row, "clodseqno", clodseqno);
	}
	
	ds_main_item1_clsp_list.setColumn(row, "edilnno", edilnno);
	ds_main_item1_clsp_list.setColumn(row, "spclcd", spclcd);
	ds_main_item1_clsp_list.setColumn(row, "detldesc", detldesc);
	ds_main_item1_clsp_list.setColumn(row, "spclspec", spclspec);
	ds_main_item1_clsp_list.setColumn(row, "spclformat", spclformat);
	ds_main_item1_clsp_list.setColumn(row, "rownum", rownum);
	ds_main_item1_clsp_list.setColumn(row, "cdnm", cdnm);
	
	ds_main_item1_clsp.setColumn(0, "selectedrow", row);
	
	ds_main_item1_clsp.setColumn(0, "spclcd", "");
	
	grp_biz_cmb_spclcd_onitemchanged();
}

function grp_btn_btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{
	if (frmf_checkOpener()) 
	{
		if (ds_main_item1_clsp_list.rowposition > -1)
		{
			grp_biz_btn_alter_onclick();
		} 
		else 
		{
			if (!utlf_isNull(grp_biz.cmb_spclcd.value) && !utlf_isNull(grp_biz.tar_spclspec.value))
			{
				grp_biz_btn_add_onclick();
			}
		}
		
		ds_hidden_clsp_rslt_list.clearData();

		for (var i = 0; i < ds_main_item1_clsp_list.rowcount; i++) 
		{
			var spclcd = ds_main_item1_clsp_list.getColumn(i, "spclcd");
			var spclspec = String(ds_main_item1_clsp_list.getColumn(i,"spclspec"));

			if (spclcd != "MX999" && spclcd != "JX999") 
			{
				if (utlf_getStringLength(spclspec) > 1750 )
				{	
					sysf_messageBox("특정내역 입력 제한길이(1750 Byte)를", "E003");	
					return;
				}
			}
			
			var flag = ds_main_item1_clsp_list.getColumn(i, "flag");
			var rownum = ds_main_item1_clsp_list.getColumn(i, "rownum");
			
			if (flag == "D" && utlf_isNull(rownum))
			{
			}
			else if (flag)
			{
				var cnt = ds_hidden_clsp_rslt_list.addRow();
				var clodseqno = ds_main_item1_clsp_list.getColumn(i, "clodseqno");
				var edilnno = ds_main_item1_clsp_list.getColumn(i, "edilnno");
				var cdnm = ds_main_item1_clsp_list.getColumn(i, "cdnm");
				var spclformat = ds_main_item1_clsp_list.getColumn(i, "spclformat");
				var detldesc = ds_main_item1_clsp_list.getColumn(i, "detldesc");
				var snglcalcscorcd = ds_main_item1_clsp_list.getColumn(i, "snglcalcscorcd");
				var oldspclcd = ds_main_item1_clsp_list.getColumn(i, "oldspclcd");
				var oldspclspec = ds_main_item1_clsp_list.getColumn(i, "oldspclspec");
				
				dsf_makeValue(ds_hidden_clsp_rslt_list, "flag", "string", flag, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "rownum", "string", rownum, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "clodseqno", "string", clodseqno, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "edilnno", "string", edilnno, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "spclcd", "string", spclcd, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "cdnm", "string", cdnm, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "spclspec", "string", spclspec, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "spclformat", "string", spclformat, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "detldesc", "string", detldesc, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "snglcalcscorcd", "string", snglcalcscorcd, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "oldspclcd", "string", oldspclcd, cnt);
				dsf_makeValue(ds_hidden_clsp_rslt_list, "oldspclspec", "string", oldspclspec, cnt);
			}
		}
		
	opener.ds_rslt_sppiz00500.copyData(ds_hidden_clsp_rslt_list);
	} 
	else 
	{
		sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수", "I004");	///상위화면이 변경되어 데이터를 전달할 수  없습니다.
	}
	this.close();
}

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