YNU_JEUS/app_home/himed/xpapps/ast/dietxp/xp/SMANT01800_환자식검식일지.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMANT01800" position="absolute 0 0 1256 840" titletext="환자식검식일지" oninit="SMANT01800_oninit" onload="SMANT01800_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 25" id="grp_tle">
          <Layouts>
            <Layout>
              <Static text="환자식검식일지" position="absolute 5 0 135 25" id="caption6" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 13 1195 830" id="grp_biz" scrollbars="none">
          <Layouts>
            <Layout>
              <Div position="absolute 5 10 1185 49" align="align:center top;" id="group1" anchor="default">
                <Layouts>
                  <Layout>
                    <Shape position="absolute 0 4 1178 39" id="roundrect2" type="roundrectangle" anchor="default"/>
                    <Static text="일자 :" position="absolute 25 13 90 30" id="caption3" class="search_name" anchor="default"/>
                    <Shape position="absolute 1092 11 1098 33" linetype="vertical" id="line14" class="line_4" anchor="default"/>
                    <Calendar position="absolute 90 13 189 32" align="align:center middle;" id="ipt_appdd" taborder="1" mask="yyyy-mm-dd" anchor="default" style="align:center middle;" autoskip="true" autoselect="true" onchanged="grp_biz_group1_ipt_appdd_onchanged"/>
                    <Button position="absolute 195 16 208 31" id="btn_before" class="icon_pre" text="" anchor="default" onclick="grp_biz_group1_btn_before_onclick"/>
                    <Button position="absolute 208 16 221 31" id="btn_next" class="icon_next" text="" anchor="default" onclick="grp_biz_group1_btn_next_onclick"/>
                    <Button position="absolute 1110 11 1166 33" id="btn_search" class="btn1" visible="false" text="조회" anchor="default" onclick="grp_biz_group1_btn_search_onclick"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 5 51 1185 57" linetype="horizontal" id="line2" class="line_10" anchor="default"/>
              <Grid position="absolute 5 55 1185 755" id="grd_data" binddataset="ds_main_data_item" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="50"/>
                      <Column size="50"/>
                      <Column size="200"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="끼니"/>
                      <Cell col="1" text="순번"/>
                      <Cell col="2" text="식단명"/>
                    </Band>
                    <Band id="body">
                      <Cell style="align:center middle;" text="bind:mealflag"/>
                      <Cell col="1" style="align:center middle;" text="bind:seq"/>
                      <Cell col="2" style="align:left middle;" text="bind:dishnm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Div id="grp_biz2" taborder="1" position="absolute 5 55 1185 820" anchor="default" scrollbars="none"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_data_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="mealflag" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="dishnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_appdd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="appdd1" type="STRING" size="256"/>
          <Column id="appdd2" type="STRING" size="256"/>
          <Column id="appdd3" type="STRING" size="256"/>
          <Column id="appdd4" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="appdd1"/>
            <Col id="appdd2"/>
            <Col id="appdd3"/>
            <Col id="appdd4"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_print" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dishnm1" type="STRING" size="256"/>
          <Column id="dishnm2" type="STRING" size="256"/>
          <Column id="dishnm3" type="STRING" size="256"/>
          <Column id="dishnm4" type="STRING" size="256"/>
          <Column id="dishnm5" type="STRING" size="256"/>
          <Column id="dishnm6" type="STRING" size="256"/>
          <Column id="dishnm7" type="STRING" size="256"/>
          <Column id="dishnm8" type="STRING" size="256"/>
          <Column id="dishnm9" type="STRING" size="256"/>
          <Column id="dishnm10" type="STRING" size="256"/>
          <Column id="dishnm11" type="STRING" size="256"/>
          <Column id="dishnm12" type="STRING" size="256"/>
          <Column id="dishnm13" type="STRING" size="256"/>
          <Column id="dishnm14" type="STRING" size="256"/>
          <Column id="dishnm15" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="dishnm1"/>
            <Col id="dishnm2"/>
            <Col id="dishnm3"/>
            <Col id="dishnm4"/>
            <Col id="dishnm5"/>
            <Col id="dishnm6"/>
            <Col id="dishnm7"/>
            <Col id="dishnm8"/>
            <Col id="dishnm9"/>
            <Col id="dishnm10"/>
            <Col id="dishnm11"/>
            <Col id="dishnm12"/>
            <Col id="dishnm13"/>
            <Col id="dishnm14"/>
            <Col id="dishnm15"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_searchitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="appdd" type="STRING" size="256"/>
          <Column id="menuflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send1_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.group1.ipt_appdd" propid="value" datasetid="ds_send_searchitem" columnid="appdd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

function SMANT01800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMANT01800_onload(obj:Form, e:LoadEventInfo)
{
	finit();
}

function finit() {
	ds_main_data_item.clearData();
	ds_main_appdd.clearData();
	ds_main_appdd.addRow();
	ds_main_print.clearData();
	ds_main_print.addRow();
	
	ds_send_searchitem.clearData();
	ds_send_searchitem.addRow();
	
	ds_send_searchitem.setColumn(0, "appdd", utlf_getCurrentDate());
	ds_send_searchitem.setColumn(0, "menuflag", 'Q1');
	
	frmf_inputEnterKey("grp_biz.group1.btn_search", "onclick", new ClickEventInfo);
}
				
function grp_biz_group1_ipt_appdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	frmf_inputEnterKey("grp_biz.group1.btn_search", "onclick", new ClickEventInfo);
}

function grp_biz_group1_btn_before_onclick(obj:Button,  e:ClickEventInfo)
{
	var ym = ds_send_searchitem.getColumn(0, "appdd");
	ym = ym.toDate().getAddDate(-1, "D");
	ym = ym.getDateFormat();
	ds_send_searchitem.setColumn(0, "appdd", ym);

	frmf_inputEnterKey("grp_biz.group1.btn_search", "onclick", new ClickEventInfo);
}

function grp_biz_group1_btn_next_onclick(obj:Button,  e:ClickEventInfo)
{
	var ym = ds_send_searchitem.getColumn(0, "appdd");
	ym = ym.toDate().getAddDate(1, "D");
	ym = ym.getDateFormat();
	ds_send_searchitem.setColumn(0, "appdd", ym);

	frmf_inputEnterKey("grp_biz.group1.btn_search", "onclick", new ClickEventInfo);
}

function grp_biz_group1_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_data_item.clearData();
	ds_main_appdd.clearData();
	ds_main_appdd.addRow();
	var appdd = ds_send_searchitem.getColumn(0, "appdd");
	
	if (utlf_isValidDateTime(appdd, "YYYYMMDD") == false) {
		sysf_messageBox("조회일자의 형식이", "E016");
		grp_biz.group1.ipt_appdd.setFocus();
		return;
	}
							
	var oParam = {};
    oParam.id          = "TRANT01801";
    oParam.service     = "dietbaseapp.DietMenu";
    oParam.method      = "reqGetDietCheckDiary";
    oParam.inds        = "req=ds_send_searchitem";
    oParam.outds       = "ds_main_data_item=ret";
    oParam.async       = false;

	tranf_submit(oParam);

	var oParam = {};
    oParam.id          = "TRANT01409";
    oParam.service     = "dietbaseapp.DietMenu";
    oParam.method      = "reqGetPridChasu";
    oParam.inds        = "req=ds_send_searchitem";
    oParam.outds       = "ds_send1_list=ret";
    oParam.async       = false;

	tranf_submit(oParam);

	
	var cnt = ds_main_data_item.rowcount;
	
	var seq = 1;
	var dishnm = "";
	for ( i=1; i<=cnt; i++ ) {
		dishnm = ds_main_data_item.getColumn(i-1, "dishnm");
		if ( !utlf_isNull(dishnm) && dishnm != '흰밥') {
			ds_main_print.setColumn(0, "dishnm"+ seq, ds_main_data_item.getColumn(i-1, "dishnm"));
			if (i==5) {
				seq = 6;
			} else if (i==10) {
				seq = 11;
			} else {
				seq = seq + 1;
			}
		}
	}
	
	//월+일 구하기
	var dd = parseInt(ds_send1_list.getColumn(0, "prid"));
	var sdd = appdd.substr(6,2);
	/*
	if ( appdd.substr(7,1) == '0' ) {
		var seqdd = appdd.substr(0,6) + dd;
	} else {							
		var seqdd = appdd.substr(0,6) + '0' + appdd.substr(7,1);
	}
	*/
	var seqdd = "";
	if (sdd > dd){
		var scnt = parseInt(sdd) - parseInt(dd);
		if (scnt > dd){
			scnt = parseInt(scnt) - parseInt(dd);
		}
		if (scnt < 10){
			seqdd = appdd.substr(0,6) + '0' + scnt;
		}else{
			seqdd = appdd.substr(0,6) + scnt;
		}
	}else{
		seqdd = appdd.substr(0,6) + sdd;
	}
	for ( i=1; i<=4; i++ ) {
		if  ( seqdd.substr(0,6) == appdd.substr(0,6) ) {
			ds_main_appdd.setColumn(0, "appdd"+ i, seqdd.substr(4,2)+'월 '+seqdd.substr(6,2)+'일');
		} else {
			ds_main_appdd.setColumn(0, "appdd"+ i, "");
		}
		seqdd = seqdd.toDate("YYYYMMDD").getAddDate(dd, "D");
		seqdd = utlf_getDateTime(seqdd, 'D');
	}
	
	//미리보기출력
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/main/print"		, ds_main_print);		// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "root/main/appdd"		, ds_main_appdd);		// 데이터셋 2	
	rptf_setNodeListToDOM(objDOM, "root/send/searchitem", ds_send_searchitem);	// 데이터셋 3	
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출
	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RPANT01801"],[objParam], option, "", "grp_biz.grp_biz2");
}
]]></Script>
  </Form>
</FDL>