YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO00600_처방에러.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO00600" position="absolute 0 0 795 500" titletext="처방오류리스트" oninit="SPMMO00600_oninit" onload="SPMMO00600_onload" onclose="SPMMO00600_onclose">
    <Layouts>
      <Layout>
        <Button position="absolute 736 475 792 497" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <Static text="* 위의 오류사항을 수정후  저장하여 주십시오." position="absolute 6 475 265 495" id="caption2" style="color:#ff0000ff;"/>
        <Tab position="absolute 2 0 795 472" id="switch1">
          <Tabpages>
            <Tabpage text="처방에러" position="absolute 0 0 793 448" id="case1">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 791 445" id="errlist1" binddataset="ds_errlist1" cellsizingtype="col" autofittype="col" extendsizetype="row" autosizingtype="row">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="80"/>
                          <Column size="252"/>
                          <Column size="60"/>
                          <Column size="364"/>
                        </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="오류내용"/>
                        </Band>
                        <Band id="body">
                          <Cell displaytype="normal" edittype="none" style="align:left middle;padding:3;linespace:2;" text="bind:prcpcd" wordwrap="char" suppress="1" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="1" style="align:left middle;padding:3;linespace:2;" text="bind:prcpnm" wordwrap="char" suppress="2" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="2" style="align:center middle;padding:3;linespace:2;" text="bind:errcd" wordwrap="char" suppress="1" autosizerow="limitmin"/>
                          <Cell col="3" style="align:left middle;padding:3 3 3 3;linespace:2;" text="bind:prcperr" wordwrap="char" suppress="1" autosizerow="limitmin"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="범용금기" id="case2">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 791 445" id="errlist2" binddataset="ds_errlist2" cellsizingtype="col" autofittype="col" extendsizetype="row" autosizingtype="row">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="80"/>
                          <Column size="302"/>
                          <Column size="374"/>
                        </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 displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpcd" wordwrap="char" suppress="1" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="1" style="align:left middle;" text="bind:prcpnm" wordwrap="char" suppress="2" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="2" style="align:left middle;" text="bind:prcperr" wordwrap="char" autosizerow="limitmin"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="연령금기" id="case3">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 791 445" id="errlist3" binddataset="ds_errlist3" cellsizingtype="col" autofittype="col" extendsizetype="row" autosizingtype="row">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="80"/>
                          <Column size="302"/>
                          <Column size="374"/>
                        </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 displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpcd" wordwrap="char" suppress="1" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="1" style="align:left middle;" text="bind:prcpnm" wordwrap="char" suppress="2" suppressalign="middle,over" autosizerow="limitmin"/>
                          <Cell col="2" style="align:left middle;" text="bind:prcperr" wordwrap="char" autosizerow="limitmin"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_errlist1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="errcd" type="STRING"/>
          <Column id="prcperr" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_errlist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcperr" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_errlist3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcperr" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_result_prcperrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-10-21
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-10-21      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
include "emr_prcpmngtxp::MMO001.xjs"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Argument			: 01.sKey	: 코드아이디
 *					: 02.sValue	: 코드명
 * Description		: 공통코드를 가져온다.
 ****************************************************************************************/
// 화면 open, 저장시 초기화 기능을 수행한다.
function fClose() {						    
	this.close();                                            
}



//=======================================================================================
// Transaction Callback 
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Argument			: 01.sSvcId	: 서비스 ID
 *					: 02.nErrorCode	: 에러코드
 *					: 03.sErrorMsg	: 에러메시지
 * Description		: tr_getCodeList의 콜백함수
 ****************************************************************************************/
function cf_(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    arErrorCode.push(sSvcId, nErrorCode);
	sysf_trace("***** cf_ *****");
	
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Components		: 
 * Components ID	: button5
 * Event			: onlbuttonup
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 
 ****************************************************************************************/
function SPMMO00600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	/*  상위 호출하는 화면에 arg_ds_result_prcperrlist 로 dataset을 전달 */
	//try {
	sysf_trace("222 : " + arg_ds_result_prcperrlist.saveXML());
		ds_result_prcperrlist.copyData(arg_ds_result_prcperrlist);
	//} catch(e) {}
}

function SPMMO00600_onload(obj:Form, e:LoadEventInfo)
{	
	var flag = "";				
	var currow = 0;
	var cnt1 = 0;
	var cnt2 = 0;
	var cnt3 = 0;
	
	//try{		
		var srcNodeListCnt = ds_result_prcperrlist.rowcount;
		
		
		for ( var i=0; i < srcNodeListCnt; i++ ) {					
			flag = ds_result_prcperrlist.getColumn(i, "flag" );
			sysf_trace(flag);
			if ( flag == "1" ) {
				var nRow = ds_errlist1.addRow();
				ds_errlist1.copyRow(nRow, ds_result_prcperrlist, i);
				cnt1++;
			} else if ( flag == "2" ) {
				var nRow = ds_errlist2.addRow();
				ds_errlist2.copyRow(nRow, ds_result_prcperrlist, i);
				cnt2++;
			} else if ( flag == "3" ) {
				var nRow = ds_errlist3.addRow();
				ds_errlist3.copyRow(nRow, ds_result_prcperrlist, i);
				cnt3++;
			}		
		}
			
		if ( cnt1 > 0 ) {
			switch1.tabindex = 0;
		} else if ( cnt2 > 0 ) {
			switch1.tabindex = 1;
		} else if ( cnt3 > 0 ) {
			switch1.tabindex = 2;
		}
		
		if ( cnt3 == 0 ) switch1.removeTabpage(2);
		if ( cnt2 == 0 ) switch1.removeTabpage(1);
		if ( cnt1 == 0 ) switch1.removeTabpage(0);
	//}catch(e){
	//	sysf_trace("ds_result_prcperrlist 가 존재하지 않습니다. 확인바랍니다.");
	//}
	
}

function SPMMO00600_onclose(obj:Form, e:CloseEventInfo)
{
	ds_errlist1.clearData();
	ds_errlist2.clearData();
	ds_errlist3.clearData();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>