YNU_JEUS/app_home/himed/xpapps/lis/plgymigrsltmngtxp/xp/SPLPP90100_병리마이그레이션데이터조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPP90100" position="absolute 0 0 1205 784" titletext="병리마이그레이션데이터조회" onload="SPLPP90100_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 40 1195 784" id="group3" scrollbars="none">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 70 280 74" linetype="horizontal" id="line1" anchor="default" style="border:2 solid cadetblue ;"/>
              <Div position="absolute 0 10 1195 45" id="group1" anchor="default">
                <Layouts>
                  <Layout>
                    <Shape position="absolute 0 0 1194 35" id="roundrect2" class="roundrect_search" type="roundrectangle" anchor="default"/>
                    <Shape position="absolute 1105 7 1111 29" linetype="vertical" id="line3" class="line_4" anchor="default"/>
                    <Button position="absolute 1123 7 1179 29" id="btn_Ref" class="btn1" text="조회" anchor="default" onclick="group3_group1_btn_Ref_onclick"/>
                    <Static text="등록번호 :" position="absolute 40 8 131 25" align="align:left middle;" id="caption11" class="search_name" anchor="default"/>
                    <Edit position="absolute 130 8 245 27" id="input2" anchor="default" onkeydown="group3_group1_input2_onkeydown"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static text="환자처방조회" position="absolute 5 55 139 69" id="caption3" class="tit_2" anchor="default"/>
              <Grid position="absolute 0 75 280 715" id="grd_patprcplist" scrollbars="fixedhorz" binddataset="ds_grd_patprcplist" anchor="default" oncellclick="group3_grd_patprcplist_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="90"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="진료과"/>
                      <Cell col="1" text="처방일"/>
                      <Cell col="2" text="pid"/>
                      <Cell col="3" text="prcpdeptcd"/>
                      <Cell col="4" text="prcpdt"/>
                      <Cell col="5" text="seqno"/>
                      <Cell col="6" text="rsltcnts"/>
                      <Cell col="7" text="ptno"/>
                      <Cell col="8" text="editpossyn"/>
                      <Cell col="9" text="검사연번호"/>
                      <Cell col="10" text="결과상태"/>
                      <Cell col="11"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:prcpdeptnm"/>
                      <Cell col="1" text="bind:prcpdd" mask="yyyy-mm-dd"/>
                      <Cell col="2" text="bind:pid"/>
                      <Cell col="3" text="bind:prcpdeptcd"/>
                      <Cell col="4" text="bind:prcpdt"/>
                      <Cell col="5" text="bind:prcpseqno"/>
                      <Cell col="6" text="bind:rsltcnts"/>
                      <Cell col="7" text="bind:ptno"/>
                      <Cell col="8" text="bind:editpossyn"/>
                      <Cell col="9" text="bind:numberlist"/>
                      <Cell col="10" text="bind:rsltstat"/>
                      <Cell col="11" text="bind:rsltgbn"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 0 719 64 738" id="btn_excel" class="btn2" taborder="2" visible="false" text="엑셀저장" anchor="default" onclick="group3_btn_excel_onclick"/>
              <Static text="처방결과상세조회" position="absolute 295 55 429 69" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 290 70 1190 74" linetype="horizontal" id="line2" anchor="default" style="border:2 solid cadetblue ;"/>
              <TextArea position="absolute 290 75 1190 715" id="tar_CmtDetlCnts" anchor="default" ontextchanged="group3_tar_CmtDetlCnts_ontextchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 0 1195 25" id="group2">
          <Layouts>
            <Layout>
              <Static text="병리마이그레이션결과조회" position="absolute 0 0 233 25" id="caption6" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 24 1195 51" id="grp_btn" scrollbars="none">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 22 1194 28" linetype="horizontal" id="line32" class="line_6" anchor="default"/>
              <Button position="absolute 1127 3 1195 25" id="btn_reset" class="btn4" text="초기화" anchor="default" onclick="grp_btn_btn_reset_onclick"/>
              <Button position="absolute 0 3 56 25" id="button11" class="btn6" text="출력" anchor="default" onclick="grp_btn_button11_onclick"/>
              <Button position="absolute 1068 3 1124 25" id="button1" class="btn4" enable="false" text="확인" anchor="default" onclick="grp_btn_button1_onclick"/>
              <Button position="absolute 1009 3 1065 25" id="button2" class="btn4" enable="false" text="저장" anchor="default" onclick="grp_btn_button2_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_patprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdeptnm" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="prcpdeptcd" type="STRING"/>
          <Column id="prcpdt" type="STRING"/>
          <Column id="prcpseqno" type="STRING"/>
          <Column id="rsltcnts" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="editpossyn" type="STRING"/>
          <Column id="numberlist" type="STRING"/>
          <Column id="rsltstat" type="STRING"/>
          <Column id="rsltgbn" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_param" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="parampid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rsltstat" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group1.input2" propid="value" datasetid="ds_hidden_ref" columnid="pid"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
include "lis_commonxp::LZZ001.xjs";

function cf_SPLPP90100(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}

function fSetInit(){
						
	ds_grd_patprcplist.clearData(); 
	group3.tar_CmtDetlCnts.value = "";

}

function fGetPatPrcpList(){
	
	var pid = group3.group1.input2.value;
	var paramPid = ds_hidden_param.getColumn(0,"pid");
	group3.group1.input2.value = paramPid;		
	ds_hidden_ref.setColumn(0,"parampid", paramPid);
	
	
	if(utlf_isNull(pid)){
		alert("등록번호를 입력해 주십시요");
		return;
	}
		
	fSetInit();
	var oParam = {};
		oParam.id          = "TRLPP90101";
		oParam.service     = "plgymigrsltmngtapp.PlgyMigRslt";
		oParam.method      = "reqGetPatMigRsltList";
		oParam.inds        = "cond=ds_hidden_ref";
		oParam.outds       = "ds_grd_patprcplist=getPatMigRsltList";
		oParam.async       = false;
		oParam.callback    = "cf_SPLPP90100";

	tranf_submit(oParam);
	
	ds_hidden_ref.setColumn(0,"parampid", "");
	ds_grd_patprcplist.rowposition = 0;
	fClickResultList();
	
}


function trim(str){
	str = str.replace(/(^\s*)|(\s*$)/g, "");
  return str;
}


function fClickResultList(){
	
	var prcplistRow = ds_grd_patprcplist.rowposition;
	
	var prcprsltlist = ds_grd_patprcplist.getColumn(prcplistRow,"rsltcnts");
	
	var ss = 0;
	var ee;
	var stt2;
	var longstr = "";
	
	for(var TT= 0 ; TT <  prcprsltlist.length ; TT++){
		
		
		var stt = prcprsltlist.substring(TT, TT+1);
		
		if(stt == "\n" || TT + 1 == prcprsltlist.length){
			ee = TT;								
			stt2 = prcprsltlist.substring(ss, ee);
			if(TT + 1 == prcprsltlist.length){
				stt2 = prcprsltlist.substring(ss, prcprsltlist.length);
			}								
			
			stt2 = trim(stt2);		
			
			if(stt2.substring(0, 1) == "●"){
				
			}else if(stt2.substring(0, 1) == "◈"){
				stt2 = "   " + stt2;
			}else{
				stt2 = "        " + stt2;
			}
			
			ss = TT;
			longstr = longstr + stt2 + "\n";
		}
		
		 
	}
	
	prcprsltlist = longstr;
	
	var edityn = ds_grd_patprcplist.getColumn(prcplistRow,"editpossyn"); // 수정가능한 데이터
	var rsltgbn = ds_grd_patprcplist.getColumn(prcplistRow,"rsltgbn"); // 현재결과 상태 결과상태가 뒤로돌아가지않게하기위함
	
	var paramPid = ds_hidden_param.getColumn(0,"pid"); // 통합결과조회시에는 수정하지않는다.
	
	if(utlf_isNull(paramPid)){
		group3.tar_CmtDetlCnts.value = prcprsltlist;
		if(edityn == "Y"){
	
			group3.tar_CmtDetlCnts.enable = true;
			
			if(rsltgbn == "3"){									
				grp_btn.button1.enable = true;
				grp_btn.button2.enable = false;
			}else{
				grp_btn.button1.enable = true; // 확인버튼
				grp_btn.button2.enable = true; // 저장버튼
			}

		}else{
			
			group3.tar_CmtDetlCnts.enable = false;		
			grp_btn.button1.enable = false;
			grp_btn.button2.enable = false;
		}
		
		
	}else{
		if (rsltgbn =="3"){
				group3.tar_CmtDetlCnts.value = prcprsltlist;
			}
		else{
			group3.tar_CmtDetlCnts.value = "";
		}
		group3.tar_CmtDetlCnts.enable = false;					
		grp_btn.button1.enable = false;
			grp_btn.button2.enable = false;
	}
	
	
}

function fSetEditCmt(){
	//소견상세내용
	ds_grd_patprcplist.setColumn(ds_grd_patprcplist.rowposition,"rsltcnts",group3.tar_CmtDetlCnts.value);
	//grd_patprcplist.rowStatus(grd_patprcplist.row) = 2;	
	ds_grd_patprcplist.setRowType(ds_grd_patprcplist.rowposition,"U");

	
}

function fSetSaveRstlCnts(rsltstat){
	
	ds_grd_patprcplist.setRowType(ds_grd_patprcplist.rowposition,"U");					
	//model.setvalue("/root/send/data2" , grd_patprcplist.getUpdateData());
	ds_send_data2.copyData(grdf_getGridUpdateData(group3.grd_patprcplist,"update"));
	ds_send.setColumn(0,"rsltstat", rsltstat);
	var oParam = {};
		oParam.id          = "TRLPP90101";
		oParam.service     = "plgymigrsltmngtapp.PlgyMigRslt";
		oParam.method      = "reqSetPatMigRsltList";
		oParam.inds        = "cond=ds_send_data2 stat=ds_send";
		oParam.async       = false;
		oParam.callback    = "cf_SPLPP90100";

	tranf_submit(oParam);
			
	ds_send_data2.clearData();
	lf_lisClearStatus(grp3.grd_patprcplist);
	fGetPatPrcpList();
	
}

function fReportPrint(){
	
	var sRsltcnts  = "";
	var sRsltcnts2 = "";
	
	var iStartPos = 0;
	var iRowNum = 0;
	
	var thisRow = ds_grd_patprcplist.rowposition;
	
	
	//한장 이상이 출력될 경우.
	
	dsf_createDs("ds_hidden_reportdetl");
	
	sRsltcnts  = ds_grd_patprcplist.getColumn(thisRow, "rsltcnts");
	for(var iLeng = 1 ; iLeng <= sRsltcnts.length ; iLeng++) {
		if("\n" == sRsltcnts.substr(iLeng, 1)) {
			dsf_makeValue(ds_hidden_reportdetl,"rsltcnts", "string", sRsltcnts.substring(iStartPos, iLeng), iRowNum);
			iRowNum++;
			iStartPos = Number(iLeng) + 1;
		} else {
			if(sRsltcnts.length == iLeng){
				dsf_makeValue(ds_hidden_reportdetl,"rsltcnts", "string", sRsltcnts.substring(iStartPos, iLeng), iRowNum);
			}
		}
	}
	dsf_createDsRow("ds_hidden_report"
						   , [{col: "pid", val: ds_grd_patprcplist.getColumn(thisRow, "pid")}
						   ,  {col: "patnm", val: ds_grd_patprcplist.getColumn(thisRow, "patnm")}
						   ,  {col: "patsex", val: ds_grd_patprcplist.getColumn(thisRow, "patsex")}
						   ,  {col: "regno", val: ds_grd_patprcplist.getColumn(thisRow, "regno")}
						   ,  {col: "prcpdeptnm", val: ds_grd_patprcplist.getColumn(thisRow, "prcpdeptnm")}
						   ,  {col: "roomcd", val: ds_grd_patprcplist.getColumn(thisRow, "roomcd")}
						   ,  {col: "prcpdd", val: ds_grd_patprcplist.getColumn(thisRow, "prcpdd")}
						   ,  {col: "prcpdt", val: ds_grd_patprcplist.getColumn(thisRow, "prcpdt")}
						   ,  {col: "acptdt", val: ds_grd_patprcplist.getColumn(thisRow, "acptdt")}
						   ,  {col: "hspnm", val: ds_grd_patprcplist.getColumn(thisRow, "hspnm")}
						   ,  {col: "drid", val: ds_grd_patprcplist.getColumn(thisRow, "drid")}]); 			
						   

	var objParam = new Object();
	var objDOM = rptf_createDOM();		
	rptf_setNodeListToDOM(objDOM, "/root/hidden/report", ds_hidden_report);
	rptf_setNodeListToDOM(objDOM, "/root/hidden/reportdetl", ds_hidden_reportdetl);
	
	objParam.xml_data_XML1 = objDOM.documentElement.source;
	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0";
	rptf_exeReportPreview30("RPLPP90100", [objParam], option);
		
}
					
					
					
					
					
function SPLPP90100_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);	
	ds_hidden_param.copyData(arg_ds_hidden_ref);
	var paramPid = ds_hidden_param.getColumn(0,"pid");
	group3.group1.input2.value = paramPid;				

	fSetInit();
	
	if(!utlf_isNull(paramPid)){
		fGetPatPrcpList();
		
	}
					
					
					
}

function group3_group1_btn_Ref_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetPatPrcpList();	
}

function group3_group1_input2_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13){
		var pid = group3.group1.input2.value;
		fGetPatPrcpList();				
	}
}

function group3_grd_patprcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	fClickResultList();
}

function group3_btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(group3.grd_patprcplist, "exportExcel", "xls");	  
}

function group3_tar_CmtDetlCnts_ontextchanged(obj:TextArea,  e:TextChangedEventInfo)
{
	fSetEditCmt();
}

function grp_btn_btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetInit();
}

function grp_btn_button11_onclick(obj:Button,  e:ClickEventInfo)
{
	fReportPrint();			
}

function grp_btn_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetSaveRstlCnts("2");
}

function grp_btn_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetSaveRstlCnts("1");
}
]]></Script>
  </Form>
</FDL>