YNU_JEUS/app_home/himed/xpapps/pam/bfjudgcarexp/xp/SMPPI00500_타병원결과등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPPI00500" position="absolute 0 0 1218 770" titletext="타병원결과등록" oninit="SMPPI00500_oninit" onload="SMPPI00500_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="타병원 결과등록" class="tit_1" position="absolute 2 1 218 24"/>
        <Div id="group2" taborder="1" class="div_SA" position="absolute 2 25 1211 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="6" text="조회" class="btn1" position="absolute 1130 10 1186 32" anchor="top right" onclick="group2_btn_search_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 7 1110 34" anchor="top right"/>
              <Static id="caption5" text="환자번호 :" class="search_name" position="absolute 30 11 116 28" anchor="default"/>
              <Static id="caption2" text="제어코드 :" class="search_name" position="absolute 278 11 364 28" anchor="default"/>
              <Static id="caption3" text="처 방 명 :" class="search_name" position="absolute 526 11 612 28" anchor="default"/>
              <Static id="caption4" text="사   유 :" class="search_name" position="absolute 774 11 860 28" anchor="default"/>
              <Edit id="ipt_pid" taborder="7" class="input_search" position="absolute 121 10 251 29" anchor="default" onkeydown="group2_ipt_pid_onkeydown"/>
              <Edit id="ipt_rulecd" taborder="8" class="input_search" position="absolute 369 10 499 29" anchor="default" onkeydown="group2_ipt_rulecd_onkeydown"/>
              <Edit id="ipt_prcpnm" taborder="9" class="input_search" position="absolute 615 10 745 29" anchor="default" onkeydown="group2_ipt_prcpnm_onkeydown"/>
              <Edit id="ipt_prcpdesc" taborder="10" class="input_search" position="absolute 859 10 989 29" anchor="default" onkeydown="group2_ipt_prcpdesc_onkeydown"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_rowadd" taborder="2" text="행추가" class="btn2" position="absolute 1019 70 1072 89" onclick="btn_rowadd_onclick" anchor="top right"/>
        <Button id="btn_rowdel" taborder="3" text="행삭제" class="btn2" position="absolute 1075 70 1128 89" onclick="btn_rowdel_onclick" anchor="top right"/>
        <Button id="button5" taborder="4" text="엑셀저장" class="btn7" position="absolute 1130 70 1210 89" onclick="button5_onclick" anchor="top right"/>
        <Shape id="line1" class="line_1" position="absolute 2 92 1212 103" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
        <Grid id="grd_picmrsltlist" class="datagrid2" taborder="5" binddataset="ds_grd_picmrsltlist" useinputpanel="false" position="absolute 2 99 1213 739" autofittype="col" anchor="left top right" onexpanddown="grd_picmrsltlist_onexpanddown" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="97"/>
                <Column size="91"/>
                <Column size="106"/>
                <Column size="301"/>
                <Column size="153"/>
                <Column size="231"/>
                <Column size="100"/>
                <Column size="100"/>
              </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="종료일"/>
              </Band>
              <Band id="body">
                <Cell/>
                <Cell col="1" displaytype="text" edittype="text" text="bind:pid"/>
                <Cell col="2" displaytype="text" edittype="text" text="bind:rulecd"/>
                <Cell col="3" displaytype="text" edittype="expr:ds_grd_picmrsltlist.getRowType(currow) == 2 ? 'text' : 'none'" text="bind:prcpcd" expandshow="show" expandsize="16"/>
                <Cell col="4" displaytype="text" edittype="readonly" text="bind:prcpnm"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:prcprslt"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:prcpdesc"/>
                <Cell col="7" displaytype="date" edittype="date" text="bind:fromdd" mask="yyyy-MM-dd"/>
                <Cell col="8" displaytype="date" edittype="date" text="bind:todd" mask="yyyy-MM-dd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="타병원 결과 List" class="tit_2" position="absolute 6 75 163 96">
          <Layouts>
            <Layout width="157" height="21"/>
          </Layouts>
        </Static>
        <Div id="group4" anchor="left right bottom" taborder="6" position="absolute 0 742 1211 766">
          <Layouts>
            <Layout>
              <Button id="button1" taborder="0" text="저 장" onclick="group4_button1_onclick" class="btn4" position="absolute 1142 2 1210 24" anchor="right bottom"/>
              <Shape id="line23" class="line_6" position="absolute 0 -2 1211 4" anchor="left right bottom" style="strokepen:1 solid #9ebed4ff;"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_picmrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="rulecd" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcprslt" type="STRING"/>
          <Column id="prcpdesc" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <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 "pam_pamcomnxp::PAM001.xjs";

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

function SMPPI00500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_picmrsltlist);
	grdf_setRowTypeIcon(grd_picmrsltlist, 0);
	ds_grd_picmrsltlist.getRowType();
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_send", [{col:"pid", type:"STRING", size:256 , val : group2.ipt_pid.value }
                             ,  {col:"rulecd", type:"STRING", size:256, val : group2.ipt_rulecd.value}
                             ,  {col:"prcpnm", type:"STRING", size:256, val : group2.ipt_prcpnm.value}
                             ,  {col:"prcpdesc", type:"STRING", size:256, val : group2.ipt_prcpdesc.value}]);		
	var oParam = {};
		oParam.id          = "TRPPI00501";
		oParam.service     = "bfjudgcareapp.BfJudgCareMngt";
		oParam.method      = "reqGetPicmrsltList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_picmrsltlist=picmrsltlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPPI00501";

	tranf_submit(oParam);

}

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

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

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

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

function btn_rowadd_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridInsertRow();
}

function fSpclGridInsertRow(){
	var addRw = ds_grd_picmrsltlist.addRow();
}
 
function btn_rowdel_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}

function fSpclGridDeleteRow(){
	var SelectedRows = grdf_getSelectedRows(grd_picmrsltlist);
	grdf_setStatus(grd_picmrsltlist, "D", SelectedRows);
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_grd_picmrsltlist.rowcount > 0) {
		grdf_exportExcel(grd_picmrsltlist, "타병원결과목록", "see");
	}else{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}		
}

function group4_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grd_picmrsltlist, "all");
	if ( updtdata.rowcount == 0)
	{
		sysf_messageBox("업데이트 정보가 없습니다.","I");
		return;
	}else{
		
		var oParam = {};
			oParam.id          = "TXPPI00501";
			oParam.service     = "bfjudgcareapp.BfJudgCareMngt";
			oParam.method      = "reqSetPicmrsltList";
			oParam.inds        = "req=ds_grd_picmrsltlist:U";
			oParam.outds       = "ds_grd_picmrsltlist=item";
			oParam.async       = false;
			oParam.typeStr    = "m";
			oParam.callback    = "cf_TXPPI00501";
			

		tranf_submit(oParam);
	}
	
}

function cf_TXPPI00501(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    sysf_messageBox("저장이","I002");
    group2_btn_search_onclick();
}

function grd_picmrsltlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	dsf_createDsRow("ds_receivedata" , [                  
					   {col: "srchdrugcd", 	val:ds_grd_picmrsltlist.getColumn(ds_grd_picmrsltlist.rowposition,"prcpcd")}
					 ]);	
	var objArg = new Object();
	objArg.arg_ds_temp = ds_receivedata;
	var objRtn = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
	//trace(objRtn.calcscorcd) 
	if (ds_temp_mech.rowcount > 0){
		var vprcpcd 	= ds_temp_mech.getColumn(0,"calcscorcd");
		var vprcpnm	= ds_temp_mech.getColumn(0,"hngnm");
		ds_grd_picmrsltlist.setColumn(ds_grd_picmrsltlist.rowposition,"prcpcd", vprcpcd)
		ds_grd_picmrsltlist.setColumn(ds_grd_picmrsltlist.rowposition,"prcpnm", vprcpnm)
		ds_temp_mech.clearData();
	}
}
]]></Script>
  </Form>
</FDL>