YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SPLLP90200_HLA결과조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLLP90200" position="absolute 0 0 1150 420" titletext="New Form" onload="SPLLP90200_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 28 1095 398" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Shape position="absolute 5 0 1090 6" linetype="vertical" id="line9" class="line_1" anchor="default"/>
              <Grid position="absolute 5 5 1090 365" id="grd_testlist" binddataset="ds_grd_testlist" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="130"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="120"/>
                      <Column size="74"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="공여자"/>
                      <Cell col="1" text="inptrslt1"/>
                      <Cell col="2" text="inptrslt2"/>
                      <Cell col="3" text="inptrslt3"/>
                      <Cell col="4" text="inptrslt4"/>
                      <Cell col="5" text="inptrslt5"/>
                      <Cell col="6" text="inptrslt6"/>
                      <Cell col="7" text="inptrslt7"/>
                      <Cell col="8" text="inptrslt8"/>
                      <Cell col="9" text="inptrslt9"/>
                      <Cell col="10" text="inptrslt10"/>
                      <Cell col="11" text="inptrslt11"/>
                      <Cell col="12" text="inptrslt12"/>
                      <Cell col="13" text="inptrslt13"/>
                      <Cell col="14" text="inptrslt14"/>
                      <Cell col="15" text="inptrslt15"/>
                      <Cell col="16" text="inptrslt16"/>
                      <Cell col="17" text="inptrslt17"/>
                      <Cell col="18" text="inptrslt18"/>
                      <Cell col="19" text="inptrslt19"/>
                      <Cell col="20" text="inptrslt20"/>
                      <Cell col="21" text="inptrslt21"/>
                      <Cell col="22" text="inptrslt22"/>
                      <Cell col="23" text="inptrslt23"/>
                      <Cell col="24" text="inptrslt24"/>
                      <Cell col="25" text="inptrslt25"/>
                      <Cell col="26" text="inptrslt26"/>
                      <Cell col="27" text="inptrslt27"/>
                      <Cell col="28" text="inptrslt28"/>
                      <Cell col="29" text="inptrslt29"/>
                      <Cell col="30" text="inptrslt30"/>
                      <Cell col="31" text="검사일자"/>
                      <Cell col="32" text="검사자"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:dnorinfo"/>
                      <Cell col="1" text="bind:inptrslt1"/>
                      <Cell col="2" text="bind:inptrslt2"/>
                      <Cell col="3" text="bind:inptrslt3"/>
                      <Cell col="4" text="bind:inptrslt4"/>
                      <Cell col="5" text="bind:inptrslt5"/>
                      <Cell col="6" text="bind:inptrslt6"/>
                      <Cell col="7" text="bind:inptrslt7"/>
                      <Cell col="8" text="bind:inptrslt8"/>
                      <Cell col="9" text="bind:inptrslt9"/>
                      <Cell col="10" text="bind:inptrslt10"/>
                      <Cell col="11" text="bind:inptrslt11"/>
                      <Cell col="12" text="bind:inptrslt12"/>
                      <Cell col="13" text="bind:inptrslt13"/>
                      <Cell col="14" text="bind:inptrslt14"/>
                      <Cell col="15" text="bind:inptrslt15"/>
                      <Cell col="16" text="bind:inptrslt16"/>
                      <Cell col="17" text="bind:inptrslt17"/>
                      <Cell col="18" text="bind:inptrslt18"/>
                      <Cell col="19" text="bind:inptrslt19"/>
                      <Cell col="20" text="bind:inptrslt20"/>
                      <Cell col="21" text="bind:inptrslt21"/>
                      <Cell col="22" text="bind:inptrslt22"/>
                      <Cell col="23" text="bind:inptrslt23"/>
                      <Cell col="24" text="bind:inptrslt24"/>
                      <Cell col="25" text="bind:inptrslt25"/>
                      <Cell col="26" text="bind:inptrslt26"/>
                      <Cell col="27" text="bind:inptrslt27"/>
                      <Cell col="28" text="bind:inptrslt28"/>
                      <Cell col="29" text="bind:inptrslt29"/>
                      <Cell col="30" text="bind:inptrslt30"/>
                      <Cell col="31" text="bind:rsltdt" mask="yyyy-mm-dd hh:nn"/>
                      <Cell col="32" text="bind:id"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 0 1090 25" id="group2">
          <Layouts>
            <Layout>
              <Static text="HLA 검사 결과조회" position="absolute 0 0 158 25" id="caption17" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_testlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="dnorinfo" type="STRING"/>
          <Column id="inptrslt1" type="STRING"/>
          <Column id="inptrslt2" type="STRING"/>
          <Column id="inptrslt3" type="STRING"/>
          <Column id="inptrslt4" type="STRING"/>
          <Column id="inptrslt5" type="STRING"/>
          <Column id="inptrslt6" type="STRING"/>
          <Column id="inptrslt7" type="STRING"/>
          <Column id="inptrslt8" type="STRING"/>
          <Column id="inptrslt9" type="STRING"/>
          <Column id="inptrslt10" type="STRING"/>
          <Column id="inptrslt11" type="STRING"/>
          <Column id="inptrslt12" type="STRING"/>
          <Column id="inptrslt13" type="STRING"/>
          <Column id="inptrslt14" type="STRING"/>
          <Column id="inptrslt15" type="STRING"/>
          <Column id="inptrslt16" type="STRING"/>
          <Column id="inptrslt17" type="STRING"/>
          <Column id="inptrslt18" type="STRING"/>
          <Column id="inptrslt19" type="STRING"/>
          <Column id="inptrslt20" type="STRING"/>
          <Column id="inptrslt21" type="STRING"/>
          <Column id="inptrslt22" type="STRING"/>
          <Column id="inptrslt23" type="STRING"/>
          <Column id="inptrslt24" type="STRING"/>
          <Column id="inptrslt25" type="STRING"/>
          <Column id="inptrslt26" type="STRING"/>
          <Column id="inptrslt27" type="STRING"/>
          <Column id="inptrslt28" type="STRING"/>
          <Column id="inptrslt29" type="STRING"/>
          <Column id="inptrslt30" type="STRING"/>
          <Column id="rsltdt" type="STRING"/>
          <Column id="id" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_refparam" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_lb0000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb1002" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_lb1003" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_default" 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 		:	2015-03-12
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-03-12      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

 var gStartCol = 2;
function cbf_SMLLP90200(strSvcID, nErrorCode, strErrorMag){	
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
}

function lf_initDataSet(){
	// 0106=시행부서(검사계) // 0111 계(시행)
	var sInDsName = dsf_createDsRow("ds_send"
							 , [{col: "codeflag", val: "0000|1002|1003|"}]); 							
												
	// 서브밋호출
	
	 var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond="+sInDsName;
		oParam.outds       = "ds_init_lb0000=0000 ds_init_lb1002=1002 ds_init_lb1003=1003"
		oParam.async       = false;
		oParam.callback    = "cbf_SMLLP90200";

	tranf_submit(oParam);
}

function fSetInit(){
					
	lf_initDataSet();

	//fGrdReMake();
	for(i=group3.grd_testlist.getCellCount("Head")-2 ; i >= gStartCol ; i--){
		//grd_testlist.colHidden(i) = true;	
		group3.grd_testlist.setRealColSize(i,0) ;
	}

	//공여자목록 그리드 셋팅
	fGrdReMake();

	ds_send_data1.copyData(arg_ds_hidden_refparam);
	dsf_makeValue(ds_send_data1,"userdeptflagcd" , "string",ds_init_lb0000.getColumn(0,"nm"));
	dsf_makeValue(ds_send_data1,"testcdlist", "string", ds_init_lb1003.getColumn(0,"etc01"));					

	var oParam = {};
		oParam.id          = "TRLLP90201";
		oParam.service     = "refprintmngtapp.SpecialTestRefPrintMngt";
		oParam.method      = "reqGetHLARsltList";
		oParam.inds        = "cond=ds_send_data1";
		oParam.outds       = "ds_grd_testlist=patlist";
		oParam.async       = false;
		oParam.callback    = "cbf_SMLLP90200";

	tranf_submit(oParam);
	
	ds_send_data1.copyData(ds_hidden_default);					


	fGrdReMake2();
	
}

/* @group  : 그리드 셋팅                                                                                                                 
 * @ver    : 2009.01.19
 * @by     : 김성희
 * @-----------------------------------
 * @type   : function
 * @access : public
 * @desc   : 그리드 셋팅 Function 
*/					
function fGrdReMake(){

	ds_grd_testlist.clearData();
	var strCaption = "공여자명";
	var endCaption = "^검사일자^검사자";
	var caption = "";
	
	var vTclsnmA = ds_init_lb1003.getColumn(0,"etc02").split("▦");
	var vTclsnmB = ds_init_lb1003.getColumn(0,"nm").split("▦");
	
	caption = strCaption;
	
	for(i=0;i<vTclsnmA.length;i++){

		group3.grd_testlist.setRealColSize(i + gStartCol,24) ;
		group3.grd_testlist.setCellProperty("Head",i + gStartCol,"text",vTclsnmA[i]);
		//caption += "^" + vTclsnmA[i];
	}
	

	
	for(i=0;i<vTclsnmB.length;i++){

		group3.grd_testlist.setRealColSize(i + gStartCol,24) ;
		group3.grd_testlist.setCellProperty("Head",i + gStartCol,"text",vTclsnmB[i]);

	}			
					
}	
				
				
//조회후 그리드 리메이크
function fGrdReMake2(){

	var vCdList  = ds_init_lb1003.getColumn(0,"etc01").split("▦");
	var vCdCount = vCdList.length;  
	//alert(vCdCount);
	var vOrgrst  = "";
	var curCol   = 0;
	
	
		for (var col=0; col < parseInt(vCdCount); col++) {
			vOrgrst = "inptrslt" + (eval(col+1) );
				curCol = eval(gStartCol+col);
				//grd_testlist.cellStyle("background-color", (row+1), curCol, (row+1),curCol) = "#eaeaea";	
				group3.grd_testlist.setCellProperty("Body",curCol,"style","background:EXPR(getColumn(currow,'" + vOrgrst + "') == 'false'?'#eaeaea')");
			
		}						
	
}				
				
function SPLLP90200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	fSetInit();
}
]]></Script>
  </Form>
</FDL>