YNU_JEUS/app_home/himed/xpapps/emr/agonalcarexp/xp/SMMNH03400_pop Symptom and sign 사정도구.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNH03400" position="absolute 0 0 891 760" titletext="Symptom and sign 사정도구" oninit="SMMNH03400_oninit" onload="SMMNH03400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 5 5 885 755" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="Symptom and sign 사정도구" position="absolute 0 10 201 32" id="caption1" class="tit_2"/>
              <Shape position="absolute -1 26 878 32" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
              <Grid position="absolute 0 31 200 746" id="grd_pcoilist" taborder="1" binddataset="ds_main_pcoi_pcoilist" autofittype="col" onrbuttondown="grp_biz_grd_pcoilist_onrbuttondown" selecttype="multirow">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="22"/>
                      <Column size="123"/>
                      <Column size="37"/>
                      <Column size="0"/>
                      <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/>
                      <Cell col="1" text="선택결과"/>
                      <Cell col="2"/>
                      <Cell col="3"/>
                      <Cell col="4"/>
                      <Cell col="5"/>
                      <Cell col="6"/>
                      <Cell col="7"/>
                      <Cell col="8"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" displaytype="text" edittype="none" text="bind:recitem"/>
                      <Cell col="2" text="bind:recrslt"/>
                      <Cell col="3" text="bind:recdd"/>
                      <Cell col="4" text="bind:pid"/>
                      <Cell col="5" text="bind:cretdd"/>
                      <Cell col="6" text="bind:crettm"/>
                      <Cell col="7" text="bind:recitemcd"/>
                      <Cell col="8" text="bind:refenum"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 205 31 878 746" id="grd_codelist" taborder="2" binddataset="ds_main_code_codelist" autofittype="col" oncellclick="grp_biz_grd_codelist_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="123"/>
                      <Column size="29"/>
                      <Column size="29"/>
                      <Column size="472"/>
                      <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="대분류"/>
                      <Cell col="1"/>
                      <Cell col="2"/>
                      <Cell col="3" text="내용"/>
                      <Cell col="4"/>
                      <Cell col="5"/>
                      <Cell col="6"/>
                      <Cell col="7"/>
                      <Cell col="8"/>
                    </Band>
                    <Band id="body">
                      <Cell style="align:left middle;background2: ;" text="bind:recitem" suppress="1" suppressalign="middle,over"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(chk == 'true' ? 'FFF0FF' : '#ffffff');background2:EXPR(chk == 'true' ? 'FFF0FF' : '#ffffff');" text="bind:chk" expr="expr:chk == 'true' || chk == '1' ? 1 : 0"/>
                      <Cell col="2" style="background:EXPR(chk == 'true' ? '#FFF0FF' : '#ffffff');background2:EXPR(chk == 'true' ? '#FFF0FF' : '#ffffff');" text="bind:cdid"/>
                      <Cell col="3" displaytype="text" edittype="text" style="background:EXPR(chk == 'true' ? '#FFF0FF' : '#ffffff');background2:EXPR(chk == 'true' ? '#FFF0FF' : '#ffffff');" text="bind:cdnm"/>
                      <Cell col="4" text="bind:recitemcd"/>
                      <Cell col="5" text="bind:refenum"/>
                      <Cell col="6" text="bind:pid"/>
                      <Cell col="7" text="bind:cretdd"/>
                      <Cell col="8" text="bind:crettm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 790 4 832 23" id="button3" class="btn5" taborder="3" text="저장" onclick="grp_biz_button3_onclick"/>
              <Button position="absolute 834 4 876 23" id="button4" class="btn2_letter2" taborder="4" text="닫기" onclick="grp_biz_button4_onclick"/>
              <Calendar position="absolute 686 4 786 23" id="ipt_recdd" class="input_default" taborder="5" mask="yyyy-mm-dd" dateformat="yyyy-MM-dd" value="null"/>
              <Static text="적용일자" position="absolute 620 3 684 24" align="align:center middle;" id="caption29" class="cell_1"/>
            </Layout>
          </Layouts>
        </Div>
        <PopupMenu id="PopupMenu00" position="absolute 896 50 948 94" innerdataset="@ds_menu" levelcolumn="level" idcolumn="func" captioncolumn="label" onmenuclick="PopupMenu00_onmenuclick" onmouseleave="PopupMenu00_onmouseleave"/>
      </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="pid" type="STRING" size="256"/>
          <Column id="cretdd" type="STRING" size="256"/>
          <Column id="crettm" type="STRING" size="256"/>
          <Column id="recdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_pcoi_pcoilist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_pcoi_pcoilist_oncolumnchanged">
        <ColumnInfo>
          <Column id="recitem" type="STRING" size="256" sumtext="기록항목명"/>
          <Column id="recrslt" type="STRING" size="256" sumtext="기록값"/>
          <Column id="recdd" type="STRING" size="256" sumtext="기록일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cretdd" type="STRING" size="256" sumtext="생성일자"/>
          <Column id="crettm" type="STRING" size="256" sumtext="생성시간"/>
          <Column id="recitemcd" type="STRING" size="256" sumtext="기록항목코드"/>
          <Column id="refenum" type="STRING" size="256" sumtext="기록항목순서"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_code_codelist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_code_codelist_oncolumnchanged">
        <ColumnInfo>
          <Column id="recitem" type="STRING" size="256" sumtext="기록항목명"/>
          <Column id="chk" type="STRING" size="256" sumtext="값"/>
          <Column id="cdid" type="STRING" size="256" sumtext="코드"/>
          <Column id="cdnm" type="STRING" size="256" sumtext="코드명"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="cretdd" type="STRING" size="256" sumtext="생성일자"/>
          <Column id="crettm" type="STRING" size="256" sumtext="생성시간"/>
          <Column id="recitemcd" type="STRING" size="256" sumtext="기록항목코드"/>
          <Column id="refenum" type="STRING" size="256" sumtext="기록항목순서"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="recdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">행추가</Col>
            <Col id="func">symptom_add</Col>
            <Col id="level">0</Col>
          </Row>
          <Row>
            <Col id="label">행삭제</Col>
            <Col id="func">symptom_del</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_sPaasData" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.ipt_recdd" propid="value" datasetid="ds_temp" columnid="recdd"/>
    </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";
function SMMNH03400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNH03400_onload(obj:Form, e:LoadEventInfo)
{
	var pid = opener.frmf_getParameter("pid");
	var cretdd = opener.frmf_getParameter("cretdd");
	var crettm = opener.frmf_getParameter("crettm");
	var recdd = opener.frmf_getParameter("recdd");	
	
	ds_temp.setColumn(0, "recdd", recdd);
	
	ds_send.setColumn(0, "pid", pid);
	ds_send.setColumn(0, "cretdd", cretdd);
	ds_send.setColumn(0, "crettm", crettm);
	ds_send.setColumn(0, "recdd", recdd);
	
	grp_biz.ipt_recdd.enable = false;
	
	var oParam = {};
		oParam.id          = "TRMNH03401";
		oParam.service     = "hospiceapp.HospiceRecMngt";
		oParam.method      = "reqPcoiList";
		oParam.inds        = "reqPcoiList=ds_send";
		oParam.outds       = "ds_main_pcoi_pcoilist=pcoilist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNH03401";

	tranf_submit(oParam);
	
	var oParam = {};
		oParam.id          = "TRMNH03402";
		oParam.service     = "hospiceapp.HospiceRecMngt";
		oParam.method      = "reqCodeList";
		oParam.inds        = "reqCodeList=ds_send";
		oParam.outds       = "ds_main_code_codelist=codelist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNH03402";

	tranf_submit(oParam);
	
	for(var i = 0; i < ds_main_code_codelist.rowcount; i++)
	{
		if(ds_main_code_codelist.getColumn(i, "recitem") == "가래(sputum)" || ds_main_code_codelist.getColumn(i, "recitem") == "가려움(itching)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "구강건조(dry mouth)" || ds_main_code_codelist.getColumn(i, "recitem") == "구내염(stomatitis)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "구토(vomiting)" || ds_main_code_codelist.getColumn(i, "recitem") == "기면(drowsyness)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "기침(cough)" || ds_main_code_codelist.getColumn(i, "recitem") == "딸꾹질(hiccup)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "발작(seizure)" || ds_main_code_codelist.getColumn(i, "recitem") == "배뇨곤란(dysuria)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "변비(constipation)" || ds_main_code_codelist.getColumn(i, "recitem") == "복수(ascites)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "부종(edema)" || ds_main_code_codelist.getColumn(i, "recitem") == "상처(wound)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "설사(diarrhea)" || ds_main_code_codelist.getColumn(i, "recitem") == "식욕부진(anorexia)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "연하곤란(dysphagia)" || ds_main_code_codelist.getColumn(i, "recitem") == "오심(nausea)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "허약(weakness)" || ds_main_code_codelist.getColumn(i, "recitem") == "호흡곤란(dyspnea)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "수면장애(insomnia)" || ds_main_code_codelist.getColumn(i, "recitem") == "섬망(delirium)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "우울(depression)" || ds_main_code_codelist.getColumn(i, "recitem") == "불안(anxiety)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "두려움(fear)" || ds_main_code_codelist.getColumn(i, "recitem") == "수치감(shame)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "슬픔(sadness)" || ds_main_code_codelist.getColumn(i, "recitem") == "외로움(loneliness)"
			|| ds_main_code_codelist.getColumn(i, "recitem") == "양가감정(ambivalence)" || ds_main_code_codelist.getColumn(i, "recitem") == "죄책감(guilty feeling)")
		{
			grp_biz.grd_codelist.setCellProperty("body", 2, "edittype", "none");
		}
	}
	
	
// 	for(var i =31 ; i < grd_pcoilist.rows ; i++){		//30개 항목은 픽스 이므로 30보다 큰거부터 시작
// 						var pcoilist = model.getValue("/root/main/pcoi/pcoilist["+i+"]/recitemcd");
// 						var recrslt  = model.getValue("/root/main/pcoi/pcoilist["+i+"]/recrslt");
// 						for(var j =0 ; j < grd_codelist.rows ; j++){		// 기준자료 50개 이상은 항상 유지가 되므로 50부터 시작
// 							var codelist = model.getValue("/root/main/code/codelist["+j+"]/recitemcd");							
// 							if( pcoilist == codelist) {
// 								model.setValue("/root/main/code/codelist["+j+"]/cdnm",recrslt);						
// 								continue;
// 							}
// 						}
// 					}
// 					
	for(var i = 0 ; i < ds_main_pcoi_pcoilist.rowcount; i++)
	{
		var pcoilist = ds_main_pcoi_pcoilist.getColumn(i, "recitemcd");
		var recrslt  = ds_main_pcoi_pcoilist.getColumn(i, "recrslt");
		
		for(var j = 0 ; j < ds_main_code_codelist.rowcount; j++)
		{
			var codelist = ds_main_code_codelist.getColumn(j, "recitemcd");
			var cdid = ds_main_code_codelist.getColumn(j, "cdid");
			
			if((pcoilist == codelist) && (recrslt == cdid))
			{
				ds_main_code_codelist.setColumn(j, "chk", "true");
				continue;
			}
		}
	}
}

function PopupMenu00_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id +"();");
}

function PopupMenu00_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
{
	obj.closePopup();
}

function grp_biz_grd_pcoilist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	PopupMenu00.trackPopup(e.screenX,e.screenY);
}

function ds_main_code_codelist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
// 	if(e.columnid == "chk")
// 	{
// 		//obj.setColumn(e.row, "chk", (e.newvalue == "true" || e.newvalue == 1) ? "true" : "false");		
// 		recitemcd = ds_main_code_codelist.getColumn(e.row, "recitemcd");
// 		cdid = ds_main_code_codelist.getColumn(e.row, "cdid");
// 		
// // 		for(var i = 0 ; i < ds_main_pcoi_pcoilist.rowcount; i++)
// // 		{
// // 			if(ds_main_pcoi_pcoilist.getColumn(i, "recitemcd") == recitemcd)
// // 			{
// // 				ds_main_pcoi_pcoilist.setColumn(i, "recrslt", cdid);
// // 			}
// // 		}
// 	}
// 	
// 	if(e.columnid == "cdnm")
// 	{
// 		cdnm = ds_main_code_codelist.getColumn(e.row, "cdnm");
// 
// 		for(var i = 0 ; i < ds_main_pcoi_pcoilist.rowcount; i++)
// 		{
// 			if(ds_main_pcoi_pcoilist.getColumn(i, "recitemcd") == recitemcd)
// 			{
// 				ds_main_pcoi_pcoilist.setColumn(i, "recrslt", cdnm);
// 			}
// 		}
// 	}
}

function symptom_add() 
{
	var row = ds_main_pcoi_pcoilist.addRow();
	
	ds_main_pcoi_pcoilist.setColumn(row, "recdd", ds_main_pcoi_pcoilist.getColumn(row-1, "recdd"));
	ds_main_pcoi_pcoilist.setColumn(row, "pid", ds_main_pcoi_pcoilist.getColumn(row-1, "pid"));
	ds_main_pcoi_pcoilist.setColumn(row, "cretdd", ds_main_pcoi_pcoilist.getColumn(row-1, "cretdd"));
	ds_main_pcoi_pcoilist.setColumn(row, "crettm", ds_main_pcoi_pcoilist.getColumn(row-1, "crettm"));
	
	var refenum =  String(Number(ds_main_pcoi_pcoilist.getColumn(row-1, "refenum"))+1);	
	var strnum;
	
	if(refenum.length == 1)
	{
		strnum = "000"+refenum;
	}
	else if(refenum.length == 2)
	{
		strnum = "00"+refenum;
	}
	else if(refenum.length == 3)
	{
		strnum = "0"+refenum;
	}

	var recitemcd = ds_main_pcoi_pcoilist.getColumn(row-1, "recitemcd").substr(0,4) + strnum ;

	ds_main_pcoi_pcoilist.setColumn(row, "recitemcd", recitemcd);
	ds_main_pcoi_pcoilist.setColumn(row, "refenum", refenum);
	
	var rows = ds_main_code_codelist.addRow();
	
	var refenum =  String(Number(ds_main_code_codelist.getColumn(rows-1, "refenum"))+1);

	var strnum;
		
	if(refenum.length == 1)
	{
		strnum = "000"+refenum;
	}
	else if(refenum.length == 2)
	{
		strnum = "00"+refenum;
	}
	else if(refenum.length == 3)
	{
		strnum = "0"+refenum;
	}			

	var recitemcd = ds_main_code_codelist.getColumn(rows-1, "recitemcd").substr(0,4) + strnum ;

	ds_main_code_codelist.setColumn(rows, "recitemcd", recitemcd);
	ds_main_code_codelist.setColumn(rows, "refenum", refenum);
	ds_main_code_codelist.setColumn(rows, "pid", ds_main_code_codelist.getColumn(rows-1, "pid"));
	ds_main_code_codelist.setColumn(rows, "cretdd", ds_main_code_codelist.getColumn(rows-1, "cretdd"));
	ds_main_code_codelist.setColumn(rows, "crettm", ds_main_code_codelist.getColumn(rows-1, "crettm"));
}

function symptom_del() 
{
	if(ds_main_pcoi_pcoilist.rowposition < 31)
	{
		sysf_messageBox("Symptom 30개항목은 삭제할수 ","I004");
		return;					       			
	}
	
	var recitem = ds_main_pcoi_pcoilist.getColumn(ds_main_pcoi_pcoilist.rowposition, "recitem");

	for(var i = 0 ;  i < ds_main_code_codelist.rowcount; i++)
	{
		if(recitem == ds_main_code_codelist.getColumn(i, "recitem"))
		{
			ds_main_code_codelist.deleteRow(i);	
		}	
	}
	ds_main_pcoi_pcoilist.deleteRow(ds_main_pcoi_pcoilist.rowposition);
}

function ds_main_pcoi_pcoilist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "recitem")
	{
		var recitemcd = ds_main_pcoi_pcoilist.getColumn(e.row, "recitemcd");
		var recitem = ds_main_pcoi_pcoilist.getColumn(e.row, "recitem")
		var cnt ;
		
		for(var i = 0 ; i < ds_main_code_codelist.rowcount; i++)
		{
			if(ds_main_code_codelist.getColumn(i, "recitemcd") == recitemcd)
			{
				cnt = i;				
			}
		}
		
		for(var i = 0 ; i < ds_main_pcoi_pcoilist.rowcount; i++ )
		{
			if( i == ds_main_pcoi_pcoilist.rowposition)
			{
				continue;
			}	
			else
			{
				if(recitem == ds_main_pcoi_pcoilist.getColumn(i, "recitem"))
				{
					sysf_messageBox("Symptom 항목이 ","E006");
					ds_main_pcoi_pcoilist.setColumn(ds_main_pcoi_pcoilist.rowposition, "recitem", ds_main_code_codelist.getColumn(cnt, "recitem"))
					
					return;	
				}
			}
		}
		ds_main_code_codelist.setColumn(cnt, "recitem", ds_main_pcoi_pcoilist.getColumn(ds_main_pcoi_pcoilist.rowposition, "recitem"));
	}
}

function grp_biz_grd_codelist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(ds_main_code_codelist.getColumn(e.row, "recitem") == "가래(sputum)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "가려움(itching)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "구강건조(dry mouth)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "구내염(stomatitis)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "구토(vomiting)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "기면(drowsyness)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "기침(cough)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "딸꾹질(hiccup)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "발작(seizure)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "배뇨곤란(dysuria)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "변비(constipation)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "복수(ascites)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "부종(edema)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "상처(wound)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "설사(diarrhea)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "식욕부진(anorexia)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "연하곤란(dysphagia)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "오심(nausea)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "허약(weakness)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "호흡곤란(dyspnea)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "수면장애(insomnia)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "섬망(delirium)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "우울(depression)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "불안(anxiety)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "두려움(fear)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "수치감(shame)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "슬픔(sadness)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "외로움(loneliness)"
	|| ds_main_code_codelist.getColumn(e.row, "recitem") == "양가감정(ambivalence)" || ds_main_code_codelist.getColumn(e.row, "recitem") == "죄책감(guilty feeling)")
	{
		recitemcd = ds_main_code_codelist.getColumn(e.row, "recitemcd");
		cdid = ds_main_code_codelist.getColumn(e.row, "cdid");
		//cdnm = ds_main_code_codelist.getColumn(e.row, "cdnm");
		

		for(var i = 0; i < ds_main_code_codelist.rowcount; i++)
		{
			if(recitemcd == ds_main_code_codelist.getColumn(i, "recitemcd"))
			{
				if(cdid == ds_main_code_codelist.getColumn(i, "cdid"))
				{
					ds_main_code_codelist.setColumn(i, "chk", "true");
				}
				else
				{
					ds_main_code_codelist.setColumn(i, "chk", "false");
				}
			}
		}
		
		for(var i = 0 ; i < ds_main_pcoi_pcoilist.rowcount; i++)
		{
			if(ds_main_pcoi_pcoilist.getColumn(i, "recitemcd") == recitemcd)
			{
				ds_main_pcoi_pcoilist.setColumn(i, "recrslt", cdid);
				sysf_trace("cdid11 :  " + cdid)
			}
		}
	}
}

function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	if(sysf_messageBox("","Q002") != 6) 
	{
		return;
	}
//	var xPaasPath = "/root/main/pcoi/pcoilist";	  

	var sPaasData =
				  "pid"                      //01등록번호
				+ "▦cretdd"              //02생성일자
				+ "▦crettm"              //02_1생성시간
				+ "▦chrtpcl"            //03기록구분
				+ "▦recitemcd"       //04기록항목코드
				+ "▦recdd"             //05기록일자
				+ "▦recrslt"            //06값
				+ "▦insrecdd"         //07기록날자
				+ "▦supitemcd"      //08상위임상항목코드
				+ "▦recitem"          //09기록항목명
				+ "▦supitem"          //09_1상위기록항목명
				+ "▦refenum"         //10조회순서
				+ "▦suprefenum"    //11상위조회순서
				+ "▩"   ;
				
	var recdd = ds_send.getColumn(0, "recdd").substr(0,8);

	for (var i = 0; i < ds_main_pcoi_pcoilist.rowcount; i++ ) 
	{
		if(i < 30)	
		{
			if(utlf_isNull(ds_main_pcoi_pcoilist.getColumn(i, "recrslt")))
			{
				sysf_messageBox("Symptom 30개항목은 ","I003");
				return;
			}
		}
		
		sPaasData +=
				ds_main_pcoi_pcoilist.getColumn(i, "pid")					//01등록번호
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "cretdd")		//02생성일자
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "crettm")		//02_1생성시간
				+ "▦" + "2"												//03기록구분
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "recitemcd")	//04기록항목코드
				//+ "▦" + ""													//05기록일자
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "recdd")	//05기록일자
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "recrslt")		//06값
				+ "▦" + recdd												//07기록날자
				+ "▦" + "SYPM0001"											//08상위임상항목코드
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "recitem")		//09기록항목명
				+ "▦" +  "Symptom"											//09_1상위기록항목명
				+ "▦" + ds_main_pcoi_pcoilist.getColumn(i, "refenum")		//10조회순서
				+ "▦" + "1"												//11상위조회순서							     
				+ "▩"   ;
	}

	dsf_setCSVToDs("ds_send_sPaasData", sPaasData);
	
	var oParam = {};
		oParam.id          = "TXMNH03401";
		oParam.service     = "hospiceapp.HospiceRecMngt";
		oParam.method      = "reqsetSymp";
		oParam.inds        = "reqsetSymp=ds_send_sPaasData";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMNH03401";

	tranf_submit(oParam);

	this.close();
}

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