YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SMPMC06506_선택진료신청누락조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPMC06506" position="absolute 0 0 960 780" titletext="선택진료신청누락조회" onload="SMPMC06506_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" class="tit_1" position="absolute 0 0 300 14" style="" text="선택진료신청 누락조회" />
        <Shape id="line48" class="line_1" linetype="horizontal" position="absolute 0 120 940 123" style="" anchor="default" />
        <Static id="caption38" class="tit_2" position="absolute 5 103 214 117" style="" text="선택진료신청서 누락환자 리스트" />
        <Shape id="roundrect2" anchor="default" class="roundrect_search" type="roundrectangle" position="absolute 0 20 940 90" style="" />
        <Button id="btn_search" class="btn1_letter2" taborder="7" position="absolute 870 45 926 67" style="background:_gradation URL(../../.._com_commonweb_images_btn1_letter2.gif) ;" text="조회" onclick="btn_search_onclick" />
        <Static id="caption1" class="search_name" position="absolute 12 30 102 47" style="" text="진료구분" />
        <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio1" taborder="1" position="absolute 125 30 215 50" style="">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" />
              <Column id="datacolumn" />
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">I</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">O</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption3" class="search_name" position="absolute 605 30 707 47" style="" text="선택진료과" />
        <Calendar id="ipt_ordddfrom" class="input_s_essential" taborder="2" position="absolute 375 30 470 49" style="align:center ;" anchor="default" />
        <Static id="caption7" class="search_name" position="absolute 242 30 356 47" style="" text="진료(입원)일자" />
        <Calendar id="ipt_ordddto" class="input_s_essential" taborder="3" position="absolute 495 30 590 49" style="align:center ;" anchor="default" />
        <Static id="caption10" position="absolute 475 30 490 50" style="align:center ;" text="~" />
        <Combo innerdataset="ds_init_orddeptcd" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_specdeptcd" taborder="4" position="absolute 705 30 845 49" style="align:left ;" onitemchanged="cmb_specdeptcd_onitemchanged" />
        <Grid id="grd_spif" binddataset="ds_main_patinfolist" class="grd_sasm" position="absolute 0 125 940 735" style="font:,,normal;" oncelldblclick="grd_spif_oncelldblclick" onbeforesort="grd_spif_onbeforesort">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="77" />
                <Column size="90" />
                <Column size="79" />
                <Column size="100" />
                <Column size="100" />
                <Column size="100" />
                <Column size="200" />
                <Column size="91" />
                <Column size="61" />
              </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="선택의" />
              </Band>
              <Band id="body">
                <Cell text="bind:pid" />
                <Cell col="1" text="bind:hngnm" />
                <Cell col="2" text="bind:ordtype" />
                <Cell col="3" text="bind:orddd" />
                <Cell col="4" text="bind:fromdd" />
                <Cell col="5" text="bind:todd" />
                <Cell col="6" text="bind:orddeptnm" />
                <Cell col="7" text="bind:orddrnm" />
                <Cell col="8" text="bind:specordyn" />
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button17" class="btn4_letter3" taborder="8" position="absolute 870 740 938 762" style="background:_gradation URL(../../.._com_commonweb_images_btn4_letter3.gif) ;" text="초기화" onclick="button17_onclick" />
        <Static id="caption2" class="search_name" position="absolute 10 60 112 77" style="" text="제출확인여부" />
        <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio2" taborder="5" position="absolute 125 60 225 80" style="">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" />
              <Column id="datacolumn" />
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">확인</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">미확인</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption4" class="search_name" position="absolute 240 60 381 77" style="" text="선택진료비발생여부" />
        <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio3" taborder="6" position="absolute 390 60 490 80" style="">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" />
              <Column id="datacolumn" />
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">발생</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">미발생</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static id="caption8" position="absolute 25 740 735 760" style="color:#ff0000;" text="* 환자정보 더블클릭하면 선택진료신청조회화면과 연동됩니다. (선택진료신청조회화면이 다른 화면으로 변경된 경우에는 연동불가)" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="ordtype" type="STRING" size="256" />
          <Column id="fromdd" type="STRING" size="256" />
          <Column id="todd" type="STRING" size="256" />
          <Column id="orddeptcd" type="STRING" size="256" />
          <Column id="returnyn" type="STRING" size="256" />
          <Column id="specamtyn" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ordtype">I</Col>
            <Col id="fromdd"></Col>
            <Col id="todd"></Col>
            <Col id="orddeptcd"></Col>
            <Col id="returnyn">N</Col>
            <Col id="specamtyn">Y</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>
          <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>
          <Column id="orddeptcd" type="STRING" size="256" />
          <Column id="orddrid" type="STRING" size="256" />
          <Column id="wardcd" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="orddeptcd"></Col>
            <Col id="orddrid"></Col>
            <Col id="wardcd"></Col>
          </Row>
        </Rows>
      </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_send" 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>
          <Column id="orddrid" type="STRING" size="256" />
          <Column id="specdrid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="orddrid"></Col>
            <Col id="specdrid"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="radio1" propid="value" datasetid="ds_send_cond" columnid="ordtype" />
      <BindItem id="item1" compid="ipt_ordddfrom" propid="value" datasetid="ds_send_cond" columnid="fromdd" />
      <BindItem id="item2" compid="ipt_ordddto" propid="value" datasetid="ds_send_cond" columnid="todd" />
      <BindItem id="item3" compid="cmb_specdeptcd" propid="value" datasetid="ds_send_cond" columnid="orddeptcd" />
      <BindItem id="item4" compid="radio2" propid="value" datasetid="ds_send_cond" columnid="returnyn" />
      <BindItem id="item5" compid="radio3" propid="value" datasetid="ds_send_cond" columnid="specamtyn" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[include '../.._pamcomnweb_js_PAM.js'
include '../.._pamcomnweb_js_PAM001.js'
include '../../.._com_commonweb_js_common.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_commonweb_js_dateHelper.js'
function SMPMC06506_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

			fInit();

}

			function fSearch() {

				// 일자기간 조건 체크
				if (utlf_getDateInterval(ds_send_cond.getColumn(0, "fromdd"), ds_send_cond.getColumn(0, "todd")) > 7) {

					sysf_messageBox("시스템부하방지를 위하여 검색기간은 최대 7일 이내로 설정 해주십시요. ", "C000");

					return;
				}

//				submit("TRPMC06516");
var oParam = {};
    oParam.id          = "TRPMC06516";
    oParam.service     = "pamcomnapp.PamComn";
    oParam.method      = "reqGetNoSpifPatList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=resultlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPMC06516";

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


			}

			function fInit() {

//				submit("TRPMC06550");
var oParam = {};
    oParam.id          = "TRPMC06550";
    oParam.service     = "patinfomngtapp.SpecAppFrm";
    oParam.method      = "reqGetSpecInitCd";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=orddeptcd ds_=orddrid ds_=wardcd ds_=P0018 ds_=P0059 ds_=P0032 ds_=P0022";
    oParam.async       = false;
    oParam.callback    = "cf_TRPMC06550";

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


				frmf_addComboItem("cmb_specdeptcd",  "전체","",  "above");

				var sDate = getNewDate().getAddDate(-7, "D")
				var rtnDate = sDate.getFullYear();
				rtnDate = rtnDate.toString() + (( sDate.getMonth() + 1 > 9 ) ? sDate.getMonth() + 1 : "0" + (sDate.getMonth() + 1));
				rtnDate = rtnDate.toString() + (( sDate.getDate()      > 9 ) ? sDate.getDate() : "0" + sDate.getDate()) ;
				ds_send_cond.setColumn( 0, "fromdd", rtnDate);
				ds_send_cond.setColumn( 0, "todd", utlf_getCurrentDate())

				ds_send_cond.setColumn( 0, "ordtype", "I");
				ds_send_cond.setColumn( 0, "orddeptcd", "");
				ds_send_cond.setColumn( 0, "returnyn", "N");
				ds_send_cond.setColumn( 0, "specamtyn", "Y");

				ds_main_patinfolist.clearData(); ds_main_patinfolist.addRow();

//model.refresh();

			}

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

						fSearch();

}

function cmb_specdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {

}

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

					var curRow = grd_spif.row;

					if ( curRow > 0 ) {

						var sPid = ds_main_patinfolist.getColumn(curRow, "pid"));

						// 오프너 체크
						if (frmf_checkOpener()) {

							var sOrdType = "";

							// 진료구분 DSC / CHEMO는 입원으로 변경해준다.
							if (ds_main_patinfolist.getColumn(curRow, "ordtype")) == "O") {

								sOrdType = "O";
							} else {

								sOrdType = "I";
							}

							opener.ds_send_cond.setColumn( 0, "pid",				sPid); // 차트번호
							opener.ds_send_cond.setColumn( 0, "ioflag", 		sOrdType); // 진료구분
							opener.ds_send_cond.setColumn( 0, "scanyn",      "A"); // 스캔여부 : 전체
							opener.ds_send_cond.setColumn( 0, "ordddfrom",  "");  // 진료기간 : none
							opener.ds_send_cond.setColumn( 0, "ordddto",      "");

							opener.javascript.fSearch();

						} else {

							sysf_messageBox("선택진료신청관리창이 닫히거나 변경되었습니다. 확인하시기 바랍니다.", "C000");
						}

					} else {

						sysf_messageBox("환자가 선택되지 않았습니다.", "");
					}

}

function grd_spif_onbeforesort {

				grd_spif.gridToInstance();

}

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

					fInit();

}

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