YNU_JEUS/app_home/himed/xpapps/emr/ercarexp/xp/SMMNE00102_희망병실등급변경.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNE00102" position="absolute 0 0 1066 244" titletext="희망 병실 등급 변경" oninit="SMMNE00102_oninit" onload="SMMNE00102_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 5 13 1064 239" id="group5" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 9 1050 10" linetype="vertical" id="line12" class="line_1" anchor="default"/>
              <Grid position="absolute 0 15 1050 194" id="grd_adrvinfolist" binddataset="ds_main_adrvinfo" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="20"/>
                      <Column size="69"/>
                      <Column size="69"/>
                      <Column size="50"/>
                      <Column size="75"/>
                      <Column size="109"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="90"/>
                      <Column size="45"/>
                      <Column size="75"/>
                      <Column size="145"/>
                      <Column size="145"/>
                    </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="S/A"/>
                      <Cell col="4" text="내원일"/>
                      <Cell col="5" text="진료과"/>
                      <Cell col="6" text="주치의"/>
                      <Cell col="7" text="담당의"/>
                      <Cell col="8" text="의사결정"/>
                      <Cell col="9" text="등급"/>
                      <Cell col="10" text="입원예정일"/>
                      <Cell col="11" text="희망병상 종류(from)"/>
                      <Cell col="12" text="희망병상 종류(to)"/>
                    </Band>
                    <Band id="body">
                      <Cell/>
                      <Cell col="1" text="bind:pid"/>
                      <Cell col="2" text="bind:patnm"/>
                      <Cell col="3" text="bind:sexage"/>
                      <Cell col="4" displaytype="date" text="bind:indd"/>
                      <Cell col="5" text="bind:orddeptnm"/>
                      <Cell col="6" text="bind:drname"/>
                      <Cell col="7" text="bind:resiname"/>
                      <Cell col="8" displaytype="combo" edittype="none" text="bind:adflag" combodataset="ds_M0720" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="9" text="bind:patgrade"/>
                      <Cell col="10" displaytype="date" text="bind:inrsrvacptdd"/>
                      <Cell col="11" displaytype="combo" edittype="combo" text="bind:bedkindfrom" combodataset="ds_M0710" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="10"/>
                      <Cell col="12" displaytype="combo" edittype="combo" text="bind:bedkindto" combodataset="ds_M0710" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="10"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 963 200 1005 219" id="button1" class="btn5" text="저장" anchor="default" onclick="group5_button1_onclick"/>
              <Button position="absolute 1008 200 1050 219" id="button2" class="btn5" text="닫기" anchor="default" onclick="group5_button2_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="입원 의사결정 정보" position="absolute 5 0 153 24" id="caption6" class="tit_1"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_adrvinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="sexage" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="drname" type="STRING"/>
          <Column id="resiname" type="STRING"/>
          <Column id="adflag" type="STRING"/>
          <Column id="patgrade" type="STRING"/>
          <Column id="inrsrvacptdd" type="STRING"/>
          <Column id="bedkindfrom" type="STRING"/>
          <Column id="bedkindto" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_M0720" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_M0710" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <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="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_adrvinfo" 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="patnm" type="STRING" size="256"/>
          <Column id="sexage" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="drname" type="STRING" size="256"/>
          <Column id="resiname" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="adflag" type="STRING" size="256"/>
          <Column id="patgrade" type="STRING" size="256"/>
          <Column id="bedkindfrom" type="STRING" size="256"/>
          <Column id="bedkindto" type="STRING" size="256"/>
          <Column id="inrsrvacptdd" type="STRING" size="256"/>
          <Column id="inrsrvacptseqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_saveinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="Dataset05" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

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

function SMMNE00102_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
}

// 초기화 작업을 합니다.
function fInitialize(){
	appf_getCodeList([	{dsNm: "ds_M0720", cdGrpId: "M0720"}, {dsNm: "ds_M0710", cdGrpId: "M0710"}], true); 
		
	// 빈값 추가
	ds_M0710.insertRow(0);
	ds_M0710.setColumn(0, "cdid", "");
	ds_M0710.setColumn(0, "cdnm", "");
	
	//zbcfGetCodeList( new Array("M0720", "M0710"), new Array("/root/init/M0720list", "/root/init/M0710list") );
	
	condparam = opener.frmf_getParameter("condparam");	//opener.javascript.getParameter("condparam");
	condarray = condparam.split("▦");
	
	var pid = condarray[0];
	var indd = condarray[1];
	var cretno = condarray[2];
	var instcd = condarray[3];
	
	ds_send.clearData();		//model.removenode("/root/send");
	ds_send.addRow();
	
	ds_send.setColumn(0, "pid", pid);
	ds_send.setColumn(0, "indd", indd);
	ds_send.setColumn(0, "cretno", cretno);
	ds_send.setColumn(0, "instcd", instcd);

// model.makeValue("/root/send/pid", pid);버팀목 전세자금대출 한도
// model.makeValue("/root/send/indd", indd);
// model.makeValue("/root/send/cretno", cretno);
// model.makeValue("/root/send/instcd", instcd);
	
	var oParam = {};
		oParam.id          = "TRMNE00111";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetAdrvHopeRoomInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_adrvinfo=adrvinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNE00111";

	tranf_submit(oParam);

	//submit("TRMNE00111");
	
	var adflag = ds_main_adrvinfo.getColumn(0, "adflag");		//model.getValue("/root/main/adrvinfo/adrvinfo/adflag");
	if ( utlf_isNull(adflag) || adflag != "A" ) {		// adflag == "" || adflag != "A"
		sysf_messageBox("입원의사결정이 [입원]인 환자만 희망병상 종류를 변경하실 수 있습니다.","E");    
		close();
	}
	
	grdf_setRowTypeIcon(group5.grd_adrvinfolist, 0);
}

function fSaveBedKind(){
	var pid = ds_main_adrvinfo.getColumn(0, "pid");	//model.getValue("/root/main/adrvinfo/adrvinfo/pid");
	var inrsrvacptdd = ds_main_adrvinfo.getColumn(0, "inrsrvacptdd");		//model.getValue("/root/main/adrvinfo/adrvinfo/inrsrvacptdd");
	var orddeptcd = ds_main_adrvinfo.getColumn(0, "orddeptcd");		
	var inrsrvacptseqno = ds_main_adrvinfo.getColumn(0, "inrsrvacptseqno");	
	var bedkindfrom = ds_main_adrvinfo.getColumn(0, "bedkindfrom");	
	var bedkindto = ds_main_adrvinfo.getColumn(0, "bedkindto");		
		
	ds_send_saveinfo.clearData();
	ds_send_saveinfo.addColumn("pid", "string");	
	ds_send_saveinfo.addColumn("inrsrvacptdd", "string");	
	ds_send_saveinfo.addColumn("orddeptcd", "string");	
	ds_send_saveinfo.addColumn("inrsrvacptseqno", "string");	
	ds_send_saveinfo.addColumn("bedkindfrom", "string");	
	ds_send_saveinfo.addColumn("bedkindto", "string");
	
	ds_send_saveinfo.addRow();
	ds_send_saveinfo.setColumn(0, "pid", pid);
	ds_send_saveinfo.setColumn(0, "inrsrvacptdd", inrsrvacptdd);
	ds_send_saveinfo.setColumn(0, "orddeptcd", orddeptcd);
	ds_send_saveinfo.setColumn(0, "inrsrvacptseqno", inrsrvacptseqno);
	ds_send_saveinfo.setColumn(0, "bedkindfrom", bedkindfrom);
	ds_send_saveinfo.setColumn(0, "bedkindto", bedkindto);

// 	model.removenode("/root/send/saveinfo");
// 	model.makeValue("/root/send/saveinfo/pid", pid);
// 	model.makeValue("/root/send/saveinfo/inrsrvacptdd", inrsrvacptdd);
// 	model.makeValue("/root/send/saveinfo/orddeptcd", orddeptcd);
// 	model.makeValue("/root/send/saveinfo/inrsrvacptseqno", inrsrvacptseqno);
// 	model.makeValue("/root/send/saveinfo/bedkindfrom", bedkindfrom);
// 	model.makeValue("/root/send/saveinfo/bedkindto", bedkindto);
	
	var oParam = {};
		oParam.id          = "TXMNE00111";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqExeAdrvBedKind";
		oParam.inds        = "saveinfo=ds_send_saveinfo";
		oParam.outds       = "ds_main_adrvinfo=adrvinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TXMNE00111";

	tranf_submit(oParam);

// 	if (submit("TXMNE00111")) {				
// 		submit("TRMNE00111");
// 	}
}

function cf_TXMNE00111(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    var oParam = {};
		oParam.id          = "TRMNE00111";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetAdrvHopeRoomInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_adrvinfo=adrvinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNE00111";

	tranf_submit(oParam);

}

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

function group5_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();	
}
]]></Script>
  </Form>
</FDL>