YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO02400_투약이력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO02400" position="absolute 0 0 1213 783" titletext="투약이력조회" oninit="SPMMO02400_oninit" onload="SPMMO02400_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 1161 23 1213 43" id="btn_medilistsrch" class="btn1" text="조회" onclick="btn_medilistsrch_onclick"/>
        <Grid position="absolute 2 77 486 783" id="grd_medilist" binddataset="ds_medilist" oncelldblclick="grd_medilist_oncelldblclick" anchor="left top bottom" autofittype="col" cellclickbound="cell" onrbuttondown="grd_medilist_onrbuttondown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="100"/>
                <Column size="272"/>
                <Column size="87"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="처방코드"/>
                <Cell col="2" text="처방명"/>
                <Cell col="3" text="약품분류"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:status" expr="expr:(status == &quot;Y&quot; || status == 1) ? 1 : 0"/>
                <Cell col="1" displaytype="text" text="bind:prcpcd"/>
                <Cell col="2" displaytype="text" text="bind:prcpnm"/>
                <Cell col="3" displaytype="combo" edittype="none" text="bind:spcldrug" combodataset="ds_spcldruginfo" combocodecol="cdid" combodatacol="cdnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="투약 리스트" position="absolute 0 58 92 78" id="caption22" class="tit_2"/>
        <Static text="투약이력 조회" position="absolute 489 58 604 78" id="caption4" class="tit_2"/>
        <Button position="absolute 400 56 486 76" id="btn_medihist" class="btn2" text="투약이력조회" onclick="btn_medihist_onclick"/>
        <Button position="absolute 268 56 332 76" id="button1" class="btn2" text="전체선택" onclick="button1_onclick"/>
        <Calendar position="absolute 387 23 478 43" id="input6" class="input_essential" dateformat="yyyy-MM-dd" value="null" autoselect="true" style="padding:0 2 0 5;"/>
        <Calendar position="absolute 490 23 581 43" id="input3" class="input_essential" dateformat="yyyy-MM-dd" value="null" autoselect="true" style="padding:0 2 0 5;"/>
        <Edit readonly="true" position="absolute 266 23 291 43" align="align:center middle;" id="output4" class="output"/>
        <Edit readonly="true" position="absolute 292 23 326 43" align="align:center middle;" id="output10" class="output"/>
        <Button position="absolute 243 22 263 42" id="button61" class="icon_search" text="" onclick="button61_onclick"/>
        <Static text="환자명" position="absolute 136 21 180 45" id="caption5" class="cell_1" style="padding:0 0 0 4;"/>
        <Shape position="absolute 0 18 1213 20" id="line17" type="rectangle" style="strokepen:0 solid #33bbbbff;fillbrush:solid #33bbbbff true;" radiusx="5" radiusy="0"/>
        <Static text="등록번호" position="absolute 0 21 57 45" id="caption6" class="cell_1" style="padding:0 0 0 4;"/>
        <Static text="처방일자" position="absolute 328 21 385 45" align="align:center middle;" id="caption17" class="cell_1" style="padding:0 0 0 4;"/>
        <Static text="투약이력조회" position="absolute 0 0 121 20" id="caption20" class="tit_2"/>
        <Shape position="absolute 0 46 1213 48" id="line6" style="strokepen:0 solid #33bbbbff;fillbrush:solid #33bbbbff true;" radiusx="5" radiusy="0" type="rectangle"/>
        <Static text="외래/입원" position="absolute 642 21 705 45" align="align:center middle;" id="caption1" class="cell_1" style="padding:0 0 0 4;"/>
        <Combo position="absolute 707 23 758 43" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">-</Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">O</Col>
                <Col id="datacolumn">외래</Col>
              </Row>
              <Row>
                <Col id="codecolumn">I</Col>
                <Col id="datacolumn">입원</Col>
              </Row>
              <Row>
                <Col id="codecolumn">E</Col>
                <Col id="datacolumn">응급</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static text="투약종류" position="absolute 760 21 817 45" align="align:center middle;" id="caption2" class="cell_1" style="padding:0 0 0 4;"/>
        <Combo position="absolute 819 23 870 43" id="combo2" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">-</Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">A2</Col>
                <Col id="datacolumn">내복</Col>
              </Row>
              <Row>
                <Col id="codecolumn">A4</Col>
                <Col id="datacolumn">외용</Col>
              </Row>
              <Row>
                <Col id="codecolumn">A6</Col>
                <Col id="datacolumn">주사</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static text="약품분류" position="absolute 872 21 929 45" align="align:center middle;" id="caption3" class="cell_1" style="padding:0 0 0 4;"/>
        <Static text="~" position="absolute 479 24 494 44" id="caption7"/>
        <Combo position="absolute 931 23 1023 43" id="combo3" innerdataset="ds_spcldruginfo" datacolumn="cdnm" codecolumn="cdid"/>
        <Static text="특정코드" position="absolute 1025 21 1082 45" align="align:center middle;" id="caption9" class="cell_1" style="padding:0 0 0 4;"/>
        <Edit position="absolute 1084 23 1159 43" id="input4" autoselect="true"/>
        <CheckBox position="absolute 163 56 259 76" id="bool1" text="타진료과 포함" falsevalue="N" truevalue="Y"/>
        <Grid position="absolute 489 77 1213 783" id="grd_mediday" binddataset="ds_main_medidayno_ret" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="처방코드"/>
              </Band>
              <Band id="body">
                <Cell style="align:left middle;" text="bind:prcpcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Edit position="absolute 182 23 240 43" id="ipt_hngnm" class="input_essential" taborder="2" autoselect="true" onkeydown="ipt_hngnm_onkeydown"/>
        <Edit position="absolute 59 23 132 43" id="ipt_pid" class="input_essential" taborder="1" autoselect="true" onkeydown="ipt_pid_onkeydown"/>
        <Combo position="absolute 583 23 640 43" id="combo4" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="combo4_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">1</Col>
                <Col id="datacolumn">1일</Col>
              </Row>
              <Row>
                <Col id="codecolumn">2</Col>
                <Col id="datacolumn">1개월</Col>
              </Row>
              <Row>
                <Col id="codecolumn">3</Col>
                <Col id="datacolumn">3개월</Col>
              </Row>
              <Row>
                <Col id="codecolumn">4</Col>
                <Col id="datacolumn">6개월</Col>
              </Row>
              <Row>
                <Col id="codecolumn">5</Col>
                <Col id="datacolumn">9개월</Col>
              </Row>
              <Row>
                <Col id="codecolumn">6</Col>
                <Col id="datacolumn">1년</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Button id="Button00" taborder="3" text="선택취소" position="absolute 334 56 398 76" class="btn2" onclick="Button00_onclick"/>
        <PopupMenu id="pmn_menu" innerdataset="ds_menu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu_onmenuclick" position="absolute 1240 0 1355 24"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" 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="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="prcpclscd" type="STRING" size="256"/>
          <Column id="spcldrug" type="STRING" size="256"/>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="termflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ioflag">-</Col>
            <Col id="prcpclscd">-</Col>
            <Col id="spcldrug">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_spcldruginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256" sumtext="약품분류명"/>
          <Column id="cdid" type="STRING" size="256" sumtext="약품분류코드"/>
        </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_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond1" type="STRING" size="256"/>
          <Column id="srchcond2" type="STRING" size="256"/>
          <Column id="srchcond3" type="STRING" size="256"/>
          <Column id="srchcond4" type="STRING" size="256"/>
          <Column id="srchcond5" type="STRING" size="256"/>
          <Column id="srchcond6" type="STRING" size="256"/>
          <Column id="srchcond7" type="STRING" size="256"/>
          <Column id="srchcond8" type="STRING" size="256"/>
          <Column id="srchcond9" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond1">1</Col>
            <Col id="srchcond6">ALL</Col>
            <Col id="srchcond7">%</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_medilist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_medilist_oncolumnchanged">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" sumtext="선택여부(Y/N)"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="spcldrug" type="STRING" size="256" sumtext="특별약품"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cond1" type="STRING" size="256"/>
          <Column id="cond2" type="STRING" size="256"/>
          <Column id="cond3" type="STRING" size="256"/>
          <Column id="cond4" type="STRING" size="256"/>
          <Column id="cond5" type="STRING" size="256"/>
          <Column id="cond6" type="STRING" size="256"/>
          <Column id="cond7" type="STRING" size="256"/>
          <Column id="cond8" type="STRING" size="256"/>
          <Column id="cond99" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_medidayno_header" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="caption" type="STRING" size="256" sumtext="header caption"/>
          <Column id="colref" type="STRING" size="256" sumtext="ref"/>
          <Column id="type" type="STRING" size="256" sumtext="type"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_medidayno_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="day" type="STRING" size="256" sumtext="처방일"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_medidayno_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="day" type="STRING" size="256" sumtext="처방일"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">약품편람</Col>
            <Col id="func">fDrugInfo</Col>
            <Col id="level">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_receivedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchdrugcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_cond" columnid="pid"/>
      <BindItem id="item1" compid="ipt_hngnm" propid="value" datasetid="ds_cond" columnid="hngnm"/>
      <BindItem id="item2" compid="output4" propid="value" datasetid="ds_cond" columnid="sex"/>
      <BindItem id="item3" compid="output10" propid="value" datasetid="ds_cond" columnid="age"/>
      <BindItem id="item4" compid="input6" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item5" compid="input3" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item6" compid="combo4" propid="value" datasetid="ds_cond" columnid="termflag"/>
      <BindItem id="item7" compid="combo1" propid="value" datasetid="ds_cond" columnid="ioflag"/>
      <BindItem id="item8" compid="combo2" propid="value" datasetid="ds_cond" columnid="prcpclscd"/>
      <BindItem id="item9" compid="combo3" propid="value" datasetid="ds_cond" columnid="spcldrug"/>
      <BindItem id="item10" compid="input4" propid="value" datasetid="ds_cond" columnid="drugcd"/>
      <BindItem id="item11" compid="bool1" propid="value" datasetid="ds_cond" columnid="deptflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

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

function SPMMO02400_onload(obj:Form, e:LoadEventInfo)
{	
	//그리드 정렬기능 추가
	grdf_setGridSort(grd_medilist);
	grdf_setGridSort(grd_mediday);
	
	ds_cond.setColumn(0, "fromdd", utlf_getCurrentDate());
	ds_cond.setColumn(0, "todd"  , utlf_getCurrentDate());
	
	var oParam = {};
		oParam.id       = "TRMMO02404";
		oParam.service  = "prcpmngtapp.PrcpMngt";
		oParam.method   = "reqGetDrugEfcyClsCdList";
		oParam.outds    = "ds_spcldruginfo=spcldruginfo";
		oParam.async    = false;

	tranf_submit(oParam);
	
	frmf_addComboItem("combo3");
	
	var pid = opener.frmf_getParameter("SPMMO02400_pid");
	var paminfocvs = sysf_getGlobalVariable("paminfo");
	
	if(!utlf_isNull(pid)){
		var hngnm = opener.frmf_getParameter("SPMMO02400_hngnm");
		var sex   = opener.frmf_getParameter("SPMMO02400_sex");
		var age   = opener.frmf_getParameter("SPMMO02400_age");
		var ioflag= opener.frmf_getParameter("SPMMO02400_ioflag");
	}else if(!utlf_isNull(paminfocvs)){
		dsf_setCSVToDs("ds_paminfo", paminfocvs);
		var pid   = ds_paminfo.getColumn(0, "pid");
		var hngnm = ds_paminfo.getColumn(0, "hngnm");
		var sex   = ds_paminfo.getColumn(0, "sex");
		var age   = ds_paminfo.getColumn(0, "age");
		var ioflag= ds_paminfo.getColumn(0, "ioflag");
	}
	
	if(!utlf_isNull(pid)){
		fInitSrchTerm(ioflag);
	}
	
	ds_init.setColumn(0, "srchcond2"  , pid);
	
	ds_cond.setColumn(0, "pid"   , pid);
	ds_cond.setColumn(0, "hngnm" , hngnm);
	ds_cond.setColumn(0, "sex"   , sex);
	ds_cond.setColumn(0, "age"   , age);
	ds_cond.setColumn(0, "ioflag", ioflag);
	
	fReqGetPatDrugList();
}

function ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	
}

function ipt_hngnm_onkeydown(obj:Edit, e:KeyEventInfo)
{
	
}

function button61_onclick(obj:Button,  e:ClickEventInfo)
{
	var xpt = this.getOwnerFrame().position.x + 100;	//window.screenleft + 100;
	var ypt = this.getOwnerFrame().position.y + 100;	//window.screenTop + 100;
	
	var objArg = new Object();
	objArg.arg_ds_send = ds_hidden;
		
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, 1, xpt, ypt, null, null, null, null, null, "M");	//modal("SPPMC02500", "1", xpt, ypt, "SPPMC02500", "/root/hidden", "/root/send");
	
	var sPid = ds_patinfolist.getColumn(0, "pid");		//model.getValue("/root/main/patinfo/patinfolist/pid");
	var sHngnm = ds_patinfolist.getColumn(0, "hngnm");	//model.getValue("/root/main/patinfo/patinfolist/hngnm");
	ds_cond.setColumn(0, "pid", sPid);					// 	model.setValue("/root/main/cond/pid", sPid);
	ds_cond.setColumn(0, "hngnm", sHngnm);				// 	model.setValue("/root/main/cond/hngnm", sHngnm);
	//model.refresh();
	
	fReqGetPatDrugList();
}

function combo4_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSettingSrchTerm();
}

function btn_medilistsrch_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqGetPatDrugList();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	for(var i = 0; i < ds_medilist.rowcount; i++)
		ds_medilist.setColumn(i, "status", "Y");
}

function Button00_onclick(obj:Button,  e:ClickEventInfo)
{
	for(var i = 0; i < ds_medilist.rowcount; i++)
		ds_medilist.setColumn(i, "status", "N");
}

function btn_medihist_onclick(obj:Button,  e:ClickEventInfo)
{
	var icnt = 0;
	var prcpcd = "";
	var prcpnm = "";
	var prcpnmlist = "prcpcd|prcpnm^";				
	
	for ( var i = 0; i < ds_medilist.rowcount; i++) {
		if ( ds_medilist.getColumn(i, "status") == "Y" ) {
			prcpcd = ds_medilist.getColumn(i, "prcpcd");
			prcpnm = ds_medilist.getColumn(i, "prcpnm");
			prcpnmlist = prcpnmlist + prcpcd + "|" + prcpnm + "^";
			icnt++;
		}
	}
	
	if(icnt > 0){
		fReqGetPatDrugHistList(prcpnmlist);
	}else{
		sysf_messageBox("검색할 처방을", "C002");
		return;
	}
}

function grd_medilist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.row < 0 || e.col < 0) return;
	
	var prcpnmlist = "prcpcd|prcpnm^";
	var prcpcd = ds_medilist.getColumn(e.row, "prcpcd");
	var prcpnm = ds_medilist.getColumn(e.row, "prcpnm");
	
	prcpnmlist = prcpnmlist + prcpcd + "|" + prcpnm;
	
	fReqGetPatDrugHistList(prcpnmlist);
}

function ds_medilist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "status")
		obj.setColumn(e.row, e.columnid, (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
}

/**
 * 환자투약리스트 조회
 * 등록번호가 없는 경우, 조회처리 하지 않음 
 */ 
function fReqGetPatDrugList(){
	var pid = ds_cond.getColumn(0, "pid");
	if(!utlf_isNull(pid)){		
		var oParam = {};
			oParam.id       = "TRMMO02401";
			oParam.service  = "prcpmngtapp.PrcpMngt";
			oParam.method   = "reqGetPatDrugList";
			oParam.inds     = "req=ds_cond";
			oParam.outds    = "ds_medilist=medilist";
			oParam.async    = true;

		tranf_submit(oParam);
	}
}

/**
 * 환자투약이력리스트 조회
 * 이력조회 이후, 투약이력그리드 생성 
 * @param : prcpnmlist 투약명(prcpcd|prcpnm^prcpcd|prcpnm)
 */ 
function fReqGetPatDrugHistList(prcpnmlist){
	ds_send.clearData();
	ds_send.addRow();
	
	ds_send.setColumn(0, "cond1", ds_cond.getColumn(0, "pid"));       //등록번호
	ds_send.setColumn(0, "cond2", sysf_getUserInfo("dutplceinstcd")); //기관코드
	ds_send.setColumn(0, "cond3", ds_cond.getColumn(0, "fromdd"));    //시작일자
	ds_send.setColumn(0, "cond4", ds_cond.getColumn(0, "todd"));      //종료일자
	ds_send.setColumn(0, "cond5", prcpnmlist);                        //처방코드,처방명	
	ds_send.setColumn(0, "cond6", ds_cond.getColumn(0, "ioflag"));    //외래/입원
	ds_send.setColumn(0, "cond7", ds_cond.getColumn(0, "prcpclscd")); //투약종류
	ds_send.setColumn(0, "cond8", ds_cond.getColumn(0, "spcldrug"));  //약품상세코드     
	
	var oParam = {};
		oParam.id       = "TRMMO02301";
		oParam.service  = "prcpmngtapp.PrcpMngt";
		oParam.method   = "reqGetMediDayNoList";
		oParam.inds     = "req=ds_send";
		oParam.outds    = "ds_medidayno_header=header ds_medidayno_ret=ret";
		oParam.async    = true;
		oParam.callback = "cf_TRMMO02301";

	tranf_submit(oParam);
}

function cf_TRMMO02301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    fMakeDrugHistGrid();
}

/**
 * 투약이력그리드 생성
 *  
 */ 
function fMakeDrugHistGrid(){
	fClrDrugHistGrid();
	
	var strcaption = ds_medidayno_header.getColumn(0, "caption");
	var strcolref  = ds_medidayno_header.getColumn(0, "colref");
	var strcoltype = ds_medidayno_header.getColumn(0, "type");

	var strcaptionArr = strcaption.split("^");
	var strcolrefArr  = strcolref.split("^");
	var strcoltypeArr = strcoltype.split("^");

	grd_mediday.enableevent  = false;
	grd_mediday.enableredraw = false;
	
	for(var i = 1; i < strcolrefArr.length; i++){
		grd_mediday.insertContentsCol(i);
		grd_mediday.setCellProperty("head", i, "text", strcaptionArr[i]);				
		grd_mediday.setCellProperty("body", i, "text", "bind:" + strcolrefArr[i]);
		
		if(i != 2)
			grd_mediday.setCellProperty("body", i, "align", "left middle");
			
		if(i > 2) {
			grd_mediday.setFormatColProperty(i, "size", 100);
		}
	}
	
	grd_mediday.setFormatColProperty(1, "size", 300);
	grd_mediday.setFormatColProperty(2, "size", 60);
	
	ds_main_medidayno_ret.enableevent = false;
	
	ds_main_medidayno_ret.clearData();
	
	var dayCmtCnt = 0;
	
	for(var i = 0; i < ds_medidayno_ret.rowcount; i++){
		var row = ds_main_medidayno_ret.addRow();
		ds_main_medidayno_ret.copyRow(row, ds_medidayno_ret, i);
		
		var dayCmtCnts = ds_medidayno_ret.getColumn(i, "day");
		dayCmtCnt = dayCmtCnts.split("|");
		
		for(var j = 0; j < dayCmtCnt.length - 1; j++){
			var columnNm = "day" + (j + 1);
			ds_main_medidayno_ret.addColumn(columnNm, "string");
			ds_main_medidayno_ret.setColumn(row, columnNm, dayCmtCnt[j]);
		}
	}
	
	ds_main_medidayno_ret.enableevent = true;
		
	grd_mediday.enableevent  = true;
	grd_mediday.enableredraw = true;
	
	grd_mediday.vscrollbar.pos = 0;
}

/**
 * 투약이력그리드 초기화
 *
 */ 
function fClrDrugHistGrid(){
	var totcol = grd_mediday.getFormatColCount();
	for(var i = totcol; i >= 1; i--){
		grd_mediday.deleteContentsCol(i);
	}
}

/**
 * 조회 기간 초기화
 *
 */ 
function fInitSrchTerm(ioflag){
	if( ioflag == "O" ){
		//3개월전~현재까지 조회기간 설정
		ds_cond.setColumn(0, "termflag", "3");
	}else{
		//전일~현재까지 조회기간 설정
		ds_cond.setColumn(0, "termflag", "0");  //입원일~오늘-1일
	}
	fSettingSrchTerm();
}

/**
 * 조회 기간 설정
 *
 */ 
function fSettingSrchTerm(){
	var number;
	var period;
	
	var termFlag = ds_cond.getColumn(0, "termflag");
	var currDD   = utlf_getCurrentDate();
	
	switch( termFlag ){
		case "1" :  //1일
			number = 1;
			period = "D";
			break;
		case "2" :  //1개월
			number = 1;
			period = "M";
			break;
		case "3" :  //3개월
			number = 3;
			period = "M";
			break;
		case "4" : //6개월
			number = 6;
			period = "M";
			break;
		case "5" : //9개월
			number = 9;
			period = "M";
			break;
		case "6" : //1년
			number = 1;
			period = "Y";
			break;
		case "0" : //입원일~전일
			number = 1;
			period = "D";
			break;
	}
	
	var fromdd, todd;
	var idate = new Date();
	
	if( termFlag == "0" ){
		fromdd = utlf_isNull(ds_paminfo.getColumnInfo("indd")) ? currDD : ds_paminfo.getColumn(0, "indd");		
		todd   = idate.getAddDate(parseInt(number) * -1, period).getDateFormat();
	}else{		
		fromdd = idate.getAddDate(parseInt(number) * -1, period).getDateFormat();	
		todd   = currDD;
	}
	
	ds_cond.setColumn(0, "fromdd", fromdd);
 	ds_cond.setColumn(0, "todd", todd);
}

function grd_medilist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row < 0) return;
	
	grdf_setSelectedCell(obj, e);
	
	pmn_menu.trackPopup(e.screenX,e.screenY);
}

function pmn_menu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id + "()");
}

//약품편람
function fDrugInfo() {
	var sDrugCd = ds_medilist.getColumn(ds_medilist.rowposition, "prcpcd");
	
	lf_DrugInfo(sDrugCd);
}]]></Script>
  </Form>
</FDL>