YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLMP00700_미생물누적결과조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLMP00700" position="absolute 0 0 1197 777" titletext="New Form" oninit="SMLMP00700_oninit" onload="SMLMP00700_onload">
    <Layouts>
      <Layout>
        <Button id="button5" taborder="1" text="초기화" class="btn4" position="absolute 1125 1 1193 23" anchor="top right"/>
        <Static id="caption6" text="결과조회" class="tit_1" position="absolute 0 0 86 25" onclick="caption6_onclick" anchor="left top"/>
        <Div id="group1" taborder="2" position="absolute 0 25 1195 90" anchor="left top right" class="div_SA">
          <Layouts>
            <Layout>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1105 6 1111 28" anchor="top right"/>
              <Button id="button1" taborder="2" text="조회" class="btn1" position="absolute 1123 6 1179 28" onclick="group1_button1_onclick" anchor="top right"/>
              <Static id="caption2" text="조회일자 :" class="search_name" position="absolute 15 10 102 27" anchor="left top"/>
              <Static id="caption3" text="~" class="search_no_b" position="absolute 214 11 227 28" anchor="left top"/>
              <Calendar id="input1" taborder="3" class="input_search" position="absolute 105 9 205 28" anchor="left top"/>
              <Calendar id="input2" taborder="4" class="input_search" position="absolute 228 9 328 28" anchor="left top"/>
              <Edit id="iptSearch" taborder="5" class="input_s_button" position="absolute 867 9 992 28" onkeyup="group1_iptSearch_onkeyup" anchor="default"/>
              <Combo id="combo2" taborder="6" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 778 9 865 28" anchor="default" onitemchanged="group1_combo2_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">등록번호</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">환자성명</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption5" text="검색구분 :" class="search_name" position="absolute 699 10 773 27" anchor="default"/>
              <Button id="button6" taborder="7" class="icon_search" position="absolute 710 39 726 55" anchor="default" onclick="group1_button6_onclick"/>
              <Edit id="ipt_tclscdlist" taborder="8" position="absolute 205 38 705 57" anchor="left top"/>
              <Static id="caption8" text="검사항목 :" class="search_name" position="absolute 15 39 109 56" anchor="left top"/>
              <Combo id="cmb_testitem" taborder="9" innerdataset="@ds_LB0103" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 105 38 201 57" onitemchanged="group1_cmb_testitem_onitemchanged" anchor="left top"/>
              <Radio id="radio2" taborder="10" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 487 10 640 30" anchor="left top">
                <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>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption9" text="외래/입원 :" class="search_name" position="absolute 385 10 478 27" anchor="left top"/>
              <Combo id="cmb_mdlcd" taborder="11" innerdataset="@ds_LB0112" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 850 38 1005 57" index="-1" onitemchanged="group1_cmb_mdlcd_onitemchanged" anchor="default"/>
              <Combo id="cmb_workgroup" taborder="12" innerdataset="@ds_LB0113" codecolumn="cd" datacolumn="nm" class="combo_search" enable="false" position="absolute 1007 38 1164 57" enableevent="true" anchor="default"/>
              <Static id="caption12" text="작업그룹 :" class="search_name" position="absolute 760 39 849 56" anchor="default"/>
              <Edit id="output1" taborder="14" readonly="true" position="absolute 1010 7 1105 26" anchor="default"/>
              <Static id="caption4" text="▶" position="absolute 995 5 1010 30" anchor="default"/>
              <Combo id="ma_combo" taborder="13" codecolumn="cd" datacolumn="nm" class="combo_search" visible="true" position="absolute 1007 38 1164 57" enable="true" index="-1" anchor="default" onitemchanged="group1_ma_combo_onitemchanged" autoselect="false" innerdataset="@ds_LB0113" autoskip="false"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" text="검사리스트" class="tit_2" position="absolute 1 97 90 113"/>
        <Grid id="grd_MicroRsltList" taborder="3" binddataset="ds_MicroRsltList" useinputpanel="false" position="absolute 1 115 1195 745" anchor="all" oncelldblclick="grd_MicroRsltList_oncelldblclick" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="50"/>
                <Column size="62"/>
                <Column size="125"/>
                <Column size="125"/>
                <Column size="200"/>
                <Column size="100"/>
                <Column size="381"/>
              </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="검사결과"/>
              </Band>
              <Band id="body">
                <Cell displaytype="date" edittype="date" style="align:left middle;" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                <Cell col="1" style="align:left middle;" text="bind:orddrnm"/>
                <Cell col="2" style="align:left middle;" text="bind:ioflag"/>
                <Cell col="3" style="align:left middle;" text="bind:testkind"/>
                <Cell col="4" displaytype="date" edittype="date" style="align:left middle;" text="bind:workdd" mask="yyyy-MM-dd hh:mm:ss"/>
                <Cell col="5" displaytype="date" edittype="date" style="align:left middle;" text="bind:reptdt" mask="yyyy-MM-dd hh:mm:ss"/>
                <Cell col="6" style="align:left middle;" text="bind:tclsnm"/>
                <Cell col="7" style="align:left middle;" text="bind:spcnm"/>
                <Cell col="8" style="align:left middle;" text="bind:reptrslt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cmb_testitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_mdlcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_workgroup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_MicroRsltList" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING"/>
          <Column id="prcpdr" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
          <Column id="tclskind" type="STRING"/>
          <Column id="workdd" type="STRING"/>
          <Column id="reptdt" type="STRING"/>
          <Column id="testnm" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="testrslt" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_LB0103" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_LB0002" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_LB0112" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_LB0113" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_testgrupdetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testgrupnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="startdd" type="STRING" size="256"/>
          <Column id="enddd" type="STRING" size="256"/>
          <Column id="searchtext" type="STRING" size="256"/>
          <Column id="refflag" type="STRING" size="256"/>
          <Column id="testmdlcd" type="STRING" size="256"/>
          <Column id="workgroup" type="STRING" size="256"/>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="pinfo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="refflag">1</Col>
            <Col id="testmdlcd">00</Col>
            <Col id="workgroup"></Col>
            <Col id="ioflag">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tclsnmlist" type="STRING" size="256"/>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="tclscdlist2" type="STRING" size="256"/>
          <Column id="testgrup" type="STRING" size="256"/>
          <Column id="tclsnmlist2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.cmb_testitem" propid="value" datasetid="ds_hidden_ref_tclscdlist" columnid="testgrup"/>
      <BindItem id="item1" compid="group1.cmb_mdlcd" propid="value" datasetid="ds_LB0112" columnid=""/>
      <BindItem id="item3" compid="group1.ipt_tclscdlist" propid="value" datasetid="ds_hidden_ref_tclscdlist" columnid="tclsnmlist"/>
      <BindItem id="item4" compid="group1.output1" propid="value" datasetid="ds_hidden_ref" columnid="pinfo"/>
      <BindItem id="item2" compid="group1.ma_combo" propid="value" datasetid="ds_hidden_ref" columnid="workgroup"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
include "lis_commonxp::LPZ001.xjs";
include "lis_commonxp::LZZ002.xjs";

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

function SMLMP00700_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
	//fgetScreenBarcodeInfo("ds_init_prntInfo", "cbf_SMLMP00400");
}

function SMLMP00700_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_MicroRsltList);
	lf_setInit();
}

//초기화
function lf_setInit(ref) 
{
	if(ref != 2)
	{
		group1.input1.value = utlf_addDate(utlf_getCurrentDate(), -365)
		group1.input2.value = utlf_getCurrentDate();
		group1.radio2.value = 0;
		group1.combo2.value = 1;
		group1.ma_combo.value = 00;
		group1_combo2_onitemchanged();

		var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "codeflag", val: "0103|0002|0112|0113|"}]);
									
		// 서브밋호출
		var oParam = {};
			oParam.id          = "TRLZZ00101";
			oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
			oParam.method      = "reqGetInitCodeInfo";
			oParam.inds        = "cond=" + sInDsName;
			oParam.outds       = "ds_LB0103=0103 ds_LB0002=0002 ds_LB0112=0112 ds_LB0113=0113";
			oParam.async       = false;
			oParam.callback    = "cf_TRLZZ00101";
		tranf_submit(oParam);
		
		group1.cmb_mdlcd.value = '00';
	}
}

function fGetResultListRef()
{
	var textbox = group1.iptSearch.text;

	if(utlf_isNull(textbox))
	{	
		alert("검색 할 대상이 없습니다.");
		return;
	}

	ds_hidden_ref.setColumn(0, "startdd", group1.input1.value);
	ds_hidden_ref.setColumn(0, "enddd", group1.input2.value);
	ds_hidden_ref.setColumn(0, "searchtext", group1.iptSearch.value);
	ds_hidden_ref.setColumn(0, "refflag", group1.combo2.value);
	ds_hidden_ref.setColumn(0, "testmdlcd", group1.cmb_mdlcd.value);
	ds_hidden_ref.setColumn(0, "ioflag", group1.radio2.value);
	ds_hidden_ref.setColumn(0, "tclscd", group1.cmb_testitem.value);
	
	if(utlf_isNull(ds_hidden_ref.getColumn(0, "workgroup")))
	{
		ds_hidden_ref.setColumn(0, "workgroup", "00");
	}
	else
	{
		ds_hidden_ref.setColumn(0, "workgroup", group1.ma_combo.value);
		trace("lee" + group1.ma_combo.value);
	}
	
	
		
	//ds_hidden_ref.setColumn(0, "workgroup", ds_LB0113.getColumn(0,"cd"));
	
	//trace(group1.ma_combo.value);
	//trace(ds_LB0113.getColumn(0,"cd"));
	//submit("TRLMP00701");
	var oParam = {};
		oParam.id          = "TRLLP01101";
		oParam.service     = "refprintmngtapp.MicroRefPrintMngt";
		oParam.method      = "reqGetMicroSectAcmlRslt";
		oParam.inds        = "cond=ds_hidden_ref";
		oParam.outds       = "ds_MicroRsltList=getMicroSectAcmlRslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLP01101";

		tranf_submit(oParam);
    
    trace(group1.combo2.value );
    trace(ds_MicroRsltList.getColumn(0, "hngnm"));
	if(group1.combo2.value == 1)
	{
		ds_hidden_ref.setColumn(0, "pinfo", ds_MicroRsltList.getColumn(0, "hngnm"));
	}
	else if(group1.combo2.value == 2)
	{
		ds_hidden_ref.setColumn(0, "pinfo", ds_MicroRsltList.getColumn(0, "pid"));
	}
	trace(ds_hidden_ref.getColumn(0, "pinfo"));
}	

function fSelectTestGrup()
{
	ds_send.setColumn(0, "testgrupnm", group1.cmb_testitem.text);
	
	var oParam = {};
		oParam.id          = "TRLLF90401";
		oParam.service     = "diagtestapplib.LisCommon";
		oParam.method      = "reqGetTestGrupDetl";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_testgrupdetl=getTestGrupDetl";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLF90401";

	tranf_submit(oParam);
	
	fSetPopUpTclscdList();
}

function fSetPopUpTclscdList()
{
	var count = ds_testgrupdetl.rowcount;
	if(count > 0)
	{
		var sendtclsnm = ds_testgrupdetl.getColumn(0, "tclsnm");
		var sendtclscd = ds_testgrupdetl.getColumn(0, "tclscd");
		var sendtclscd2 = ds_testgrupdetl.getColumn(0, "tclscd");
		
		
		// 검사그룹 상세 목록 없을때
		if(utlf_isNull(sendtclsnm))
		{
			ds_hidden_ref_tclscdlist.setColumn(0, "tclscdlist", "");
			ds_hidden_ref_tclscdlist.setColumn(0, "tclsnmlist", "");
		}
		else	 // 검사그룹 상세 목록 있을때
		{
			for(i = 1; i< count; i++)
			{
				sendtclsnm = sendtclsnm + ", " + ds_testgrupdetl.getColumn(i, "tclsnm");
				sendtclscd  = sendtclscd  + "','" + ds_testgrupdetl.getColumn(i, "tclscd");
				sendtclscd2  = sendtclscd2  + "▦" + ds_testgrupdetl.getColumn(i, "tclscd");
			}
			ds_hidden_ref_tclscdlist.setColumn(0, "tclsnmlist", sendtclsnm);
			ds_hidden_ref_tclscdlist.setColumn(0, "tclscdlist", "'" + sendtclscd + "'");
			ds_hidden_ref_tclscdlist.setColumn(0, "tclscdlist2", sendtclscd2);
		}
	}
}

function fSetTestMdlcd()
{
	var etc = group1.cmb_mdlcd.value;
	var etc2 = ds_hidden_ref.getColumn(0, "workgroup");
	
	if(etc == "00") 
	{
		group1.cmb_workgroup.visible = "true"
		group1.ma_combo.visible = "false";
		group1.cmb_workgroup.enable = "false"
	}
	else if(etc == "MR")
	{
		group1.cmb_workgroup.visible = "true"
		group1.ma_combo.visible = "true";
		group1.cmb_workgroup.enable = "true";
		group1.cmb_workgroup.value = 00;
	}
	else if(etc == "MA")
	{
		group1.cmb_workgroup.visible = "false";
		group1.ma_combo.visible = "true"
		group1.cmb_workgroup.enable = "false";
		group1.ma_combo.enable = "true"
		group1.ma_combo.value = 00;
	}
	else
	{
		group1.cmb_workgroup.visible = "false";
		group1.ma_combo.visible = "false";
		group1.ma_combo.enabled = "false";
	}
	
	//ds_hidden_ref.setColumn(0, "workgroup", "00");
}

function fClickResultList()
{
	var row = ds_MicroRsltList.rowposition;
	var objArg = new Object();
	objArg.arg_ds_hidden_ref = ds_MicroRsltList;
	frmf_modal("SPLMP90200", "SPLMP90200", objArg, "", "", "", "", "", "", "", "", "", "M");
		
}
			
function group1_cmb_testitem_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSelectTestGrup();
}

function group1_cmb_mdlcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSetTestMdlcd();
}

//조회
function group1_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetResultListRef();
}

function group1_iptSearch_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetResultListRef();
	}
}

function group1_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	var testgrup = ds_hidden_ref_tclscdlist.setColumn(0, "testgrup");

	var objArg = new Object();
		objArg.testGrup = ds_hidden_ref_tclscdlist;
	frmf_modal("SMLLF90400","SMLLF90400",objArg, "", "", "", "", "", "", "", "", "", "M");
	
	ds_hidden_ref.setColumn(0, "tclscdlist", ds_hidden_ref_tclscdlist.getColumn(0, "tclscdlist"));
}

function group1_combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	if(group1.combo2.value == 1)
	{
		group1.output1.visible = "true";
	}
	else
	{
		group1.output1.visible = "true";
	}
}

//그리드더블클릭
function grd_MicroRsltList_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fClickResultList();
}

function group1_ma_combo_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	
}
]]></Script>
  </Form>
</FDL>