YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SMPIJ01200_미시행처방및반납처방조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPIJ01200" position="absolute 0 0 1280 1024" titletext="미시행 처방 및 반납처방 조회" onload="SMPIJ01200_onload">
    <Layouts>
      <Layout>
        <Div id="group1" position="absolute 0 0 1194 13" style="">
          <Layouts>
            <Layout>
              <Static id="caption6" class="tit_1" position="absolute 0 0 191 13" style="" text="미시행 처방 및 반납처방 조회" />
            </Layout>
          </Layouts>
        </Div>
        <Div id="group3" scrollbars="autoboth" position="absolute 0 13 1195 757" style="">
          <Layouts>
            <Layout>
              <Div id="group2" position="absolute 0 10 1194 45" style="align: top;border: solid #ffd799 #ffd799;background:#fffbf2  ;">
                <Layouts>
                  <Layout>
                    <Shape id="roundrect1" anchor="default" position="absolute 0 0 1194 35" style="border: solid #ffd799 #ffd799;background:#fffbf2  ;" />
                    <Button id="button1" class="btn1_letter2" position="absolute 1123 7 1179 29" style="" text="조회" onclick="group3_group2_button1_onclick" />
                    <Shape id="line13" class="line_4" linetype="vertical" position="absolute 1107 7 1110 29" style="" anchor="default" />
                    <Static id="caption3" class="search_name" position="absolute 13 9 99 26" style="" text="의뢰일자 :" />
                    <Static id="caption2" class="search_name" position="absolute 744 9 817 26" style="" text="입원일 :" />
                    <Static id="caption4" position="absolute 190 8 202 25" style="" text="~" />
                    <Static id="caption7" class="search_name" position="absolute 302 9 362 26" style="" text="병동 :" />
                    <Static id="caption5" class="search_name" position="absolute 495 9 581 26" style="" text="환자번호 :" />
                    <Static id="caption8" class="search_name" position="absolute 920 9 980 26" style="" text="확인 :" />
                    <Calendar id="ipt_fromdd" class="input_search" position="absolute 102 8 187 27" style="" anchor="default" />
                    <Calendar id="ipt_todd" class="input_search" position="absolute 205 8 290 27" style="" anchor="default" />
                    <Combo innerdataset="ds_init_U0001list_U0001" datacolumn="cdnm" codecolumn="cdid" columncount="-1" rowcount="-1" id="cmb_wardcd" class="combo_search" position="absolute 365 8 480 27" style="" />
                    <Edit id="ipt_pid" class="input_search" position="absolute 584 8 669 27" style="" anchor="default" onlbuttonup="group3_group2_ipt_pid_onlbuttonup" onkeypress="group3_group2_ipt_pid_onkeypress" />
                    <Edit id="opt_patnm" class="output_fix" position="absolute 673 8 730 27" style="" anchor="default" readonly="true" />
                    <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="cmb_chkflag" class="combo_search" position="absolute 983 8 1085 27" style="">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn" />
                          <Column id="datacolumn" />
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">1</Col>
                            <Col id="datacolumn">미시행 + 반납</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">2</Col>
                            <Col id="datacolumn">미시행</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">3</Col>
                            <Col id="datacolumn">반납</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">4</Col>
                            <Col id="datacolumn">시행</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">5</Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Calendar id="ipt_indd" class="input_search" position="absolute 820 8 905 27" style="" anchor="default" />
                  </Layout>
                </Layouts>
              </Div>
              <Static id="caption1" class="tit_2" position="absolute 5 55 211 68" style="" text="미시행 처방 및 반납처방 리스트" />
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 0 70 1194 73" style="" anchor="default" />
              <Grid id="grd_ordlist" binddataset="ds_main_list01_ordlist" class="datagrid2" position="absolute 0 75 1194 739" style="" oncelldblclick="group3_grd_ordlist_oncelldblclick" onaftersort="group3_grd_ordlist_onaftersort">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="85" />
                      <Column size="86" />
                      <Column size="66" />
                      <Column size="60" />
                      <Column size="109" />
                      <Column size="86" />
                      <Column size="54" />
                      <Column size="84" />
                      <Column size="68" />
                      <Column size="59" />
                      <Column size="80" />
                      <Column size="77" />
                      <Column size="52" />
                      <Column size="122" />
                      <Column size="56" />
                      <Column size="47" />
                      <Column size="37" />
                      <Column size="37" />
                      <Column size="100" />
                      <Column size="100" />
                      <Column size="75" />
                      <Column size="71" />
                      <Column size="100" />
                      <Column size="73" />
                      <Column size="76" />
                    </Columns>
                    <Rows>
                      <Row size="25" band="head" />
                      <Row size="25" />
                    </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="Acting" />
                      <Cell col="13" text="처방명" />
                      <Cell col="14" text="계산여부" />
                      <Cell col="15" text="투여량" />
                      <Cell col="16" text="횟수" />
                      <Cell col="17" text="일수" />
                      <Cell col="18" text="사유" />
                      <Cell col="19" text="참고" />
                      <Cell col="20" text="등록부서" />
                      <Cell col="21" text="등록자" />
                      <Cell col="22" text="확인일시" />
                      <Cell col="23" text="확인자" />
                      <Cell col="24" text="심사자" />
                    </Band>
                    <Band id="body">
                      <Cell text="bind:actorddd" />
                      <Cell col="1" text="bind:pid" />
                      <Cell col="2" text="bind:hngnm" />
                      <Cell col="3" text="bind:prcpflag" />
                      <Cell col="4" text="bind:execprcphistcd" />
                      <Cell col="5" text="bind:prcpdd" />
                      <Cell col="6" text="bind:roomcd" />
                      <Cell col="7" text="bind:prcpexecdeptcd" />
                      <Cell col="8" text="bind:orddrid" />
                      <Cell col="9" text="bind:prcpno" />
                      <Cell col="10" text="bind:prcphistno" />
                      <Cell col="11" text="bind:prcpcd" />
                      <Cell col="12" text="bind:actcretno" />
                      <Cell col="13" text="bind:prcpnm" />
                      <Cell col="14" text="bind:calcflag" />
                      <Cell col="15" text="bind:execprcpqty" />
                      <Cell col="16" text="bind:execprcptims" />
                      <Cell col="17" text="bind:execprcpdayno" />
                      <Cell col="18" text="bind:resncd" />
                      <Cell col="19" text="bind:rem" />
                      <Cell col="20" text="bind:rgstdeptcd" />
                      <Cell col="21" text="bind:rgstrid" />
                      <Cell col="22" text="bind:carecnfmdd" />
                      <Cell col="23" text="bind:carecnfmrid" />
                      <Cell col="24" text="bind:judgid" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_btn" scrollbars="autoboth" position="absolute 0 757 1195 784" style="">
          <Layouts>
            <Layout>
              <Button id="button9" class="btn4_letter2" position="absolute 1138 5 1194 27" style="" text="닫기" />
              <Shape id="line32" class="line_6" linetype="horizontal" position="absolute 0 0 1194 3" style="" anchor="default" />
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <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>
            <Col id="pid"></Col>
            <Col id="hngnm"></Col>
            <Col id="rrgstno1"></Col>
            <Col id="rrgstno2"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_U0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="U0001" type="STRING" size="256" />
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256" />
          <Column id="todd" type="STRING" size="256" />
          <Column id="wardcd" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="patnm" type="STRING" size="256" />
          <Column id="indd" type="STRING" size="256" />
          <Column id="chkflag" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"></Col>
            <Col id="todd"></Col>
            <Col id="wardcd"></Col>
            <Col id="pid"></Col>
            <Col id="patnm"></Col>
            <Col id="indd"></Col>
            <Col id="chkflag"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_sppmc02500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_init_P0160list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="P0160" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="P0160"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="patinfolist" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="patinfolist"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_list01_ordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="actorddd" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="hngnm" type="STRING" size="256" />
          <Column id="prcpflag" type="STRING" size="256" />
          <Column id="execprcphistcd" type="STRING" size="256" />
          <Column id="prcpdd" type="STRING" size="256" />
          <Column id="roomcd" type="STRING" size="256" />
          <Column id="prcpexecdeptcd" type="STRING" size="256" />
          <Column id="orddrid" type="STRING" size="256" />
          <Column id="prcpno" type="STRING" size="256" />
          <Column id="prcphistno" type="STRING" size="256" />
          <Column id="prcpcd" type="STRING" size="256" />
          <Column id="actcretno" type="STRING" size="256" />
          <Column id="prcpnm" type="STRING" size="256" />
          <Column id="calcflag" type="STRING" size="256" />
          <Column id="execprcpqty" type="STRING" size="256" />
          <Column id="execprcptims" type="STRING" size="256" />
          <Column id="execprcpdayno" type="STRING" size="256" />
          <Column id="resncd" type="STRING" size="256" />
          <Column id="rem" type="STRING" size="256" />
          <Column id="rgstdeptcd" type="STRING" size="256" />
          <Column id="rgstrid" type="STRING" size="256" />
          <Column id="carecnfmdd" type="STRING" size="256" />
          <Column id="carecnfmrid" type="STRING" size="256" />
          <Column id="judgid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="actorddd"></Col>
            <Col id="pid"></Col>
            <Col id="hngnm"></Col>
            <Col id="prcpflag"></Col>
            <Col id="execprcphistcd"></Col>
            <Col id="prcpdd"></Col>
            <Col id="roomcd"></Col>
            <Col id="prcpexecdeptcd"></Col>
            <Col id="orddrid"></Col>
            <Col id="prcpno"></Col>
            <Col id="prcphistno"></Col>
            <Col id="prcpcd"></Col>
            <Col id="actcretno"></Col>
            <Col id="prcpnm"></Col>
            <Col id="calcflag"></Col>
            <Col id="execprcpqty"></Col>
            <Col id="execprcptims"></Col>
            <Col id="execprcpdayno"></Col>
            <Col id="resncd"></Col>
            <Col id="rem"></Col>
            <Col id="rgstdeptcd"></Col>
            <Col id="rgstrid"></Col>
            <Col id="carecnfmdd"></Col>
            <Col id="carecnfmrid"></Col>
            <Col id="judgid"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd" />
      <BindItem id="item1" compid="group3.group2.ipt_todd" propid="value" datasetid="ds_send" columnid="todd" />
      <BindItem id="item2" compid="group3.group2.cmb_wardcd" propid="value" datasetid="ds_send" columnid="wardcd" />
      <BindItem id="item3" compid="group3.group2.ipt_pid" propid="value" datasetid="ds_send" columnid="pid" />
      <BindItem id="item4" compid="group3.group2.opt_patnm" propid="value" datasetid="ds_send" columnid="patnm" />
      <BindItem id="item5" compid="group3.group2.cmb_chkflag" propid="value" datasetid="ds_send" columnid="chkflag" />
      <BindItem id="item6" compid="group3.group2.ipt_indd" propid="value" datasetid="ds_send" columnid="indd" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SMPIJ01200_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

					var arrParam = [ {dsNm: "ds_init_P0160list", 
                  cdGrpId: "P0160"  } ];
appf_getCodeList(arrParam,  );
//					submit("TRPIJ01201");
var oParam = {};
    oParam.id          = "TRPIJ01201";
    oParam.service     = "bfjudgapp.UnExecRtnPrcp";
    oParam.method      = "reqGetWardCd";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=U0001";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01201";

tranf_submit(oParam);
/*
function cf_TRPIJ01201(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ01201(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ01201") > -1
arErrorCode.pop("TRPIJ01201") < 0
*/



					init();

}

					function init() {
						// 팝업일 경우 자동 조회
						if(window.parent != null) {
//							if(ds_send.getColumn(0, "wardcd") != "" || ds_send.getColumn(0, "pid") != "" || 
//							ds_send.getColumn(0, "indd") != "" || ds_send.getColumn(0, "chkflag") != "") {
							if(ds_send.getColumn(0, "wardcd") != "" || ds_send.getColumn(0, "pid") != "" || ds_send.getColumn(0, "indd") != "") {
								search();
							}
						}
					}

					// 조회 실행시 검색조건 검사
					function search() {
						if(group3.group2.cmb_chkflag.value=='4') {
							if(group3.group2.ipt_fromdd.value == "") {
								sysf_messageBox("의뢰일자 시작일을","C001");
								group3.group2.ipt_fromdd.setFocus();
								return false;
							}
							if(group3.group2.ipt_todd.value == "") {
								sysf_messageBox("의뢰일자 종료일을","C001");
								group3.group2.ipt_todd.setFocus();
								return false;
							}
						}
						ds_main_list01.clearData();
//						submit("TRPIJ01202");
var oParam = {};
    oParam.id          = "TRPIJ01202";
    oParam.service     = "bfjudgapp.UnExecRtnPrcp";
    oParam.method      = "reqGetExipMech";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=ordlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01202";

tranf_submit(oParam);
/*
function cf_TRPIJ01202(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ01202(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ01202") > -1
arErrorCode.pop("TRPIJ01202") < 0
*/


					}

include '../../.._com_commonweb_js_common.js'
include '../../.._com_commonweb_js_numericHelper.js'
include '../../.._com_commonweb_js_dateHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'

function group3_group2_button1_onclick(obj:Button, e:ClickEventInfo) {

						if ((ds_send.getColumn(0, "fromdd") && ds_send.getColumn(0, "todd")) ||
							(ds_send.getColumn(0, "wardcd") != "" || ds_send.getColumn(0, "pid") != "" || ds_send.getColumn(0, "indd") != "")) {
							search();
						} else {
							sysf_messageBox("의뢰일자(시작일자~종료일자) 또는 그외의 조건을","C001");
						}

}

function group3_group2_ipt_pid_onlbuttonup(obj:Edit,  e:MouseEventInfo) {

							if (group3.group2.ipt_pid.value) {
							ds_hidden_sppmc02500_cond.setColumn( 0, "srchcond", "1");		// 검색조건 : 등록번호로 설정
							ds_hidden_sppmc02500_cond.setColumn( 0, "pid", group3.group2.ipt_pid.value);
							} else {
								ds_hidden_sppmc02500_cond.clearData(); ds_hidden_sppmc02500_cond.addRow();
							}

							frmf_modal("SPPMC02500", "SPPMC02500", "ds_hidden_sppmc02500_cond""-"ds_send"", "", "1", "150", "150", "", "", "", "", "", "M");
							var srch_pid = ds_main_patinfo_patinfolist.getColumn(0, "pid");

							group3.group2.ipt_pid.value = ds_main_patinfo_patinfolist.getColumn(0, "pid");
							group3.group2.opt_patnm.value = ds_main_patinfo_patinfolist.getColumn(0, "hngnm");

//model.refresh();

}

function group3_group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo) {

							if (event.keyCode == '13') {	// Enter 입력 시에
								if (group3.group2.ipt_pid.value) {
									ds_hidden_sppmc02500_cond.setColumn( 0, "srchcond", "1");		// 검색조건 : 등록번호로 설정
									ds_hidden_sppmc02500_cond.setColumn( 0, "pid", group3.group2.ipt_pid.value);
								} else {
									ds_hidden_sppmc02500_cond.clearData(); ds_hidden_sppmc02500_cond.addRow();
								}

								frmf_modal("SPPMC02500", "SPPMC02500", "ds_hidden_sppmc02500_cond""-"ds_send"", "", "1", "150", "150", "", "", "", "", "", "M");
								var srch_pid = ds_main_patinfo_patinfolist.getColumn(0, "pid");

								group3.group2.ipt_pid.value = ds_main_patinfo_patinfolist.getColumn(0, "pid");
								group3.group2.opt_patnm.value = ds_main_patinfo_patinfolist.getColumn(0, "hngnm");

//model.refresh();

							}

}

function group3_grd_ordlist_oncelldblclick(obj:Grid, e:GridClickEventInfo) {

						if(window.parent != null) {
							var row = group3.grd_ordlist.row;
							opener.ds_hidden_ordlist.clearData(); 
							opener.dsf_makeValue( ds_hidden, "ordlist", "string", "" );
							opener.ds_hidden_ordlis.copyRow( t, ds_main_list01_ordlist, row);
							window.close();
						} else {
							return false;
						}

}

function group3_grd_ordlist_onaftersort {

						group3.grd_ordlist.gridToInstance();		

}

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