YNU_JEUS/app_home/himed/xpapps/lis/donmngtxp/xp/SMLBD01300_공여자처방입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLBD01300" position="absolute 0 0 1195 805" titletext="공여자처방입력" oninit="SMLBD01300_oninit" onload="SMLBD01300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 25" id="group3">
          <Layouts>
            <Layout>
              <Static text="공여자처방입력" position="absolute 0 0 223 25" id="caption7" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 65 1195 789" id="group2" scrollbars="none">
          <Layouts>
            <Layout>
              <Button position="absolute 259 32 275 48" id="button5" class="icon_search" text="" anchor="default" onclick="group2_button5_onclick"/>
              <Static text="처방코드목록" position="absolute 347 87 457 103" id="caption26" class="tit_2" anchor="default"/>
              <Static text="환자정보" position="absolute 3 7 103 24" align="align:center middle;" id="caption36" class="tit_2" anchor="default"/>
              <Shape position="absolute 345 103 655 109" linetype="horizontal" id="line17" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Shape position="absolute 0 103 340 109" linetype="horizontal" id="line1" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Shape position="absolute 0 49 1194 55" linetype="vertical" id="line8" class="line_2" anchor="default"/>
              <Static text="공여자목록" position="absolute 2 86 113 101" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 25 1194 29" linetype="horizontal" id="line6" class="line_3" anchor="default" style="border:2 solid #808080ff ;"/>
              <Static text="환자명" position="absolute 0 54 120 77" align="align:center middle;" id="caption43" class="cell_1" anchor="default"/>
              <Static text="성별/나이" position="absolute 532 54 632 77" align="align:center middle;" id="caption46" class="cell_1" anchor="default"/>
              <Static text="주민등록번호" position="absolute 256 54 376 77" align="align:center middle;" id="caption47" class="cell_1" anchor="default"/>
              <Static text="혈액형" position="absolute 738 54 838 77" align="align:center middle;" id="caption48" class="cell_1" anchor="default"/>
              <Shape position="absolute 660 103 1194 109" linetype="horizontal" id="line2" class="line_1" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
              <Static text="처방내역" position="absolute 661 87 761 103" id="caption5" class="tit_2" anchor="default"/>
              <Button position="absolute 930 81 1005 100" id="btn_addrow" class="btn2" text="바코드발행" anchor="default" onclick="group2_btn_addrow_onclick"/>
              <Static text="등록번호" position="absolute 0 30 120 53" align="align:center middle;" id="caption39" class="cell_1" anchor="default"/>
              <Edit readonly="true" position="absolute 123 55 253 74" id="output1" anchor="default"/>
              <MaskEdit readonly="true" position="absolute 379 55 529 74" id="output2" mask="999999-9999999" anchor="default"/>
              <Edit readonly="true" position="absolute 635 55 735 74" id="output3" anchor="default"/>
              <Edit readonly="true" position="absolute 841 55 961 74" id="output4" anchor="default"/>
              <Button position="absolute 1008 81 1094 100" id="button2" class="btn2" text="바코드재발행" anchor="default" onclick="group2_button2_onclick"/>
              <Button position="absolute 1097 81 1194 100" id="button3" class="btn2" text="바코드발행취소" anchor="default" onclick="group2_button3_onclick"/>
              <Edit position="absolute 123 31 253 50" id="ipt_pid" class="input_s_button" anchor="default" onkeydown="group2_ipt_pid_onkeydown" autoselect="true"/>
              <Grid position="absolute 0 107 340 715" id="grd_dnorlist" binddataset="ds_grd_dnorlist" anchor="default" oncellclick="group2_grd_dnorlist_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="140"/>
                      <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="주민등록번호"/>
                      <Cell col="3" text="공여자sexage"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:dnorno"/>
                      <Cell col="1" text="bind:dnornm"/>
                      <Cell col="2" text="bind:dnorrgstno"/>
                      <Cell col="3"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 345 107 655 716" id="grd_prcpcdlist" binddataset="ds_grd_prcpcdlist" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="29"/>
                      <Column size="40"/>
                      <Column size="80"/>
                      <Column size="147"/>
                      <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="검체코드"/>
                    </Band>
                    <Band id="body">
                      <Cell text="expr:currow + 1"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                      <Cell col="2" text="bind:tclscd"/>
                      <Cell col="3" style="align:left middle;" text="bind:tclsnm"/>
                      <Cell col="4" text="bind:spccd"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 660 107 1194 715" id="grd_dnorprcplist" binddataset="ds_grd_dnorprcplist" anchor="default" oncellclick="group2_grd_dnorprcplist_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="35"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="140"/>
                      <Column size="106"/>
                      <Column size="70"/>
                      <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/>
                      <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="caption1"/>
                      <Cell col="9"/>
                      <Cell col="10"/>
                      <Cell col="11"/>
                      <Cell col="12"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                      <Cell col="1" text="bind:prcpdd" mask="@@@@-@@-@@"/>
                      <Cell col="2" text="bind:tclscd"/>
                      <Cell col="3" text="bind:tclsnm"/>
                      <Cell col="4" text="bind:bcolldt" mask="@@@@-@@-@@ @@:@@"/>
                      <Cell col="5" text="bind:bcnoyn"/>
                      <Cell col="6" text="bind:dsexage"/>
                      <Cell col="7" text="bind:dnornm"/>
                      <Cell col="8" text="bind:bcno2"/>
                      <Cell col="9" text="bind:spccd"/>
                      <Cell col="10" text="bind:pid"/>
                      <Cell col="11" text="bind:prcpgenrflag"/>
                      <Cell col="12" text="bind:payyn"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Edit readonly="true" position="absolute 1040 55 1194 74" id="output5" anchor="default"/>
              <Static text="입원/외래" position="absolute 965 54 1035 77" align="align:center middle;" id="caption2" class="cell_1" anchor="default"/>
              <Shape position="absolute 0 77 1194 83" linetype="horizontal" id="line9" class="line_3" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 30 1195 57" id="group5" scrollbars="none">
          <Layouts>
            <Layout>
              <Button position="absolute 958 3 1038 25" id="btn_prt" class="btn4" text="처방저장" anchor="default" onclick="group5_btn_prt_onclick"/>
              <Button position="absolute 1124 3 1192 25" id="btn_cle" class="btn4" text="초기화" anchor="default" onclick="group5_btn_cle_onclick"/>
              <Shape position="absolute 0 24 1195 30" linetype="horizontal" id="line35" class="line_6" anchor="default"/>
              <Button position="absolute 1041 3 1121 25" id="button1" class="btn4" text="처방취소" anchor="default" onclick="group5_button1_onclick"/>
              <Button position="absolute 0 3 92 25" id="btn_prnt" class="btn3" taborder="18" text="프린터설정" anchor="default" onclick="group5_btn_prnt_onclick"/>
              <Button position="absolute 875 3 955 25" id="button4" class="btn4" text="외래등록" anchor="default" onclick="group5_button4_onclick"/>
              <Button position="absolute 768 3 872 25" id="button6" class="btn4" text="NAT번호입력" anchor="default" onclick="group5_button6_onclick"/>
              <Button position="absolute 625 3 765 25" id="button8" class="btn4" text="바코드발행(환자별)" anchor="default" onclick="group5_button8_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_dnorlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dnorno" type="STRING" size="256" sumtext="공여자번호"/>
          <Column id="dnornm" type="STRING" size="256" sumtext="공여자명"/>
          <Column id="dnorrgstno" type="STRING" size="256" sumtext="주민등록번호"/>
          <Column id="dnorseqno" type="STRING" size="256" sumtext="공여자순번"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="처방유일키"/>
          <Column id="dsexage" type="STRING" size="256" sumtext="공여자sexage"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_prcpcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
          <Column id="prcpflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_dnorprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="bcolldt" type="STRING" size="256"/>
          <Column id="bcnoyn" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="prcpseq" type="STRING" size="256"/>
          <Column id="dnornm" type="STRING" size="256"/>
          <Column id="dsexage" type="STRING" size="256"/>
          <Column id="payyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tnsrnm" type="STRING" size="256"/>
          <Column id="tnsrgstno" type="STRING" size="256"/>
          <Column id="tnssexage" type="STRING" size="256"/>
          <Column id="btype" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="acptseqno" type="STRING" size="256"/>
          <Column id="orgorddd" type="STRING" size="256"/>
          <Column id="tnsrpid" type="STRING" size="256"/>
          <Column id="ordtypenm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="tnsrnm"/>
            <Col id="tnsrgstno"/>
            <Col id="tnssexage"/>
            <Col id="btype"/>
            <Col id="ordtype"/>
            <Col id="orddd"/>
            <Col id="cretno"/>
            <Col id="instcd"/>
            <Col id="acptseqno"/>
            <Col id="orgorddd"/>
            <Col id="tnsrpid"/>
            <Col id="ordtypenm"/>
          </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="pid" type="STRING" size="256"/>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="spccdlist" type="STRING" size="256"/>
          <Column id="dnorno" type="STRING" size="256"/>
          <Column id="dnorseqno" type="STRING" size="256"/>
          <Column id="scrnid" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="basecdid" type="STRING" size="256"/>
          <Column id="prcplist" type="STRING" size="256"/>
          <Column id="data1" type="STRING" size="256"/>
          <Column id="data2" type="STRING" size="256"/>
          <Column id="natno" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="prcpflaglist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="tclscdlist"/>
            <Col id="spccdlist"/>
            <Col id="dnorno"/>
            <Col id="dnorseqno"/>
            <Col id="scrnid"/>
            <Col id="prcpdd"/>
            <Col id="prcpcd"/>
            <Col id="execprcpuniqno"/>
            <Col id="codeflag"/>
            <Col id="basecdid"/>
            <Col id="prcplist"/>
            <Col id="data1"/>
            <Col id="data2"/>
            <Col id="natno"/>
            <Col id="ordtype"/>
            <Col id="prcpflaglist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" 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="natno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cancelinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="resndesc" type="STRING" size="256"/>
          <Column id="resncd" type="STRING" size="256"/>
          <Column id="resncdkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="resncdkind">01</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ord" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_otpt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="otptyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_LB0118" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="코드명"/>
          <Column id="chk" type="STRING" size="256" sumtext="chk"/>
          <Column id="etc01" type="STRING" size="256" sumtext="기타1"/>
          <Column id="etc02" type="STRING" size="256" sumtext="기타2"/>
          <Column id="etc03" type="STRING" size="256" sumtext="기타3"/>
          <Column id="etc04" type="STRING" size="256" sumtext="기타4"/>
          <Column id="etc05" type="STRING" size="256" sumtext="기타4"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_barcdprntsetup_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_natno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="btn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_barcodeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_pid" propid="value" datasetid="ds_hidden" columnid="pid"/>
      <BindItem id="item1" compid="group2.output1" propid="value" datasetid="ds_patinfo" columnid="tnsrnm"/>
      <BindItem id="item2" compid="group2.output2" propid="value" datasetid="ds_patinfo" columnid="tnsrgstno"/>
      <BindItem id="item3" compid="group2.output3" propid="value" datasetid="ds_patinfo" columnid="tnssexage"/>
      <BindItem id="item4" compid="group2.output4" propid="value" datasetid="ds_patinfo" columnid="btype"/>
      <BindItem id="item5" compid="group2.output5" propid="value" datasetid="ds_patinfo" columnid="ordtypenm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-04-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-04-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LPZ001.xjs";
include "emr_carecomxp::ENRSignEngine.xjs";

var arErrorCode = new HashArray();

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

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

function SMLBD01300_onload(obj:Form, e:LoadEventInfo)
{
		ds_send.setColumn(0,"codeflag", "0118|");   // 0118= 
		ds_send.setColumn(0,"basecdid", "LB001"); // LB001 =  공여자처방이가능한목록
		var oParam = {};
			oParam.id          = "TRLZZ00101";
			oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
			oParam.method      = "reqGetInitCodeInfo";
			oParam.inds        = "cond=ds_send";
			oParam.outds       = "ds_init_LB0118=0118";
			oParam.async       = false;
			oParam.callback    = "cbf_SMBD01300";

		tranf_submit(oParam);

		var count  = ds_init_LB0118.rowcount;
		var newrow = 0;
		for(i=0; i< count ; i++){
			newrow = ds_grd_prcpcdlist.addRow();
			ds_grd_prcpcdlist.setColumn(newrow,"chk", "");
			ds_grd_prcpcdlist.setColumn(newrow,"tclscd", ds_init_LB0118.getColumn(i,"cd"));
			ds_grd_prcpcdlist.setColumn(newrow,"tclsnm", ds_init_LB0118.getColumn(i,"nm"));
			ds_grd_prcpcdlist.setColumn(newrow,"spccd", ds_init_LB0118.getColumn(i,"etc01"));
			ds_grd_prcpcdlist.setColumn(newrow,"prcpflag", ds_init_LB0118.getColumn(i,"etc04"));		//basecddesc 사전, 사후검사 구분용 1: 사전, 2: 사후검사
		
		}
		ds_grd_dnorprcplist.clearData();
		ds_grd_dnorlist.clearData();
				
		// 바코드정보조회
		fGetBarcdInfo();
//		lzzfMakeBrcdPrntObjHanDo();
		ds_grd_prcpcdlist.setColumn(0,"chk",1);
		ds_grd_dnorprcplist.setColumn(0,"chk",1);
				
		if(!utlf_isNull(appf_getPatientInfo("pid"))){
			ds_hidden.setColumn(0,"pid", appf_getPatientInfo("pid"));	
		}else{
			group2.ipt_pid.setFocus();
		}
		
		if(!utlf_isNull(ds_hidden.getColumn(0,"pid"))){
			fGetPatinfo("N");	
		}
}

// 초기화
function fSetInit(){
	ds_patinfo.clearData();
	ds_grd_prcpcdlist.clearData();
	ds_grd_dnorlist.clearData();
	ds_grd_dnorprcplist.clearData();
	ds_hidden.setColumn(0,"pid","");
	ds_send.clearData();
	

}  // 사용

// 바코드정보조회
function fGetBarcdInfo(){
	ds_send.setColumn(0,"scrnid", frmf_getScreenID());
	var oParam = {};
		oParam.id          = "TRLLC90101";
		oParam.service     = "diagtestapplib.LisCommon";
		oParam.method      = "reqGetSetUpInfo";
		oParam.inds        = "scrnid=ds_send";
		oParam.outds       = "ds_barcdprntsetup_info=getSetUpInfo";
		oParam.async       = false;
		oParam.callback    = "cbf_SMBD01300";

	tranf_submit(oParam);
	
}

// 엔터키 이벤트 


// 환자정보조회
function fGetPatinfo(topyn)
{
	ds_patinfo.clearData();	
	ds_grd_dnorlist.clearData();	
	
	ds_send.setColumn(0,"pid", ds_hidden.getColumn(0,"pid"));
	var oParam = {};
		oParam.id          = "TRLBD01301";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetPatInfo";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_patinfo=getPatInfo";
		oParam.async       = false;
		oParam.callback    = "cbf_SMBD01300";
	tranf_submit(oParam);
	
	if(topyn == "Y"){
		fSetTopInfo();
	}
	
	
	// 공여자목록 조회
	fGetDnorPrcpList();
	
}

// 공여자목록, 처방코드목록, 처방내역   조회
function fGetDnorPrcpList(){
	//grd_dnorlist.rebuildStyle();
	ds_send.setColumn(0,"pid", ds_hidden.getColumn(0,"pid"));
	
	var oParam = {};
		oParam.id          = "TRLBD01302";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetDnorList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_dnorlist=getDnorList";
		oParam.async       = false;
		oParam.callback    = "cbf_SMBD01300";

	tranf_submit(oParam);
	
	if(ds_grd_dnorlist.rowcount < 1){
		sysf_messageBox("공여자 등록이 안되어있습니다. 공여자 처방 등록 " , "E001", "");  //할 수 없습니다.
		return;	
	}else{
		ds_grd_dnorlist.rowposition = 0;
		fGetPrcpList();
	}	
}



// 처방코드목록조회
function fGetPrcpCdList(){
	
	var oParam = {};
		oParam.id          = "TRLBD01303";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetPrcpcdList";
		oParam.outds       = "ds_grd_prcpcdlist=getPrcpcdList";
		oParam.async       = false;
		oParam.callback    = "cbf_SMBD01300";

	tranf_submit(oParam);
	
}
	
	
// 환자정보검색 팝업 띄우기
function fGetPatInfoPopUp()
{
	frmf_modal("SPLBD91300", "SPLBD91300","", "", "","", "", "", "", "", "", "", "M");
	var pid = frmf_getParameter("SMLBD01300_pid");
	var tnsrnm = frmf_getParameter("SMLBD01300_tnsrnm") 
	var sexage = frmf_getParameter("SMLBD01300_sexage") 
	var rrgstno = frmf_getParameter("SMLBD01300_rrgstno")
	var iogb = frmf_getParameter("SMLBD01300_iogb")
	var ordtype = frmf_getParameter("SMLBD01300_iogb")
	var orddd = frmf_getParameter("SMLBD01300_orddd")
	var cretno = frmf_getParameter("SMLBD01300_cretno") 
	var instcd = frmf_getParameter("SMLBD01300_instcd")
	var acptseqno = frmf_getParameter("SMLBD01300_acptseqno")
	var orgorddd = frmf_getParameter("SMLBD01300_orgorddd")
	
	ds_hidden.setColumn(0,"pid", pid);
	//ds_patinfo.addRow(0);
	ds_patinfo.setColumn(0, "tnsrpid", pid);
	ds_patinfo.setColumn(0, "tnsrnm", tnsrnm);
	ds_patinfo.setColumn(0, "tnssexage", sexage);
	ds_patinfo.setColumn(0, "tnsrgstno", rrgstno);
	ds_patinfo.setColumn(0, "ordtype", ordtype);
	ds_patinfo.setColumn(0, "orddd", orddd);
	ds_patinfo.setColumn(0, "instcd", instcd);
	ds_patinfo.setColumn(0, "orgorddd", orgorddd);
	ds_patinfo.setColumn(0, "acptseqno", acptseqno);
	
	fGetPatinfo("Y");	
}	

// 처방코드 선택 
function fSetPrcpcdSelect(ref){
	if(ref == "dd"){ // 더블클릭시 
		ds_grd_prcpcdlist.setColumn(ds_grd_prcpcdlist.rowposition,"chk", "1");		
	}
	
	var pcnt = 0; 
	for(i=0; i<ds_grd_prcpcdlist.rowcount; i++ ){
		if(ds_grd_prcpcdlist.getColumn(i,"chk")=="1"){
			ds_grd_dnorprcplist.addRow();
			ds_grd_dnorprcplist.setColumn(pcnt ,"tclscd", ds_grd_prcpcdlist.getColumn(i,"tclscd"));	
			ds_grd_dnorprcplist.setColumn(pcnt ,"tclsnm", ds_grd_prcpcdlist.getColumn(i,"tclsnm"));	
			
			pcnt ++; 
		}	
	}
		
}
		
// 처방저장(추가처방)		
function fExeDnorPrcp(){
	
	if(ds_patinfo.getColumn(0,"ordtype")=="O"){
		if(ds_patinfo.getColumn(0,"orddd") != utlf_getCurrentDate()){
			//delPatientInfos();
			alert("접수정보가 없습니다. 외래등록을 하십시오.");
			return;	
		}
	}
	
	if(ds_grd_dnorlist.rowcount < 1){
		sysf_messageBox("공여자를 ", "C002"); // 선택하십시오.
		return;
	}
	var prcprow = ds_grd_dnorlist.rowcount;
	
	var tclscdlist = "";
	var spccdlist = "";
	var prcpflag = "";	//추가 20090609
	
	for(i=0; i<ds_grd_prcpcdlist.rowcount; i++ ){
		if(ds_grd_prcpcdlist.getColumn(i,"chk")=="1"){
			tclscdlist = tclscdlist + ds_grd_prcpcdlist.getColumn(i,"tclscd") + "▦";
			spccdlist = spccdlist + ds_grd_prcpcdlist.getColumn(i,"spccd") + "▦";
			prcpflag = prcpflag + ds_grd_prcpcdlist.getColumn(i,"prcpflag") + "▦";		//추가 20090609
			
			// NAT 처방낼때 nat번호 입력창 띄우기
			if(ds_grd_prcpcdlist.getColumn(i,"tclscd")=="LBD101"){
				//alert("Nat입력");	
				

				frmf_modal("SPLBD91301", "SPLBD91301","", "", "","", "", "", "", "", "", "", "M");
				if(ds_hidden_natno.getColumn(0,"btn") == "cancel"){	//Nat입력 팝업에서 취소버튼 눌렀을때 저장 중지!! _20090209추가
					return;
				}
			}
		}
	}
	
	if(utlf_isNull(tclscdlist)){
		sysf_messageBox("처방코드를 ", "C002"); // 선택하십시오.
		return;
	} 
	
	//alert("tclscdlist= " +tclscdlist);
	ds_send.setColumn(0,"pid", ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"tclscdlist", tclscdlist);  // tclscd▦tclscd▦
	ds_send.setColumn(0,"spccdlist", spccdlist);  // spccd▦spccd▦
	ds_send.setColumn(0,"prcpflaglist", prcpflag);  // prcpflag▦prcpflag▦
	ds_send.setColumn(0,"dnorno",      ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno", ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));
	ds_send.setColumn(0,"natno",      ds_hidden_natno.getColumn(0,"natno"));
	
	var oParam = {};
		oParam.id          = "TXLBD01301";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqExeDnorPrcp";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_item=item ds_barcodeinfo=barcodeinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TXLBD01301";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXLBD01301") > -1){
			

		ds_grd_prcpcdlist.setColumn(0,"chk","0");
		ds_grd_dnorprcplist.setColumn(0,"chk","0");
		
		fGetPatinfo("Y");
		
		if(ds_grd_dnorlist.rowcount > 0){
			//grd_dnorlist.row = 1;
			fGetPrcpList();	
		}
		
		
		ds_grd_dnorlist.rowcount = prcprow;
		fGetPrcpList();
	}
	
}
function cf_TXLBD01301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
//NAT 번호입력
function fSetNATNoRgst(){
	if(group2.grd_dnorlist.currentrow < 0){
		sysf_messageBox("공여자를 ", "C002"); // 선택하십시오.
		return;
	}
	
	
	if(group2.grd_dnorprcplist.currentrow < 0){
		sysf_messageBox("처방내역을 ", "C002"); // 선택하십시오.
		return;
	}
		
	frmf_modal("SPLBD91301", "SPLBD91301","", "", "","", "", "", "", "", "", "", "M");
	
	if(ds_hidden_natno.getColumn(0,"btn")=="cancel"){
		//alert("aa");
		return;	
	}
	
	ds_send.setColumn(0,"pid",                    ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"dnorno",              ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno",        ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));
	ds_send.setColumn(0,"prcpdd",            ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "prcpdd"));
	ds_send.setColumn(0,"execprcpuniqno", ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "execprcpuniqno"));
	ds_send.setColumn(0,"natno",               ds_hidden_natno.getColumn(0,"natno"));
	
	var oParam = {};
		oParam.id          = "TXLBD01305";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqSetNatNo";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_item=item";
		oParam.async       = false;
		oParam.callback    = "cbf_SMBD01300";

	tranf_submit(oParam);
	
}

// 처방내역 리스트 조회
function fGetPrcpList(){
	ds_send.setColumn(0,"pid",                    ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"dnorno",              ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno",        ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));
	var oParam = {};
		oParam.id          = "TRLBD01304";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetDnorPrcpList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_dnorprcplist=getDnorPrcpList";
		oParam.async       = false;
		oParam.callback    = "cf_TRLBD01304";

	tranf_submit(oParam);
		
	for(i= 1; i<= 6; i++){
		group2.grd_dnorprcplist.setCellProperty("body",i,"color" ,"EXPR(getColumn(currow,'bcnoyn')=='Y'?'red'");
	}
	
}


//프린터 설정
function fSetPrint() {
	var count = ds_barcdprntsetup_info.rowcount; //getNodesetCount("/root/main/barcdprntsetup/prntsetupinfo/setupinfo");
	
	if(count == 0) {
		
		ds_barcdprntsetup_info.addRow();
	}
	var objArg = new Object();
	objArg.arg_ds_barcdprntsetup_info = ds_barcdprntsetup_info;
	frmf_open("SPLLC90100","SPLLC90100", objArg, "", "", "", "","","","","","","M" );
}



//바코드발행
function fExeBcoll(){
	
	if(group2.grd_dnorlist.currentrow < 0){
		sysf_messageBox("공여자를 " , "C002", ""); //공여자를 선택하십시오.
		return;
	}
	
	if(ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition,"bcnoyn") == "Y"){
		sysf_messageBox("이미 발행되었습니다. \n바코드 발행을 " , "E001", ""); // 할 수 없습니다.
		return;
	}
	var prcprow = group2.grd_dnorlist.currentrow;
	
	ds_send.setColumn(0,"pid",                    ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"prcpdd",            ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "tclscd"));
	ds_send.setColumn(0,"execprcpuniqno", ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "execprcpuniqno"));
	ds_send.setColumn(0,"dnorno",              ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno",        ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));


	var prcplist = "";
	var chkyn = ""; 
	var payyn = ""; 
	for(i=0; i< ds_grd_dnorprcplist.rowcount; i++){
		if(ds_grd_dnorprcplist.getColumn(i,"chk")=="1"){
			prcplist +=  ds_grd_dnorprcplist.getColumn(i,"prcpdd") + "▣" +  ds_grd_dnorprcplist.getColumn(i,"tclscd") + "▣"
						 + ds_grd_dnorprcplist.getColumn(i,"execprcpuniqno") +  "▣" + ds_grd_dnorprcplist.getColumn(i,"prcpseq") + "◈";
			chkyn += i; 
			
			if(ds_grd_dnorprcplist.getColumn(i,"payyn")=="N"){ // 수납안했을때 
				payyn += i; 
			}
		}
		
		
	}
	
	if(utlf_isNull(chkyn)){
		sysf_messageBox("바코드 발행할 처방을" , "C002", ""); // 선택하십시오.
		return;	
	}
	
	if(!utlf_isNull(payyn)){ 
		sysf_messageBox("미수납내역이 존재합니다. 바코드 발행 " , "E001", ""); // 할 수 없습니다.
		return;
	}	
	
	ds_send.setColumn(0,"prcplist", prcplist);
	//submit("TXLBD01302");
	var oParam = {};
		oParam.id          = "TXLBD01302";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqExeBcoll";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_item=item ds_barcodeinfo=barcodeinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TXLBD01302";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXLBD01302") > -1){
		
		fGetPatinfo("N");
		
		
		group2.grd_dnorlist.currentrow = prcprow;
		
		if(ds_grd_dnorlist.rowcount > 0){
			fGetPrcpList();	
		}
		
		if(ds_grd_dnorprcplist.rowcount > 0){
			ds_grd_dnorprcplist.rowposition = 0; 
		}
		
		if(ds_grd_dnorprcplist.rowposition > 0){
			
			var count = ds_barcodeinfo.rowcount;//getNodesetCount("/root/main/barcodeinfo") ;
		
			for(i=0; i<count; i++){
				dsf_makeValue(ds_barcodeinfo,"dnornm", "string", ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "dnornm"),i);
				dsf_makeValue(ds_barcodeinfo,"dnorsexage", "string", ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "dsexage"),i);
			}
		}
		
		fLisSpcBarcodePrint(ds_barcodeinfo);
		ds_barcodeinfo.clearData();
	}
	
}
function cf_TXLBD01302(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
//바코드재발행
function fExeBarcdRePrnt(){
	
	var bcollyn = "";
	var execuniqlist = "";
	var chkyn="";
	
	if(group2.grd_dnorlist.currentrow < 0){
		sysf_essageBox("공여자를 " , "C002", ""); //공여자를 선택하십시오.
		return;
	}
	
	if(group2.grd_dnorprcplist.currentrow < 0){
		sysf_messageBox("재발행할 처방을 " , "C002", ""); //공여자를 선택하십시오.
		return;
	}
	
	for(i=0; i<ds_grd_dnorprcplist.rowcount; i++ ){
		if(ds_grd_dnorprcplist.getColumn(i,"chk")=="1"){
			if(ds_grd_dnorprcplist.getColumn(i,"bcnoyn")=="N"){
				bcollyn += i;
			}else{
				execuniqlist += ds_grd_dnorprcplist.getColumn(i,"prcpdd") + "▤" + 
									  ds_grd_dnorprcplist.getColumn(i,"execprcpuniqno") + "▤" + 
									  ds_grd_dnorprcplist.getColumn(i,"prcpseq") + "▥";
				
			}	
			chkyn += i; 
		}
	}
	
	if(!utlf_isNull(bcollyn)){
		sysf_messageBox("바코드발행이 안된 처방입니다. 재발행 " , "E001", "");  //할 수 없습니다.
		return;		
	}
	
	if(utlf_isNull(chkyn)){
		sysf_messageBox("재발행할 처방을 " , "C002", ""); //재발행할 처방을 선택하십시오
		return;			
	}
	
	ds_send.setColumn(0,"prcplist",      execuniqlist);
	ds_send.setColumn(0,"pid",          ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"dnorno",      ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno", ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));
	
	var oParam = {};
		oParam.id          = "TRLBD01305";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetReBcno";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_barcodeinfo=barcodeinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRLBD01305";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRLBD01305") > -1){
		
		
		if(ds_grd_dnorprcplist.rowcount > 0){
			var count = ds_barcodeinfo.rowcount;//getNodesetCount("/root/main/barcodeinfo") ;
			
			for(i=0; i<count; i++){
				dsf_makeValue(ds_barcodeinfo,"dnornm", "string", "공여자 : " + ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "dnornm"),i);
				dsf_makeValue(ds_barcodeinfo,"dnorsexage", "string", ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition, "dsexage"),i);
			}
		}
		
		
		fLisSpcBarcodePrint(ds_barcodeinfo);
		ds_barcodeinfo.clearData(); 
	}
	
}// 미완료
function cf_TRLBD01305(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

// 처방취소
function fExePrcpCancel(){
	if(group2.grd_dnorlist.currentrow < 0){
		sysf_messageBox("공여자를 ", "C002"); // 선택하십시오.
		return;
	}
	
	var prcpcdlist = "";
	var bcollyn = "";
	var prcprow = group2.grd_dnorlist.currentrow;
	
	
	for(i=0; i<ds_grd_dnorprcplist.rowcount; i++ ){
		if(ds_grd_dnorprcplist.getColumn(i,"chk")=="Y"){
			if(ds_grd_dnorprcplist.getColumn(i,"bcnoyn")=="N"){
				prcpcdlist += ds_grd_dnorprcplist.getColumn(i,"prcpdd") + "▤" + ds_grd_dnorprcplist.getColumn(i,"tclscd")
								   + "▤" + ds_grd_dnorprcplist.getColumn(i,"execprcpuniqno") + "▥";
			}else{
				bcollyn += i;
			}
			
		}	
	}
	
	if(!utlf_isNull(bcollyn)){
		sysf_messageBox("바코드발행된 상태 입니다. 처방 취소 " , "E001", "");  //할 수 없습니다.
		return;	
	}
	
	if(utlf_isNull(prcpcdlist)){
		sysf_messageBox("취소할 처방을 ", "C002"); // 선택하십시오.
		return;
	}
	
	//alert("tclscdlist= " +tclscdlist);
	ds_send.setColumn(0,"pid",          ds_hidden.getColumn(0,"pid"));
	ds_send.setColumn(0,"dnorno",      ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno"));
	ds_send.setColumn(0,"dnorseqno", ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno"));
	ds_send.setColumn(0,"prcplist",      prcpcdlist);
	
	//submit("TXLBD01303");
	var oParam = {};
		oParam.id          = "TXLBD01303";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqExeDnorPrcpDC";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_item=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXLBD01303";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXLBD01303") > -1){
		ds_grd_prcpcdlist.setColumn(0,"chk","0");
		ds_grd_dnorprcplist.setColumn(0,"chk","0");
		
		fGetPatinfo("Y");
		
		ds_grd_dnorlist.rowposition = prcprow;
		
		if(ds_grd_dnorlist.rowcount > 0){
			//grd_dnorlist.row = 1;
			fGetPrcpList();	
		}
	}
	
}
function cf_TXLBD01303(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
// 바코드발행취소
function fExeBcollCancel(){
	
	if(group2.grd_dnorlist.currentrow < 0){
		sysf_messageBox("공여자를 ", "C002"); // 선택하십시오.
		return;
	}
	
	var prcpcdlist = "";
	var bcollyn = "";
	var prcprow = group2.grd_dnorlist.currentrow;
	//grd_dnorlist.row = prcprow;
	
	for(i=0; i< ds_grd_dnorprcplist.rowcount; i++){
		if(ds_grd_dnorprcplist.getColumn(i,"chk")=="1"){
			if(ds_grd_dnorprcplist.getColumn(i,"bcnoyn")=="Y"){
				
				prcpcdlist +=  ds_hidden.getColumn(0,"pid") + "▤" + 
								   ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorno") + "▤" + 
								   ds_grd_dnorlist.getColumn(ds_grd_dnorlist.rowposition,"dnorseqno") + "▤" + 
								   ds_grd_dnorprcplist.getColumn(i,"prcpdd") + "▤" + 
								   ds_grd_dnorprcplist.getColumn(i,"execprcpuniqno") + "▥";
								   
			}else{
				bcollyn += i; 	
				
			}	
		}
		
	}
	
	if(!utlf_isNull(bcollyn)){
		sysf_messageBox("바코드발행이 안된 상태입니다.  발행 취소 " , "E001", "");  //할 수 없습니다.
		return;	
	}
	
	if(utlf_isNull(prcpcdlist)){
		sysf_messageBox("발행 취소할 처방을 ", "C002"); // 선택하십시오.
		return;
	}
	
	ds_send.setColumn(0,"prcplist",      prcpcdlist);
	//alert("prcpcdlist= " + prcpcdlist);
	var oParam = {};
		oParam.id          = "TXLBD01304";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqExeBcollCancel";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_item=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXLBD01304";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXLBD01304") > -1){
		fGetPatinfo("Y");
		
		ds_grd_dnorlist.rowposition = prcprow;
		
		if(ds_grd_dnorlist.rowcount > 0){
			fGetPrcpList();	
		}
	}
	
		
}
function cf_TXLBD01304(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
//top 정보
function fSetTopInfo()
{

//	delPatientInfos(); //환자정보 전체 삭제

	var today = utlf_getCurrentDate();
	
	if(ds_patinfo.getColumn(0,"ordtype")=="I"){
	//alert("ee");
		var param =  ds_patinfo.getColumn(0,"ordtype") + "▦" + 
												ds_patinfo.getColumn(0,"tnsrpid") + "▦" + 
												ds_patinfo.getColumn(0,"orddd") + "▦" +
												ds_patinfo.getColumn(0,"cretno") + "▦" +
												ds_patinfo.getColumn(0,"acptseqno") + "▦" +   // seqno
												today + "▦" + 
												ds_patinfo.getColumn(0,"instcd");
											   
	}else if(ds_patinfo.getColumn(0,"ordtype")=="O"){
		var param =  ds_patinfo.getColumn(0,"ordtype") + "▦" + 
												ds_patinfo.getColumn(0,"tnsrpid") + "▦" + 
												ds_patinfo.getColumn(0,"orddd") + "▦" +
												ds_patinfo.getColumn(0,"cretno") + "▦" +
												ds_patinfo.getColumn(0,"instcd") + "▦" +
												ds_patinfo.getColumn(0,"acptseqno") + "▦" +
												ds_patinfo.getColumn(0,"orgorddd") + "▦";
											
	}
	appf_initPatientInfo(param);
	//frmf_modal("SPMMO08900","SPMMO08900","","","","","","","","","","","M");		
	//modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");			
}


// 외래등록
function fSetOuterRgst(){
	
	

	ds_send.setColumn(0,"pid",       ds_patinfo.getColumn(0,"tnsrpid"));
	ds_send.setColumn(0,"ordtype",   ds_patinfo.getColumn(0,"ordtype"));

	
	//setParameter("pid", model.getValue("/root/main/patinfo/tnsrpid") );          //등록번호
	
	// 외래 환자 접수목록 조회  팝업 
	var objArg = new Object();
	objArg.arg_pid = ds_hidden.getColumn(0,"pid");
	frmf_modal("SPLBD91400", "SPLBD91400", objArg, "","","","","","","","","","M");	
	
	if(ds_hidden_otpt.getColumn(0,"otptyn")=="Y"){
	
		fGetPatinfo("Y");
		
	}
	
}


//처방내역 클릭시 체크
function fSetPrcpListCheck(){
	if(group2.grd_dnorprcplist.currentrow > 0){
		if(ds_grd_dnorprcplist.getColumn(ds_grd_dnorprcplist.rowposition,"chk")=="1"){
			ds_grd_dnorprcplist.setColumn(ds_grd_dnorprcplist.rowposition,"chk", "0");	
		}else{
			ds_grd_dnorprcplist.setColumn(ds_grd_dnorprcplist.rowposition,"chk", "1");		
		}	
		//grd_dnorprcplist.rebuild();
	}	
}


// 환자별 채혈 팝업
function fExeBcollPid(){
	frmf_modal("SMLLC00300","SMLLC00300", "", "","","","","","","","","","M");	
	//SMLLC00300_환자별채혈관리.xrw
}
function group2_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetPatInfoPopUp();
}

function group2_btn_addrow_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeBcoll();
}

function group2_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeBarcdRePrnt();
}

function group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeBcollCancel();
}

function group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keyCode == "13"){
		
		ds_hidden.setColumn(0,"pid",  utlf_transEmptyToNull(group2.ipt_pid.text).toUpperCase());	
		// 환자정보 조회 
		fGetPatinfo("Y");		
		
	}		
}

function group2_grd_dnorlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	
		fGetPrcpList();
	
}

function group2_grd_dnorprcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(group2.grd_dnorprcplist.currentcol != 1 ){
							fSetPrcpListCheck();
						}
}

function group5_btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeDnorPrcp();
}

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

function group5_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fExePrcpCancel();
}

function group5_btn_prnt_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetPrint();
}

function group5_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetOuterRgst();
}

function group5_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetNATNoRgst();
}

function group5_button8_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeBcollPid();
}
]]></Script>
  </Form>
</FDL>