YNU_JEUS/app_home/himed/xpapps/pam/pamcomnxp/xp/SPPMO01200_진료의뢰서조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMO01200" position="absolute 0 0 435 345" titletext="진료의뢰서조회" onload="SPPMO01200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 433 316" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Div position="absolute 0 0 433 35" align="align:center top;" id="group2" class="div_SA">
                <Layouts>
                  <Layout>
                    <Button position="absolute 355 7 411 29" id="btn_search" class="btn1" visible="false" text="조회" onclick="group3_group2_btn_search_onclick"/>
                    <Shape position="absolute 336 7 342 29" linetype="horizontal" id="line13" class="line_4" visible="false"/>
                    <Static text="등록번호 :" position="absolute 10 8 101 25" id="caption3" class="search_name"/>
                    <Edit position="absolute 100 8 190 27" id="ipt_pid" class="input_essential" onkeydown="group3_group2_ipt_pid_onkeydown"/>
                    <Button position="absolute 195 9 211 25" id="button1" class="icon_search" text="" onclick="group3_group2_button1_onclick" hotkey="F2"/>
                    <Static text="환자이름 :" position="absolute 220 8 306 25" id="caption2" class="search_name"/>
                    <Edit position="absolute 310 8 410 27" id="input1" class="input_search" onkeydown="group3_group2_input1_onkeydown"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static text="진료의뢰서" position="absolute 0 44 95 60" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 60 432 66" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
              <Grid position="absolute 0 65 432 314" id="grd_ordreqfrm" binddataset="ds_main_ordreqform_cnst" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="100"/>
                      <Column size="200"/>
                      <Column size="110"/>
                      <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="등록번호"/>
                      <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="의뢰의사명"/>
                      <Cell col="9" text="참고사항"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:pid"/>
                      <Cell col="1" displaytype="combo" edittype="combo" text="bind:orddeptcd" combodataset="ds_init_orddeptcdlist" combocodecol="cd" combodatacol="nm" combodisplayrowcount="-1"/>
                      <Cell col="2" displaytype="date" text="bind:lastupdtdt" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="3" displaytype="combo" edittype="combo" text="bind:insuflag" combodataset="ds_init_insuflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="4" displaytype="combo" edittype="combo" text="bind:ordreqkind" combodataset="ds_init_p0310" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="5" displaytype="date" text="bind:fromdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="6" displaytype="date" text="bind:todd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="7" text="bind:reqformhospnm"/>
                      <Cell col="8" text="bind:reqformdrnm"/>
                      <Cell col="9" text="bind:remfact"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 316 433 343" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 376 5 432 27" id="btn_confirm" class="btn4" text="확인" onclick="group1_btn_confirm_onclick" anchor="default"/>
              <Shape position="absolute 0 -2 431 4" linetype="horizontal" id="line32" class="line_6" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_ordreqfrm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="lastupdtdt" type="STRING"/>
          <Column id="insuflag" type="STRING"/>
          <Column id="ordreqkind" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="reqformhospnm" type="STRING"/>
          <Column id="reqformdrnm" type="STRING"/>
          <Column id="remfact" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_ordreqform_cnst" 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="orddeptcd" type="STRING" size="256"/>
          <Column id="insuflag" type="STRING" size="256"/>
          <Column id="ordreqkind" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="reqformhospnm" type="STRING" size="256"/>
          <Column id="reqformdrnm" type="STRING" size="256"/>
          <Column id="remfact" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="orddeptcd"/>
            <Col id="insuflag"/>
            <Col id="ordreqkind"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="reqformhospnm"/>
            <Col id="reqformdrnm"/>
            <Col id="remfact"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_patinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_p0310" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" 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="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_insuflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">보험</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">보호</Col>
            <Col id="value">2</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item1" compid="group3.group2.input1" propid="value" datasetid="ds_send" columnid="hngnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs"
include "com_basiccodexp::ZBC001.xjs"
include "pam_pamcomnxp::PAM.xjs"


function SPPMO01200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 폼 초기화 
	
	//zbcfGetCodeList(new Array("P0310"), new Array("/root/init/P0310list"));
	var arrParam = [
		 {dsNm: "ds_init_p0310", cdGrpId: "P0310"}
	];
	
	appf_getCodeList(arrParam, true);	


					
	//진료과코드 진료의사ID 조회
	pamGetDeptCDDrIDList();
	
	if (frmf_checkOpener()){		//팝업화면으로 사용될 때	
		//pid, orddeptcd 를 받아온다.
		var SMPMO01200_PARM = String(opener.frmf_getParameter("SMPMO01200_PARM"));
		var array_parm = SMPMO01200_PARM.split("▦");						
		var pid = array_parm[0];
		var hngnm = array_parm[1];
		//var orddeptcd = array_parm[1];
		
		if( pid != '' && pid != '-' && pid != ' ' && pid != null ){						
			ds_send.setColumn(0, "pid", pid);
			ds_send.setColumn(0, "hngnm", hngnm);
			
			group3_group2_btn_search_onclick(null, null);
		}
	}
	//model.refresh();					
	group3.group2.ipt_pid.setFocus(); 
}

function group1_btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{
	//window.close();
	this.close();
}

function group3_group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keyCode == "13") {
		ds_send.setColumn(0, "pid", group3.group2.ipt_pid.text);
		group3_group2_btn_search_onclick(null, null);
	}
}

function group3_group2_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var objArg = new Object();
	objArg.arg_ds_send = ds_hidden_source;
	//modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/hidden/source", "/root/send");
	frmf_modal("SPPMC02500", "SPPMC02500", "", "", 1, 150, 150, "", "", "", "", "", "M");
						
	if(ds_main.getColumn(0, "popupendflag") == 'ok'){
		ds_send.setColumn(0, "pid", ds_main_patinfo_patinfolist.getColumn(0, "pid"));	
		ds_send.setColumn(0, "hngnm", ds_main_patinfo_patinfolist.getColumn(0, "hngnm"));
	}
	//model.refresh();
}

function group3_group2_input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keyCode == "13") {
		//model.resetInstanceNode("/root/hidden/source");
		ds_hidden_source.clearData();
		ds_hidden_source.setColumn(0, "srchcond", "2");
		ds_hidden_source.setColumn(0, "hngnm", group3.group2.input1.text);
		
		var objArg = new Object();
		objArg.arg_ds_send = ds_hidden_source;
		//modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/hidden/source", "/root/send");
		frmf_modal("SPPMC02500", "SPPMC02500", "", "", 1, 150, 150, "", "", "", "", "", "M");
	
		
		if(ds_main.getColumn(0, "popupendflag") == 'ok'){
			ds_send.setColumn(0, "pid", ds_main_patinfo_patinfolist.getColumn(0, "pid"));	
			ds_send.setColumn(0, "hngnm", ds_main_patinfo_patinfolist.getColumn(0, "hngnm"));								
		}
	}					
}

function group3_group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var pid =  ds_send.getColumn(0, "pid");
	if( pid == '' || pid == '' || pid == '-' ){
		
		sysf_essageBox("등록번호가 없습니다. 환자조회 후 다시 시도해 주세요.", "E999", "");
		return false;	
	}else{
		ds_hidden_source.setColumn(0, "srchcond", "1");
		ds_hidden_source.setColumn(0, "pid", pid);
		
		
		//if(submit("TRPMC02500")){
		var oParam = {};
		oParam.id          = "TRPMC02500";
		oParam.service     = "patinfomngtapp.PatBaseInfo";
		oParam.method      = "reqGetPatInfo";
		oParam.inds        = "req=ds_hidden_source";
		oParam.outds       = "ds_main_patinfo_patinfolist=patinfolist";
		oParam.async       = false;
		oParam.callback    = "cf_TRPMC02500";

		tranf_submit(oParam);

		if(arErrorCode.pop("TRPMC02500") > -1){
			if( ds_main_patinfo_patinfolist.rowcount  > 0 ){
				
				ds_send.setColumn(0, "pid", ds_main_patinfo_patinfolist.getColumn(0, "pid"));
				ds_send.setColumn(0, "hngnm", ds_main_patinfo_patinfolist.getColumn(0, "hngnm"));
			}else{
				
				sysf_messageBox("존재하지 않는 등록번호입니다. 등록번호를 확인하세요.", 'E999', '');
				return false;
			}
		}else{
			return false;	
		}
	}
	
	//submit("TRPMO01201");
	
	var oParam = {};
    oParam.id          = "TRPMO01201";
    oParam.service     = "opatmngtapp.OutRgst";
    oParam.method      = "reqGetOrdReqForms";
    oParam.inds        = "req=ds_hidden_source";
    oParam.outds       = "ds_main_ordreqform_cnst=cnst";
    oParam.async       = false;

	tranf_submit(oParam);
	
}

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


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