YNU_JEUS/app_home/himed/xpapps/ast/healthexambasexp/xp/SMAHA03160_문진코드관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHA03160" position="absolute 0 0 1200 798" titletext="문진코드 관리" oninit="SMAHA03160_oninit" onload="SMAHA03160_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="문진코드관리" class="tit_1" position="absolute 0 0 175 25"/>
        <Grid id="grd_answlst" taborder="1" binddataset="ds_main_anslst_item" useinputpanel="false" position="absolute 594 100 1194 760" cellsizingtype="col" anchor="top right bottom" selecttype="multirow">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="100"/>
                <Column size="421"/>
                <Column size="55"/>
                <Column size="100"/>
                <Column size="100"/>
              </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="최종수정일시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 3;" text="bind:answcd" editautoselect="true"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 3;" text="bind:answcnts" editautoselect="true"/>
                <Cell col="3" displaytype="checkbox" edittype="checkbox" text="bind:reminptyn" expr="expr:reminptyn == 'Y' ? 1 : 0"/>
                <Cell col="4" text="bind:lastupdtrid"/>
                <Cell col="5" text="bind:lastupdtdt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div id="grp_sea" anchor="left top right" taborder="2" class="div_SA" position="absolute 0 25 1195 65">
          <Layouts>
            <Layout>
              <Static id="caption2" text="문진분류 :" class="search_name" position="absolute 13 12 100 29"/>
              <Static id="caption3" text="문진코드 :" class="search_name" position="absolute 358 12 470 29"/>
              <Edit id="ipt_inqrcnts" taborder="1" autoselect="true" autoskip="true" class="input_search" position="absolute 752 11 1092 30"/>
              <Button id="btn_search" taborder="2" text="조회" class="btn1" position="absolute 1120 10 1176 32" onclick="grp_sea_btn_search_onclick" anchor="top right"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1101 10 1107 32" anchor="top right"/>
              <Static id="caption5" text="문진내역 :" class="search_name" position="absolute 663 12 750 29"/>
              <Edit id="ipt_inqrcd" taborder="3" autoselect="true" autoskip="true" class="input_search" position="absolute 447 11 607 30"/>
              <Combo id="cmb_inqrflag" taborder="4" innerdataset="@ds_init_baseinfo_inqrflaglst_A0106" codecolumn="cdid" datacolumn="cdnm" class="combo_s_essential" position="absolute 102 11 262 30" onitemchanged="grp_sea_cmb_inqrflag_onitemchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" text="문진코드" class="tit_2" position="absolute 0 79 78 101"/>
        <Shape id="line1" class="line_10" position="absolute 0 95 590 101" anchor="left top right"/>
        <Grid id="grd_inqrlst" taborder="3" binddataset="ds_main_inqrlst_item" useinputpanel="false" position="absolute 0 100 590 760" cellsizingtype="col" anchor="all" selecttype="multirow" oncellclick="grd_inqrlst_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="18" band="left"/>
                <Column size="70" band="left"/>
                <Column size="260" band="left"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="50"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="100"/>
              </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="기타구분1"/>
                <Cell col="9" text="기타구분2"/>
                <Cell col="10" text="최종수정자"/>
                <Cell col="11" text="최종수정일시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="text" edittype="text" text="bind:inqrcd" editautoselect="true"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:left top;padding:3 0 0 3;" text="bind:inqrnm" wordwrap="word" editautoselect="true"/>
                <Cell col="3" displaytype="combo" edittype="combo" text="bind:answflag" editautoselect="true" combodataset="ds_init_baseinfo_answflaglst_A0066" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="4" displaytype="text" edittype="text" text="bind:answcnt" editautoselect="true"/>
                <Cell col="5" displaytype="checkbox" edittype="checkbox" text="bind:useyn" expr="expr:useyn == 'Y' ? 1 : 0" editautoselect="true"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:defltval" editautoselect="true"/>
                <Cell col="7" displaytype="text" edittype="text" text="bind:inqrdipseq" editautoselect="true"/>
                <Cell col="8" displaytype="text" edittype="text" text="bind:inqretcflag1" editautoselect="true"/>
                <Cell col="9" displaytype="text" edittype="text" text="bind:inqretcflag2" editautoselect="true"/>
                <Cell col="10" text="bind:lastupdtrid" editautoselect="true"/>
                <Cell col="11" displaytype="text" edittype="text" text="bind:lastupdtdt" editautoselect="true"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption4" text="선택형답안" class="tit_2" position="absolute 594 79 701 101" anchor="top right"/>
        <Shape id="line2" class="line_10" position="absolute 594 95 1194 101" anchor="top right"/>
        <Button id="btn_grddel" taborder="4" text="행삭제" class="btn2" position="absolute 537 76 590 95" onclick="btn_grddel_onclick" anchor="top right"/>
        <Button id="btn_grdadd" taborder="5" text="행추가" class="btn2" position="absolute 482 76 535 95" onclick="btn_grdadd_onclick" anchor="top right"/>
        <Button id="btn_ansadd" taborder="6" text="행추가" class="btn2" position="absolute 1087 76 1140 95" anchor="top right" onclick="btn_ansadd_onclick"/>
        <Button id="btn_ansdel" taborder="7" text="행삭제" class="btn2" position="absolute 1141 76 1194 95" anchor="top right" onclick="btn_ansdel_onclick"/>
        <Button id="btn_print" taborder="8" text="출력" class="btn6" position="absolute 0 765 56 787" anchor="left bottom"/>
        <Button id="btn_init" taborder="9" text="초기화" class="btn4" position="absolute 1069 765 1137 787" anchor="right bottom" onclick="btn_init_onclick"/>
        <Button id="btn_save" taborder="10" text="저장" class="btn4" position="absolute 1140 765 1196 787" anchor="right bottom" onclick="btn_save_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="srchinqrflag" type="STRING" size="256"/>
          <Column id="srchinqrcd" type="STRING" size="256"/>
          <Column id="srchinqrcnts" type="STRING" size="256"/>
          <Column id="srchinstcd" type="STRING" size="256"/>
          <Column id="ansinqrcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchinqrflag"/>
            <Col id="srchinqrcd"/>
            <Col id="srchinqrcnts"/>
            <Col id="srchinstcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_inqrlst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_inqrlst_item_oncolumnchanged">
        <ColumnInfo>
          <Column id="inqrcd" type="STRING" size="256" sumtext="문진코드"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="inqrnm" type="STRING" size="256" sumtext="문진명"/>
          <Column id="answflag" type="STRING" size="256" sumtext="답변유형"/>
          <Column id="answcnt" type="INT" size="256" sumtext="답변수"/>
          <Column id="useyn" type="STRING" size="256" sumtext="사용여부"/>
          <Column id="defltval" type="STRING" size="256" sumtext="기본값"/>
          <Column id="inqrdipseq" type="INT" size="256" sumtext="문진출력순서"/>
          <Column id="inqretcflag1" type="STRING" size="256" sumtext="기타구분1"/>
          <Column id="inqretcflag2" type="STRING" size="256" sumtext="기타구분2"/>
          <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종수정자ID"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_anslst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_anslst_item_oncolumnchanged">
        <ColumnInfo>
          <Column id="answcd" type="STRING" size="256" sumtext=""/>
          <Column id="answcnts" type="STRING" size="256" sumtext=""/>
          <Column id="reminptyn" type="STRING" size="256" sumtext=""/>
          <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종수정자ID"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_baseinfo_inqrflaglst_A0106" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_baseinfo_answflaglst_A0066" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_save_inqrflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_save_saveinqrans" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_inqrflag" propid="value" datasetid="ds_send" columnid="srchinqrflag"/>
      <BindItem id="item1" compid="grp_sea.ipt_inqrcd" propid="value" datasetid="ds_send" columnid="srchinqrcd"/>
      <BindItem id="item2" compid="grp_sea.ipt_inqrcnts" propid="value" datasetid="ds_send" columnid="srchinqrcnts"/>
    </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";
var arErrorCode = new HashArray();
function SMAHA03160_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHA03160_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_answlst);
	grdf_setRowTypeIcon(grd_answlst, 0);
	grdf_initGrid(grd_inqrlst);
	grdf_setRowTypeIcon(grd_inqrlst, 0);
	
	grp_sea.btn_search.enable = frmf_checkAuth("R") ;
	btn_save.enable = frmf_checkAuth("X") ;
	btn_print.enable = frmf_checkAuth("P") ;

	fGetInqrFlag();
}

function fGetInqrFlag()
{
	ds_init_baseinfo_inqrflaglst_A0106.clearData();
	
	var arrParam = [{dsNm: "ds_init_baseinfo_inqrflaglst_A0106", cdGrpId: "A0106"}
				   ,{dsNm: "ds_init_baseinfo_answflaglst_A0066", cdGrpId: "A0066"}]
	appf_getCodeList(arrParam); 
	
	//submit("TRZBC00101");	 					
}

function grp_sea_cmb_inqrflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	grp_sea.btn_search.click();
}

function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_anslst_item.clearData();
	ds_main_inqrlst_item.clearData();
	fGetInqrlst();
}

function fGetInqrlst()
{	
	var tmp = ds_send.getColumn(0, "srchinqrflag");
	var selRow = ds_main_inqrlst_item.rowposition;
	
	if (utlf_isNull(tmp))
	{
		sysf_messageBox("문진분류를 ", "C001")
		return;	
	}
	//ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("posinstcd") );
	ds_send.setColumn(0, "srchinstcd", "031");
	
	var oParam = {};
		oParam.id          = "TRAHA03162";
		oParam.service     = "healthexambaseapp.InqrCode";
		oParam.method      = "reqGetInqrCdList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_inqrlst_item=item";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA03162";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRAHA03162") > -1)
	{
		if(selRow >= 0) 
		{
			fGetInqrAns();
		}
	}
}

function cf_TRAHA03162(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

function fGetInqrAns()
{
	var tmpinqrflag = ds_send.getColumn(0, "srchinqrflag");
	
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("posinstcd"));
	ds_send.setColumn(0, "srchinqrflag", tmpinqrflag);
	ds_send.setColumn(0, "ansinqrcd", ds_main_inqrlst_item.getColumn(ds_main_inqrlst_item.rowposition, "inqrcd"));

	var oParam = {};
		oParam.id          = "TRAHA31602";
		oParam.service     = "healthexambaseapp.InqrCode";
		oParam.method      = "reqGetInqrAns";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_anslst_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA31602";

	tranf_submit(oParam);
}

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

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

function btn_grdadd_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_inqrlst_item.addRow();
}

function btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = grdf_getSelectedRows(grd_inqrlst);

	for(var i = rows.length; i >= 0; i--) 
	{
		var m_row = rows[i];

		if(ds_main_inqrlst_item.getRowType(m_row) == 2)
		{
			ds_main_inqrlst_item.deleteRow(m_row);
		}
		else
		{
			ds_main_inqrlst_item.updatecontrol = false;
			ds_main_inqrlst_item.setRowType(m_row, "d");
			ds_main_inqrlst_item.updatecontrol = true;
		}
	}
}

function btn_ansadd_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_anslst_item.addRow();
}

function btn_ansdel_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = grdf_getSelectedRows(grd_answlst);

	for(var i = rows.length; i >= 0; i--) 
	{
		var m_row = rows[i];

		if(ds_main_anslst_item.getRowType(m_row) == 2)
		{
			ds_main_anslst_item.deleteRow(m_row);
		}
		else
		{
			ds_main_anslst_item.updatecontrol = false;
			ds_main_anslst_item.setRowType(m_row, "d");
			ds_main_anslst_item.updatecontrol = true;
		}
	}
}

function grd_inqrlst_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	obj.setCellPos(e.cell)
	obj.showEditor(true);
	fGetInqrAns();
}

function btn_init_onclick(obj:Button,  e:ClickEventInfo)
{
	fInitInqrLst();		
}

function fInitInqrLst()
{
	ds_main_inqrlst_item.clearData();
	ds_main_anslst_item.clearData();                                                                                                                                                                                                                                    
}  

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if(fSaveInqrCd()) 
	{
		fGetInqrlst();
	}
}

function fSaveInqrCd() 
{ 
	var ret = false;
	if( sysf_messageBox("문진코드정보를","Q002") == 6)
	{	
		var  inqrfg = ds_send.getColumn(0, "srchinqrflag");
		
		if( utlf_isNull(inqrfg) ) return ;
		
		var updategrid = grdf_getGridUpdateData(grd_inqrlst);
		grdf_setStatusColumn(updategrid, "m");
		ds_send_save_inqrflag.copyData(updategrid, true);
		
		var updategrid2 = grdf_getGridUpdateData(grd_answlst);
		grdf_setStatusColumn(updategrid2, "m");
		ds_send_save_saveinqrans.copyData(updategrid2, true);
		
		ds_send_save_inqrflag.addColumn("inqrflag", "string")
		ds_send_save_inqrflag.addColumn("instcd", "string")
		ds_send_save_inqrflag.addColumn("userid", "string")
		ds_send_save_inqrflag.addColumn("inqrcd", "string")
		dsf_setDefaultVal(ds_send_save_inqrflag, "inqrflag:"+grp_sea.cmb_inqrflag.value+",instcd:"+sysf_getUserInfo("posinstcd")+",userid:"+sysf_getUserInfo("userid")+",inqrcd:"+ds_main_inqrlst_item.getColumn(ds_main_inqrlst_item.rowposition, "inqrcd"));
		
		ds_send_save_saveinqrans.addColumn("inqrflag", "string")
		ds_send_save_saveinqrans.addColumn("instcd", "string")
		ds_send_save_saveinqrans.addColumn("userid", "string")
		ds_send_save_saveinqrans.addColumn("inqrcd", "string")
		dsf_setDefaultVal(ds_send_save_saveinqrans, "inqrflag:"+grp_sea.cmb_inqrflag.value+",instcd:"+sysf_getUserInfo("posinstcd")+",userid:"+sysf_getUserInfo("userid")+",inqrcd:"+ds_main_inqrlst_item.getColumn(ds_main_inqrlst_item.rowposition, "inqrcd"));
		
		var oParam = {};
			oParam.id          = "TXAHA03161";
			oParam.service     = "healthexambaseapp.InqrCode";
			oParam.method      = "reqExeInqrCode";
			oParam.inds        = "req=ds_send_save_inqrflag reqans=ds_send_save_saveinqrans";
			oParam.outds       = "ds_=item ds_=itemans";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHA03161";

		tranf_submit(oParam);

		if(arErrorCode.pop("TXAHA03161") > -1)
		{
			ret = true;
		}
		
		return ret;
	}
	return ret;
}

function cf_TXAHA03161(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}
]]></Script>
  </Form>
</FDL>