YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLBP02700_수혈동의서조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLBP02700" position="absolute 0 0 1256 805" titletext="Untitle" oninit="model1_oninit">
    <Layouts>
      <Layout>
        <Div id="grp_sea" anchor="left top right" taborder="1" style="align:center top;" position="absolute 0 25 1256 67" class="div_SA">
          <Layouts>
            <Layout/>
          </Layouts>
        </Div>
        <Static id="caption2" class="search_name" position="absolute 9 36 83 56" anchor="default" positiontype="position" text="진료일자"/>
        <Static id="caption222" class="search_name" position="absolute 322 36 396 56" anchor="default" positiontype="position" text="등록번호"/>
        <Edit id="ipt_pid" class="input_button" position="absolute 394 36 493 56" anchor="default" positiontype="position" onkeydown="ipt_pid_onkeydown"/>
        <Button id="button1" class="btn1" position="absolute 1118 36 1174 56" anchor="top right" positiontype="position" text="조회" onclick="button1_onclick"/>
        <Shape id="line13" class="line_4" position="absolute 1108 7 1108 29" anchor="default" positiontype="position" linetype="vertical"/>
        <Calendar id="input26" class="input_essential" position="absolute 82 36 182 56" anchor="default" positiontype="position" dateformat="yyyy-MM-dd" value="null"/>
        <Static id="caption3" position="absolute 185 36 200 56" anchor="default" positiontype="position" text="~"/>
        <Calendar id="input1" class="input_essential" position="absolute 198 36 298 56" anchor="default" positiontype="position" dateformat="yyyy-MM-dd"/>
        <Static id="caption1" class="tit_2" position="absolute 0 77 131 97" anchor="default" positiontype="position" text="수혈동의서 리스트"/>
        <Grid id="grd_transfusiontext" position="absolute 0 97 1256 805" anchor="all" positiontype="position" binddataset="ds_grid_grd_transfusiontext" oncelldblclick="grd_transfusiontext_oncelldblclick" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="160"/>
                <Column size="85"/>
                <Column size="65"/>
                <Column size="100"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="40"/>
                <Column size="115"/>
                <Column size="50"/>
                <Column size="100"/>
                <Column size="135"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="20"/>
              </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="진료과"/>
                <Cell col="9" text="환자명"/>
                <Cell col="10" text="진료타입"/>
                <Cell col="11" text="진료과/병실"/>
                <Cell col="12" text="출력일시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="expr:currow+1"/>
                <Cell col="1" style="align:center middle;" text="bind:formnm"/>
                <Cell col="2" style="align:center middle;" text="bind:stat"/>
                <Cell col="3" style="align:center middle;" text="bind:scanyn"/>
                <Cell col="4" displaytype="text" style="align:center middle;" text="bind:formcd"/>
                <Cell col="5" displaytype="text" style="align:center middle;" text="bind:cretno"/>
                <Cell col="6" displaytype="text" style="align:center middle;" text="bind:pid"/>
                <Cell col="7" style="align:center middle;" text="bind:orddd" mask="expr:orddd==null?'':'####-##-##'"/>
                <Cell col="8" style="align:center middle;" text="bind:orddeptcd"/>
                <Cell col="9" style="align:center middle;" text="bind:patnm"/>
                <Cell col="10" style="align:center middle;" text="bind:ordtype"/>
                <Cell col="11" style="align:center middle;" text="bind:wardroom"/>
                <Cell col="12" style="align:center middle;" text="bind:prntdt" mask="expr:prntdt==null?'':'####-##-## ##:##:##'"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_1" position="absolute 0 70 1194 70" anchor="default" positiontype="position" linetype="horizontal"/>
        <Button id="button10" class="btn7" position="absolute 1201 74 1254 94" anchor="top right" positiontype="position" text="엑셀" onclick="button10_onclick"/>
        <Button id="button5" class="btn1" position="absolute 1177 36 1245 56" anchor="top right" positiontype="position" text="초기화" onclick="button5_onclick"/>
        <Shape id="line15" class="line_6" position="absolute 0 25 1194 25" anchor="default" positiontype="position" linetype="horizontal"/>
        <Static id="caption6" class="tit_1" position="absolute 0 0 136 25" anchor="default" positiontype="position" text="수혈동의서조회"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_transfusiontext" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <column id="formnm" type="STRING" size="256"/>
          <column id="stat" type="STRING" size="256"/>
          <column id="scanyn" type="STRING" size="256"/>
          <column id="formcd" type="STRING" size="256"/>
          <column id="cretno" type="STRING" size="256"/>
          <column id="treatno" type="STRING" size="256"/>
          <column id="pid" type="STRING" size="256"/>
          <column id="orddd" type="STRING" size="256"/>
          <column id="orddeptcd" type="STRING" size="256"/>
          <column id="patnm" type="STRING" size="256"/>
          <column id="ordtype" type="STRING" size="256"/>
          <column id="prntdt" type="STRING" size="256"/>
          <column id="wardroom" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_iemr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="docucd"/>
          <Column id="treatno"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LLZ001.xjs";

function model1_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);

	lf_setInit();
}

function lf_setInit() {
	
	var Today = utlf_getCurrentDate();
	var BfDay = utlf_addDate(Today, -30);
	input26.value = BfDay;
	input1.value  = Today;
	grdf_setGridSort(grd_transfusiontext);
}

 function lf_getTansfusionList() {
		
		var startdd = input26.value;
		var enddd   = input1.value;
		var pid     = ipt_pid.value;
		var sInDsName = dsf_createDsRow("ds_temp_search"
 	                             , [{col: "startdd", val:startdd }
 	                             , {col: "enddd", val:enddd }
 	                             , {col: "pid", val:pid }
 	                             ]);
		var oParam = {};
			oParam.id          = "TRLBP02601";
			oParam.service     = "refprintmngtapp.BloodBankRefPrintMngt";
			oParam.method      = "reqGetTansfusionList";
			oParam.inds        = "cond="+sInDsName;
			oParam.outds       = "ds_grid_grd_transfusiontext=getTansfusionList";
			oParam.async       = false;
			oParam.callback    = "cbf_SMLBP02700";

		tranf_submit(oParam);                        
}

//  EMR Viewer popup 호출
function lf_openview(){
			
	if(utlf_transNullToEmpty(ds_grid_grd_transfusiontext.getColumn(ds_grid_grd_transfusiontext.rowposition, "scanyn")) == "Y" && 
	utlf_transNullToEmpty(ds_grid_grd_transfusiontext.getColumn(ds_grid_grd_transfusiontext.rowposition, "treatno")) != "")
	{
		var arrArg = new Object();					

		ds_iemr.clearData();
		ds_iemr.addRow();
		
		ds_iemr.setColumn(0, "docucd", utlf_transNullToEmpty(ds_grid_grd_transfusiontext.getColumn(ds_grid_grd_transfusiontext.rowposition, "formcd")));
		ds_iemr.setColumn(0, "treatno", utlf_transNullToEmpty(ds_grid_grd_transfusiontext.getColumn(ds_grid_grd_transfusiontext.rowposition, "treatno")));
		
		arrArg.iemr = ds_iemr;
		arrArg.viewer_flag = "";

		frmf_modal("SPMMR06400","SPMMR06400", arrArg, "", "", "", "", "", "", "", "", "", "M");
	}
}

// 등록번호 Enter Key 처리
function lf_keyEvent(){
	
	fSetInputNodeCurPidObj(ipt_pid, 9);  //등록번호 9자리로 변경
	ipt_pid.setSelect();
	lf_getTansfusionList();
}

// 엑셀 저장
function lf_exeExcel(pGridId) {
	grdf_exportExcel(pGridId, lf_lisGetTitle(this), "sheet1", false);
}

// callback 함수
function cbf_SMLBP02700(strSvcID, nErrorCode, strErrorMag) {
	
	if(nErrorCode != 0) {
		sysf_messageBox("ID: "+ strSvcID + "  Error: " + strErrorMag, "E009", "");
	}else{
		switch(strSvcID) {
			case "TRLBP02701":
					
				break;
			default:
				break;
		}
	}
}

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

function button1_onclick(obj:Button, e:ClickEventInfo)
{
	lf_getTansfusionList();
}

function grd_transfusiontext_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	lf_openview();
}

function button5_onclick(obj:Button, e:ClickEventInfo)
{
	lf_setInit();					
}

function button10_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_exeExcel(grd_transfusiontext);
}
]]></Script>
  </Form>
</FDL>