YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SPPIJ00900_재원미시행처방조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIJ00900" position="absolute 0 0 1102 697" titletext="재원 미시행 처방 조회" oninit="SPPIJ00900_oninit" onload="SPPIJ00900_onload">
    <Layouts>
      <Layout>
        <Static text="재원 미시행 처방 조회" position="absolute 6 9 221 30" id="caption1" class="tit_2"/>
        <Shape position="absolute 5 25 1095 31" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="환자번호" position="absolute 6 30 71 49" id="caption3" class="cell_1"/>
        <Edit position="absolute 70 30 170 49" id="ipt_pid" class="input_default" onkeydown="ipt_pid_onkeydown"/>
        <Button position="absolute 1040 30 1093 49" id="btn_close" class="btn2" text="닫 기" onclick="btn_close_onclick"/>
        <Button position="absolute 175 30 228 49" id="btn_search" class="btn2" text="조 회" onclick="btn_search_onclick"/>
        <Grid position="absolute 5 50 1095 170" id="grd_inpt" scrollbars="autoboth" binddataset="ds_grd_inpt" autofittype="none" oncelldblclick="grd_inpt_oncelldblclick" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="85"/>
                <Column size="50"/>
                <Column size="50"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="50"/>
                <Column size="60"/>
                <Column size="50"/>
                <Column size="50"/>
              </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="보조"/>
                <Cell col="10" text="입원일자"/>
                <Cell col="11" text="시작일자"/>
                <Cell col="12" text="종료일자"/>
                <Cell col="13" text="생성"/>
                <Cell col="14" text="기관번호"/>
                <Cell col="15" text="생성번호"/>
                <Cell col="16" text="주부유형"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:hngnm"/>
                <Cell col="2" text="bind:wardnm"/>
                <Cell col="3" text="bind:roomnm"/>
                <Cell col="4" text="bind:dschdclrtyn"/>
                <Cell col="5" text="bind:dschnotiyn"/>
                <Cell col="6" text="bind:indschstat"/>
                <Cell col="7" text="bind:orddeptnm"/>
                <Cell col="8" text="bind:insukind"/>
                <Cell col="9" text="bind:suppkind"/>
                <Cell col="10" displaytype="date" edittype="date" text="bind:indd" mask="yyyy-MM-dd"/>
                <Cell col="11" displaytype="date" edittype="date" text="bind:fromdd" mask="yyyy-MM-dd"/>
                <Cell col="12" displaytype="date" edittype="date" text="bind:todd" mask="yyyy-MM-dd"/>
                <Cell col="13" text="bind:cretyn"/>
                <Cell col="14" text="bind:instcd"/>
                <Cell col="15" text="bind:cretno"/>
                <Cell col="16" text="bind:mskind"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid position="absolute 5 175 1095 690" id="grd_iprc" scrollbars="autoboth" binddataset="ds_grd_iprc" autofittype="none" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="49"/>
                <Column size="77"/>
                <Column size="45"/>
                <Column size="45"/>
                <Column size="85"/>
                <Column size="234"/>
                <Column size="40"/>
                <Column size="25"/>
                <Column size="40"/>
                <Column size="25"/>
                <Column size="50"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="54"/>
                <Column size="66"/>
                <Column size="97"/>
                <Column size="54"/>
                <Column size="69"/>
                <Column size="66"/>
                <Column size="63"/>
              </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"/>
                <Cell col="9" text="수량"/>
                <Cell col="10"/>
                <Cell col="11" text="급/비"/>
                <Cell col="12" text="예약일시"/>
                <Cell col="13" text="처방적용일"/>
                <Cell col="14" text="처방일시"/>
                <Cell col="15" text="Acting부서"/>
                <Cell col="16" text="prcpno"/>
                <Cell col="17" text="prcphistno"/>
                <Cell col="18" text="execprcpuniqno"/>
                <Cell col="19" text="rsrvflag"/>
                <Cell col="20" text="inclprcptno"/>
                <Cell col="21" text="prcpsetcd"/>
                <Cell col="22" text="prcpclscd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" text="bind:roomcd"/>
                <Cell col="2" text="bind:execprcpstatcd"/>
                <Cell col="3" text="bind:prcpkindcdnm"/>
                <Cell col="4" text="bind:prcpclscd"/>
                <Cell col="5" text="bind:prcpcd"/>
                <Cell col="6" style="align:left middle;" text="bind:prcpnm" tooltiptext="bind:prcpnm"/>
                <Cell col="7" text="bind:prcpvol"/>
                <Cell col="8" text="bind:prcpvolunitflag"/>
                <Cell col="9" text="bind:prcpqty"/>
                <Cell col="10" text="bind:prcpqtyunitflag"/>
                <Cell col="11" text="bind:payflagcd"/>
                <Cell col="12" displaytype="date" edittype="date" text="bind:rsrvdt" mask="yyyy-MM-dd HH:mm"/>
                <Cell col="13" displaytype="date" edittype="date" text="bind:prcpdd" mask="yyyy-MM-dd"/>
                <Cell col="14" displaytype="date" edittype="date" text="bind:prcpdt" mask="yyyy-MM-dd HH:mm"/>
                <Cell col="15" text="bind:execdeptcd"/>
                <Cell col="16" text="bind:prcpno"/>
                <Cell col="17" text="bind:prcphistno"/>
                <Cell col="18" text="bind:execprcpuniqno"/>
                <Cell col="19" text="bind:rsrvflag"/>
                <Cell col="20" text="bind:inclprcpno"/>
                <Cell col="21" text="bind:prcpsetcd"/>
                <Cell col="22" text="bind:prcpclscd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_inpt" 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="wardnm" type="STRING"/>
          <Column id="roomnm" type="STRING"/>
          <Column id="dschdclrtyn" type="STRING"/>
          <Column id="dschnotiyn" type="STRING"/>
          <Column id="indschstat" type="STRING"/>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="insukind" type="STRING"/>
          <Column id="suppkind" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="cretyn" type="STRING"/>
          <Column id="instcd" type="STRING"/>
          <Column id="cretno" type="STRING"/>
          <Column id="mskind" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_iprc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="roomcd" type="STRING"/>
          <Column id="execprcpstatcd" type="STRING"/>
          <Column id="prcpkindcdnm" type="STRING"/>
          <Column id="prcpclscd" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcpvol" type="STRING"/>
          <Column id="prcpvolunitflag" type="STRING"/>
          <Column id="prcpqty" type="STRING"/>
          <Column id="prcpqtyunitflag" type="STRING"/>
          <Column id="payflagcd" type="STRING"/>
          <Column id="rsrvdt" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="prcpdt" type="STRING"/>
          <Column id="execdeptcd" type="STRING"/>
          <Column id="prcpno" type="STRING"/>
          <Column id="prcphistno" type="STRING"/>
          <Column id="execprcpuniqno" type="STRING"/>
          <Column id="rsrvflag" type="STRING"/>
          <Column id="inclprcpno" type="STRING"/>
          <Column id="prcpsetcd" type="STRING"/>
          <Column id="prcpclscd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </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 SPPIJ00900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIJ00900_onload(obj:Form, e:LoadEventInfo)
{
	if( frmf_checkOpener() )  {
		ipt_pid.value = arg_tmp_pid;
	}
	if (!utlf_isNull(ipt_pid.value)) {
		btn_search_onclick()	
	}
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_send", [{col:"pid", type:"STRING", size:256, val: ipt_pid.value}]);	
							 
	var oParam = {};
		oParam.id          = "TRPIJ00901";
		oParam.service     = "bfjudgapp.InHospJudg";
		oParam.method      = "reqGetNoActInpt";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_inpt=gridinpt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ00901";

	tranf_submit(oParam);
	
	//var count = ds_grd_inpt.rowcount;
	//alert(count);
	if(ds_grd_inpt.rowcount > 0){
		var oParam = {};
			oParam.id          = "TRPIJ00902";
			oParam.service     = "bfjudgapp.InHospJudg";
			oParam.method      = "reqGetNoActIprc";
			oParam.inds        = "req=ds_grd_inpt";
			oParam.outds       = "ds_grd_iprc=gridiprc";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIJ00902";

		tranf_submit(oParam);
 	}
}

function grd_inpt_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	dsf_createDsRow( "ds_send1" , [{col : "pid", val : ds_grd_inpt.getColumn(e.row, "pid")}
								,  {col : "indd", val : ds_grd_inpt.getColumn(e.row, "indd")}
								,  {col : "cretno", val : ds_grd_inpt.getColumn(e.row, "cretno")}
								,  {col : "mskind", val : ds_grd_inpt.getColumn(e.row, "mskind")}
								,  {col : "fromdd", val : ds_grd_inpt.getColumn(e.row, "fromdd")}
								,  {col : "todd", val : ds_grd_inpt.getColumn(e.row, "todd")}]);
	var oParam = {};
		oParam.id          = "TRPIJ00902";
		oParam.service     = "bfjudgapp.InHospJudg";
		oParam.method      = "reqGetNoActIprc";
		oParam.inds        = "req=ds_send1";
		oParam.outds       = "ds_grd_iprc=gridiprc";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ00902";

	tranf_submit(oParam);
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	 {
		btn_search_onclick();
	 }
}
]]></Script>
  </Form>
</FDL>