YNU_JEUS/app_home/himed/xpapps/ast/healexamxp/xp/SMAHR00950_질병유소견자사후관리소견서.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHR00950" position="absolute 0 0 1196 773" titletext="질병유소견자 사후관리 소견서" oninit="SMAHR00950_oninit" onload="SMAHR00950_onload">
    <Layouts>
      <Layout>
        <Div id="group5" taborder="0" class="div_SA" position="absolute 0 25 1190 85" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption11" text="건진기간 :" class="search_name" position="absolute 296 9 382 26"/>
              <Static id="caption12" text="사업체 :" class="search_name" position="absolute 632 9 710 26"/>
              <Shape id="line7" linetype="vertical" position="absolute 1105 12 1111 46" anchor="top right"/>
              <Calendar id="ipt_srchfromdd" taborder="2" class="input_s_essential" position="absolute 387 8 487 27" autoselect="true" autoskip="true"/>
              <Calendar id="ipt_srchtodd" taborder="3" class="input_s_essential" position="absolute 504 8 604 27" autoselect="true" autoskip="true"/>
              <Edit id="ipt_srchcmpycd" taborder="4" class="input_search" position="absolute 709 8 789 27" autoselect="true" autoskip="true" onkeyup="group5_ipt_srchcmpycd_onkeyup"/>
              <Button id="btn_selcmpy" taborder="5" class="icon_search" position="absolute 794 9 810 25" onclick="group5_btn_selcmpy_onclick"/>
              <Edit id="opt_srchcmpynm" taborder="6" readonly="true" class="output" position="absolute 814 8 1055 27"/>
              <Button id="btn_search" taborder="7" text="조회" class="btn1" position="absolute 1122 19 1178 41" anchor="top right" onclick="group5_btn_search_onclick"/>
              <Static id="caption19" text="~" class="search_n_b" position="absolute 490 10 502 27"/>
              <Static id="caption3" text="건진상세분류 :" class="search_name" position="absolute 10 9 127 26"/>
              <Combo id="cmb_srchhealexamdetlflag" taborder="8" innerdataset="@ds_init_baseinfo_hedetlflaglst_A0070" codecolumn="cdid" datacolumn="cdnm" position="absolute 129 8 270 27"/>
              <Static id="caption2" text="판정분류 :" class="search_name" position="absolute 10 35 125 52"/>
              <cp_checkboxList id="checkbox1" titletext="CheckBox List" taborder="9" scrollbars="none" position="absolute 130 33 1037 54" style="background:#e9e9e9ff;" col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" class="line_10" position="absolute 0 118 1190 124" anchor="left top right"/>
        <Button id="button51" taborder="1" text="엑셀" class="btn7" position="absolute 1132 99 1190 118" anchor="top right" onclick="button51_onclick"/>
        <Grid id="grd_judglist" taborder="2" binddataset="ds_main_judglist_judginfolist" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 123 1190 765" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="81"/>
                <Column size="80"/>
                <Column size="64"/>
                <Column size="91"/>
                <Column size="100"/>
                <Column size="88"/>
                <Column size="100"/>
                <Column size="132"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="147"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="건진일자"/>
                <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="소견명"/>
                <Cell col="9" text="조치명"/>
                <Cell col="10" text="사후관리"/>
                <Cell col="11" text="업무적합성"/>
              </Band>
              <Band id="body">
                <Cell text="bind:hopedd" mask="yyyy-mm-dd"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" text="bind:cmpycd"/>
                <Cell col="4" text="bind:cmpynm"/>
                <Cell col="5" text="bind:pkgcd"/>
                <Cell col="6" text="bind:pkgnm"/>
                <Cell col="7" text="bind:judgcd"/>
                <Cell col="8" text="bind:judg1st"/>
                <Cell col="9" text="bind:sogyun"/>
                <Cell col="10" text="bind:jchnm"/>
                <Cell col="11" text="bind:shnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="질병유소견자 사후관리 소견서" class="tit_1" position="absolute 0 0 258 25"/>
      </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="srchhealexamdetlflag" type="STRING" size="256"/>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="srchcmpycd" type="STRING" size="256"/>
          <Column id="srchcmpynm" type="STRING" size="256"/>
          <Column id="srchjudgcd" type="STRING" size="256"/>
          <Column id="srchetccd" type="STRING" size="256"/>
          <Column id="cdgrupid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchhealexamdetlflag"/>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="srchcmpycd"/>
            <Col id="srchcmpynm"/>
            <Col id="srchjudgcd"/>
            <Col id="srchetccd"/>
            <Col id="cdgrupid">S170</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_judglist_judginfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hopedd" type="STRING" size="256" sumtext="환자등록번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="성명"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="cmpycd" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="cmpynm" type="STRING" size="256" sumtext="건진구분"/>
          <Column id="pkgcd" type="STRING" size="256" sumtext="패키지검사구분"/>
          <Column id="pkgnm" type="STRING" size="256" sumtext="패키지코드"/>
          <Column id="judgcd" type="STRING" size="256" sumtext="패키지명"/>
          <Column id="judg1st" type="STRING" size="256" sumtext="청구대상"/>
          <Column id="sogyun" type="STRING" size="256" sumtext="건진일자"/>
          <Column id="jchnm" type="STRING" size="256" sumtext="패키지코드"/>
          <Column id="shnm" type="STRING" size="256" sumtext="패키지명"/>
          <Column id="upmjhsnm" type="STRING" size="256" sumtext="청구대상"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_baseinfo_hedetlflaglst_A0070" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cmb_info2_comcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256" sumtext="코드"/>
          <Column id="cdnm" type="STRING" size="256" sumtext="코드명"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group5.cmb_srchhealexamdetlflag" propid="value" datasetid="ds_send" columnid="srchhealexamdetlflag"/>
      <BindItem id="item1" compid="group5.ipt_srchfromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
      <BindItem id="item2" compid="group5.ipt_srchtodd" propid="value" datasetid="ds_send" columnid="srchtodd"/>
      <BindItem id="item3" compid="group5.ipt_srchcmpycd" propid="value" datasetid="ds_send" columnid="srchcmpycd"/>
      <BindItem id="item4" compid="group5.opt_srchcmpynm" propid="value" datasetid="ds_send" columnid="srchcmpynm"/>
    </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";
var vHealExamFlag = "";
var vHealExamDetlFlag = "";
function SMAHR00950_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHR00950_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_judglist);
	
	fGetBasicCdList();
	fInitInfo();
	
	var sProp="col=5,row=3,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=20,overflow='visible'";
	group5.checkbox1.setInitComp(sProp, ds_init_cmb_info2_comcdlist,"cdid","cdnm","fn_cmpEvent");
}

function fn_cmpEvent()
{
	ds_send.setColumn(0, "srchjudgcd", String(group5.checkbox1.getData()).replace(",", " "));
}

function fGetBasicCdList()
{
	vHealExamFlag = 'G'
	vHealExamDetlFlag = 'G01'

	var arrParam = [{dsNm: "ds_init_baseinfo_hedetlflaglst_A0070", cdGrpId: "A0070"}
				  , {dsNm: "ds_init_baseinfo_rsrvflaglst_A0115", cdGrpId: "A0115"}
				  , {dsNm: "ds_init_baseinfo_rsrvflaglst_A0107", cdGrpId: "A0107"}
				  , {dsNm: "ds_init_baseinfo_statlst_A0117", cdGrpId: "A0117"}
				  , {dsNm: "ds_init_baseinfo_testflag_A0113", cdGrpId: "A0113"}]
	appf_getCodeList(arrParam); 
	
	var oParam = {};
		oParam.id          = "TRAHR00953";
		oParam.service     = "healexamrsltjudgapp.RsltInpt";
		oParam.method      = "reqGetComcodeList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_cmb_info2_comcdlist=comcdlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHR00953";

	tranf_submit(oParam);
}

function fInitInfo()
{
	var curDt = utlf_getCurrentDate();
	ds_send.setColumn(0, "srchfromdd", curDt);
	ds_send.setColumn(0, "srchtodd", curDt);
}

function group5_ipt_srchcmpycd_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		group5.btn_selcmpy.click();
	}
}

function group5_btn_selcmpy_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetComnCd("SMAHA01500", "09" , "cd", group5.ipt_srchcmpycd.value, group5.ipt_srchcmpycd, group5.opt_srchcmpynm);
}

function group5_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isValidDateTime(ds_send.getColumn(0, "srchfromdd"), "YYYYMMDD") == false ||utlf_isValidDateTime(ds_send.getColumn(0, "srchtodd"), "YYYYMMDD") == false )
	{
		sysf_messageBox("건진기간 형식이 잘못 입력되었습니다. 확인바랍니다.", "E999", "");
		return;
	}
	else
	{
		var oParam = {};
			oParam.id          = "TRAHR00952";
			oParam.service     = "healexamrsltjudgapp.RsltInpt";
			oParam.method      = "reqGetDiseaseOpnList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_judglist_judginfolist=judginfolist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHR00952";

		tranf_submit(oParam);
	}
}

function button51_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_judglist, "excel", "Sheet1", "true", "", "");
}
]]></Script>
  </Form>
</FDL>