YNU_JEUS/app_home/himed/xpapps/lis/plgyacptmngtxp/xp/SMLPJ00700_접수취소현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPJ00700" position="absolute 0 0 1199 761" titletext="접수/취소현황" oninit="SMLPJ00700_oninit" onload="SMLPJ00700_onload">
    <Layouts>
      <Layout>
        <Button id="button13" taborder="1" text="EXCEL저장" class="btn7" position="absolute 1102 69 1194 91" anchor="top right" onclick="button13_onclick"/>
        <Static id="caption6" text="접수/취소현황" class="tit_1" position="absolute 0 0 116 25"/>
        <Static id="caption4" text="접수/취소 목록" class="tit_2" position="absolute 1 83 115 99" anchor="left top"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 99 1194 105" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Div id="group2" taborder="2" position="absolute 0 25 1195 60" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1105 7 1111 29" anchor="top right"/>
              <Edit id="ipt_seaval" taborder="11" class="input_search" position="absolute 507 8 605 27" anchor="left top" onkeyup="group2_ipt_seaval_onkeyup"/>
              <Static id="caption3" text="등록번호 :" class="search_name" position="absolute 416 9 502 26" anchor="left top"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 979 8 991 25" anchor="top right"/>
              <Button id="btn_sea" taborder="12" text="조회" class="btn1" position="absolute 1123 7 1179 29" anchor="top right" onclick="group2_btn_sea_onclick"/>
              <Calendar id="ipt_cnclfromdd" taborder="13" class="input_s_essential" position="absolute 876 8 976 27" mask="yyyy-mm-dd" anchor="top right"/>
              <Calendar id="ipt_cncltodd" taborder="14" class="input_s_essential" position="absolute 995 8 1095 27" mask="yyyy-mm-dd" anchor="top right" onkeyup="group2_ipt_cncltodd_onkeyup"/>
              <Combo id="cbo_ptnocd" taborder="15" innerdataset="ds_init_cbo_ptnocd" codecolumn="ptnocd" datacolumn="ptnonm" position="absolute 109 8 220 27" anchor="left top"/>
              <Edit id="ipt_fromptno" taborder="16" class="text_center" position="absolute 253 8 303 27" anchor="left top"/>
              <Static id="caption1" text="병리번호 :" class="search_name" position="absolute 15 9 105 26" anchor="left top"/>
              <Static id="caption7" text="~" class="search_no_b" position="absolute 306 8 318 25" anchor="left top"/>
              <Edit id="input1" taborder="17" class="text_center" position="absolute 351 8 401 27" anchor="left top"/>
              <Edit id="input2" taborder="18" class="text_center" position="absolute 321 8 348 27" anchor="left top"/>
              <Edit id="ipt_fromyear" taborder="19" class="text_center" position="absolute 223 8 250 27" anchor="left top"/>
              <Static id="caption8" text="조회구분 :" class="search_name" position="absolute 620 9 706 26" anchor="top right"/>
              <Combo id="cbo_refflagcd" taborder="20" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 711 8 771 27" anchor="top right" onitemchanged="group2_cbo_refflagcd_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">접수</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">취소</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="cap_refdd" text="접수일자 :" class="search_name" position="absolute 787 9 873 26" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_acptcncllist" class="datagrid2" taborder="3" binddataset="ds_grd_acptcncllist" useinputpanel="false" position="absolute 0 103 1194 756" autofittype="col" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="31"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="69"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="기관코드"/>
                <Cell col="1" text="병리번호"/>
                <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="취소시간"/>
                <Cell col="13" text="취소자ID"/>
                <Cell col="14" text="취소자"/>
                <Cell col="15" text="검사코드"/>
                <Cell col="16" text="검사명"/>
                <Cell col="17" text="검사그룹코드"/>
                <Cell col="18" text="그룹검사명"/>
                <Cell col="19" text="진료과코드"/>
                <Cell col="20" text="진료과"/>
                <Cell col="21" text="진료의ID"/>
                <Cell col="22" text="진료의"/>
                <Cell col="23" text="추가처방의ID"/>
                <Cell col="24" text="추가&#10;처방의"/>
                <Cell col="25" text="검체코드"/>
                <Cell col="26" text="검체명"/>
                <Cell col="27" text="Cassette&#10;번호"/>
                <Cell col="28" text="취소사유"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:ptno"/>
                <Cell col="2" text="expr:currow + 1"/>
                <Cell col="3" style="align:left middle;" class="text_center" text="bind:dispptno"/>
                <Cell col="4" text="bind:relaptno"/>
                <Cell col="5" class="text_center" text="bind:disprelaptno"/>
                <Cell col="6" class="text_center" text="bind:pid"/>
                <Cell col="7" class="text_center" text="bind:patnm"/>
                <Cell col="8" class="text_center" text="bind:patflagnm"/>
                <Cell col="9" displaytype="date" edittype="date" class="text_center" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                <Cell col="10" displaytype="date" edittype="date" class="text_center" text="bind:acptdd" mask="yyyy-MM-dd"/>
                <Cell col="11" displaytype="date" edittype="date" class="text_center" text="bind:cncldd" mask="yyyy-MM-dd"/>
                <Cell col="12" displaytype="date" edittype="date" class="text_center" text="bind:cncltm" mask="hh:mm:ss"/>
                <Cell col="13" text="bind:cnclid"/>
                <Cell col="14" class="text_center" text="bind:cnclnm"/>
                <Cell col="15" text="bind:testcd"/>
                <Cell col="16" style="align:left middle;" text="bind:testnm"/>
                <Cell col="17" text="bind:tgrupcd"/>
                <Cell col="18" text="bind:tgrupnm"/>
                <Cell col="19" text="bind:orddeptcd"/>
                <Cell col="20" class="text_center" text="bind:orddeptnm"/>
                <Cell col="21" text="bind:orddrid"/>
                <Cell col="22" class="text_center" text="bind:orddrnm"/>
                <Cell col="23" text="bind:appeorddrid"/>
                <Cell col="24" class="text_center" text="bind:appeorddrnm"/>
                <Cell col="25" text="bind:spccd"/>
                <Cell col="26" text="bind:spcnm"/>
                <Cell col="27" class="text_center" text="bind:blocno"/>
                <Cell col="28" style="align:left middle;" text="bind:resncnts"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_bu" taborder="4" text="조회" class="btn1" position="absolute 808 72 864 94" anchor="top right" onclick="btn_bu_onclick" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cbo_ptnocd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ptnonm" type="STRING"/>
          <Column id="ptnocd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_acptcncllist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="relaptno" type="STRING"/>
          <Column id="disprelaptno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="patflagnm" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="acptdd" type="STRING"/>
          <Column id="cncldd" type="STRING"/>
          <Column id="cncltm" type="STRING"/>
          <Column id="cnclid" type="STRING"/>
          <Column id="cnclnm" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="testnm" type="STRING"/>
          <Column id="tgrupcd" type="STRING"/>
          <Column id="tgrupnm" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="appeorddrid" type="STRING"/>
          <Column id="appeorddrnm" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="blocno" type="STRING"/>
          <Column id="resncnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_data_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sysdd" type="STRING" size="256"/>
          <Column id="systm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="seaval" type="STRING" size="256"/>
          <Column id="acptfromdd" type="STRING" size="256"/>
          <Column id="acpttodd" type="STRING" size="256"/>
          <Column id="seameth" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="seameth">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ptnocode" type="STRING" size="256"/>
          <Column id="fromyear" type="STRING" size="256"/>
          <Column id="fromptno" type="STRING" size="256"/>
          <Column id="toyear" type="STRING" size="256"/>
          <Column id="toptno" type="STRING" size="256"/>
          <Column id="sysdt" type="STRING" size="256"/>
          <Column id="ptnocd" type="STRING" size="256"/>
          <Column id="refflagcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_cnclfromdd" propid="value" datasetid="ds_hidden" columnid="acptfromdd"/>
      <BindItem id="item1" compid="group2.ipt_cncltodd" propid="value" datasetid="ds_hidden" columnid="acpttodd"/>
      <BindItem id="item2" compid="group2.ipt_seaval" propid="value" datasetid="ds_hidden" columnid="seaval"/>
      <BindItem id="item3" compid="group2.ipt_fromyear" propid="value" datasetid="ds_init" columnid="fromyear"/>
      <BindItem id="item4" compid="group2.input2" propid="value" datasetid="ds_init" columnid="toyear"/>
      <BindItem id="item5" compid="group2.ipt_fromptno" propid="value" datasetid="ds_init" columnid="fromptno"/>
      <BindItem id="item6" compid="group2.input1" propid="value" datasetid="ds_init" columnid="toptno"/>
      <BindItem id="item7" compid="group2.cbo_ptnocd" propid="value" datasetid="ds_init" columnid="ptnocode"/>
      <BindItem id="item8" compid="group2.cbo_refflagcd" propid="value" datasetid="ds_init" columnid="refflagcd"/>
    </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 SMLPJ00700_oninit(obj:Form, e:InitEventInfo)
{
		frmf_initForm(obj);
}

function SMLPJ00700_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_acptcncllist);
	fExeInitialize();
}

function fExeInitialize()
{
	var sCurDate = "";

	dsf_createDsRow("ds_send", [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}]);
	
	var oParam = {};
		oParam.id          = "TRLPZ00102";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetSystemDateTimeInformation";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_data_sysdtinfo=sysdtinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00102";
	tranf_submit(oParam);
	
	dsf_createDsRow("ds_send", [{col : "instcd",    val : sysf_getUserInfo("dutplceinstcd")}
							   ,{col : "refflagcd", val : "0"}]);	
	var oParam = {};
		oParam.id          = "TRLPZ00109";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetPtNoCdList";
		oParam.inds        = "refdata=ds_send";
		oParam.outds       = "ds_init_cbo_ptnocd=rsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPZ00109";
	tranf_submit(oParam);

	sCurDate = utlf_getCurrentDate();

	// 초기값 설정
	ds_hidden.setColumn(0, "seaval", "");
	ds_hidden.setColumn(0, "acptfromdd", utlf_getCurrentDate());
	ds_hidden.setColumn(0, "acpttodd", utlf_getCurrentDate());
	ds_hidden.setColumn(0, "seameth", "1");
	
	ds_init.setColumn(0, "refflagcd", "0");
	ds_init.setColumn(0, "ptnocode", "");
	ds_init.setColumn(0, "fromyear", sCurDate.substr(2,2));
	ds_init.setColumn(0, "toyear", sCurDate.substr(2,2));
	ds_init.setColumn(0, "fromptno", "");
	ds_init.setColumn(0, "toptno", "");
}

function fGetCnclPrcpList()
{					
	var sTemp   = "";
	var sFromDD = ds_hidden.getColumn(0, "acptfromdd");
	var sToDD = ds_hidden.getColumn(0, "acpttodd");
	
	if( !utlf_isNull(ds_init.getColumn(0, "ptnocode")))
	{
		if( utlf_isNull(ds_init.getColumn(0, "fromyear")))
		{
			ds_init.setColumn(0, "fromyear", sFromDD.substr(2,2));
		}
		else
		{
			sTemp = ds_init.getColumn(0, "fromyear");
			ds_init.setColumn(0, "fromyear", sTemp.getLeftPad(2, "0"));
		}
		
		if( utlf_isNull(ds_init.getColumn(0, "toyear")))
		{
			ds_init.setColumn(0, "toyear", sToDD.substr(2,2));
		} 
		else
		{
			sTemp = ds_init.getColumn(0, "toyear");
			ds_init.setColumn(0, "toyear", sTemp.getLeftPad(2, "0"));
		}
		if( utlf_isNull(ds_init.getColumn(0, "fromptno")))
		{
			ds_init.setColumn(0, "fromptno", "000000");
		} 
		else 
		{
			sTemp = ds_init.getColumn(0, "fromptno");
			ds_init.setColumn(0, "fromptno", sTemp.getLeftPad(6, "0"));
		}
		if( utlf_isNull(ds_init.getColumn(0, "toptno")))
		{
			ds_init.setColumn(0, "toptno", "999999");
		}
		else
		{
			sTemp = ds_init.getColumn(0, "toptno");
			ds_init.setColumn(0, "toptno", sTemp.getLeftPad(6, "0"));
		}
	}
	
	sTemp = ds_init.getColumn(0, "ptnocode");
	ds_send.clearData();
	dsf_createDsRow("ds_send", [{col : "instcd",      	    val : sysf_getUserInfo("dutplceinstcd")}
							   ,{col : "cnclfromdd",  	    val : ds_hidden.getColumn(0, "acptfromdd")}
							   ,{col : "cncltodd",	 	    val : ds_hidden.getColumn(0, "acpttodd")}
							   ,{col : "refmthd", 			val : ds_hidden.getColumn(0, "seameth")}
							   ,{col : "refval",   	        val : ds_hidden.getColumn(0, "seaval")}
							   ,{col : "ptnocode",          val : utlf_transNullToEmpty(sTemp).replace("-", "")}
							   ,{col : "fromyear",          val : ds_init.getColumn(0, "fromyear")}
							   ,{col : "fromptno",          val : ds_init.getColumn(0, "fromptno")}
							   ,{col : "toyear",            val : ds_init.getColumn(0, "toyear")}
							   ,{col : "toptno",            val : ds_init.getColumn(0, "toptno")}
							   ,{col : "acptflagcd",         val : ds_init.getColumn(0, "refflagcd")}]);
	
	var oParam = {};
		oParam.id          = "TRLPJ00701";
		oParam.service     = "plgyrefmngtapp.AcptSpecRef";
		oParam.method      = "reqGetAcptCnclList";
		oParam.inds        = "refData=ds_send";
		oParam.outds       = "ds_grd_acptcncllist=reflist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLPJ00701";
	tranf_submit(oParam);
}

function fExeRefFlagChng()
{
	if(ds_init.getColumn(0, "refflagcd") == "0")
	{
		group2.cap_refdd.text = "접수일자 :";
	}
	else 
	{
		group2.cap_refdd.text = "취소일자 :";
	}
}

//조회
function group2_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetCnclPrcpList();	
}

function group2_ipt_cncltodd_onkeyup(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{	
		fGetCnclPrcpList();
	}
}

function group2_cbo_refflagcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fExeRefFlagChng();
}

//엑셀저장
function button13_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_acptcncllist, "접수취소현황", "sheet1", false);
}

function group2_ipt_seaval_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_hidden.setColumn(0, "seaval", group2.ipt_seaval.text);
		fGetCnclPrcpList();
	}
}

function btn_bu_onclick(obj:Button,  e:ClickEventInfo)
{
  frmf_modal("SMLPJ00710", "SMLPJ00710", "", null, null, null, null, null, null, null, null, null, "M");		
}
]]></Script>
  </Form>
</FDL>