YNU_JEUS/app_home/himed/xpapps/lis/plgyrefmngtxp/xp/SMLPP02000_전체이미지조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLPP02000" position="absolute 0 0 1256 805" titletext="전체이미지조회" oninit="model1_oninit" onload="SMLPP02000_onload">
    <Layouts>
      <Layout>
        <Static id="Static01" class="sta_DA_box" position="absolute 0 120 1256 146" anchor="left top right"/>
        <Static id="cap_lastPage" text="1" position="absolute 1107 124 1131 144" anchor="top right" positiontype="position"/>
        <Static id="caption4" text="이미지 목록" class="tit_2" position="absolute 0 151 101 171" positiontype="position"/>
        <Div id="group2" taborder="8" style="align:center top;" position="absolute 0 55 1256 97" class="div_SA" anchor="left top right" positiontype="position">
          <Layouts>
            <Layout>
              <Edit id="ipt_pid" taborder="11" class="input_search" position="absolute 419 10 517 30" anchor="default" imemode="none" maxlength="10" onkeydown="group2_ipt_pid_onkeydown" inputtype="number" positiontype="position"/>
              <Static id="caption3" text="등록번호" class="search_name" position="absolute 345 10 419 30" anchor="default" positiontype="position"/>
              <Static id="caption5" text="~" position="absolute 715 10 731 30" anchor="default" style="align:center;" class="search_no_b" positiontype="position"/>
              <Button id="btn_sea" taborder="12" text="조회" class="btn1" position="absolute 1188 10 1244 30" anchor="top right" onclick="btn_sea_onclick" positiontype="position"/>
              <Calendar id="ipt_cnclfromdd" taborder="13" class="input_s_essential" position="absolute 615 10 715 30" mask="####-##-##" anchor="default" dateformat="yyyy-MM-dd" value="null" onchanged="group2_ipt_cnclfromdd_onchanged" positiontype="position"/>
              <Calendar id="ipt_cncltodd" taborder="14" class="input_s_essential" position="absolute 731 10 831 30" mask="####-##-##" anchor="default" dateformat="yyyy-MM-dd" value="null" positiontype="position"/>
              <Combo id="cbo_ptnocd" taborder="15" position="absolute 82 10 238 30" anchor="default" innerdataset="@ds_ptnocdlist" codecolumn="ptnocd" datacolumn="ptnonm" index="-1" positiontype="position"/>
              <Edit id="ipt_fromptno" taborder="16" class="text_center" position="absolute 271 10 321 30" anchor="default" imemode="hangul" maxlength="6" inputtype="number" positiontype="position" onkeydown="group2_ipt_fromptno_onkeydown"/>
              <Static id="caption1" text="병리번호" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
              <Edit id="ipt_fromyear" taborder="17" class="text_center" position="absolute 241 10 268 30" anchor="default" imemode="hangul" maxlength="2" inputtype="number" positiontype="position"/>
              <Static id="cap_refdd" text="등록일자" class="search_name" position="absolute 541 10 615 30" anchor="default" positiontype="position"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption2" text="인적사항" class="tit_2" position="absolute 0 101 87 121" positiontype="position"/>
        <Edit id="opt_pid" taborder="10" readonly="true" position="absolute 343 123 441 143" positiontype="position" class="input_readonly"/>
        <Static id="cap_pid" text="등록번호" class="cell_1" position="absolute 239 121 340 145" positiontype="position"/>
        <Edit id="opt_ptno" taborder="11" readonly="true" position="absolute 105 123 236 143" positiontype="position" class="input_readonly"/>
        <Static id="caption8" text="병리번호" class="cell_1" position="absolute 1 121 102 145" positiontype="position"/>
        <Edit id="opt_hngnm" taborder="12" readonly="true" position="absolute 540 123 638 143" positiontype="position" class="input_readonly"/>
        <Static id="cap_hngnm" text="이름" class="cell_1" position="absolute 444 121 537 145" positiontype="position"/>
        <Static id="caption9" text="성별/나이" class="cell_1" position="absolute 641 121 734 145" positiontype="position"/>
        <Edit id="opt_sexage" taborder="13" readonly="true" position="absolute 737 123 835 143" positiontype="position" class="input_readonly"/>
        <Static id="caption10" text="관련병리번호" class="cell_1" position="absolute 838 121 939 145" positiontype="position"/>
        <Static id="caption12" text="의뢰과" class="cell_1" position="absolute 1061 121 1137 144" positiontype="position"/>
        <Button id="button3" taborder="15" text="출력(원내)" class="btn6" position="absolute 95 97 189 119" anchor="top right" positiontype="position" onclick="button3_onclick" visible="true"/>
        <Button id="button5" taborder="17" text="출력(원외)" class="btn6" position="absolute 190 97 282 119" anchor="top right" positiontype="position" onclick="button5_onclick" visible="true"/>
        <Static id="caption6" text="이미지조회" class="tit_1" position="absolute 0 2 120 27" positiontype="position"/>
        <Div id="div_img" taborder="19" text="Div00" position="absolute 370 145 1256 804">
          <Layouts>
            <Layout>
              <Static id="caption4" text="이미지 내용" class="tit_2" position="absolute 0 5 101 25"/>
              <ImageViewer id="obj_imge" taborder="18" position="absolute 0 23 873 652" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_btn" anchor="left top right" taborder="25" class="div_DA_box" position="absolute 0 28 1254 56">
          <Layouts>
            <Layout>
              <Button id="button2" taborder="0" text="처음" class="btn3" visible="true" position="absolute 2 4 58 24" anchor="top right" onclick="grp_btn_button2_onclick"/>
              <Button id="btn_prntexcel" taborder="1" text="이전" class="btn3" visible="true" position="absolute 59 4 115 24" anchor="top right" onclick="grp_btn_btn_prntexcel_onclick"/>
              <Edit id="ipt_paval" taborder="2" imemode="hangul" inputtype="number" maxlength="3" onkeydown="ipt_paval_onkeydown" class="input_search" visible="true" position="absolute 117 4 161 24" anchor="top right" style="align:right middle;"/>
              <Static id="caption7" text="/" visible="true" position="absolute 163 4 174 24" anchor="top right"/>
              <Button id="button1" taborder="3" text="다음" class="btn4" visible="true" position="absolute 207 4 263 24" anchor="top right" onclick="grp_btn_button1_onclick"/>
              <Button id="button4" taborder="4" text="최종" class="btn4" visible="true" position="absolute 264 4 320 24" anchor="top right" onclick="grp_btn_button4_onclick"/>
              <Edit id="cap_lastPage" taborder="5" imemode="hangul" inputtype="number" maxlength="3" onkeydown="ipt_paval_onkeydown" class="input_search" position="absolute 172 4 205 24" anchor="top right" style="align:right middle;" visible="false" value="1"/>
            </Layout>
          </Layouts>
        </Div>
        <Edit id="inpt_relaptno" taborder="26" readonly="true" position="absolute 945 123 1057 143" class="input_search"/>
        <Edit id="output4" taborder="28" readonly="true" class="input_readonly" position="absolute 1140 123 1252 143"/>
        <Grid id="grd_ptnolist" class="CSS::lis.css" taborder="6" useinputpanel="false" position="absolute 0 168 365 804" autofittype="none" anchor="all" binddataset="ds_grid_grd_ptnolist" positiontype="position" oncellclick="grd_ptnolist_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0" band="left"/>
                <Column size="0" band="left"/>
                <Column size="25" band="left"/>
                <Column size="80" band="left"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="48"/>
              </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="rgstrid"/>
                <Cell col="10" text="등록자"/>
                <Cell col="11" text="acptdd"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:ptno"/>
                <Cell col="2" celltype="head" expr="currow+1"/>
                <Cell col="3" class="text_center" text="bind:dispptno"/>
                <Cell col="4" class="text_center" text="bind:pid"/>
                <Cell col="5" class="text_center" text="bind:patnm"/>
                <Cell col="6" class="text_center" text="bind:sexage"/>
                <Cell col="7" class="text_center" text="bind:rgstdd" mask="####-##-##"/>
                <Cell col="8" text="bind:rgsttm" mask="##:##:##"/>
                <Cell col="9" text="bind:rgstrid"/>
                <Cell col="10" class="text_center" text="bind:rgstrnm"/>
                <Cell col="11" class="text_center" text="bind:acptdd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_ptnolist" 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="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="wardroom" type="STRING"/>
          <Column id="rgstdd" type="STRING"/>
          <Column id="rgsttm" type="STRING"/>
          <Column id="rgstrid" type="STRING"/>
          <Column id="rgstrnm" type="STRING"/>
          <Column id="rsltimg" type="BLOB"/>
          <Column id="acptdd" type="STRING" size="0"/>
          <Column id="totpage" type="STRING" size="0"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_sysdate" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sysdd" type="STRING"/>
          <Column id="systm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_ptnocdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="ptnocd" type="STRING"/>
          <Column id="ptnonm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_lastpage" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lastpage" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="lastpage">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ptno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="relaptno" type="STRING"/>
          <Column id="hospnm" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
          <Column id="disprelaptno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_prtninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd"/>
          <Column id="ptno"/>
          <Column id="dispptno"/>
          <Column id="pid"/>
          <Column id="rsltcnts1"/>
          <Column id="rsltcnts2"/>
          <Column id="rsltcnts3"/>
          <Column id="rsltcnts4"/>
          <Column id="rsltcnts5"/>
          <Column id="hosaddr"/>
          <Column id="acptdd"/>
          <Column id="relaptno"/>
          <Column id="disprelaptno"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_headerinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd"/>
          <Column id="ptno"/>
          <Column id="dispptno"/>
          <Column id="pid"/>
          <Column id="patnm"/>
          <Column id="sexage"/>
          <Column id="rrgstno"/>
          <Column id="orddeptnm"/>
          <Column id="wardnm"/>
          <Column id="prcpdt"/>
          <Column id="orddrnm"/>
          <Column id="dsctdt"/>
          <Column id="chrgdrnm"/>
          <Column id="acptdt"/>
          <Column id="acptnm"/>
          <Column id="grosdt"/>
          <Column id="grosdrnm"/>
          <Column id="reqcnts"/>
          <Column id="testnmlist"/>
          <Column id="spcnmlist"/>
          <Column id="spcnm"/>
          <Column id="workflagcd"/>
          <Column id="statsworkflagcd"/>
          <Column id="spckeepflagcd"/>
          <Column id="rslthideflagcd"/>
          <Column id="conccaseflagcd"/>
          <Column id="preprsltflagcd"/>
          <Column id="rsltcnts1"/>
          <Column id="rsltcnts2"/>
          <Column id="rsltcnts3"/>
          <Column id="rsltcnts4"/>
          <Column id="rsltcnts5"/>
          <Column id="cmtcnts"/>
          <Column id="mcont"/>
          <Column id="grospic"/>
          <Column id="keybloc"/>
          <Column id="tissbloct"/>
          <Column id="tissblocnt"/>
          <Column id="cstecnt"/>
          <Column id="slidcnt"/>
          <Column id="tissbank"/>
          <Column id="cfnm"/>
          <Column id="oproomcd"/>
          <Column id="mcode"/>
          <Column id="delivedt"/>
          <Column id="delivenm"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_diaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="termengnm" type="STRING"/>
          <Column id="termhngnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_imginfolist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rsltimg" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_rslthdrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="inptdt" type="STRING"/>
          <Column id="inptnm" type="STRING"/>
          <Column id="readdt" type="STRING"/>
          <Column id="readdrnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output4" propid="value" datasetid="ds_patinfo" columnid="orddeptnm"/>
      <BindItem id="item1" compid="inpt_relaptno" propid="value" datasetid="ds_patinfo" columnid="disprelaptno"/>
      <BindItem id="item2" compid="div_img.obj_imge" propid="image" datasetid="ds_grid_grd_ptnolist" columnid="rsltimg"/>
      <BindItem id="item3" compid="grp_btn.cap_lastPage" propid="value" datasetid="ds_lastpage" columnid="lastpage"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// xjs Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LPZ001.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";	//공통코드호출

//=======================================================================================
// global variable 전역변수
//---------------------------------------------------------------------------------------
var hospitalAddress = ""; //병원주소


//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
function lf_exeInitialize() {

	var sCurDate = "";
	var sPtNoCd  = "";
	var sYear    = "";
	var sNo      = "";
	
	grp_btn.ipt_paval.value = "1";

	// 이미지 object, 브라우져 object 비활성화
	var menuparam = frmf_getMenuParam();
	
	fgetSysDtInfo("ds_sysdate");						//TRLPZ00102 시스템시간조회
	fGetPtNoCdList("ds_ptnocdlist");					//TRLPZ00109 병리번호조회
	
	//초기값 설정
	sCurDate = ds_sysdate.getColumn(0,"sysdd");
	group2.ipt_cnclfromdd.value = sCurDate;
	group2.ipt_cncltodd.value = sCurDate;
	group2.ipt_pid.value = "";
	group2.cbo_ptnocd.value = "-";
	group2.ipt_fromyear.value = sCurDate.substr(2,2);
	hospitalAddress = lf_getHardCDList("Y", 1006, 4, null);
	trace("menuparam = " + menuparam);
	// 메뉴에서 화면이 선택되었을 경우 처리
	if (menuparam == "1") {
		// Continue
	} else {
		// 검사결과등록, 결과조회 화면에서 호출할 경우 처리
		var objParentWin = opener.getOwnerFrame().name;
		trace("objParentWin = " + objParentWin);
		if(objParentWin != "ChildFrameTop"){
			if(objParentWin == "SMLPP00500"){		// 결과조회 화면에서 호출할 경우 처리
				group2.cbo_ptnocd.value = opener.frmf_getParameter("SMLPP02000_ptnocd");
				group2.ipt_fromyear.value = opener.frmf_getParameter("SMLPP02000_year");
				group2.ipt_fromptno.value = opener.frmf_getParameter("SMLPP02000_no");
				group2.ipt_cnclfromdd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				group2.ipt_cncltodd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				//opener.frmf_getarameter("SMLPP02000_scrno");
				group2.ipt_pid.value = opener.frmf_getParameter("SMLPP02000_pid");
				//trace("SMLPP02000_rgstdd : -->>>    " + opener.frmf_getParameter("SMLPP02000_rgstdd"));
				//trace("SMLPP02000_pid : -->>>    " + opener.frmf_getParameter("SMLPP02000_pid"));
				
			} else if(objParentWin == "SMLPR02700"){
				group2.cbo_ptnocd.value = SMLPP02000_ptnocd;
				group2.ipt_fromyear.value = SMLPP02000_year;
				group2.ipt_fromptno.value = SMLPP02000_no;
				group2.ipt_cnclfromdd.value = SMLPP02000_rgstdd;
				group2.ipt_cncltodd.value = SMLPP02000_rgstdd;
				group2.ipt_pid.value = "";
				
			} else if(objParentWin =="SMMMI00100"||objParentWin=="SMAER00800"){
				var sPtno = opener.frmf_getParameter("SMLPP02000_no");
				group2.cbo_ptnocd.value = sPtno.substr(0, sPtno.length-8);
				group2.ipt_fromyear.value = sPtno.substr(sPtno.length-8, sPtno.length-7);
				group2.ipt_fromptno.value = sPtno.substr(sPtno.length-6, sPtno.length);
				group2.ipt_cnclfromdd.value = ds_sysdate.getColumn(0,"sysdd");
				group2.ipt_cncltodd.value = ds_sysdate.getColumn(0,"sysdd");
				group2.ipt_pid.value = "";
				
			} else if(opener.frmf_getParameter("SMLPP02000_scrno")=="SMAER00800"){
				sPtNoCd = opener.frmf_getParameter("SMLPP02000_no");
				sPtNoCd = sPtNoCd.getTrim();
				sYear   = sPtNoCd.toString().substr(sPtNoCd.length-8, 2);
				sNo     = sPtNoCd.toString().substr(sPtNoCd.length-6, 6);
				sPtNoCd = sPtNoCd.toString().substr(0, sPtNoCd.length-8);
				group2.cbo_ptnocd.value = sPtNoCd;
				group2.ipt_fromyear.value = sYear;
				group2.ipt_fromptno.value = sNo;
				group2.ipt_cnclfromdd.value = "";
				group2.ipt_cncltodd.value = "99991231";
				//opener.frmf_getarameter("SMLPP02000_scrno");
				group2.ipt_pid.value = "";
				group2.cbo_ptnocd.enable = false;
				group2.ipt_pid.enable = false;
				group2.ipt_cnclfromdd.enable = false;
				group2.ipt_fromptno.enable = false;
				group2.btn_sea.enable = false;
				bol_imgdisp.value = false;
			} else {
				group2.cbo_ptnocd.value = opener.frmf_getParameter("SMLPP02000_ptnocd");
				group2.ipt_fromyear.value = opener.frmf_getParameter("SMLPP02000_year");
				group2.ipt_fromptno.value = opener.frmf_getParameter("SMLPP02000_no");
				group2.ipt_cnclfromdd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				group2.ipt_cncltodd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				//opener.frmf_getarameter("SMLPP02000_scrno");
				group2.ipt_pid.value = opener.frmf_getParameter("SMLPP02000_pid");			
			}
			
			lf_getImgInfo("");

		} else {

			if(opener.frmf_getParameter("SMLPP02000_scrno")=="SMAER00800"){
				sPtNoCd = opener.frmf_getParameter("SMLPP02000_no");
				sPtNoCd = sPtNoCd.getTrim();
				sYear   = sPtNoCd.toString().substr(sPtNoCd.length-8, 2);
				sNo     = sPtNoCd.toString().substr(sPtNoCd.length-6, 6);
				sPtNoCd = sPtNoCd.toString().substr(0, sPtNoCd.length-8);
				group2.cbo_ptnocd.value = sPtNoCd;
				group2.ipt_fromyear.value = sYear;
				group2.ipt_fromptno.value = sNo;
				group2.ipt_cnclfromdd.value = "";
				group2.ipt_cncltodd.value = "99991231";
				//opener.frmf_getarameter("SMLPP02000_scrno");
				group2.ipt_pid.value = "";
				group2.cbo_ptnocd.enable = false;
				group2.ipt_pid.enable = false;
				group2.ipt_cnclfromdd.enable = false;
				group2.ipt_fromptno.enable = false;
				group2.btn_sea.enable = false;
				bol_imgdisp.value = false;
					
			} else if(opener.frmf_getParameter("SMLPP02000_scrno")=="SMLPR02700"){
				group2.cbo_ptnocd.value = SMLPP02000_ptnocd;
				group2.ipt_fromyear.value = SMLPP02000_year;
				group2.ipt_fromptno.value = SMLPP02000_no;
				group2.ipt_cnclfromdd.value = SMLPP02000_rgstdd;
				group2.ipt_cncltodd.value = SMLPP02000_rgstdd;
				group2.ipt_pid.value = "";
				
			} else if(opener.frmf_getParameter("plgv_SMLPP02000_scrno")=="SMMMI00100"){
				var sPtno = plgv_SMLPP02000_no;
				group2.cbo_ptnocd.value = sPtno.substr(0, sPtno.length-8);
				group2.ipt_fromyear.value = sPtno.substr(sPtno.length-8, sPtno.length-7);
				group2.ipt_fromptno.value = sPtno.substr(sPtno.length-6, sPtno.length);
				group2.ipt_cnclfromdd.value = ds_sysdate.getColumn(0,"sysdd");
				group2.ipt_cncltodd.value = ds_sysdate.getColumn(0,"sysdd");
				group2.ipt_pid.value = "";
								
			} else {
				group2.cbo_ptnocd.value = opener.frmf_getParameter("SMLPP02000_ptnocd");
				group2.ipt_fromyear.value = opener.frmf_getParameter("SMLPP02000_year");
				group2.ipt_fromptno.value = opener.frmf_getParameter("SMLPP02000_no");
				group2.ipt_cnclfromdd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				group2.ipt_cncltodd.value = opener.frmf_getParameter("SMLPP02000_rgstdd");
				//opener.frmf_getarameter("SMLPP02000_scrno");
				group2.ipt_pid.value = opener.frmf_getParameter("SMLPP02000_pid");
			}
			lf_getImgInfo("");
		}						
	}
	imgview(0);
}

//접수목록 조회 처리 함수
function lf_getImgInfo(pPage){
	var iWidth     = 0;
	var iHeight    = 0;
	var iBackWidth = 0;
	var sSize = "";
	var sNode = ds_grid_grd_ptnolist;
	var sTemp   = "";
	var sFromDD = group2.ipt_cnclfromdd.value;
	var sToDD   = group2.ipt_cncltodd.value;
	// var a = sFromDD.toString();
	div_img.obj_imge.image = "";
	div_img.obj_imge.position.width = 0;
	div_img.obj_imge.position.height = 0;
	div_img.resetScroll();
	// 이상 페이지 번호 처리
	if(utlf_isNull(pPage)){
		grp_btn.ipt_paval.value = "1";
	} else if(pPage=="first"){
		grp_btn.ipt_paval.value = "1";
	} else if(pPage=="before"){
		if(Number(grp_btn.ipt_paval.value)<=1){
			grp_btn.ipt_paval.value = "1";
		} else {
			grp_btn.ipt_paval.value = Number(grp_btn.ipt_paval.value)-1;
		}
	} else if(pPage=="next"){
		if(Number(grp_btn.ipt_paval.value)>=Number(cap_lastPage.text)){
			grp_btn.ipt_paval.value = cap_lastPage.text;
		} else {
			grp_btn.ipt_paval.value = Number(grp_btn.ipt_paval.value)+1;
		}
	} else if(pPage=="last") {
		grp_btn.ipt_paval.value = cap_lastPage.text;
	} else if(pPage=="enter") {
		if(!utlf_isDigit(grp_btn.ipt_paval.value)){
			sysf_messageBox("숫자를 입력해 주세요.", "E000");
			return;
		}
	} else {
		grp_btn.ipt_paval.value = "1";
	}
		
	if(!utlf_isNull(group2.cbo_ptnocd.value))
	{
		if(utlf_isNull(group2.ipt_fromyear.value))
		{
			group2.ipt_fromyear.value = sFromDD.substr(2,2);
		} else {
			sTemp = group2.ipt_fromyear.value;
			group2.ipt_fromyear.value = utlf_lPad(sTemp,2,"0");
		}
		if(utlf_isNull(group2.ipt_fromptno.value))
		{
			group2.ipt_fromptno.value = "000000";
		}else {
			sTemp = group2.ipt_fromptno.value;
			group2.ipt_fromptno.value = utlf_lPad(sTemp,6,"0");
		}
	}
	
	sTemp = group2.cbo_ptnocd.value;
	var sInDsName = dsf_createDsRow("ds_refInfo"
									,  [{col: "instcd" 		, val:	sysf_getUserInfo("dutplceinstcd")} 
									,  {col: "acptfromdd" 	, val:  group2.ipt_cnclfromdd.value}
									,  {col: "acpttodd" 	, val:  group2.ipt_cncltodd.value} 	
									,  {col: "pid" 			, val:  group2.ipt_pid.value} 	
									,  {col: "ptnocode" 	, val:	String(sTemp).replace("-", "")} 
									,  {col: "fromyear" 	, val:	group2.ipt_fromyear.value} 
									,  {col: "fromptno" 	, val:	group2.ipt_fromptno.value} 
									,  {col: "page" 		, val:	grp_btn.ipt_paval.value} 
									,  {col: "itemlimit" 	, val:	"100"} 
									]);
	tranf_submit({
					 id: "TRLPP02001"
				   , service: "plgyrefmngtapp.TestRsltRef"
				   , method: "reqGetRsltImgList"
				   , inds : "reqData="+sInDsName
				   , outds: "ds_grid_grd_ptnolist=refrslt ds_lastpage=lastpage"  
				   , async: false
	});
	
	if(utlf_isNull(pPage))
	{
		if(ds_grid_grd_ptnolist.rowcount>0)
		{
			cap_lastPage.text = ds_grid_grd_ptnolist.getColumn(0,"totpage");
		} else {
			cap_lastPage.text = "0";
		}
	}
	
	opt_ptno.value = "";
	opt_pid.value = "";
	opt_hngnm.value = "";
	opt_sexage.value = "";
		
}


function cbf_SMLPP02000(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
}


function SMLPP02000_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 화면공통
	lf_exeInitialize();
}


function btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_getImgInfo("");
}


function group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if (e.keycode == '13') {
		frmf_setInputNodeCurPid_Change(group2.ipt_pid.value);
		group2.ipt_pid.value = frmf_setInputNodeCurPid_Change(group2.ipt_pid.value);
		lf_getImgInfo("");
	}
}


function grp_btn_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_getImgInfo("first");
}


function grp_btn_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_getImgInfo("next");
}


function grp_btn_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	//lf_getImgInfo("last");
	lf_getImgInfo(ds_imginfolist);
}


function button3_onclick(obj:Button,  e:ClickEventInfo)
{

	var sInDsName = dsf_createDsRow("ds_temp_search"
		, [{col: "instcd"	, val: sysf_getUserInfo("dutplceinstcd")}
		,  {col: "ptno"		, val: grd_ptnolist.getCellValue(grd_ptnolist.selectendrow, grd_ptnolist.getBindCellIndex("body","ptno"))} 
		,  {col: "acptdd"	, val: grd_ptnolist.getCellValue(grd_ptnolist.selectendrow, grd_ptnolist.getBindCellIndex("body","acptdd"))} 
	]);

	tranf_submit({
		  id		: "TRLPP02002"
		, service	: "plgyrefmngtapp.AcptSpecRef"
		, method	: "reqGetMoleRslt"
		, inds 		: "reqpatinfo="+sInDsName
		, outds		: "ds_prtninfo=prtninfo ds_headerinfo=headerinfo ds_diaginfo=diaginfo ds_imginfolist=imginfolist ds_rslthdrinfo=rslthdrinfo ds_lastpage=lastpage"
		, callback	: "cbf_SMLPP02000"
		, async		: false
	});

	dsf_createDs("ds_temp_prtninfo");
	ds_temp_prtninfo.addColumn("reportnm"		, "string");
	ds_temp_prtninfo.addColumn("reoprtengnm"	, "string");
	ds_temp_prtninfo.addColumn("dispptno"		, "string");
	ds_temp_prtninfo.addColumn("patnm"			, "string");
	ds_temp_prtninfo.addColumn("pid"			, "string");
	ds_temp_prtninfo.addColumn("delivedtnm"		, "string");
	ds_temp_prtninfo.addColumn("rrgstno"		, "string");
	ds_temp_prtninfo.addColumn("acptdt"			, "string");
	ds_temp_prtninfo.addColumn("dsctdt"			, "string");
	ds_temp_prtninfo.addColumn("grosdt"			, "string");
	ds_temp_prtninfo.addColumn("prcpdt"			, "string");
	ds_temp_prtninfo.addColumn("inptdt"			, "string");
	ds_temp_prtninfo.addColumn("termengnm"		, "string");
	ds_temp_prtninfo.addColumn("readdt"			, "string");
	ds_temp_prtninfo.addColumn("testnmlist"		, "string");
	ds_temp_prtninfo.addColumn("spcnm"			, "string");
	ds_temp_prtninfo.addColumn("disppptno"		, "string");
	ds_temp_prtninfo.addColumn("keybloc"		, "string");
	ds_temp_prtninfo.addColumn("rsltcnts3"		, "string");
	ds_temp_prtninfo.addColumn("rsltcnts4"		, "string");
	ds_temp_prtninfo.addColumn("rsltcnts1"		, "string");
	ds_temp_prtninfo.addColumn("rsltcnts5"		, "string");
	ds_temp_prtninfo.addColumn("cmtcnts"		, "string");
	ds_temp_prtninfo.addColumn("inptnm"			, "string");
	ds_temp_prtninfo.addColumn("readdrnm"		, "string");
	ds_temp_prtninfo.addColumn("hosaddr"		, "string");
	var nAddRow = ds_temp_prtninfo.addRow();
	ds_temp_prtninfo.setColumn(nAddRow, "reportnm"		, "분자병리 보고서");
	ds_temp_prtninfo.setColumn(nAddRow, "reoprtengnm"	, "Report for Molecular Pathology");
	ds_temp_prtninfo.setColumn(nAddRow, "dispptno"		, ds_prtninfo.getColumn(0, "dispptno"));
	ds_temp_prtninfo.setColumn(nAddRow, "patnm"			, ds_headerinfo.getColumn(0, "patnm"));
	ds_temp_prtninfo.setColumn(nAddRow, "pid"			, ds_headerinfo.getColumn(0, "pid"));
	ds_temp_prtninfo.setColumn(nAddRow, "delivedtnm"	, ds_headerinfo.getColumn(0, "delivedt"));
	ds_temp_prtninfo.setColumn(nAddRow, "rrgstno"		, ds_headerinfo.getColumn(0, "rrgstno"));
	ds_temp_prtninfo.setColumn(nAddRow, "acptdt"		, ds_headerinfo.getColumn(0, "acptdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "dsctdt"		, ds_headerinfo.getColumn(0, "dsctdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "grosdt"		, ds_headerinfo.getColumn(0, "grosdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "prcpdt"		, ds_headerinfo.getColumn(0, "prcpdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "inptdt"		, ds_rslthdrinfo.getColumn(0, "inptdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "termengnm"		, ds_diaginfo.getColumn(0, "termengnm"));
	ds_temp_prtninfo.setColumn(nAddRow, "readdt"		, ds_rslthdrinfo.getColumn(0, "readdt"));
	ds_temp_prtninfo.setColumn(nAddRow, "testnmlist"	, ds_headerinfo.getColumn(0, "testnmlist"));
	ds_temp_prtninfo.setColumn(nAddRow, "spcnm"			, ds_headerinfo.getColumn(0, "spcnm"));
	ds_temp_prtninfo.setColumn(nAddRow, "keybloc"		, ds_headerinfo.getColumn(0, "keybloc"));
	ds_temp_prtninfo.setColumn(nAddRow, "rsltcnts3"		, ds_prtninfo.getColumn(0, "rsltcnts3"));
	ds_temp_prtninfo.setColumn(nAddRow, "rsltcnts4"		, ds_prtninfo.getColumn(0, "rsltcnts4"));
	ds_temp_prtninfo.setColumn(nAddRow, "rsltcnts1"		, ds_prtninfo.getColumn(0, "rsltcnts1"));
	ds_temp_prtninfo.setColumn(nAddRow, "rsltcnts5"		, ds_prtninfo.getColumn(0, "rsltcnts5"));
	ds_temp_prtninfo.setColumn(nAddRow, "cmtcnts"		, ds_headerinfo.getColumn(0, "cmtcnts"));
	ds_temp_prtninfo.setColumn(nAddRow, "inptnm"		, ds_rslthdrinfo.getColumn(0, "inptnm"));
	ds_temp_prtninfo.setColumn(nAddRow, "readdrnm"		, ds_rslthdrinfo.getColumn(0, "readdrnm"));
	ds_temp_prtninfo.setColumn(nAddRow, "hosaddr"		, hospitalAddress);

	var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
	var objParam = new Object();
	objParam.xml_data_XML1 = rptf_getXMLString(ds_temp_prtninfo, "root/prtninfo");
	objParam.xml_data_XML1f = rptf_getXMLString(ds_imginfolist, "root/hidden/imginfo/imginfolist");
	rptf_exeReportPreview30(["RPLPP00700"],[objParam], option);
}


function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var sInDsName = dsf_createDsRow("ds_temp_search"
		, [{col: "instcd"	, val: sysf_getUserInfo("dutplceinstcd")}
		,  {col: "ptno"		, val: grd_ptnolist.getCellValue(grd_ptnolist.selectendrow, grd_ptnolist.getBindCellIndex("body","ptno"))} 
		,  {col: "acptdd"	, val: grd_ptnolist.getCellValue(grd_ptnolist.selectendrow, grd_ptnolist.getBindCellIndex("body","acptdd"))} 
	]);
		
	tranf_submit({
		  id		: "TRLPP02002"
		, service	: "plgyrefmngtapp.AcptSpecRef"
		, method	: "reqGetMoleRslt"
		, inds 		: "reqpatinfo="+sInDsName
		, outds		: "ds_prtninfo=prtninfo ds_headerinfo=headerinfo ds_diaginfo=diaginfo ds_imginfolist=imginfolist ds_rslthdrinfo=rslthdrinfo ds_lastpage=lastpage"
		, callback	: "cbf_SMLPP02000"
		, async		: false
	});
	
	var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
	var objParam = new Object();
	objParam.xml_data_XML1 = rptf_getXMLString(ds_imginfolist, "hidden/patinfo");
	rptf_exeReportPreview30(["RPLPP00800"],[objParam], option);
}


function group2_ipt_cnclfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	//날짜값 바뀔 때 fromyear셋팅
 	var sDate = group2.ipt_cnclfromdd.value;
 	group2.ipt_fromyear.value = sDate.toString().substr(13,2); 	
}


function grd_ptnolist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
//	div_img.obj_imge.image = obj.getCellValue(e.row, obj.getBindCellIndex("body","rsltimg"));
	imgview(e.row);
}

function imgview(row)
{
	trace("이미지조회");
	var x = div_img.obj_imge.imagewidth;
	var y = div_img.obj_imge.imageheight;
	div_img.obj_imge.position.width = x;
	div_img.obj_imge.position.height = y;
	div_img.resetScroll();
	
	opt_ptno.value = ds_grid_grd_ptnolist.getColumn(row,"dispptno");
	opt_pid.value = ds_grid_grd_ptnolist.getColumn(row,"pid");
	opt_hngnm.value = ds_grid_grd_ptnolist.getColumn(row,"patnm");
	opt_sexage.value = ds_grid_grd_ptnolist.getColumn(row,"sexage");


}
function ipt_paval_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode==13){
		lf_getImgInfo("enter");
	}
}

function grp_btn_btn_prntexcel_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_getImgInfo("before");
}

function group2_ipt_fromptno_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode ==13)
	{
		lf_getImgInfo("");
	}
}
]]></Script>
  </Form>
</FDL>