YNU_JEUS/app_home/himed/xpapps/lis/donmngtxp/xp/SPLBD91400_외래환자접수목록조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLBD91400" position="absolute 0 0 620 343" titletext="외래환자 접수목록 조회" onload="SPLBD91400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 311 601 338" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 486 5 542 27" id="btn_confirm" class="btn4" taborder="8" text="접수" onclick="group1_btn_confirm_onclick"/>
              <Button position="absolute 545 5 601 27" id="btn_cancel" class="btn4" taborder="9" text="취소" onclick="group1_btn_cancel_onclick"/>
              <Shape position="absolute 0 -2 600 4" linetype="horizontal" id="line32" class="line_6"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" text="접수목록" class="tit_2" position="absolute 1 57 96 73"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 74 601 80" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="cap_regno" text="등록번호" class="cell_1" position="absolute 0 25 70 48"/>
        <Static id="caption2" text="환자정보" class="tit_2" position="absolute 1 5 96 21"/>
        <Shape id="line2" class="line_3" position="absolute 0 21 601 27" style="strokepen:2 solid #33bbbbff;"/>
        <Static id="caption3" text="환자성명" class="cell_1" position="absolute 176 25 246 48"/>
        <Static id="caption4" text="성별" class="cell_1" position="absolute 352 25 412 48"/>
        <Static id="caption5" text="나이" class="cell_1" position="absolute 478 25 538 48"/>
        <Shape id="line9" class="line_3" position="absolute 0 45 601 51"/>
        <Grid id="grd_otptlist" taborder="1" binddataset="ds_grd_otptlist" useinputpanel="false" oncellclick="group3_grd_otptlist_oncellclick" position="absolute 0 78 601 308">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="31"/>
                <Column size="100"/>
                <Column size="150"/>
                <Column size="100"/>
                <Column size="101"/>
                <Column size="100"/>
                <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="pid"/>
                <Cell col="1" text="hngnm"/>
                <Cell col="2" text="sex"/>
                <Cell col="3" text="age"/>
                <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="orddeptcd"/>
                <Cell col="11" text="orddrid"/>
                <Cell col="12" text="ordtm"/>
                <Cell col="13" text="rsrvflag"/>
                <Cell col="14" text="etcordflag"/>
                <Cell col="15" text="instcd"/>
                <Cell col="16" text="medamtestmyn"/>
                <Cell col="17" text="medamtfreeresn"/>
                <Cell col="18" text="insukind"/>
                <Cell col="19" text="suppkind"/>
                <Cell col="20" text="insucd"/>
                <Cell col="21" text="suppkindresn"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:hngnm"/>
                <Cell col="2" text="bind:sex"/>
                <Cell col="3" text="bind:age"/>
                <Cell col="4" text="expr:currow + 1"/>
                <Cell col="5" displaytype="date" edittype="date" text="bind:orddd" mask="yyyy-MM-dd"/>
                <Cell col="6" text="bind:orddeptnm"/>
                <Cell col="7" text="bind:orddrnm"/>
                <Cell col="8" text="bind:suppkind2"/>
                <Cell col="9" text="bind:insukind2"/>
                <Cell col="10" text="bind:orddeptcd"/>
                <Cell col="11" text="bind:orddrid"/>
                <Cell col="12" text="bind:ordtm"/>
                <Cell col="13" text="bind:rsrvflag"/>
                <Cell col="14" text="bind:etcordflag"/>
                <Cell col="15" text="bind:instcd"/>
                <Cell col="16" text="bind:medamtestmyn"/>
                <Cell col="17" text="bind:medamtfreeresn"/>
                <Cell col="18" text="bind:insukind"/>
                <Cell col="19" text="bind:suppkind"/>
                <Cell col="20" text="bind:insucd"/>
                <Cell col="21" text="bind:suppkindresn"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Edit id="opt_pid" taborder="2" readonly="true" position="absolute 73 26 173 45"/>
        <Edit id="opt_hngnm" taborder="3" readonly="true" position="absolute 249 26 349 45"/>
        <Edit id="opt_sex" taborder="4" readonly="true" position="absolute 415 26 475 45"/>
        <Edit id="opt_age" taborder="5" readonly="true" position="absolute 541 26 601 45"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_otptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="sex" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="orddd" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="orddrnm" type="STRING"/>
          <Column id="suppkind2" type="STRING"/>
          <Column id="insukind2" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="ordtm" type="STRING"/>
          <Column id="rsrvflag" type="STRING"/>
          <Column id="etcordflag" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="medamtestmyn" type="STRING"/>
          <Column id="medamtfreeresn" type="STRING"/>
          <Column id="insukind" type="STRING"/>
          <Column id="suppkind" type="STRING"/>
          <Column id="insucd" type="STRING"/>
          <Column id="suppkindresn" type="STRING"/>
        </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="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="ordtm" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="insucd" type="STRING" size="256"/>
          <Column id="suppkindresn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="orddd"/>
            <Col id="orddeptcd"/>
            <Col id="orddrid"/>
            <Col id="ordtm"/>
            <Col id="instcd"/>
            <Col id="insukind"/>
            <Col id="insucd"/>
            <Col id="suppkindresn"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="opt_pid" propid="value" datasetid="ds_patinfo" columnid="pid"/>
      <BindItem id="item1" compid="opt_hngnm" propid="value" datasetid="ds_patinfo" columnid="hngnm"/>
      <BindItem id="item2" compid="opt_sex" propid="value" datasetid="ds_patinfo" columnid="sex"/>
      <BindItem id="item3" compid="opt_age" propid="value" datasetid="ds_patinfo" columnid="age"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
var arErrorCode = new HashArray();

function cf_TRLBD91401(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    if(ds_grd_otptlist.rowcount > 0){
		opt_pid.value = ds_grd_otptlist.getColumn(0,"pid");
		opt_hngnm.value = ds_grd_otptlist.getColumn(0,"hngnm");
		opt_sex.value = ds_grd_otptlist.getColumn(0,"sex");
		opt_age.value = ds_grd_otptlist.getColumn(0,"age");
	}
}
function cf_TXLBD91401(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
// 초기화 
function lf_SetInit(){
	
	if(utlf_isNull(arg_pid)){ // 등록번호 없으면 초기화 
		ds_grd_otptlist.clearData();
		opt_pid.value = "";
		opt_hngnm.value = "";
		opt_sex.value = "";
		opt_age.value = "";
		return;		
	}
	
	// 등록번호 오면 접수내역 조회 
	ds_send.setColumn(0,"pid",arg_pid);
	var oParam = {};
		oParam.id          = "TRLBD91401";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetOtptlist";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_otptlist=getOtptlist";
		oParam.async       = true;
		oParam.callback    = "cf_TRLBD91401";

	tranf_submit(oParam);
	
	
}

// 확인, 그리드선택  B=확인버튼  G=그리드선택
function lf_SetOtptAcpt(gbn)
{
	if(ds_grd_otptlist.rowposition < 0 )
	{
		alert("접수내역을 선택하십시오.");
		return;	
	}	
	var currow = ds_grd_otptlist.rowposition;
		
// 	ds_send.setColumn(0,"pid",          ds_grd_otptlist.getColumn(currow,"pid"));
// 	ds_send.setColumn(0,"orddd",        utlf_getCurrentDate());
// 	ds_send.setColumn(0,"orddeptcd", ds_grd_otptlist.getColumn(currow,"orddeptcd"));
// 	ds_send.setColumn(0,"orddrid",     ds_grd_otptlist.getColumn(currow,"orddrid"));
// 	ds_send.setColumn(0,"ordtm",       ds_grd_otptlist.getColumn(currow,"ordtm"));
// 	ds_send.setColumn(0,"instcd",      ds_grd_otptlist.getColumn(currow,"instcd"));
// 	ds_send.setColumn(0,"insukind",   ds_grd_otptlist.getColumn(currow,"insukind"));
// 	ds_send.setColumn(0,"insucd",     ds_grd_otptlist.getColumn(currow,"insucd"));
// 	ds_send.setColumn(0,"suppkindresn", ds_grd_otptlist.getColumn(currow,"suppkindresn"));
		
	dsf_createDsRow("ds_send_cond", [{col : "otpt_pid", val : ds_grd_otptlist.getColumn(currow, "pid")}
		                            ,{col : "otpt_flag", val : "I"}
		                            ,{col : "otpt_orddd", val : utlf_getCurrentDate()}
		                            ,{col : "otpt_orddeptcd", val : ds_grd_otptlist.getColumn(currow, "orddeptcd")}
		                            ,{col : "otpt_orddrid", val : ds_grd_otptlist.getColumn(currow, "orddrid")}
		                            ,{col : "otpt_ordtm",   val : ds_grd_otptlist.getColumn(currow, "ordtm")}
		                            ,{col : "otpt_rsrvflag", val : "P"}
		                            ,{col : "otpt_etcordflag", val : "A"}
		                            ,{col : "otpt_instcd",    val : ds_grd_otptlist.getColumn(currow,"instcd")}
		                            ,{col : "otpt_medamtestmyn", val : "N"}
		                            ,{col : "otpt_medamtfreeresn", val : "19"}
		                            ,{col : "otpt_insukind",      val : ds_grd_otptlist.getColumn(currow, "insukind")}
		                            ,{col : "otpt_suppkind",      val : "01"}
		                            ,{col : "otpt_insucd",  val : ds_grd_otptlist.getColumn(currow,"insucd")}
		                            ,{col : "otpt_suppkindresn", val : ds_grd_otptlist.getColumn(currow, "suppkindresn")}]);
	if(gbn=="B")
	{
		 // 외래접수 태우기 
		 var oParam = {};
			oParam.id          = "TXLBD91401";
			oParam.service     = "donmngtapp.DonRgst";
			oParam.method      = "reqExeOtptAcpt";
			oParam.inds        = "cond=ds_send_cond";
			oParam.async       = false;
			oParam.callback    = "cf_TXLBD91401";

		tranf_submit(oParam);

		if(arErrorCode.pop("TXLBD91401") > -1)
		{
			alert("접수성공");
			opener.ds_hidden.setColumn(0,"otptyn", "Y");
			this.close();
		} 
	}
}
			
function SPLBD91400_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	lf_SetInit();
}

function group3_grd_otptlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	lf_SetOtptAcpt("G");
}

function group1_btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_SetOtptAcpt("B");
}

function group1_btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.ds_hidden.setColumn(0,"otptyn", "N");
	this.close();
}
]]></Script>
  </Form>
</FDL>