YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SMPIJ01800_퇴원후외래예약검사조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPIJ01800" position="absolute 0 0 1202 715" titletext="퇴원후외래예약검사조회" onload="SMPIJ01800_onload">
    <Layouts>
      <Layout>
        <Div id="group1" position="absolute 0 0 813 13" style="">
          <Layouts>
            <Layout>
              <Static id="caption6" class="tit_1" position="absolute 0 0 269 14" style="" text="퇴원후외래예약검사조회" />
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_biz" scrollbars="autoboth" position="absolute 0 13 1186 688" style="">
          <Layouts>
            <Layout>
              <Shape id="roundrect1" anchor="default" type="roundrectangle" position="absolute 0 10 1186 45" style="border: solid #ffd799 #ffd799;background:#fffbf2  ;" />
              <Button id="btn_ref" class="btn1_letter2" taborder="4" position="absolute 1115 17 1171 39" style="" text="조회" onclick="grp_biz_btn_ref_onclick" />
              <Shape id="line13" linetype="vertical" position="absolute 1100 17 1103 39" style="border: solid #ffe4bb #ffe4bb;" anchor="default" />
              <Static id="caption3" class="tit_2" position="absolute 311 55 523 68" style="" text="퇴원후외래예약검사" />
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 305 70 1185 73" style="" anchor="default" />
              <Static id="caption1" class="search_name" position="absolute 15 19 96 36" style="" text="환자번호:" />
              <Static id="caption4" class="search_name" position="absolute 319 19 412 36" style="" text="입원기간 :" />
              <Calendar id="ipt_intodd" class="input_search" taborder="3" position="absolute 529 18 629 37" style="" anchor="default" />
              <Static id="caption5" position="absolute 513 22 528 37" style="" text="~" />
              <Calendar id="ipt_infromdd" class="input_search" taborder="2" position="absolute 408 18 508 37" style="" anchor="default" />
              <Edit id="ipt_pid" class="input_search" taborder="1" position="absolute 99 18 215 37" style="" anchor="default" onlbuttonup="grp_biz_ipt_pid_onlbuttonup" onkeydown="grp_biz_ipt_pid_onkeydown" />
              <Edit id="opt_patnm" class="output_fix" position="absolute 218 18 298 37" style="" anchor="default" readonly="true" />
              <Shape id="line8" class="line_1" linetype="horizontal" position="absolute 0 70 300 73" style="" anchor="default" />
              <Grid id="grd_hoprc" binddataset="ds_main_list1_hoprclist" position="absolute 0 75 300 675" style="" oncellclick="grp_biz_grd_hoprc_oncellclick" onaftersort="grp_biz_grd_hoprc_onaftersort">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0" />
                      <Column size="95" />
                      <Column size="0" />
                      <Column size="91" />
                      <Column size="0" />
                      <Column size="90" />
                      <Column size="80" />
                      <Column size="100" />
                      <Column size="100" />
                    </Columns>
                    <Rows>
                      <Row size="23" band="head" />
                      <Row size="23" />
                    </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="입원일련번호" />
                    </Band>
                    <Band id="body">
                      <Cell text="bind:pid" />
                      <Cell col="1" text="bind:outorddd" />
                      <Cell col="2" text="bind:orddeptcd" />
                      <Cell col="3" text="bind:orddeptnm" />
                      <Cell col="4" text="bind:orddrid" />
                      <Cell col="5" text="bind:orddrnm" />
                      <Cell col="6" text="bind:insukind" />
                      <Cell col="7" text="bind:orddd" />
                      <Cell col="8" text="bind:cretno" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static id="caption15" class="tit_2" position="absolute 5 55 48 68" style="" text="일자" />
              <Grid id="grd_dexop" binddataset="ds_main_list2_dexoplist" visible="true" position="absolute 305 75 1185 675" style="">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25" />
                      <Column size="100" />
                      <Column size="100" />
                      <Column size="320" />
                      <Column size="50" />
                      <Column size="60" />
                      <Column size="50" />
                      <Column size="50" />
                      <Column size="90" />
                    </Columns>
                    <Rows>
                      <Row size="25" band="head" />
                      <Row size="25" />
                    </Rows>
                    <Band id="head">
                      <Cell text="G" />
                      <Cell col="1" text="처방코드" />
                      <Cell col="2" text="EDI코드" />
                      <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 text="bind:grupsnglyn" />
                      <Cell col="1" text="bind:calcscorcd" />
                      <Cell col="2" text="bind:edicd" />
                      <Cell col="3" text="bind:ordnm" />
                      <Cell col="4" text="bind:payflagcd" />
                      <Cell col="5" text="bind:execprcpqty" />
                      <Cell col="6" text="bind:execprcptims" />
                      <Cell col="7" text="bind:execprcpdayno" />
                      <Cell col="8" text="bind:prcpdd" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group2" position="absolute 0 688 1186 715" style="">
          <Layouts>
            <Layout>
              <Button id="btn_init" class="btn4_letter3" taborder="9" position="absolute 1058 5 1126 27" style="" text="초기화" onclick="group2_btn_init_onclick" />
              <Button id="btn_close" class="btn4_letter2" taborder="10" position="absolute 1129 5 1185 27" style="" text="닫기" onclick="group2_btn_close_onclick" />
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_list2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="dexoplist" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="dexoplist"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_pidnmref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_cond_smpij01800" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" />
          <Column id="patnm" type="STRING" size="256" />
          <Column id="indd" type="STRING" size="256" />
          <Column id="dschdd" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"></Col>
            <Col id="patnm"></Col>
            <Col id="indd"></Col>
            <Col id="dschdd"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" />
          <Column id="orddd" type="STRING" size="256" />
          <Column id="cretno" type="STRING" size="256" />
          <Column id="orddeptcd" type="STRING" size="256" />
          <Column id="orddrid" type="STRING" size="256" />
          <Column id="insukind" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"></Col>
            <Col id="orddd"></Col>
            <Col id="cretno"></Col>
            <Col id="orddeptcd"></Col>
            <Col id="orddrid"></Col>
            <Col id="insukind"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_pidnmref_pidnmrslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pidnm" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pidnm"></Col>
          </Row>
        </Rows>
      </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_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256" />
        </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_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" />
          <Column id="infromdd" type="STRING" size="256" />
          <Column id="intodd" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"></Col>
            <Col id="infromdd"></Col>
            <Col id="intodd"></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>
          <Column id="init" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="init"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_list1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="hoprclist" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="hoprclist"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.ipt_intodd" propid="value" datasetid="ds_send_reqdata" columnid="intodd" />
      <BindItem id="item1" compid="grp_biz.ipt_infromdd" propid="value" datasetid="ds_send_reqdata" columnid="infromdd" />
      <BindItem id="item2" compid="grp_biz.ipt_pid" propid="value" datasetid="ds_send_reqdata" columnid="pid" />
      <BindItem id="item3" compid="grp_biz.opt_patnm" propid="value" datasetid="ds_main_pidnmref_pidnmrslt" columnid="pidnm" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SMPIJ01800_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

					fInitialize();		// 화면을 초기화한다.

}

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

				function fCheckOpener() {

//					var pid = ds_hidden_cond_smpij01800.getColumn(0, "pid");
//					var indd = ds_hidden_cond_smpij01800.getColumn(0, "indd");
//					var dschdd = ds_hidden_cond_smpij01800.getColumn(0, "dschdd");

					ds_main_list1_hopclist.clearData();
					ds_main_list2_dexoplist.clearData();	

					ds_send_reqdata.setColumn( 0, "pid", ds_hidden_cond_smpij01800.getColumn(0, "pid"));
					ds_main_pidnmref_pidnmrslt.setColumn( 0, "pidnm", ds_hidden_cond_smpij01800.getColumn(0, "patnm"));
					ds_send_reqdata.setColumn( 0, "infromdd",ds_hidden_cond_smpij01800.getColumn(0, "indd"));
					ds_send_reqdata.setColumn( 0, "intodd",ds_hidden_cond_smpij01800.getColumn(0, "dschdd"));	

//					submit("TRPIJ01801");
var oParam = {};
    oParam.id          = "TRPIJ01801";
    oParam.service     = "bfjudgapp.AftDschOutRsrvTest";
    oParam.method      = "reqGetAftDschOutRsrvTestList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=hoprclist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01801";

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



//model.refresh();

				}

				function fInitialize() {

					ds_main_list1_hopclist.clearData();
					ds_main_list2_dexoplist.clearData();		

					ds_send_reqdata_pid.clearData(); ds_send_reqdata_pid.addRow();
					ds_send_reqdata_patnm.clearData(); ds_send_reqdata_patnm.addRow();
					ds_send_reqdata_infromdd.clearData(); ds_send_reqdata_infromdd.addRow();
					ds_send_reqdata_intodd.clearData(); ds_send_reqdata_intodd.addRow();	
					ds_main_pidnmref_pidnmrslt_pidnm.clearData(); ds_main_pidnmref_pidnmrslt_pidnm.addRow();				

					ds_send_reqdata.setColumn( 0, "infromdd",utlf_getCurrentDate());
					ds_send_reqdata.setColumn( 0, "intodd",utlf_getCurrentDate());

//model.refresh();

				}	

				function fDschAftOutSrv() {

					ds_main_list1_hopclist.clearData();
					ds_main_list2_dexoplist.clearData();	

					var pid = ds_send_reqdata.getColumn(0, "pid");
					var pidnm = ds_main_pidnmref_pidnmrslt.getColumn(0, "pidnm");
					var infromdd = ds_send_reqdata.getColumn(0, "infromdd");
					var intodd = ds_send_reqdata.getColumn(0, "intodd");

					if(infromdd > intodd) {
						sysf_messageBox("시작일은 종료일보다 앞설 수","I004");
						return false;
					}

//					submit("TRPIJ01801");
var oParam = {};
    oParam.id          = "TRPIJ01801";
    oParam.service     = "bfjudgapp.AftDschOutRsrvTest";
    oParam.method      = "reqGetAftDschOutRsrvTestList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=hoprclist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01801";

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


				}	

				function fRefPidnm() {
					var pid = ds_send_reqdata.getColumn(0, "pid");
					if(pid == "") {
						sysf_messageBox("환자번호를","C001");
						return;
					} else {
//						submit("TRPIJ01802");
var oParam = {};
    oParam.id          = "TRPIJ01101";
    oParam.service     = "bfjudgapp.AftDschOutRsrvTest";
    oParam.method      = "reqGetAftDschOutRsrvTestPidnm";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=pidnmrslt";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01101";

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


					}
				}	

				function fChkPidnm() {
					fRefPidnm();
				}	

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

					fDschAftOutSrv();

}

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

						fRefPidnm();

}

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

						if(event.keyCode == 13) {
							obj.updateToDataset();
							fChkPidnm();	
						}

}

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

						if(grp_biz.grd_hoprc.isCell(event.target) && grp_biz.grd_hoprc.row >= grp_biz.grd_hoprc.fixedRows) {

							var row = grp_biz.grd_hoprc.row ;
							ds_send_reqdata1.setColumn( 0, "pid",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("pid")));
							ds_send_reqdata1.setColumn( 0, "orddd",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("orddd")));
							ds_send_reqdata1.setColumn( 0, "cretno",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("cretno")));
							ds_send_reqdata1.setColumn( 0, "orddeptcd",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("orddeptcd")));
							ds_send_reqdata1.setColumn( 0, "orddrid",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("orddrid")));
							ds_send_reqdata1.setColumn( 0, "insukind",grp_biz.grd_hoprc.valueMatrix(row, grp_biz.grd_hoprc.colRef("insukind")));

							// 외래미시행처방 미시행 오더 조회
//							submit("TRPIJ01803");
var oParam = {};
    oParam.id          = "TRPIJ01803";
    oParam.service     = "bfjudgapp.AftDschOutRsrvTest";
    oParam.method      = "reqGetAftDschOutRsrvTestDetlList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=dexoplist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ01803";

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


						}

}

function grp_biz_grd_hoprc_onaftersort {

					grp_biz.grd_hoprc.gridToInstance();		// Sort 된 Grid 상의 Data 순서와 Instance Node 상의 Data 순서를 동일하게 맞춰준다.

}

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

						fInitialize();

}

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

						window.close();	// F5 실행시 IE를 종료시킨다.

}

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