YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SMLLC00650_외래치과검체조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLC00650" position="absolute 0 0 1256 805" titletext="핵의학 검체 조회" onload="SMLLC00650_onload" oninit="SMLLC00650_oninit">
    <Layouts>
      <Layout>
        <Button position="absolute 1120 41 1188 63" id="btn_reset" class="btn4" text="초기화"/>
        <Static id="caption6" text="치과병원 이관  검체검사 내역 조회" class="tit_1" position="absolute 0 0 239 25"/>
        <Div id="group2" taborder="3" position="absolute 0 25 1194 69" class="div_SA">
          <Layouts>
            <Layout width="1194" height="70">
              <Static id="caption2" text="시행부서" class="search_name" position="absolute 368 17 442 34" anchor="default"/>
              <Static id="caption1" text="차트번호:" class="search_name" position="absolute 625 17 715 34" anchor="default"/>
              <Edit id="ipt_text" taborder="7" onkeydown="group3_group2_ipt_text_onkeydown" class="input_button" position="absolute 702 17 802 36" anchor="default"/>
              <Button id="button23" taborder="8" text="전송" onclick="group3_group2_button23_onclick" class="btn3" position="absolute 955 16 1017 38" anchor="default"/>
              <Combo id="cmb_TLrgCd" taborder="9" innerdataset="@ds_init_LB0111" codecolumn="cd" datacolumn="nm" class="combo_s_essential" position="absolute 445 17 599 36" anchor="default"/>
              <Combo id="cmd_TMdlCd" taborder="10" innerdataset="ds_init_cmd_TMdlCd" codecolumn="cd" datacolumn="nm" class="combo_s_essential" visible="false" position="absolute 890 17 925 36" anchor="default"/>
              <Combo id="cmb_spcflag" taborder="11" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" visible="false" position="absolute 885 17 940 36" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">00</Col>
                      <Col id="datacolumn">-전체-</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">취소</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">채혈</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3</Col>
                      <Col id="datacolumn">가접수</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">4</Col>
                      <Col id="datacolumn">접수</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 220 17 235 34" anchor="default"/>
              <Static id="caption4" text="조회기간 :" class="search_name" position="absolute 16 16 95 33" anchor="default"/>
              <Button id="btn_Ref" taborder="12" text="조회" onclick="group3_group2_btn_Ref_onclick" class="btn1" position="absolute 825 17 881 39" anchor="default"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1047 9 1053 42" anchor="default"/>
              <Calendar id="ipt_todd" taborder="13" class="input_s_essential" position="absolute 237 14 352 33" anchor="default"/>
              <Calendar id="ipt_fromdd" taborder="14" class="input_s_essential" position="absolute 93 14 208 33" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 0 93 1194 99" style="strokepen:3 solid #33bbbbff;"/>
        <Grid id="grd_nspclist" taborder="4" binddataset="ds_grd_nspclist" useinputpanel="false" position="absolute 0 97 1194 754" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="31"/>
                <Column size="60"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="75"/>
                <Column size="70"/>
                <Column size="65"/>
                <Column size="180"/>
                <Column size="70"/>
                <Column size="130"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="130"/>
                <Column size="0"/>
                <Column size="100"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <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="본원 결과상태"/>
                <Cell col="12" text="채취시각"/>
                <Cell col="13" text="채취자"/>
                <Cell col="14" text="결과일"/>
                <Cell col="15" text="병동"/>
                <Cell col="16" text="처방일"/>
                <Cell col="17" text="작업번호"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                <Cell col="2" text="bind:tsectnm"/>
                <Cell col="3" displaytype="text" edittype="text" text="bind:bcno"/>
                <Cell col="4" displaytype="combo" edittype="combo" style="align:center;" text="bind:rsltstat" combodataset="ds_init_pro" combocodecol="cd" combodatacol="nm" combodisplay="edit"/>
                <Cell col="5" style="align:left;" text="bind:orddeptnm"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:pid"/>
                <Cell col="7" text="bind:hngnm"/>
                <Cell col="8" text="bind:tclsnm"/>
                <Cell col="9" text="bind:tclscd"/>
                <Cell col="10" text="bind:spcnm"/>
                <Cell col="11" displaytype="combo" edittype="combo" style="align:center;" text="bind:spcstat" combodataset="ds_init_pro" combocodecol="cd" combodatacol="nm"/>
                <Cell col="12" text="bind:bcoll"/>
                <Cell col="13" text="bind:spcpseuacpt"/>
                <Cell col="14" text="bind:spcacpt"/>
                <Cell col="15" text="bind:spccncl"/>
                <Cell col="16" text="bind:prcpdd"/>
                <Cell col="17" text="bind:execprcpuniqno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel" taborder="5" text="엑셀저장" class="btn7" position="absolute 1055 41 1132 61"/>
        <Button id="btn_check" taborder="6" position="absolute 1024 43 1044 63" style="image:URL('..\..\..\IMAGES\lis\chkRPT0.png');"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cmd_TMdlCd" 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_TLrgCd" 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_grd_nspclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="tsectnm" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="rsltstat" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="spcstat" type="STRING"/>
          <Column id="bcoll" type="STRING"/>
          <Column id="spcpseuacpt" type="STRING"/>
          <Column id="spcacpt" type="STRING"/>
          <Column id="spccncl" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="execprcpuniqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_LB0102" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_LB0106" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_LB0104" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_LB0111" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_LB0000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_spcacpt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testmdlcd" type="STRING" size="256"/>
          <Column id="testlrgcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_radio1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">전체</Col>
            <Col id="value">00</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">건진</Col>
            <Col id="value">3</Col>
          </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="refflag" type="STRING" size="256"/>
          <Column id="reftext" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="spcflag" type="STRING" size="256"/>
          <Column id="genrflag" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="execdept" type="STRING" size="256"/>
          <Column id="sectcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="spcflag">00</Col>
            <Col id="genrflag">2</Col>
            <Col id="refflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_pro" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cd">-</Col>
            <Col id="nm"> </Col>
          </Row>
          <Row>
            <Col id="nm">최종보고</Col>
            <Col id="cd">4</Col>
          </Row>
          <Row>
            <Col id="nm">수정보고</Col>
            <Col id="cd">5</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_outerlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="tsectnm" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="rsltstat" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="tclscd" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="spcstat" type="STRING"/>
          <Column id="bcoll" type="STRING"/>
          <Column id="spcpseuacpt" type="STRING"/>
          <Column id="spcacpt" type="STRING"/>
          <Column id="spccncl" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="execprcpuniqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="group2.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item0" compid="group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item2" compid="group2.cmb_TLrgCd" propid="value" datasetid="ds_send" columnid="execdept"/>
      <BindItem id="item3" compid="group2.ipt_text" propid="value" datasetid="ds_send" columnid="refflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-11-25
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

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


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

function cf_TXLLR91201(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}


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

function cf_TRLLC00603(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}
function SMLLC00650_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_nspclist);
	
	group2.ipt_fromdd.value = utlf_getCurrentDate();
	group2.ipt_todd.value = utlf_getCurrentDate();
	
	ds_hidden_spcacpt.setColumn(0, "testlrgcd", '00');
	ds_hidden_spcacpt.setColumn(0, "testmdlcd", '00');

	
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col : "codeflag", val : "0102|0106|0104|0111|0000|"}]);
	//초기정보 조회
	var oParam = {};
    oParam.id          = "TRLZZ00101";
    oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
    oParam.method      = "reqGetInitCodeInfo";
    oParam.inds        = "cond=" + sInDsName;
    oParam.outds       = "ds_init_LB0102=0102 ds_init_LB0106=0106 ds_init_LB0104=0104 ds_init_LB0111=0111 ds_init_LB0000=0000";
    oParam.async       = false;
    oParam.callback    = "cf_TRLZZ00101";

	tranf_submit(oParam);	
    group2.cmb_TLrgCd.value = '00';
}

function SMLLC00650_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);

}

function group3_group2_btn_Ref_onclick(obj:Button,  e:ClickEventInfo)
{
  lf_GetNSpcList();
}

function lf_GetNSpcList() 
{

// 	model.setValue("/root/send/execdept", model.getValue("/root/hidden/spcacpt/testlrgcd"));										
// 	submit("TRLLC00604");
// 	<column id="refflag"                         desc="환자번호"          ref="refflag"/>
// 			<column id="spcflag"                          desc="검체상태"          ref="spcflag"/>			
// 			<column id="fromdd"                          desc="시작일자"          ref="fromdd"/>
// 			<column id="todd"                            desc="종료일자"          ref="todd"/>
//             <column id="genrflag"                        desc="입원외래상태"       ref="genrflag"/>
//             <column id="execdept"                        desc="시행부서"          ref="execdept"/>   
            	
	var oParam = {};
		oParam.id          = "TRLLC00604";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqGetLSpcdentList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_nspclist=nspclist";
		oParam.async       = false;
		oParam.callback    = "cf_TRLLC00604";

	tranf_submit(oParam);

	   // 진행상황 및  처방일 색깔 빨강색으로 둔다
// 	   if(grd_nspclist.rows > 0) {
// 		   for(iRow = 1; iRow < grd_nspclist.rows;iRow++)
// 		   {					   
// 			   if( model.getvalue("/root/main/spclist["+iRow+"]/rsltstat") == "4" || model.getvalue("/root/main/spclist["+iRow+"]/rsltstat") == "5" )
// 			   {
// 				 grd_nspclist.cellstyle("color", iRow, grd_nspclist.colRef("rsltstat")) = "#ff3300";
// 			   }
// 			   if( model.getvalue("/root/main/spclist["+iRow+"]/spcstat") == "5")
// 			   {
// 				 grd_nspclist.cellstyle("color", iRow, grd_nspclist.colRef("spcstat")) = "#ff3300";
// 			   }							   
// 		   }
// 		}						
}
function group3_group2_button23_onclick(obj:Button,  e:ClickEventInfo)
{
	
// 	for(i = 1 ; i < grd_nspclist.rows ; i ++){
// 		grd_nspclist.rowStatus(i) = 0;
// 		if(model.getValue("/root/main/spclist["+i+"]/choi") == "true"){
// 			grd_nspclist.rowStatus(i) = 2;
// 		}
// 	}
// 	model.setValue("/root/send/data1",  grd_nspclist.getUpdateData());
// 	submit("TXLLR91201");	
	
	ds_send_outerlist.clearData();
	ds_send_outerlist.updatecontrol = false;
	//체크된것만 send 데이터셋으로 보내기
	for(var i=0; i<ds_grd_nspclist.rowcount; i++){
		if(ds_grd_nspclist.getColumn(i,"choi")=="1"){
			var aRow = ds_send_outerlist.addRow();
			ds_send_outerlist.copyRow(aRow,ds_grd_nspclist,i);
			ds_send_outerlist.setRowType(i,Dataset.ROWTYPE_INSERT);
		}
	}
	ds_send_outerlist.updatecontrol = true;
//	return;
 	var oParam = {};
 		oParam.id          = "TXLLR91201";
 		oParam.service     = "rsltmngtapp.RsltMngt";
 		oParam.method      = "reqExecDentMigTestList";
 		oParam.inds        = "cond=ds_send_outerlist";
 		oParam.transaction = false;
 		oParam.async       = false;
 		oParam.callback    = "cf_TXLLR91201";
 
 	tranf_submit(oParam);

		
}

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