YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SPPIJ03306_DRG질병군우선순위관리.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SPPIJ03306" position="absolute 0 0 960 660" titletext="DRG 질병군 우선순위 관리" onload="SPPIJ03306_onload">
    <Layouts>
      <Layout>
        <Div id="grp_tle" position="absolute 0 0 865 13" style="">
          <Layouts>
            <Layout>
              <Static id="cap_title" class="tit_1" position="absolute 0 0 216 15" style="" text="DRG 질병군 우선순위 관리" />
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_biz" scrollbars="autoboth" position="absolute 0 28 942 620" style="">
          <Layouts>
            <Layout>
              <Grid id="grd_diaggruplist" binddataset="ds_main_diaggruplist_diaggrup" class="datagrid3" position="absolute 0 77 940 591" style="" onmousedown="grp_biz_grd_diaggruplist_onmousedown" onkillfocus="grp_biz_grd_diaggruplist_onkillfocus">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="90" />
                      <Column size="100" />
                      <Column size="44" />
                      <Column size="43" />
                      <Column size="125" />
                      <Column size="40" />
                      <Column size="450" />
                      <Column size="50" />
                      <Column size="100" />
                      <Column size="50" />
                      <Column size="105" />
                    </Columns>
                    <Rows>
                      <Row size="23" band="head" />
                      <Row size="23" />
                    </Rows>
                    <Band id="head">
                      <Cell text="진료과" />
                      <Cell col="1" text="분류" />
                      <Cell col="2" text="순위" />
                      <Cell col="3" text="SEQ" />
                      <Cell col="4" text="질병군범주" />
                      <Cell col="5" text="DRG&#xA;유무" />
                      <Cell col="6" text="해당 주진단․시술코드 및 부가코드" />
                      <Cell col="7" text="등록자" />
                      <Cell col="8" text="등록일자" />
                      <Cell col="9" text="수정자" />
                      <Cell col="10" text="수정일자" />
                    </Band>
                    <Band id="body">
                      <Cell text="bind:orddeptcd" />
                      <Cell col="1" text="bind:classcode" />
                      <Cell col="2" text="bind:ranking" />
                      <Cell col="3" text="bind:seq" />
                      <Cell col="4" text="bind:diaggrup" />
                      <Cell col="5" text="bind:drgyn" />
                      <Cell col="6" text="bind:opcodedesc" />
                      <Cell col="7" text="bind:fstrgstrid" />
                      <Cell col="8" text="bind:fstrgstdt" />
                      <Cell col="9" text="bind:lastupdtrid" />
                      <Cell col="10" text="bind:lastupdtdt" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static id="cap_judgtrgtman" class="tit_2" position="absolute 4 56 290 69" style="" text="DRG 진료과별 질병군 우선순위 리스트" />
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 0 72 940 75" style="" anchor="default" />
              <Div id="group1" position="absolute 0 5 940 45" style="align: top;">
                <Layouts>
                  <Layout>
                    <Shape id="roundrect3" anchor="default" type="roundrectangle" position="absolute 0 0 940 40" style="" />
                    <Button id="btn_select" class="btn1_letter2" taborder="32" position="absolute 875 10 931 32" style="" text="조회" onclick="grp_biz_group1_btn_select_onclick" />
                    <Shape id="line3" class="line_4" linetype="vertical" position="absolute 860 5 863 38" style="" anchor="default" />
                    <Static id="caption2" class="search_name" position="absolute 8 11 95 28" style="" text="진료과 :" />
                    <Combo innerdataset="ds_hidden_list1_deptlist" datacolumn="depthngnm" codecolumn="deptcd" columncount="-1" rowcount="-1" id="cmb_orddeptcd" position="absolute 100 10 200 29" style="" onitemchanged="grp_biz_group1_cmb_orddeptcd_onitemchanged" />
                  </Layout>
                </Layouts>
              </Div>
              <Button id="btn_excelsave" class="btn2_letter4" position="absolute 871 52 935 71" style="" text="엑셀저장" onclick="grp_biz_btn_excelsave_onclick" />
              <Button id="button1" class="btn5_letter2" visible="false" position="absolute 828 52 870 71" style="" text="저장" onclick="grp_biz_button1_onclick" />
              <Button id="button2" class="btn2_letter3" visible="false" position="absolute 720 52 773 71" style="" text="행종료" onclick="grp_biz_button2_onclick" />
              <Button id="button3" class="btn2_letter3" visible="false" position="absolute 774 52 827 71" style="" text="행추가" onclick="grp_biz_button3_onclick" />
              <Grid id="datagrid1" binddataset="ds_hidden_list1_deptlist" visible="false" position="absolute 500 40 550 75" style="">
                <Formats>
                  <Format id="default">
                    <Rows>
                      <Row size="24" band="head" />
                      <Row size="24" />
                    </Rows>
                    <Band id="head">
                      <Cell text="caption1" />
                      <Cell col="1" text="caption2" />
                      <Cell col="2" text="caption3" />
                    </Band>
                    <Band id="body">
                      <Cell text="bind:deptcd" />
                      <Cell col="1" text="bind:depthngnm" />
                      <Cell col="2" text="bind:deptengabbr" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_cancel" class="btn4_letter2" position="absolute 884 622 940 644" style="" text="종료" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_PAM" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="PK042list" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="PK042list"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="orddeptcd" type="STRING" size="256" />
          <Column id="instcd" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="orddeptcd"></Col>
            <Col id="instcd">031</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_popupmenu_clcj" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_popupmenu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_main_diaggruplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="diaggrup" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="diaggrup"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_popupmenu_clcj_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="name" type="STRING" size="256" />
          <Column id="func" type="STRING" size="256" />
          <Column id="name" type="STRING" size="256" />
          <Column id="func" type="STRING" size="256" />
          <Column id="name" type="STRING" size="256" />
          <Column id="func" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="name">행 추가</Col>
            <Col id="func">fSpclGridInsertRow</Col>
          </Row>
          <Row>
            <Col id="name">-</Col>
            <Col id="func"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.group1.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SPPIJ03306_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

					// 화면을 초기화한다.
					fInitialize();

}

include '../../.._com_commonweb_js_common.js'
include '../../.._com_commonweb_js_dateHelper.js'
include '../../.._com_commonweb_js_numericHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'
include '../../.._pam_pamcomnweb_js_PAM001.js'

				var gToday = new Date();
				var gBaseyear  = gToday.getDateFormat("YYYY");	// (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
				var gBasemonth = gToday.getDateFormat("MM");
				var gBaseday   = gToday.getDateFormat("DD");
				var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
				var gCurrentym  = gBaseyear + gBasemonth;

				// -----------------------
				// ▶ 화면초기화
				// -----------------------
				function fInitialize() {

//					submit("TRPIJ00203", false);
var oParam = {};
    oParam.id          = "TRPIJ00203";
    oParam.service     = "bfjudgapp.InHospJudgTrgtMan";
    oParam.method      = "reqGetDeptList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=deptlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ00203";

tranf_submit(oParam);
/*
function cf_TRPIJ00203(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ00203(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ00203") > -1
arErrorCode.pop("TRPIJ00203") < 0
*/



					ds_init_orddeptcd2.copyData(ds_hidden_tmp_orddeptcd2); 

					// 2013.08.27 - DRG 질환 대분류 원무공통코드조회
					var arrParam = [ {dsNm: "ds_init_PAM_PK042list"
							, 
                  cdGrpId: 
									"PK042"
									 } ];
pamfGetCodeList(arrParam, );

//model.refresh();

					grp_biz.datagrid1.sort(1,1,grp_biz.datagrid1.rows-1,2)	= "asc";
					grp_biz.datagrid1.gridToInstance();
					grp_biz.group1.btn_select.dispatch("DOMActivate");

				}

				// ----------------------------------------------------------------------
				// ▶ 동일진료일 명세서조회
				// ----------------------------------------------------------------------				
				function fGetDocuList() {

					var chk = true;
//					if (ds_send.getColumn(0, "orddd") == "") {
//						chk = false;
//						sysf_messageBox("기준년월은", "I003");	//I003=필수입력입니다.	
//						ipt_orddd.setFocus();
//					} 

					if (chk == true) {
//						submit("TRPIJ03306");			
var oParam = {};
    oParam.id          = "TRPIJ03306";
    oParam.service     = "bfjudgapp.DRGCdIF";
    oParam.method      = "reqGetDrgDiagGroupRank";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=rslt";
    oParam.async       = false;
    oParam.callback    = "cf_TRPIJ03306";

tranf_submit(oParam);
/*
function cf_TRPIJ03306(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPIJ03306(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPIJ03306") > -1
arErrorCode.pop("TRPIJ03306") < 0
*/


					}
				}

									// 화면을 초기화한다.
				function fSpclGridInsertRow(){
					grd_opcdlist.AddRow();
					grd_opcdlist.bottomRow = grd_opcdlist.rows;
				}

				function fSpclGridDeleteRow(){
					for (var i = 0; i < grd_opcdlist.selectedRows; i++) {
						var sel = grd_opcdlist.selectedRow(i);
						grd_opcdlist.rowstatus(sel) = "4";
					}
				}

function grp_biz_grd_diaggruplist_onmousedown(obj:Grid, e:GridMouseEventInfo) {

						if (event.button == 3) {	// 3 : 오른쪽 버튼
							if (grd_opcdlist.isCell(event.target) && grd_opcdlist.mouseRow >= grd_opcdlist.fixedrows) {
								window.setPopupMenu(true, "ds_hidden_popupmenu_clcj_item", "name", "func", false);
							} else {
								window.showPopupMenu(true);
								window.setPopupMenu(true, "ds_hidden_popupmenu_clcj_item", "name", "func", false);
							}
						}

}

function grp_biz_grd_diaggruplist_onkillfocus(obj:Grid, e:KillFocusEventInfo) {

						window.setPopupMenu(false);

}

function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo) {

						fGetDocuList();

}

function grp_biz_group1_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {

							fGetDocuList();

}

function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo) {

					grd_opcdlist.gridToInstance();
					if (grd_opcdlist.rows > 1) {

						var fileName = window.fileDialog("save", "", false, grp_tle.cap_title.value, "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
						if (fileName != "") {
							grd_opcdlist.saveExcel(fileName, "sheetname:;colhiddenextend:true;rowhiddenextend:false;col_3:label;col_4:label;col_5:label;col_6:label;", true, true, "", "", true);
						}
					} else {
						sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
					}								

}

function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo) {

						var updtdata = getGridUpdateData(grd_opcdlist);
						if (updtdata == "") {
						 	sysf_messageBox("변경된 데이터가","I004");
							return;
						}

						for (var i=0; i < grd_opcdlist.rows; i++){
							if ((grd_opcdlist.rowStatus(i) == 1 || grd_opcdlist.rowStatus(i) == 2 || grd_opcdlist.rowStatus(i) == 3) &&
							(grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("opedicode")).length == 0 
								|| grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("orddeptcd")).length ==0
								|| grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("opgbn")).length ==0
								|| grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("fromdd")).length ==0
								|| grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("todd")).length ==0))
							{	
								var errmsg = "";
								if (grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("todd")).length ==0) 			
								{
									errmsg = grd_opcdlist.labelMatrix(0,grd_opcdlist.colRef("todd"));
								}
								if (grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("fromdd")).length ==0) 			
								{
									errmsg = grd_opcdlist.labelMatrix(0,grd_opcdlist.colRef("fromdd"));
								}
								if (grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("opgbn")).length ==0) 			
								{
									errmsg = grd_opcdlist.labelMatrix(0,grd_opcdlist.colRef("opgbn"));
								}
								if (grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("orddeptcd")).length ==0) 	
								{
									errmsg = grd_opcdlist.labelMatrix(0,grd_opcdlist.colRef("orddeptcd"));
								}
								if (grd_opcdlist.valueMatrix(i,grd_opcdlist.colRef("opedicode")).length == 0 ) 	
								{
									errmsg = grd_opcdlist.labelMatrix(0,grd_opcdlist.colRef("opedicode"));
								}

								sysf_messageBox(errmsg.split("\n").join("")+"는","I003");
								return false;
							} 
						}

						if (sysf_messageBox("저장", "S001") == 6) {
							ds_send.setColumn( 0, "opcdlist",grd_opcdlist.getUpdateData());
//							if ( submit("TXPIJ03300") ) {
var oParam = {};
    oParam.id          = "TXPIJ03300";
    oParam.service     = "bfjudgapp.DRGCdIF";
    oParam.method      = "reqExeDrgOperateCode";
    oParam.inds        = "srch=ds_ req=ds_";
    oParam.outds       = "ds_=rslt";
    oParam.async       = false;
    oParam.callback    = "cf_TXPIJ03300";

tranf_submit(oParam);
/*
function cf_TXPIJ03300(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TXPIJ03300(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TXPIJ03300") > -1
arErrorCode.pop("TXPIJ03300") < 0
*/


								sysf_messageBox("저장이","I002");

							}
						}

}

function grp_biz_button2_onclick(obj:Button, e:ClickEventInfo) {

						fSpclGridDeleteRow();

}

function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo) {

						fSpclGridInsertRow();

}

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