YNU_JEUS/app_home/himed/xpapps/lis/rsltmngtxp/xp/SMLLR91100_현장검사결과등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLR91100" position="absolute 0 0 783 724" titletext="현장검사결과등록" oninit="SMLLR91100_oninit" onload="SMLLR91100_onload">
    <Layouts>
      <Layout>
        <Static id="caption2" text="현장검사결과등록" class="tit_2" position="absolute 1 1 127 17"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 70 780 76" style="strokepen:3 solid #33bbbbff;"/>
        <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 0 17 775 23" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="caption5" text="환자명" class="cell_1" position="absolute 0 -140 72 -117"/>
        <Edit id="patnm" taborder="1" readonly="true" position="absolute 350 23 485 42" autoselect="true" class="output"/>
        <Shape id="line3" linetype="horizontal" class="line_2" position="absolute 0 41 775 47"/>
        <Static id="caption3" text="검 사 자" class="cell_1" position="absolute 490 21 562 44"/>
        <Static id="caption4" text="등 록 번 호" class="cell_1" position="absolute 0 21 72 44" style="padding:0 0 0 5;"/>
        <Static id="caption9" text="환 자 명" class="cell_1" position="absolute 275 21 347 44"/>
        <Edit id="ipt_userid" taborder="3" position="absolute 565 23 635 42" autoselect="true" onkeydown="ipt_userid_onkeydown"/>
        <Edit id="output1" taborder="4" readonly="true" position="absolute 638 23 713 42" autoselect="true" class="output"/>
        <Button id="button23" taborder="5" text="저장" class="btn3" position="absolute 719 21 775 43" onclick="button23_onclick"/>
        <Grid id="grd_TestInfoCnts" class="datagrid2" taborder="6" binddataset="ds_grd_TestInfoCnts" useinputpanel="false" position="absolute 0 74 780 385" cellsizingtype="col" oncellclick="grd_TestInfoCnts_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="45"/>
                <Column size="25"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="200"/>
                <Column size="65"/>
                <Column size="55"/>
                <Column size="90"/>
                <Column size="85"/>
                <Column size="40"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="바코드^바코드^바코드^바코드번호^bcno^처방일자^검사명^검사결과^단위^검체명^참고치^수납^처방구분^execdeptcd^tclscd^testlrgkind^execdd"/>
                <Cell col="1" colspan="2" text="바코드" taborder="undefined"/>
                <Cell col="3" text="바코드번호"/>
                <Cell col="4"/>
                <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"/>
                <Cell col="13"/>
                <Cell col="14"/>
                <Cell col="15"/>
                <Cell col="16"/>
                <Cell col="17"/>
                <Cell col="18"/>
                <Cell col="19"/>
                <Cell col="20"/>
                <Cell col="21"/>
                <Cell col="22"/>
                <Cell col="23"/>
                <Cell col="24"/>
              </Band>
              <Band id="body">
                <Cell displaytype="none" edittype="none" text="bind:bcgbn"/>
                <Cell col="1" displaytype="normal" edittype="none" style="background:EXPR(utlf_isNull(selchk) ? '' : (selchk == '1' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (selchk == '0' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (selchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));background2:EXPR(utlf_isNull(selchk) ? '' : (selchk == '1' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (selchk == '0' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (selchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));selectbackground:EXPR(utlf_isNull(selchk) ? '' : (selchk == '1' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (selchk == '0' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (selchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));" text="bind:bcbtn"/>
                <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:choi" expr="expr:(choi==&quot;true&quot;||choi==1)?1:0"/>
                <Cell col="3" text="bind:bcno2"/>
                <Cell col="4" text="bind:bcno"/>
                <Cell col="5" displaytype="date" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                <Cell col="6" style="align:left middle;" text="bind:tclsscrnnm"/>
                <Cell col="7" displaytype="text" edittype="text" text="bind:reptrslt"/>
                <Cell col="8" text="bind:rsltunit"/>
                <Cell col="9" text="bind:spcnm"/>
                <Cell col="10" text="bind:ref"/>
                <Cell col="11" text="bind:rcptyn"/>
                <Cell col="12" text="bind:prcpgenrflagnm"/>
                <Cell col="13" text="bind:execdeptcd"/>
                <Cell col="14" text="bind:testcd"/>
                <Cell col="15" text="bind:tclscd"/>
                <Cell col="16" text="bind:testlrgkind"/>
                <Cell col="17" text="bind:spccd"/>
                <Cell col="18" text="bind:prcpgenrflag"/>
                <Cell col="19" text="bind:prcpno"/>
                <Cell col="20" text="bind:prcphopedd"/>
                <Cell col="21" text="bind:execprcpuniqno"/>
                <Cell col="22" text="bind:prcpdd2"/>
                <Cell col="23" text="bind:rcptstatcd"/>
                <Cell col="24" text="bind:execdd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption6" text="조 회 구 간" class="cell_1" position="absolute 0 391 72 414" style="padding:0 0 0 5;"/>
        <Static id="caption7" text="~" position="absolute 192 393 207 413"/>
        <Shape id="line4" linetype="horizontal" class="line_1" position="absolute 0 416 780 422" style="strokepen:3 solid #33bbbbff;"/>
        <Button id="button1" taborder="7" text="조회" class="btn3" position="absolute 666 392 722 414" onclick="button1_onclick"/>
        <Button id="button2" taborder="8" text="수정" class="btn3" position="absolute 724 392 780 414" onclick="button2_onclick"/>
        <Grid id="poctgrid" class="datagrid2" taborder="9" binddataset="ds_poctgrid" useinputpanel="false" position="absolute 0 420 780 700" oncellclick="poctgrid_oncellclick" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="50"/>
                <Column size="25"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="170"/>
                <Column size="65"/>
                <Column size="50"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="125"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="바코드^바코드^바코드^바코드번호^bcno^검사명^검사결과^단위^검체명^참고치^결과일시^검사자"/>
                <Cell col="1" colspan="2" text="바코드" taborder="undefined"/>
                <Cell col="3" text="바코드번호"/>
                <Cell col="4"/>
                <Cell col="5" text="검사명"/>
                <Cell col="6" text="검사결과"/>
                <Cell col="7" text="단위"/>
                <Cell col="8" text="검체명"/>
                <Cell col="9" text="참고치"/>
                <Cell col="10" displaytype="normal" edittype="none" text="결과일시"/>
                <Cell col="11" text="검사자"/>
                <Cell col="12"/>
                <Cell col="13"/>
                <Cell col="14"/>
                <Cell col="15"/>
              </Band>
              <Band id="body">
                <Cell displaytype="none" edittype="none" text="bind:bcgbn"/>
                <Cell col="1" displaytype="normal" edittype="none" style="background:EXPR(utlf_isNull(bcchk) ? '' : (bcchk == 'true' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (bcchk == 'false' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (bcchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));background2:EXPR(utlf_isNull(bcchk) ? '' : (bcchk == 'true' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (bcchk == 'false' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (bcchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));selectbackground:EXPR(utlf_isNull(bcchk) ? '' : (bcchk == 'true' ? &quot;URL('IMG::lis/chkBC1.png') center middle&quot; : (bcchk == 'false' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : (bcchk == '-' ? &quot;URL('IMG::lis/chkBC0.png') center middle&quot; : ''))));" text="bind:bcbtn"/>
                <Cell col="2" displaytype="checkbox" edittype="checkbox" text="bind:choi" expr="expr:(choi==&quot;true&quot;||choi==1)?1:0"/>
                <Cell col="3" text="bind:bcno2"/>
                <Cell col="4" text="bind:bcno"/>
                <Cell col="5" style="align:left middle;" text="bind:tclsscrnnm"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:reptrslt"/>
                <Cell col="7" text="bind:rsltunit"/>
                <Cell col="8" text="bind:spcnm"/>
                <Cell col="9" text="bind:refh"/>
                <Cell col="10" displaytype="date" edittype="date" text="bind:lastreptdt" mask="yyyy-MM-dd HH:mm:ss" calendardisplaynulltype="nulltext"/>
                <Cell col="11" text="bind:lastupdtrid"/>
                <Cell col="12" text="bind:testcd"/>
                <Cell col="13" text="bind:spccd"/>
                <Cell col="14" text="bind:rsltseq"/>
                <Cell col="15" text="bind:testlrgkind"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Calendar id="ipt_usdt" taborder="10" class="input_s_essential" position="absolute 77 393 184 412" autoselect="true" autoskip="true"/>
        <Calendar id="ipt_uedt" taborder="11" class="input_s_essential" position="absolute 211 393 318 412" autoselect="true"/>
        <Edit id="iptSearch" taborder="12" class="input_button" position="absolute 75 23 216 42" onkeyup="iptSearch_onkeyup" autoselect="true"/>
        <Static id="caption1" text="처 방 구 분" class="cell_1" position="absolute 1 47 73 67" style="padding:0 0 0 5;"/>
        <Radio id="rad_prcpgenrflag" taborder="13" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 76 49 181 69" onitemchanged="rad_prcpgenrflag_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>
        </Radio>
        <Edit id="ipt_3" taborder="14" visible="false" position="absolute 326 49 426 68" autoselect="true"/>
        <Static id="caption8" text="바코드번호" class="cell_1" visible="false" position="absolute 251 49 323 72"/>
        <Static id="caption10" text="수납:V는 VIP 대상자임" position="absolute 627 50 772 65" style="color:#ff0000ff;font:Dotum,9,bold;"/>
        <Button id="button9" taborder="15" text="닫기" class="btn4" position="absolute 724 701 780 723"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_TestInfoCnts" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_TestInfoCnts_oncolumnchanged">
        <ColumnInfo>
          <Column id="selchk" type="STRING" size="256" sumtext="검체구분"/>
          <Column id="choi" type="STRING" size="256" sumtext="검사항목구분"/>
          <Column id="bcno" type="STRING" size="256" sumtext="검체번호"/>
          <Column id="tclscd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="tclsscrnnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="reptrslt" type="STRING" size="256" sumtext="보고결과"/>
          <Column id="rsltunit" type="STRING" size="256" sumtext="단휘"/>
          <Column id="testlrgkind" type="STRING" size="256" sumtext="대분류유형"/>
          <Column id="execdeptcd" type="STRING" size="256" sumtext="시행부서"/>
          <Column id="ref" type="STRING" size="256" sumtext="참고치"/>
          <Column id="rcptyn" type="STRING" size="256" sumtext="수납여부"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="spccd" type="STRING" size="256" sumtext="검체코드"/>
          <Column id="bcno2" type="STRING" size="256" sumtext="검체번호"/>
          <Column id="diffcntyn" type="STRING" size="256" sumtext="diff여부"/>
          <Column id="tclskind" type="STRING" size="256" sumtext="검사분류"/>
          <Column id="testcd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방구분"/>
          <Column id="prcpgenrflagnm" type="STRING" size="256" sumtext="처방구분"/>
          <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
          <Column id="prcphopedd" type="STRING" size="256" sumtext="처방희망일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방유일키"/>
          <Column id="prcpdd2" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="rcptstatcd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="execdd" type="STRING" size="256" sumtext="엑팅일자"/>
          <Column id="bcgbn" type="STRING" size="256"/>
          <Column id="prcphopedt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_poctgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bcgbn" type="STRING"/>
          <Column id="bcbtn" type="STRING"/>
          <Column id="choi" type="STRING"/>
          <Column id="bcno2" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="tclsnm" type="STRING"/>
          <Column id="reptrslt" type="STRING"/>
          <Column id="ref" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="refval" type="STRING"/>
          <Column id="reptdd" type="STRING"/>
          <Column id="reptnm" type="STRING"/>
          <Column id="testcd" type="STRING"/>
          <Column id="spccd" type="STRING"/>
          <Column id="rsltseq" type="STRING"/>
          <Column id="testlrgkind" type="STRING"/>
        </ColumnInfo>
      </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="pid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="sdd" type="STRING" size="256"/>
          <Column id="edd" type="STRING" size="256"/>
          <Column id="pidstr" type="STRING" size="256"/>
          <Column id="prcpgenrflag" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_getJaeWonTrue" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="jaewonyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" 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="prcpgenrflag" type="STRING" size="256"/>
          <Column id="sdd" type="STRING" size="256"/>
          <Column id="edd" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="data1" type="STRING" size="256"/>
          <Column id="data2" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pname" type="STRING" size="256" sumtext="환자명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_getUsernm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING" size="256" sumtext="검사자명"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="iptSearch" propid="value" datasetid="ds_hidden_ref" columnid="pid"/>
      <BindItem id="item2" compid="ipt_userid" propid="value" datasetid="ds_hidden_ref" columnid="userid"/>
      <BindItem id="item3" compid="rad_prcpgenrflag" propid="value" datasetid="ds_hidden_ref" columnid="prcpgenrflag"/>
      <BindItem id="item4" compid="ipt_3" propid="value" datasetid="ds_hidden_ref" columnid="bcno"/>
      <BindItem id="item5" compid="patnm" propid="value" datasetid="ds_patlist" columnid="pname"/>
      <BindItem id="item6" compid="ipt_usdt" propid="value" datasetid="ds_hidden_ref" columnid="sdd"/>
      <BindItem id="item7" compid="ipt_uedt" propid="value" datasetid="ds_hidden_ref" columnid="edd"/>
      <BindItem id="item8" compid="output1" propid="value" datasetid="ds_getUsernm" columnid="usernm"/>
    </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::LZZ002.xjs";


function SMLLR91100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLLR91100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_TestInfoCnts);
	grdf_initGrid(poctgrid);
	//grdf_setRowTypeIcon(grd_TestInfoCnts, 0);
	fOpenList();
}

function fOpenList()
{	
	var toDay =  utlf_getCurrentDate();
	ds_hidden_ref.setColumn(0, "sdd", toDay);
	ds_hidden_ref.setColumn(0, "edd", toDay);
	ds_hidden_ref.setColumn(0, "userid", sysf_getUserId());
	ds_hidden_ref.setColumn(0, "pid", appf_getPatientInfo("pid"));
		
	dsf_makeValue(ds_send, "pid", "string", ds_hidden_ref.getColumn(0, "pid"));
	
	
	//입원 환자 여부 조회
	var oParam = {};
		oParam.id          = "TRLLR91103";
		oParam.service     = "bcollmngtapp.BCollMngt";
		oParam.method      = "reqGetJaeWonTrue";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_getJaeWonTrue=jaewon";
		oParam.async       = false;
	tranf_submit(oParam);
	ds_getJaeWonTrue.updateColID("jaewon", "jaewonyn");
		
	var jaewonyn = ds_getJaeWonTrue.getColumn(0, "jaewonyn");

	if(jaewonyn == "Y")
	{
		ds_hidden_ref.setColumn(0, "prcpgenrflag", "2");
	}
	else
	{
		ds_hidden_ref.setColumn(0, "prcpgenrflag", "1");
	}
	
	dsf_makeValue(ds_send, "prcpgenrflag", "string", ds_hidden_ref.getColumn(0, "prcpgenrflag"));
	ds_hidden_ref.setColumn(0, "pidstr", ds_hidden_ref.getColumn(0, "pid"));
	
	var oParam = {};
		oParam.id          = "TRLLR91101";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqGetPoctTestList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_TestInfoCnts=testlist ds_patlist=patlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLR91101";
	tranf_submit(oParam);
	//return true;
	fRemark(1);
	freprint();
	
	iptSearch.setFocus();
}

function fRemark(flag)
{					
	var sunab = false;
	var sunabcnts = "";
	var returnvalue = "";
	
	if(flag == 1)
	{
		for(iRow = 0; iRow < ds_grd_TestInfoCnts.rowcount; iRow++)
		{
			//바코드 이미지 넣기 expr로 구현
// 			if(ds_grd_TestInfoCnts.getColumn(iRow,"choi")=="true")
// 			{
// 				returnvalue = "#c0c0c0";
// 			} else {
// 				returnvalue = "#EEFFFF";
// 			}
			if(ds_grd_TestInfoCnts.getColumn(iRow,"tclscd") == ds_grd_TestInfoCnts.getColumn(iRow,"testcd"))
			{
// 				trace("같다");
// 				trace(ds_grd_TestInfoCnts.getColumn(iRow,"prcpgenrflag"));
// 				trace(ds_grd_TestInfoCnts.getColumn(iRow,"rcptstatcd"));
				if((ds_grd_TestInfoCnts.getColumn(iRow,"prcpgenrflag")=="O" && ds_grd_TestInfoCnts.getColumn(iRow,"rcptstatcd") != "230") ||
					(ds_grd_TestInfoCnts.getColumn(iRow,"prcpgenrflag") == "D" && ds_grd_TestInfoCnts.getColumn(iRow,"rcptstatcd")!= "230") ||
					(ds_grd_TestInfoCnts.getColumn(iRow,"prcpgenrflag") == "S" && ds_grd_TestInfoCnts.getColumn(iRow,"rcptstatcd") != "230"))
				{
					
					if(ds_grd_TestInfoCnts.getColumn(iRow,"rcptyn") == "V" )
					{
						sunab = false;
					}							  									
					else 	
					{	
						sunab = true;								
					}		
					sunabcnts = sunabcnts +" "+ds_grd_TestInfoCnts.getColumn(iRow,"tclsscrnnm")+",";
					trace("sunabcnts="+sunabcnts);
					trace("sunab2222="+sunab);
				}
			}
			trace("sunab="+sunab);
		}
		if(sunab)
			{
				sunabcnts = utlf_transNullToEmpty(sunabcnts).substring(0, sunabcnts.length -1);
				sysf_messageBox(sunabcnts + " 항목은 수납되지 않았습니다. ","I");
			}
	} 
}

function freprint()
{
	ds_send.clearData();
	dsf_makeValue(ds_send, "pid", "string", ds_hidden_ref.getColumn(0, "pid"));
	dsf_makeValue(ds_send, "sdd", "string", ds_hidden_ref.getColumn(0, "sdd"));
	dsf_makeValue(ds_send, "edd", "string", ds_hidden_ref.getColumn(0, "edd"));
	
	ds_poctgrid.clearData();
	var oParam = {};
		oParam.id          = "TRLLR91102";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqGetPoctList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_poctgrid=getPoctList";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLLR91102";
	tranf_submit(oParam);
	fRemark(2);	
	
}
function iptSearch_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fpidset();
       iptSearch.setSelect(0,10);		
	}
	//iptSearch.setSelect(0,10);
	
}

function fpidset()
{
	var inputval = iptSearch.text;
	ds_hidden_ref.setColumn(0, "pid", inputval);
	
	if( !utlf_isNull(ds_hidden_ref.getColumn(0, "bcno")))
	{	
	}
	var inputval = iptSearch.text;
	ds_hidden_ref.setColumn(0, "pid", inputval);
	
	if( !utlf_isNull(ds_hidden_ref.getColumn(0, "pid")))
	{	
		ds_hidden_ref.setColumn(0, "pidstr", inputval);
		ds_send.setColumn(0, "pid", inputval);
		
		//입원 환자 여부 조회
		var oParam = {};
			oParam.id          = "TRLLR91103";
			oParam.service     = "bcollmngtapp.BCollMngt";
			oParam.method      = "reqGetJaeWonTrue";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_getJaeWonTrue=jaewon";
			oParam.async       = false;
		tranf_submit(oParam);
		ds_getJaeWonTrue.updateColID("jaewon", "jaewonyn");
		
		var jaewonyn = ds_getJaeWonTrue.getColumn(0, "jaewonyn");
		
		if(jaewonyn == "Y")
		{
			ds_hidden_ref.setColumn(0, "prcpgenrflag", "2");
		}
		else
		{
			ds_hidden_ref.setColumn(0, "prcpgenrflag", "1");
		}
		
		ds_send.setColumn(0, "prcpgenrflag", ds_hidden_ref.getColumn(0, "prcpgenrflag"));
		
		ds_grd_TestInfoCnts.clearData();
		ds_poctgrid.clearData();
		var oParam = {};
			oParam.id          = "TRLLR91101";
			oParam.service     = "rsltmngtapp.RsltMngt";
			oParam.method      = "reqGetPoctTestList";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_grd_TestInfoCnts=testlist ds_patlist=patlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLLR91101";
		tranf_submit(oParam);
		
		fRemark(1);
		freprint();	
		iptSearch.setFocus();
	}
}



function fUserNMRef()
{								
	var inputval = ipt_userid.text;
	ds_hidden_ref.setColumn(0, "userid", inputval);
	
	if(!utlf_isNull(ds_hidden_ref.getColumn(0, "userid")))
	{					
		//model.makeValue("/root/send/userid" , model.getvalue("/root/hidden/ref/userid"));	
		ds_send.setColumn(0, "userid", ds_hidden_ref.getColumn(0, "userid"));
		//submit("TRLZZ00104");					
		var oParam = {};
			oParam.id          = "TRLZZ00104";
			oParam.service     = "diagtestapplib.LisCommon";
			oParam.method      = "reqGetUserNM";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_getUsernm=usernm";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLZZ00104";
		tranf_submit(oParam);
	}					
}

//조회
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	freprint();
}

function poctgrid_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var nCol = poctgrid.currentcol;
	
	if(nCol == 1 || nCol == poctgrid.getBindCellIndex("Body","choi"))
	{
		//그리드에서 row선택시
		//lf_setGridChoi(0);
		fSetGridChoi(0);
	}
}

//그리드에서 row  선택시 
function fSetGridChoi(flag)
{	
	if (flag == 0)
	{
		var nRow = ds_poctgrid.rowposition;
		var nCol = poctgrid.currentcol;

		if ( nCol == 1 )  //selchk
		{
			if(ds_poctgrid.getColumn(nRow,"bcchk") == "true")	 // 체크 되어 있는거 풀렸을때 true->1
			{
				ds_poctgrid.setColumn(nRow,"bcchk","false"); 
				ds_poctgrid.setColumn(nRow,"choi","false");
				
				if(nRow+1 <= ds_poctgrid.rowcount-1)
				{
					for(iRow = nRow + 1 ; ; iRow ++)
					{
						if( ds_poctgrid.getColumn(iRow,"bcchk")== "true" || ds_poctgrid.getColumn(iRow,"bcchk")== "false" ||iRow > ds_poctgrid.rowcount-1)
						{
							break;
						}
						ds_poctgrid.setColumn(iRow,"choi","false");								
					}
				}
			}
			else if(ds_poctgrid.getColumn(nRow,"bcchk") == "false")	  // 선택 안돼있다가 체크했을때
			{
				ds_poctgrid.setColumn(nRow, "bcchk", "true");
				ds_poctgrid.setColumn(nRow, "choi", "true");

				if(nRow+1 <= ds_poctgrid.rowcount-1)
				{
					for(iRow = nRow + 1 ; ; iRow ++ )
					{
						if( ds_poctgrid.getColumn(iRow,"bcchk")== "true" || ds_poctgrid.getColumn(iRow,"bcchk")== "false" ||iRow > ds_poctgrid.rowcount-1)
						{
							break;
						}
						ds_grid_poctgrid.setColumn(iRow,"choi","true");
					}
				}			
			}
		} 
	}
	else
	{
		var row = ds_grd_TestInfoCnts.rowposition;
		var col = grd_TestInfoCnts.currentcol;
		if(col == 1)
		{
			if(ds_grd_TestInfoCnts.getColumn(row, "selchk") == "1")
			{
				ds_grd_TestInfoCnts.setColumn(row, "selchk", "0");
				ds_grd_TestInfoCnts.setColumn(row, "choi", "false");
				
				if(row + 1 <= ds_grd_TestInfoCnts.rowcount-1)
				{
					for(iRow = row + 1 ; ; iRow ++ )
					{
						if(ds_grd_TestInfoCnts.getColumn(iRow,"selchk") == "1" || 
						 ds_grd_TestInfoCnts.getColumn(iRow,"selchk") == "0" || 
						 iRow > ds_grd_TestInfoCnts.rowcount- 1){
							break;
						}

						ds_grd_TestInfoCnts.setColumn(iRow,"choi" , "false");	
							
					}
				}
			}	
			else if(ds_grd_TestInfoCnts.getColumn(row,"selchk") == "0")
			{
				ds_grd_TestInfoCnts.setColumn(row, "selchk", "1");
				ds_grd_TestInfoCnts.setColumn(row, "choi", "true");
				
				if(row + 1 <= ds_grd_TestInfoCnts.rowcount-1)
				{
					for(iRow = row + 1 ; ; iRow ++)
					{
						if(ds_grd_TestInfoCnts.getColumn(iRow,"selchk") == "1" 
						  || ds_grd_TestInfoCnts.getColumn(iRow,"selchk") == "0" 
							 || iRow > ds_grd_TestInfoCnts.rowcount-1)
						 {
							break;
						}
						ds_grd_TestInfoCnts.setColumn(iRow, "choi", "true");
					}
				}
			}
		}																	
	}
}

//수정
function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fReExeSave();
}

//수정
function fReExeSave()
{
	var chk = false;
	
	for(i=0; i<ds_poctgrid.rowcount; i++)
	{
		if(ds_poctgrid.getColumn(i,"choi")=="1")
		{
			if(ds_poctgrid.getColumn(i,"testcd") == "LOS101")
			{
				ds_poctgrid.setColumn(i,"choi","0");
				chk = true;
			}
		}
		else
		{
			if(ds_poctgrid.getColumn(i,"testcd")== "LOS101")
			{
				ds_poctgrid.setColumn(i,"choi","0");
			}
		}
	}
	
	if(chk){
		sysf_messageBox("Glucose(Strip)(POCT) 검사는 조회만 가능 합니다.","I");
	}
	
	if(ds_poctgrid.rowcount <= 0)
	{
		return;
	}
		 
	var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "userid", val: ipt_userid.value}]);
	
	var oParam = {};
		oParam.id          = "TXLLR91102";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqReExeSave";
		oParam.inds        = "cond=ds_poctgrid:U user=ds_temp_search";
		oParam.async       = false;
		//oParam.callback    = "cf_TXLLR91102";
	tranf_submit(oParam);
			
	freprint();	
}

function grd_TestInfoCnts_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var nCol = grd_TestInfoCnts.currentcol;
	
	if(nCol == 1 || nCol == grd_TestInfoCnts.getBindCellIndex("Body","choi"))
	{
		//그리드에서 row선택시
		fSetGridChoi(1);
	}
}

function button23_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeSave();
}

function fExeSave()
{

	var jaewonyn = ds_getJaeWonTrue.getColumn(0, "jaewonyn");
 	var prcpgenrflag = ds_hidden_ref.getColumn(0, "prcpgenrflag");
	var execddyncnt = 0;
	var	count = 0;
	
	for(i = 0; i < ds_grd_TestInfoCnts.rowcount; i++)
	{
	
		var nRowType = ds_grd_TestInfoCnts.getRowType(i);
		trace("rowtype :" + nRowType);
		if(ds_grd_TestInfoCnts.getColumn(i,"choi")== "1" || ds_grd_TestInfoCnts.getColumn(i, "choi") == "true" || nRowType = "4")
		{
			//액팅이 된 처방인지 체크
			if(ds_grd_TestInfoCnts.getColumn(i,"execdd") != "00000000")
			{
				execddyncnt++;	
			}
		}
	}
	
	if(jaewonyn == "Y" && prcpgenrflag == "1")
	{	
		if(execddyncnt == 0)
		{
			sysf_messageBox("입원 환자는 외래처방의 채혈 및 접수가 불가능합니다.", "I");
			return;						
		}
	}
	else if(jaewonyn == "N" && prcpgenrflag == "2")
	{
		if(execddyncnt == 0)
		{
			sysf_messageBox("재원중인 환자만 입원처방의 채혈 및 접수가 가능합니다.", "I");
			return;
		}
	}				
	
	ds_grd_TestInfoCnts.updatecontrol = false;
	
	for(i = 0; i < ds_grd_TestInfoCnts.rowcount; i++)
	{
		var nRowType = ds_grd_TestInfoCnts.getRowType(i);
		trace("nRowType = " + nRowType);

		if(ds_grd_TestInfoCnts.getColumn(i, "choi")== "1" || ds_grd_TestInfoCnts.getColumn(i, "choi") == "true" && nRowType == "4" )
		{
			trace("dddd");
			++count;
			ds_grd_TestInfoCnts.setRowType(i,Dataset.ROWTYPE_UPDATE);
			ds_grd_TestInfoCnts.setColumn(i, "bcgbn", "true");
			ds_grd_TestInfoCnts.setColumn(i, "choi", "true");
			ds_grd_TestInfoCnts.setColumn(i, "prcphopedt", ds_grd_TestInfoCnts.getColumn(i, "prcphopedd"));
		}
		if(ds_grd_TestInfoCnts.getColumn(i, "choi")== "1" || ds_grd_TestInfoCnts.getColumn(i, "choi") == "true" && utlf_isNull(ds_grd_TestInfoCnts.getColumn(i, "reptrslt")))
		{
			sysf_messageBox("저장할 검사결과가 없습니다.");
			return;
		}
	}
	
	
	if(count < 1)
	{
		sysf_messageBox("저장할", "E013", "");
		return;
	}
	ds_grd_TestInfoCnts.updatecontrol = true;
	
	
	dsf_createDsRow("ds_userinfo", [{col : "userid", val : ds_hidden_ref.getColumn(0, "userid")}
	                               ,{col : "pid",    val : ds_hidden_ref.getColumn(0, "pid")}]);
	
	var up = grdf_getGridUpdateData(grd_TestInfoCnts, "update");
	//ds_grd_TestInfoCnts.updateColID
	
/*	trace(up.saveXML())*/
	
	var oParam = {};
		oParam.id          = "TXLLR91101";
		oParam.service     = "rsltmngtapp.RsltMngt";
		oParam.method      = "reqExecPoctTestList";
		oParam.inds        = "cond=ds_grd_TestInfoCnts:U user=ds_userinfo";
		oParam.transaction = false;
		oParam.async       = false;
		//oParam.callback    = "cf_TXLLR91101";
	tranf_submit(oParam);

	fOpenList();
}



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

//처방구분 변경
function rad_prcpgenrflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fprcpgenrflagset();	
}

function fprcpgenrflagset()
{
	var inputval = iptSearch.text;
	
	ds_hidden_ref.setColumn(0, "pid", inputval);
	
	if(!utlf_isNull(ds_hidden_ref.getColumn(0, "pid")))
	{	
		ds_hidden_ref.setColumn(0, "pidstr", inputval);

		ds_send.setColumn(0, "pid", inputval);
		
		if(utlf_isNull(ds_hidden_ref.getColumn(0, "prcpgenrflag")))
		{
			sysf_messageBox("처방구분을 선택해주세요.", "I");
			return;
		}
		
		ds_send.setColumn(0, "prcpgenrflag", ds_hidden_ref.getColumn(0, "prcpgenrflag"));

		var oParam = {};
			oParam.id          = "TRLLR91101";
			oParam.service     = "rsltmngtapp.RsltMngt";
			oParam.method      = "reqGetPoctTestList";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_grd_TestInfoCnts=testlist ds_patlist=patlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLLR91101";
		tranf_submit(oParam);
		
		fRemark(1);
		freprint();	
		iptSearch.setFocus();
	}
}			

]]></Script>
  </Form>
</FDL>