YNU_JEUS/app_home/himed/xpapps/ast/infcmngtxp/xp/SMASB01100_격리주의표시등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMASB01100" position="absolute 0 0 876 382" titletext="감염주의 표시등록" oninit="SMASB01100_oninit" onload="SMASB01100_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 870 345" id="group3" scrollbars="none">
          <Layouts>
            <Layout>
              <Static text="감염리스트" position="absolute 0 4 95 20" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 58 517 64" linetype="vertical" id="line1" class="line_1" anchor="default"/>
              <Grid position="absolute 0 21 517 320" align="align:center middle;" id="grd_infclist" binddataset="ds_grd_infclist" anchor="default" oncellclick="group3_grd_infclist_oncellclick" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="73"/>
                      <Column size="155"/>
                      <Column size="68"/>
                      <Column size="68"/>
                      <Column size="68"/>
                      <Column size="68"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </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="caption1"/>
                      <Cell col="7"/>
                      <Cell col="8"/>
                      <Cell col="9"/>
                      <Cell col="10"/>
                      <Cell col="11"/>
                      <Cell col="12"/>
                      <Cell col="13"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="combo" style="align:center middle;background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:isoldispcd" combodataset="ds_A0140" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="1" displaytype="combo" style="padding:0 0 0 5;background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:isoldiagcd" combodataset="ds_A0220" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="2" displaytype="date" style="background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:dispfromdt" calendardisplaynulltype="nulltext"/>
                      <Cell col="3" displaytype="date" style="background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:disptodt" calendardisplaynulltype="nulltext"/>
                      <Cell col="4" style="background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:fstrgstrid"/>
                      <Cell col="5" style="background:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);background2:EXPR(disptodt&gt;utlf_getCurrentDate()?&quot;#FFF000&quot;:&quot;&quot;);" text="bind:lastupdtrid"/>
                      <Cell col="6" text="bind:pid"/>
                      <Cell col="7" text="bind:seqno"/>
                      <Cell col="8" text="bind:hngnm"/>
                      <Cell col="9" text="bind:sexflag"/>
                      <Cell col="10" text="bind:age"/>
                      <Cell col="11" text="bind:indd"/>
                      <Cell col="12" text="bind:cretno"/>
                      <Cell col="13" text="bind:etccnts"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="감염정보" position="absolute 522 5 617 21" id="caption3" class="tit_2" anchor="default"/>
              <Static text="환자정보" position="absolute 522 22 602 44" align="align:center middle;" id="caption8" class="cell_1" anchor="default"/>
              <Shape position="absolute 521 42 864 48" linetype="horizontal" id="line3" class="line_2" anchor="default"/>
              <Static text="주의종류" position="absolute 522 47 602 94" align="align:center middle;" id="cap_isoldispcd" class="cell_1" anchor="default"/>
              <Shape position="absolute 521 92 864 98" linetype="horizontal" id="line4" class="line_2" anchor="default"/>
              <Static text="감염질환" position="absolute 522 97 602 120" align="align:center middle;" id="cap_isoldiagcd" class="cell_1" anchor="default"/>
              <Shape position="absolute 521 118 864 124" linetype="horizontal" id="line5" class="line_2" anchor="default"/>
              <Static text="시 작 일" position="absolute 522 123 602 146" align="align:center middle;" id="caption9" class="cell_1" anchor="default"/>
              <Shape position="absolute 521 170 864 176" linetype="horizontal" id="line8" class="line_2" anchor="default"/>
              <Shape position="absolute 521 144 864 150" linetype="horizontal" id="line9" class="line_2" anchor="default"/>
              <Static text="해 제 일" position="absolute 522 149 602 172" align="align:center middle;" id="caption10" class="cell_1" anchor="default"/>
              <Static text="안 내 문" position="absolute 522 174 602 317" align="align:center middle;" id="caption12" class="cell_1" anchor="default"/>
              <Shape position="absolute 522 317 865 323" linetype="horizontal" id="line2" class="line_3" anchor="default"/>
              <TextArea position="absolute 605 175 864 317" id="textarea1" anchor="default" wordwrap="char"/>
              <Calendar position="absolute 605 151 720 170" id="input1" class="input_default" anchor="default" autoselect="true"/>
              <Calendar position="absolute 605 125 720 144" id="input2" class="input_default" enable="false" anchor="default"/>
              <Combo position="absolute 605 99 830 118" id="cmb_isoldiagcd" class="combo_essential" innerdataset="ds_init_cmb_isoldiagcd" datacolumn="cdnm" codecolumn="cdid" anchor="default" onitemchanged="group3_cmb_isoldiagcd_onitemchanged"/>
              <Edit readonly="true" position="absolute 683 24 743 43" id="output1" anchor="default" class="output"/>
              <Edit readonly="true" position="absolute 813 24 836 43" id="output2" anchor="default" class="output"/>
              <Edit readonly="true" position="absolute 839 24 862 43" id="output3" anchor="default" class="output"/>
              <Static text="성별/나이" position="absolute 746 22 811 44" align="align:center middle;" id="caption13" class="cell_1" anchor="default"/>
              <Shape position="absolute 522 20 865 26" linetype="horizontal" id="line6" class="line_3" anchor="default"/>
              <Radio position="absolute 605 50 862 94" id="radio1" columncount="2" rowcount="1" innerdataset="@ds_A0140" datacolumn="cdnm" codecolumn="cdid" anchor="default" onitemchanged="group3_radio1_onitemchanged"/>
              <Edit position="absolute 607 24 679 43" id="input3" anchor="default" onkeydown="group3_input3_onkeydown"/>
              <Button id="button7" taborder="1" class="icon_search" position="absolute 585 25 601 41" onclick="group3_button7_onclick" visible="false"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 349 870 376" id="group1" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 -2 864 4" linetype="horizontal" id="line12" class="line_6" anchor="default"/>
              <Button position="absolute 810 3 866 25" id="button5" class="btn4" text="저장" anchor="default" onclick="group1_button5_onclick"/>
              <Button position="absolute 753 3 809 25" id="button6" class="btn4" text="신규" anchor="default" onclick="group1_button6_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 0 870 25" id="grp_tle">
          <Layouts>
            <Layout>
              <Static text="감염주의 표시등록" position="absolute 0 0 142 25" id="caption14" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_infclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="isoldispcd" type="STRING"/>
          <Column id="isoldiagcd" type="STRING"/>
          <Column id="dispfromdt" type="STRING"/>
          <Column id="disptodt" type="STRING"/>
          <Column id="fstrgstrid" type="STRING"/>
          <Column id="lastupdtrid" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="seqno" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="sexflag" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="cretno" type="STRING"/>
          <Column id="etccnts" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_isoldiagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING"/>
          <Column id="cdid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_A0140" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_A0220" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_A0910" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_A0920" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_A0930" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_A0940" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_infctioninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="sexflag" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="isoldispcd" type="STRING" size="256"/>
          <Column id="isoldiagcd" type="STRING" size="256"/>
          <Column id="etccnts" type="STRING" size="256"/>
          <Column id="dispfromdt" type="STRING" size="256"/>
          <Column id="disptodt" type="STRING" size="256"/>
          <Column id="fstrgstrid" type="STRING" size="256"/>
          <Column id="fstrgstdt" type="STRING" size="256"/>
          <Column id="lastupdtid" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="isoresncd" type="STRING" size="256"/>
          <Column id="isolabbrcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="sexflag"/>
            <Col id="age"/>
            <Col id="isoldispcd"/>
            <Col id="isoldiagcd"/>
            <Col id="etccnts"/>
            <Col id="dispfromdt"/>
            <Col id="disptodt"/>
            <Col id="fstrgstrid"/>
            <Col id="fstrgstdt"/>
            <Col id="lastupdtid"/>
            <Col id="seqno"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="status"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_condition" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="orddeptcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_isolinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_isopatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_A0935" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.input3" propid="value" datasetid="ds_infctioninfo" columnid="pid"/>
      <BindItem id="item1" compid="group3.output1" propid="value" datasetid="ds_infctioninfo" columnid="hngnm"/>
      <BindItem id="item2" compid="group3.output2" propid="value" datasetid="ds_infctioninfo" columnid="sexflag"/>
      <BindItem id="item3" compid="group3.output3" propid="value" datasetid="ds_infctioninfo" columnid="age"/>
      <BindItem id="item4" compid="group3.radio1" propid="value" datasetid="ds_infctioninfo" columnid="isoldispcd"/>
      <BindItem id="item5" compid="group3.cmb_isoldiagcd" propid="value" datasetid="ds_infctioninfo" columnid="isoldiagcd"/>
      <BindItem id="item6" compid="group3.input2" propid="value" datasetid="ds_infctioninfo" columnid="dispfromdt"/>
      <BindItem id="item7" compid="group3.input1" propid="value" datasetid="ds_infctioninfo" columnid="disptodt"/>
      <BindItem id="item8" compid="group3.textarea1" propid="value" datasetid="ds_infctioninfo" columnid="etccnts"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KU2.0
 * 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";
include "emr_prcpmngtxp::MMO001.xjs";

function SMASB01100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  // 화면공통
}

function SMASB01100_onload(obj:Form, e:LoadEventInfo)
{
	if ( sysf_getUserInfo("dutplcecd") == '3110300000'){
		group3.button7.visible = true;
	}else{
		group3.button7.visible = false;
	}
	var arrParam = [{dsNm: "ds_A0140", cdGrpId: "A0140"}
				   ,{dsNm: "ds_A0220", cdGrpId: "A0220"}
				   ,{dsNm: "ds_A0910", cdGrpId: "A0910"}
				   ,{dsNm: "ds_A0920", cdGrpId: "A0920"}
				   ,{dsNm: "ds_A0930", cdGrpId: "A0930"}
				   ,{dsNm: "ds_A0935", cdGrpId: "A0935"}
				   ,{dsNm: "ds_A0940", cdGrpId: "A0940"}
				   ]
	appf_getCodeList(arrParam, true);	
	
	ds_A0140.addColumn("num", "string");	
	
	ds_A0140.setColumn(ds_A0140.findRow("cdid", "B"), "num", "1");
	ds_A0140.setColumn(ds_A0140.findRow("cdid", "C"), "num", "2");
	ds_A0140.setColumn(ds_A0140.findRow("cdid", "A"), "num", "3");
	ds_A0140.setColumn(ds_A0140.findRow("cdid", "D"), "num", "4");
	
	//ds_A0140.keystring("")
	ds_A0140.keystring = "S:num";

	var pid = "";
	var strRegtdt = "";
	var iDate = new Date();
	var strYearCal = "";
	
	var pamInfoCvs = sysf_getGlobalVariable("paminfo");  //상단정보가 있을 경우는 검색
	
	if(!utlf_isNull(pamInfoCvs)){ //cvs가 ""이 아닌 경우에만 처리함.	
		dsf_setCSVToDs("ds_paminfo",pamInfoCvs);
		//model.removeNodeSet("/root/main/paminfo/list");
		//setCSVToNode("/root/main/paminfo", pamInfoCvs);
		var ioflag = ds_paminfo.getColumn(0,"ioflag");
		
		if(ioflag == "I" || ioflag == "E" || ioflag == "D"){
			ds_hidden_condition.setColumn(0,"pid", ds_paminfo.getColumn(0,"pid") );	
			ds_hidden_condition.setColumn(0,"indd", ds_paminfo.getColumn(0,"indd"));
			ds_hidden_condition.setColumn(0,"cretno", ds_paminfo.getColumn(0,"cretno"));
			ds_hidden_condition.setColumn(0,"orddeptcd", ds_paminfo.getColumn(0,"orddeptcd"));

		}else if(ioflag == "O" || ioflag == "S"){
			ds_hidden_condition.setColumn(0,"pid", ds_paminfo.getColumn(0,"pid") );	
			ds_hidden_condition.setColumn(0,"indd", ds_paminfo.getColumn(0,"orddd"));
			ds_hidden_condition.setColumn(0,"cretno", ds_paminfo.getColumn(0,"cretno"));
			ds_hidden_condition.setColumn(0,"orddeptcd", ds_paminfo.getColumn(0,"orddeptcd"));
			
		}else{
			var rtn = sysf_messageBox("상단의 정보와 ", "E004");
			return;
		}
	}  

	ds_infctioninfo.setColumn(0,"pid",  ds_paminfo.getColumn(0,"pid"));
	ds_infctioninfo.setColumn(0,"hngnm", ds_paminfo.getColumn(0,"hngnm"));
	ds_infctioninfo.setColumn(0,"sexflag", ds_paminfo.getColumn(0,"sex"));
	ds_infctioninfo.setColumn(0,"age", ds_paminfo.getColumn(0,"age"));


	if(!utlf_isNull(ds_hidden_condition.getColumn(0,"pid"))) {
		dsf_createDsRow("ds_send_reqdata",
					[{col:"pid"		, val:ds_hidden_condition.getColumn(0,"pid")}
					,{col:"indd"	, val:""}
					,{col:"cretno"	, val:""}
					,{col:"orddeptcd"	, val:""}
					,{col:"isoldispcd", val:""}
					,{col:"isollistflag"	, val:""}
					,{col:"isolwrnflag",val:""}					
					]);
		
		var oParam = {};
			oParam.id          = "TRASB01101";
			oParam.service     = "infcbaseapp.IsolMngt";
			oParam.method      = "reqGetIsolDisp";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_grd_infclist=info";
			oParam.async       = false;
			oParam.callback    = "cf_TRASB01101";

		tranf_submit(oParam);
	}
	
	//var grd_rows=grd_infclist.rows;
	//var grd_fixrows=grd_infclist.fixedRows;
	//expr로 처리
// 	if(grd_rows>grd_fixrows){
// 		for(var i=grd_fixrows; i<grd_rows; i++){
// 			var end_day=grd_infclist.valueMatrix(i, grd_infclist.colRef("disptodt"));
// 			var current_day=getCurrentDate();
// 			if(current_day <end_day){
// 				grd_infclist.rowstyle(i, "data", "background-color") = "#FFF000";
// 			}
// 		}
// 	}
	
	if( utlf_isNull(ds_infctioninfo.getColumn(0,"dispfromdt")) ){
		ds_infctioninfo.setColumn(0,"dispfromdt", utlf_getCurrentDate());
	}
	if( utlf_isNull(ds_infctioninfo.getColumn(0,"disptodt")) ){
		ds_infctioninfo.setColumn(0,"disptodt","99991231");
	}
}
function cf_TRASB01101(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    ds_grd_infclist.rowposition = -1;
}
function group3_grd_infclist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
		ds_infctioninfo.clearData();
		ds_infctioninfo.addRow();
		ds_infctioninfo.setColumn(0,"isoldispcd", ds_grd_infclist.getColumn(e.row,"isoldispcd"));
		var ev = new ItemChangeEventInfo;
		frmf_inputEnterKey("group3.radio1", "onitemchanged", ev );
		frmf_inputEnterKey("group3.cmb_isoldiagcd", "onitemchanged", ev );

		ds_infctioninfo.copyRow(0,ds_grd_infclist,e.row);
		//model.copyNode("/root/main/infctioninfo", "/root/main/infclist/info["+grd_infclist.row+"]");
		group3.radio1.enable=false;
		group3.cmb_isoldiagcd.enable=false;
						
}

function group3_cmb_isoldiagcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var type=ds_infctioninfo.getColumn(0,"isoldispcd");
	var cdid=ds_infctioninfo.getColumn(0,"isoldiagcd");
	var today = utlf_getCurrentDate();
	
	if(type=="B"){
		ds_infctioninfo.setColumn(0,"disptodt","99991231");
		
		ds_infctioninfo.setColumn(0,"isolabbrcd","B");
		
	}else if(type=="C"){
		if(cdid=="I04"||cdid=="I05"||cdid=="I06"||cdid=="I07"||cdid=="I08"||cdid=="I09"||
		   cdid=="I10"||cdid=="I11"||cdid=="I12"||cdid=="I20"||cdid=="I21"||cdid=="I22"||cdid=="I29"){
			var disptodt = (today.toDate()).getAddDate(21);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I13" || cdid=="I26"){
			var disptodt = (today.toDate()).getAddDate(7);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I25"){
			var disptodt = (today.toDate()).getAddDate(3,'M');
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}
		
		ds_infctioninfo.setColumn(0,"isolabbrcd","C");

	}else if(type=="A"){
		if(cdid=="I14"||cdid=="I15"){
			var disptodt = (today.toDate()).getAddDate(14);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I16"){
			var disptodt = (today.toDate()).getAddDate(7);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}
		ds_infctioninfo.setColumn(0,"isolabbrcd","A");
	}else if(type=="D"){
		if(cdid=="I17"){
			var disptodt = (today.toDate()).getAddDate(14);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I27"||cdid=="I18"){
			var disptodt = (today.toDate()).getAddDate(7);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I28"||cdid=="I19"){
			var disptodt = (today.toDate()).getAddDate(5);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}else if(cdid=="I30"){
			var disptodt = (today.toDate()).getAddDate(21);
			ds_infctioninfo.setColumn(0,"disptodt",disptodt.getDateFormat());		
		}
		ds_infctioninfo.setColumn(0,"isolabbrcd","D");
	}
	if(!utlf_isNull(cdid)){
		ds_infctioninfo.setColumn(0,"etccnts", ds_A0940.lookup("cdid",cdid,"cdnm"));
	}
}

function group3_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var isoresncd=ds_infctioninfo.getColumn(0,"isoldispcd");
	if(isoresncd=="A"){
		ds_init_cmb_isoldiagcd.copyData(ds_A0930);
	}else if(isoresncd=="B"){
		ds_init_cmb_isoldiagcd.copyData(ds_A0910); 
	}else if(isoresncd=="C"){
		ds_init_cmb_isoldiagcd.copyData(ds_A0920); 
	}else if(isoresncd=="D"){
		ds_init_cmb_isoldiagcd.copyData(ds_A0935); 
	}
	ds_infctioninfo.setColumn(0,"disptodt","");
	ds_infctioninfo.setColumn(0,"etccnts","");
	ds_infctioninfo.setColumn(0,"isoldiagcd", "");
}

function group3_input3_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == "13"){
		//setInputNodeCurText();
		
		frmf_setInputNodeCurPid();
		
		dsf_createDsRow("ds_send_reqdata",
					[{col:"pid"		, val:obj.value}
					,{col:"indd"	, val:""}
					,{col:"cretno"	, val:""}
					,{col:"orddeptcd"	, val:""}
					,{col:"isoldispcd", val:""}
					,{col:"isollistflag"	, val:""}
					,{col:"isolwrnflag",val:""}					
					]);
		
		var oParam = {};
			oParam.id          = "TRASB01101";
			oParam.service     = "infcbaseapp.IsolMngt";
			oParam.method      = "reqGetIsolDisp";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_grd_infclist=info";
			oParam.async       = false;
			oParam.callback    = "cf_TRASB01101";

		tranf_submit(oParam);
	}
}

function group1_button5_onclick(obj:Button,  e:ClickEventInfo)
{
		ds_init_cmb_isoldiagcd.clearData();
		var arrCompId = new Array("group3.rdo_isoldispcd","group3.cmb_isoldiagcd");
		
		if( !frmf_isRequiredControls(arrCompId)){
			return;
		}
		
		if( utlf_isNull(ds_infctioninfo.getColumn(0,"seqno")) ){
			ds_infctioninfo.setColumn(0,"status", "i");
		}else{
			ds_infctioninfo.setColumn(0,"status", "u");
		}
		var strStatus = ds_infctioninfo.getColumn(0,"status");
		var updRow  = ds_grd_infclist.rowposition;
		
		ds_infctioninfo.setColumn(0,"indd", ds_hidden_condition.getColumn(0,"indd") );	
		ds_infctioninfo.setColumn(0,"cretno", ds_hidden_condition.getColumn(0,"cretno") );	
		ds_infctioninfo.setColumn(0,"orddeptcd", ds_hidden_condition.getColumn(0,"orddeptcd") );	
		
		ds_infctioninfo.setColumn(0,"isoresncd", ds_infctioninfo.getColumn(0,"isoldiagcd"));
		
		if(utlf_isNull(ds_infctioninfo.getColumn(0,"disptodt"))){
			ds_infctioninfo.setColumn(0,"disptodt","99991231");
		}
		
		//model.removeNodeset("/root/send/savedata");
		//model.makeNode("/root/send/savedata");
		//model.copyNode("/root/send/savedata", "/root/main/infctioninfo");
		
		var oParam = {};
			oParam.id          = "TXASB01101";
			oParam.service     = "infcbaseapp.IsolMngt";
			oParam.method      = "reqExeIsolDisp";
			oParam.inds        = "req=ds_infctioninfo";
			oParam.outds       = "ds_grd_infclist=info ds_init_cmb_isoldiagcd=diaginfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TXASB01101";

		tranf_submit(oParam);
		
		ds_grd_infclist.rowposition = -1;
	   
		//model.copyNode("/root/main/infclist", "/root/main/getinfclist");


		dsf_createDsRow("ds_send_reqdata",
					[{col:"pid"		, val:ds_hidden_condition.getColumn(0,"pid")}					
					]);

		var oParam = {};
			oParam.id          = "TRASB01102";
			oParam.service     = "infcbaseapp.IsolMngt";
			oParam.method      = "reqGetIsolDispUpInfo";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_isolinfo=info";
			oParam.async       = false;
			oParam.callback    = "cf_TRASB01102";

		tranf_submit(oParam);

		
		if(frmf_isPopup()) {
				close();
		}
}
function cf_TRASB01102(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    var sEYN = ds_isolinfo.getColumn(0,"existyn");
			//setPatientInfo("infection","12345678|Y^N^Y");
			appf_setPatientInfo("infection", sEYN);
}
function group1_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_infctioninfo.setColumn(0,"isoldispcd", "");
	ds_infctioninfo.setColumn(0,"isoldiagcd", "");
	ds_infctioninfo.setColumn(0,"testrsltdt", "");
	ds_infctioninfo.setColumn(0,"dispfromdt", utlf_getCurrentDate());
	ds_infctioninfo.setColumn(0,"disptodt", "");
	ds_infctioninfo.setColumn(0,"etccnts", "");
	ds_infctioninfo.setColumn(0,"seqno", "");

	group3.radio1.enable=true;
	group3.cmb_isoldiagcd.enable=true;
}

function group3_button7_onclick(obj:Button,  e:ClickEventInfo)
{
		
	var objArg = new Object();
	objArg.arg_ds_send = ds_infctioninfo;
	frmf_modal("SPPMC02500","SPPMC02500",objArg,"",1,10,10,"","","","","","M");
	
	if(ds_patinfolist.rowcount <= 0){
		sysf_messageBox("선택된 환자 정보가 ", "I004");
		return;
	}
	ds_infctioninfo.setColumn(0, "pid", ds_patinfolist.getColumn(0,"pid"));
	ds_infctioninfo.setColumn(0, "sexflag", ds_patinfolist.getColumn(0,"sex"));
	ds_infctioninfo.setColumn(0, "age", ds_patinfolist.getColumn(0,"age"));
	ds_infctioninfo.setColumn(0, "hngnm", ds_patinfolist.getColumn(0,"hngnm"));
		
	fSearchIsolPatInfo();
}
function fSearchIsolPatInfo() {

		var oParam = {};
			oParam.id          = "TRASB01199";
			oParam.service     = "infcbaseapp.IsolMngt";
			oParam.method      = "reqGetIsolDispPatInfo";
			oParam.inds        = "req=ds_infctioninfo";
			oParam.outds       = "ds_isopatinfo=patinfo";
			oParam.async       = false;
			//oParam.callback    = "TRASB01199";

		tranf_submit(oParam);

		//팝업을 사용하여 환자 기본정보 검색
		/*
		if( utlf_isNull(ds_infctioninfo.getColumn(0,"pid")))
		{
			sysf_messageBox("환자 정보가", "I004");
			return;
		}
		*/

		if(ds_isopatinfo.rowcount <= 0){
			sysf_messageBox("환자 정보가 ", "I004");			
			
			ds_infctioninfo.setColumn(0, "pid", "");
			ds_infctioninfo.setColumn(0, "sexflag", "");
			ds_infctioninfo.setColumn(0, "age", "");
			ds_infctioninfo.setColumn(0, "hngnm", "");
			ds_hidden_condition.clearData();
			if(ds_hidden_condition.rowcount <= 0){
				ds_hidden_condition.addRow();
			}
			
			return;
		}

		ds_hidden_condition.setColumn(0, "pid", ds_isopatinfo.getColumn(0,"pid"));
		ds_hidden_condition.setColumn(0, "indd", ds_isopatinfo.getColumn(0,"indd"));
		ds_hidden_condition.setColumn(0, "cretno", ds_isopatinfo.getColumn(0,"cretno"));
		
		if(!utlf_isNull(ds_hidden_condition.getColumn(0,"pid"))) {
			dsf_createDsRow("ds_send_reqdata",
						[{col:"pid"		, val:ds_hidden_condition.getColumn(0,"pid")}
						,{col:"indd"	, val:""}
						,{col:"cretno"	, val:""}
						,{col:"orddeptcd"	, val:""}
						,{col:"isoldispcd", val:""}
						,{col:"isollistflag"	, val:""}
						,{col:"isolwrnflag",val:""}					
						]);
			
			var oParam = {};
				oParam.id          = "TRASB01101";
				oParam.service     = "infcbaseapp.IsolMngt";
				oParam.method      = "reqGetIsolDisp";
				oParam.inds        = "req=ds_send_reqdata";
				oParam.outds       = "ds_grd_infclist=info";
				oParam.async       = false;
				oParam.callback    = "cf_TRASB01101";

			tranf_submit(oParam);
		}
		
		
		if( utlf_isNull(ds_infctioninfo.getColumn(0,"dispfromdt")) ){
			ds_infctioninfo.setColumn(0,"dispfromdt", utlf_getCurrentDate());
		}
		if( utlf_isNull(ds_infctioninfo.getColumn(0,"disptodt")) ){
			ds_infctioninfo.setColumn(0,"disptodt","99991231");
		}		

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