YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SMPIJ02901_항암제투여현황제외처방관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIJ02901" position="absolute 0 0 746 653" titletext="항암제 투여 현황 제외 처방 등록 관리" oninit="SMPIJ02901_oninit" onload="SMPIJ02901_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 26 742 625" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Grid position="absolute 1 78 741 592" id="grd_prcplist" class="datagrid3" binddataset="ds_main_prcplist" anchor="all" autofittype="col" onrbuttondown="grp_biz_grd_prcplist_onrbuttondown" onenteredit="grp_biz_grd_prcplist_onenteredit" onkeyup="grp_biz_grd_prcplist_onkeyup">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="24"/>
                      <Column size="68"/>
                      <Column size="160"/>
                      <Column size="78"/>
                      <Column size="71"/>
                      <Column size="60"/>
                      <Column size="101"/>
                      <Column size="47"/>
                      <Column size="100"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="cdid"/>
                      <Cell col="1"/>
                      <Cell col="2" text="처방코드"/>
                      <Cell col="3" text="처방명"/>
                      <Cell col="4" text="시작일자"/>
                      <Cell col="5" text="종료일자"/>
                      <Cell col="6" text="등록자"/>
                      <Cell col="7" text="등록일자"/>
                      <Cell col="8" text="수정자"/>
                      <Cell col="9" text="수정일자"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:cdid"/>
                      <Cell col="1" celltype="head"/>
                      <Cell col="2" displaytype="text" edittype="text" editfilter="upper,number,char" style="align:left middle;" text="bind:cdnm"/>
                      <Cell col="3" style="align:left middle;" text="bind:detldesc"/>
                      <Cell col="4" displaytype="date" edittype="text" style="align:center;" text="bind:fromdd" mask="yyyy-MM-dd" enable="false"/>
                      <Cell col="5" displaytype="date" edittype="text" style="align:center;" text="bind:todd" mask="yyyy-MM-dd" enable="false"/>
                      <Cell col="6" displaytype="normal" edittype="none" text="bind:fstrgstrid"/>
                      <Cell col="7" displaytype="date" edittype="none" text="bind:fstrgstdt"/>
                      <Cell col="8" text="bind:lastupdtrid"/>
                      <Cell col="9" displaytype="date" text="bind:lastupdtdt"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="제외 처방 리스트" position="absolute 4 56 238 71" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Shape position="absolute 1 73 741 79" linetype="horizontal" id="line1" class="line_1" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
              <Div position="absolute 0 1 740 41" align="align:center top;" id="group1" anchor="left top right" class="div_SA">
                <Layouts>
                  <Layout>
                    <Button position="absolute 675 9 731 31" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 657 4 663 37" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 507 52 587 71" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
              <Button position="absolute 696 52 738 71" id="button1" class="btn5" text="저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
              <Button position="absolute 588 52 641 71" id="button2" class="btn2" text="행삭제" anchor="top right" onclick="grp_biz_button2_onclick"/>
              <Button position="absolute 642 52 695 71" id="button3" class="btn2" text="행추가" anchor="top right" onclick="grp_biz_button3_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 680 625 736 647" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
        <Static id="cap_title" text="항암제 투여 현황 제외 처방 등록 관리" class="tit_1" position="absolute 1 0 259 26"/>
        <PopupMenu id="PopupMenu00" position="absolute 773 88 862 134" innerdataset="@ds_menu" captioncolumn="label" idcolumn="func" levelcolumn="level" onmouseleave="PopupMenu00_onmouseleave" onmenuclick="PopupMenu00_onmenuclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING"/>
          <Column id="cdnm" type="STRING"/>
          <Column id="detldesc" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="fstrgstrid" type="STRING"/>
          <Column id="fstrgstdt" type="STRING"/>
          <Column id="lastupdtrid" type="STRING"/>
          <Column id="lastupdtdt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <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">fSpclGridInsertRow</Col>
            <Col id="level">0</Col>
          </Row>
          <Row>
            <Col id="label">-</Col>
          </Row>
          <Row>
            <Col id="label">행 삭제</Col>
            <Col id="func">fSpclGridDeleteRow</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="cdgupid" type="STRING" size="256"/>
          <Column id="cd_name" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_smpic00200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="con1_dd" type="STRING" size="256"/>
          <Column id="con2_gsflag" type="STRING" size="256"/>
          <Column id="con3_search1" type="STRING" size="256"/>
          <Column id="srchdrugcd" type="STRING" size="256"/>
          <Column id="con5_insu" type="STRING" size="256"/>
          <Column id="con_ordinptflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_mech" 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 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";

var gToday = new Date();
var gBaseyear  = gToday.getDateFormat("YYYY");
var gBasemonth = gToday.getDateFormat("MM");
var gBaseday   = gToday.getDateFormat("DD");
var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
var gCurrentym  = gBaseyear + gBasemonth;
				
function SMPIJ02901_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIJ02901_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_prcplist);
	grdf_setRowTypeIcon(grp_biz.grd_prcplist, 1);
	fInitialize();
}

function fInitialize()
{	
	ds_send.copyData(arg_ds_temp)
	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	if (ds_send.getColumn(0,"cdgrupid") == "PK044"){
		cap_title.text = "항암제 투여 현황 제외 처방 등록 관리";
		this.titletext = "항암제 투여 현황 제외 처방 등록 관리";
		grp_biz.cap_judgtrgtman.text = "제외 처방 리스트";
	} else if(ds_send.getColumn(0,"cdgrupid") == "PK252") {
		cap_title.text = "항암제 투여 현황 포함 처방 등록 관리";	
		this.titletext = "항암제 투여 현황 포함 처방 등록 관리";
		grp_biz.cap_judgtrgtman.text = "포함 처방 리스트";
	}
	
	grp_biz_group1_btn_select_onclick();
}

function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDocuList();
}

function fGetDocuList()
{
	var chk = true;
	
	if (chk == true) 
	{
		var oParam = {};
			oParam.id          = "TRPIJ02903";
			oParam.service     = "bfjudgapp.InHospJudg";
			oParam.method      = "reqGetStageHistoryNotPrcpcd";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_prcplist=rslt";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIJ02903";

		tranf_submit(oParam);		
	}
}
//행추가
function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridInsertRow();
}
//행삭제
function grp_biz_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}
//종료
function btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function fSpclGridInsertRow()
{
	var row = ds_main_prcplist.addRow();
	ds_main_prcplist.setColumn(row, "cdgrupid", ds_send.getColumn(0,"cdgrupid"));
	ds_main_prcplist.setColumn(row, "fromdd", gCurrentdd);
	ds_main_prcplist.setColumn(row, "todd", "99991231");
	
}

function fSpclGridDeleteRow()
{
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_prcplist);
	grdf_setStatus(grp_biz.grd_prcplist, "D", SelectedRows);
}
//저장
function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grp_biz.grd_prcplist);
	
	if (updtdata.rowcount == 0) 
	{
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	for (var i = 0; i < ds_main_prcplist.rowcount; i++)
	{
		if ((ds_main_prcplist.getRowType(i) == 2 || ds_main_prcplist.getRowType(i) == 4) && 
			(utlf_isNull(ds_main_prcplist.getColumn(i, "cdnm")) || utlf_isNull(ds_main_prcplist.getColumn(i, "fromdd")) || utlf_isNull(ds_main_prcplist.getColumn(i, "todd"))))
		{
			var errmsg = "";
			
			if(utlf_isNull(ds_main_prcplist.getColumn(i, "todd")))
			{
				errmsg = "종료일자";
			}
			
			if(utlf_isNull(ds_main_prcplist.getColumn(i, "fromdd")))
			{
				errmsg = "시작일자";
			}
			
			if(utlf_isNull(ds_main_prcplist.getColumn(i, "cdnm")))
			{
				errmsg = "처방코드";
			}
			
			sysf_messageBox(errmsg +"는","I003");
			return false;
		}
	}
	
	if (sysf_messageBox("저장", "S001") == 6) 
	{
		var oParam = {};
			oParam.id          = "TXPIJ02903";
			oParam.service     = "bfjudgapp.InHospJudg";
			oParam.method      = "reqExeStageHistoryNotPrcpcd";
			oParam.inds        = "req=ds_main_prcplist:U";
			oParam.outds       = "ds_main_prcplist=rslt";
			oParam.async       = false;
			oParam.callback    = "cf_TXPIJ02903";

		tranf_submit(oParam);
	}
}

function cf_TXPIJ02903()
{
	sysf_messageBox("저장이","I002");
}

//엑셀저장
function grp_biz_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_main_prcplist.rowcount > 0) 
	{
		grdf_exportExcel(grp_biz.grd_prcplist, "항암제 투여 현황 제외 처방 등록 관리", "see");
	}
	else 
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");
	}
}

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

function PopupMenu00_onmouseleave(obj:PopupMenu, e:MenuMouseEventInfo)
{
	obj.closePopup();
}

function grp_biz_grd_prcplist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	PopupMenu00.trackPopup(e.screenX,e.screenY);
}

function grp_biz_grd_prcplist_onenteredit(obj:Grid, e:GridEditEventInfo)
{
	if(e.col == 2)
	{
		grp_biz_grd_prcplist_onkeydown();
	}
}

function grp_biz_grd_prcplist_onkeyup(obj:Grid, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetSnglcalcscorcd();
	}
}

function fGetSnglcalcscorcd()
{
	ds_hidden_smpic00200.setColumn(0, "con1_dd", gCurrentdd);
	ds_hidden_smpic00200.setColumn(0, "con2_gsflag", "S");
	ds_hidden_smpic00200.setColumn(0, "con3_search1", "calcscorcd");
	ds_hidden_smpic00200.setColumn(0, "srchdrugcd", ds_main_prcplist.getColumn(ds_main_prcplist.rowposition, "cdnm"));
	ds_hidden_smpic00200.setColumn(0, "con5_insu", "insu");
	ds_hidden_smpic00200.setColumn(0, "con_ordinptflag", "PAM");
	
	frmf_setParameter("openflag", "edicd");
	
	var objArgs = new Object();
		objArgs.arg_ds_temp = ds_hidden_smpic00200; 
		
	frmf_modal("SMPIC00200", "SMPIC00200", objArgs, "", "", "", "", "", "", "", "", "", "M");
	
	if(ds_temp_mech.rowcount == 0)
	{
		sysf_messageBox("수가조회 화면에서 선택한 결과가", "I004");
		return;
	}
	
	if(ds_temp_mech.getColumn(0, "ordinptflag") != "A")
	{
		sysf_messageBox("처방이 불가한 코드", "E008");
		return;
	}
	
	ds_main_prcplist.setColumn(ds_main_prcplist.rowposition, "cdnm", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
	ds_main_prcplist.setColumn(ds_main_prcplist.rowposition, "detldesc", ds_temp_picmmech.getColumn(0, "picmmech_hngnm"));
}



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