YNU_JEUS/app_home/himed/xpapps/ast/healthexamrsrvacptxp/xp/SMAHA04110_재미검자관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHA04110" position="absolute 0 0 1201 780" titletext="Untitle" oninit="SMAHA04110_oninit" onload="SMAHA04110_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="재미검자관리" class="tit_1" position="absolute 0 0 134 25"/>
        <Div id="grp_sea" anchor="left top right" taborder="1" class="div_SA" position="absolute 0 25 1195 65">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="0" text="조회" class="btn1" position="absolute 1123 11 1179 33" anchor="top right" onclick="grp_sea_btn_search_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 11 1110 33" anchor="top right"/>
              <Combo id="cmb_srchhealexamdetlflag" taborder="1" innerdataset="@ds_init_baseinfo_healexamdetlflaglst_item" codecolumn="cdid" datacolumn="cdnm" class="combo_search" visible="false" position="absolute 95 11 205 30"/>
              <Edit id="ipt_srchpid" taborder="2" class="input_search" position="absolute 834 11 939 30" autoselect="true" autoskip="true" onkeyup="grp_sea_ipt_srchpid_onkeyup"/>
              <Button id="btn_srchpat" taborder="3" class="icon_search" position="absolute 949 11 965 27" onclick="grp_sea_btn_srchpat_onclick"/>
              <Static id="caption1" text="~" position="absolute 610 12 619 32"/>
              <Edit id="opt_srchpnm" taborder="4" readonly="true" position="absolute 969 11 1089 30" class="output"/>
              <Static id="caption2" text="건진구분 :" class="search_name" visible="false" position="absolute 5 12 91 29"/>
              <Static id="caption47" text="조회일자 :" class="search_name" position="absolute 418 13 493 30"/>
              <Calendar id="ipt_todd" taborder="6" autoselect="true" class="input_s_essential" position="absolute 626 12 726 31"/>
              <Static id="caption49" text="환자검색 :" class="search_name" position="absolute 749 12 830 29"/>
              <Calendar id="ipt_fromdd" taborder="5" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 504 12 604 31"/>
              <Combo id="combo1" taborder="7" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 295 12 405 31">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">L</Col>
                      <Col id="datacolumn">최종건진일</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">다음예약일</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption3" text="조회구분 :" class="search_name" position="absolute 216 13 294 30"/>
              <Combo id="combo2" taborder="8" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 98 11 198 30" onitemchanged="grp_sea_combo2_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">미검자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">C</Col>
                      <Col id="datacolumn">재검자</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption4" text="재미검구분 :" class="search_name" position="absolute 5 12 96 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_reexamlst" taborder="2" binddataset="ds_main_reexam_item" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 93 1195 743" anchor="all" selecttype="multirow" onexpanddown="grd_reexamlst_onexpanddown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="58"/>
                <Column size="80"/>
                <Column size="71"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="160"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="120"/>
                <Column size="128"/>
                <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" text="등록번호"/>
                <Cell col="3" text="성명"/>
                <Cell col="4" text="신체검사일"/>
                <Cell col="5" text="패키지명"/>
                <Cell col="6" text="연락처1"/>
                <Cell col="7" text="연락처2"/>
                <Cell col="8" text="주소"/>
                <Cell col="9" text="통보여부"/>
                <Cell col="10" text="다음예약일"/>
                <Cell col="11" text="재검대상검사목록"/>
                <Cell col="12" text="비고"/>
                <Cell col="13" text="건진구분"/>
                <Cell col="14" text="원예약등록일"/>
                <Cell col="15" text="원예약등록번호"/>
                <Cell col="16" text="다음예약등록일"/>
                <Cell col="17" text="다음예약등록번호"/>
                <Cell col="18"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:sel" expr="expr:sel == 'Y' ? 1 : 0"/>
                <Cell col="2" displaytype="text" edittype="text" text="bind:pid" expandshow="show"/>
                <Cell col="3" text="bind:hngnm"/>
                <Cell col="4" text="bind:hopedd"/>
                <Cell col="5" text="bind:pkgnm"/>
                <Cell col="6" text="bind:hometel"/>
                <Cell col="7" text="bind:mpphontel"/>
                <Cell col="8" text="bind:addr"/>
                <Cell col="9" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:notiyn" combodataset="ds_cmb_notiyn" combocodecol="value" combodatacol="label"/>
                <Cell col="10" displaytype="date" edittype="date" text="bind:nexthopedd" calendardisplaynulltype="nulltext"/>
                <Cell col="11" displaytype="text" edittype="text" text="bind:reexamcdlst" expandshow="show"/>
                <Cell col="12" displaytype="text" edittype="text" style="padding:0 0 0 3;" text="bind:cnts"/>
                <Cell col="13" text="bind:healexamdetlflag"/>
                <Cell col="14" text="bind:orgrsrvdd"/>
                <Cell col="15" text="bind:orgrsrvno"/>
                <Cell col="16" text="bind:nextrsrvdd"/>
                <Cell col="17" text="bind:nextrsrvno"/>
                <Cell col="18" text="bind:reexseq"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line3" class="line_10" position="absolute 0 88 1195 94" anchor="left top right"/>
        <Button id="btn_rsltdel" taborder="3" text="행삭제" class="btn2" position="absolute 1142 69 1195 88" anchor="top right" onclick="btn_rsltdel_onclick"/>
        <Button id="btn_rsltadd" taborder="4" text="행추가" class="btn2" position="absolute 1086 69 1139 88" anchor="top right" onclick="btn_rsltadd_onclick"/>
        <Button id="btn_save" taborder="5" text="저장" class="btn4" position="absolute 1138 748 1194 770" anchor="right bottom" onclick="btn_save_onclick"/>
        <Button id="btn_print" taborder="6" text="엑셀저장" class="btn7" position="absolute 0 748 80 770" anchor="left bottom"/>
      </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="srchpid" type="STRING" size="256"/>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="healexamdetlflag" type="STRING" size="256"/>
          <Column id="srchpnm2" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="srchreexflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchpid"/>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="healexamdetlflag"/>
            <Col id="srchpnm2"/>
            <Col id="srchflag">L</Col>
            <Col id="srchreexflag">C</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_reexam_item" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_reexam_item_oncolumnchanged">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="hopedd" type="STRING" size="256" sumtext="신검일"/>
          <Column id="pkgnm" type="STRING" size="256" sumtext="패키지명"/>
          <Column id="hometel" type="STRING" size="256" sumtext="연락처1"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="연락처2"/>
          <Column id="addr" type="STRING" size="256" sumtext="주소"/>
          <Column id="notiyn" type="STRING" size="256" sumtext="통보여부"/>
          <Column id="nexthopedd" type="STRING" size="256" sumtext="다음예약일"/>
          <Column id="reexamcdlst" type="STRING" size="256" sumtext="재검 검사목록"/>
          <Column id="cnts" type="STRING" size="256" sumtext="비고"/>
          <Column id="healexamdetlflag" type="STRING" size="256" sumtext="건진구분"/>
          <Column id="orgrsrvdd" type="STRING" size="256" sumtext="원예약등록일"/>
          <Column id="orgrsrvno" type="STRING" size="256" sumtext="원예약등록번호"/>
          <Column id="nextrsrvdd" type="STRING" size="256" sumtext="다음예약등록일"/>
          <Column id="nextrsrvno" type="STRING" size="256" sumtext="다음예약등록번호"/>
          <Column id="reexseq" type="STRING" size="256" sumtext="다음예약등록번호"/>
          <Column id="sel" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_notiyn" 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="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">통보</Col>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">미통보</Col>
            <Col id="value">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_baseinfo_healexamdetlflaglst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_baseinfo_chealexamdetlflaglst_A0069" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_baseinfo_ghealexamdetlflaglst_A0070" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_templst" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_templst_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="okflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.combo2" propid="value" datasetid="ds_send" columnid="srchreexflag"/>
      <BindItem id="item1" compid="grp_sea.cmb_srchhealexamdetlflag" propid="value" datasetid="ds_send" columnid="healexamdetlflag"/>
      <BindItem id="item2" compid="grp_sea.combo1" propid="value" datasetid="ds_send" columnid="srchflag"/>
      <BindItem id="item3" compid="grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
      <BindItem id="item4" compid="grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="srchtodd"/>
      <BindItem id="item5" compid="grp_sea.ipt_srchpid" propid="value" datasetid="ds_send" columnid="srchpid"/>
      <BindItem id="item6" compid="grp_sea.opt_srchpnm" propid="value" datasetid="ds_send" columnid="srchpnm2"/>
    </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";
include "ast_healexamxp::AHA001.xjs";
function SMAHA04110_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHA04110_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_reexamlst);
	grdf_setRowTypeIcon(grd_reexamlst, 0);
	
	fGetBaseInfo();
	
	var cur_date = new Date();
	var from_date = (cur_date.getAddDate(-1, 'M')).getDateFormat();
	
	ds_send.setColumn(0, "srchfromdd", from_date);
	ds_send.setColumn(0, "srchtodd", utlf_getCurrentDate());
}

function fGetBaseInfo()
{
	var arrParam = [{dsNm: "ds_init_baseinfo_healexamflaglst_A0068", cdGrpId: "A0068"}
				   ,{dsNm: "ds_init_baseinfo_chealexamdetlflaglst_A0069", cdGrpId: "A0069"}
				   ,{dsNm: "ds_init_baseinfo_ghealexamdetlflaglst_A0070", cdGrpId: "A0070"}
				   ,{dsNm: "ds_init_baseinfo_comcode_P0008", cdGrpId: "P0008"}
				   ,{dsNm: "ds_init_baseinfo_comcode_P0010", cdGrpId: "P0010"}
				   ,{dsNm: "ds_init_baseinfo_comcode_P0032", cdGrpId: "P0032"}]
	appf_getCodeList(arrParam); 
	
	//submit("TRZBC00101");

	ds_init_baseinfo_healexamdetlflaglst_item.copyData(ds_init_baseinfo_chealexamdetlflaglst_A0069);
	ds_init_baseinfo_healexamdetlflaglst_item.appendData(ds_init_baseinfo_ghealexamdetlflaglst_A0070);
}

function grp_sea_combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetreexam();		
}

function grp_sea_ipt_srchpid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		grp_sea.btn_srchpat.click();
	}
}

function grp_sea_btn_srchpat_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearchPatInfo("SMAHA00100",   "pid", grp_sea.ipt_srchpid.value, "N", "ds_send" , "srchpid", "srchpnm2");
}

function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetreexam();
}

function fGetreexam()
{
	ds_main_reexam_item.clearData();
	var oParam = {};
		oParam.id          = "TRAHA04111";
		oParam.service     = "healthexamrsrvacptapp.ReexamMngt";
		oParam.method      = "reqGetReExamLst";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_reexam_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA04111";

	tranf_submit(oParam);
}

function btn_rsltadd_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_reexam_item.addRow();
}

function btn_rsltdel_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = grdf_getSelectedRows(grd_reexamlst);

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

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

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveVal();
	sysf_messageBox("저장 ", "I002");
}

function fSaveVal()
{
	if( sysf_messageBox("재미검자정보를 ","Q002") == 6)
	{
		ds_main_reexam_item.updatecontrol = false;
		dsf_setFixVal(ds_main_reexam_item, "healexamflag:G,healexamdetlflag:G02");
		ds_main_reexam_item.updatecontrol = true;
		
		var oParam = {};
			oParam.id          = "TXAHA04111";
			oParam.service     = "healthexamrsrvacptapp.ReexamMngt";
			oParam.method      = "reqExeReExamLst";
			oParam.inds        = "reexamlst=ds_main_reexam_item:u";
			oParam.outds       = "ds_=item3";
			oParam.typeStr     = "m";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHA04111";

		tranf_submit(oParam);
	}
}

function cf_TXAHA04111(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    else
    {
		fGetreexam();
    }
}

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

function grd_reexamlst_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	if( e.cell == obj.getBindCellIndex("Body", "pid") && ds_main_reexam_item.getRowType(ds_main_reexam_item.rowposition) == 2)
	{
		frmf_setParameter("SPAHB00600_PARAM5", "ds_main_reexam_item/"+ds_main_reexam_item.rowposition);
		frmf_modal("SPAHA04111", "SPAHA04111", "", "", "", "", "", "", "", "", "", "", "M");
	}
	
	if( e.cell == obj.getBindCellIndex("Body", "reexamcdlst")) 
	{
		fGetPkgCd("SMAHA00100", "A", "Y","nm" , "" ,  'G02', 'M', "ds_temp_templst","","", 28);
		if(ds_temp_templst_list.rowcount > 0)
		{
			ds_main_reexam_item.setColumn(ds_main_reexam_item.rowposition, "reexamcdlst", "");
			var strCdlst = "";
			for(var i = 0; i < ds_temp_templst_list.rowcount; i++)
			{
				strCdlst += ds_temp_templst_list.getColumn(i, "testcd") + ",";
			}
			ds_main_reexam_item.setColumn(ds_main_reexam_item.rowposition, "reexamcdlst", strCdlst);
		}
	}
}
]]></Script>
  </Form>
</FDL>